• <ins id="pjuwb"></ins>
    <blockquote id="pjuwb"><pre id="pjuwb"></pre></blockquote>
    <noscript id="pjuwb"></noscript>
          <sup id="pjuwb"><pre id="pjuwb"></pre></sup>
            <dd id="pjuwb"></dd>
            <abbr id="pjuwb"></abbr>

            S.l.e!ep.¢%

            像打了激速一樣,以四倍的速度運轉,開心的工作
            簡單、開放、平等的公司文化;尊重個性、自由與個人價值;
            posts - 1098, comments - 335, trackbacks - 0, articles - 1
              C++博客 :: 首頁 :: 新隨筆 :: 聯系 :: 聚合  :: 管理

            #!/usr/bin/perl
            ?use strict;

            ?# 打印此腳本使用信息和輸出說明。

            ?################################################################
            ?# Output the usage of this perl script
            ?################################################################
            ?sub usage
            ?{
            ??? print "memmonitor: Monitor system memory usage\n";
            ??? print "1. if used memory is more than 75% of total memory, memmonitor\n";
            ??? print "will output one warning message per minites.\n";
            ??? print "2. if used memory is more than 90% of total momory, memmonitor\n";
            ??? print "will kill the processes that occupied the most memory untill\n";
            ??? print "used memory is less than 75% of total memory.\n\n";

            ??? return 0;
            ?}

            ?usage

            ?my $total_mem;
            ?my $used_mem;
            ?my $next_line = 0;
            ?my @rc;
            ?my $rate;

            ?# $total_mem 和 $used_mem 變量分別代表了總計實際內存大小和已經使用的內存大小
            ?rc = `vmstat`;
            ?foreach ( @rc ) {
            ??? if ( $next_line ) {
            ????? my @value = split /\s+/, $_;
            ???????? $used_mem = @value[3] * 4;
            ???????? $next_line = 0;
            ???????? last;
            ???? } elsif ( /^.*mem=(\d+)MB$/ ) {
            ???????? $total_mem = $1 * 1024;
            ???? } elsif ( /^.*avm.*$/ ) {
            ???????? $next_line = 1;
            ???? }
            ?}

            ?# 這段代碼使用了 vmstat 命令得到系統內存狀態信息,并對結果進行逐行解析,得到各個字段的數據。

            ?if ( $total_mem ) {
            ??? $rate = $used_mem / $total_mem;
            ?}

            ?# 計算得到了當前全局內存使用率

            ?if ( $rate > 0.75 ) {
            ??? print "Warning: Memory is not enough\n";
            ?}

            ?# 如果內存使用率大于 0.75, 將打印出警告信息。

            ?if ( $rate > 0.9 ) {
            ??? my $line_count = 0;
            ??? my @output = `ps aux | head -1;ps aux | sort -rn +5`;
            ??? foreach ( @output ) {
            ??????? if ( $line_count ) {
            ??????????? my @killed_process = split /\s+/,$_;
            ??????????? print "Warning: Out of memory. Kill process: @killed_process[1]\n";
            ??????????? # 發送警告信息給 root 用戶,保存程序運行記錄。
            `echo "Process @killed_process[1] has been killed because of unlimited memory \
            allocation" | mail -s "Out of memory" root`

            ??????????? `kill -11 @killed_process[1]`;
            ??????????? last;
            ??????? }
            ??????? $line_count = $line_count + 1;
            ??? }

            ?# 如果內存使用率大于 0.9,腳本將調用 ps 命令并且找出內存使用率最高的進程,打印出將要殺掉進程的警告信息,
            ?#殺掉內存使用率最高的進程。 此過程將循環進行知道內存占用率低于 0.9
            ?}

            亚洲国产成人久久综合碰| 无码伊人66久久大杳蕉网站谷歌| 亚洲精品无码久久久影院相关影片| 国产成年无码久久久免费| av无码久久久久久不卡网站| 亚洲国产精品久久久久网站| 久久久久久青草大香综合精品| 亚洲狠狠婷婷综合久久蜜芽 | 久久免费99精品国产自在现线| 久久久精品波多野结衣| 欧美喷潮久久久XXXXx| 久久久久久极精品久久久| 日本久久久久亚洲中字幕| 久久婷婷五月综合色99啪ak| 久久人人爽人人爽人人片AV不| 人人狠狠综合久久亚洲高清| 2021久久国自产拍精品| 99蜜桃臀久久久欧美精品网站| 欧美激情精品久久久久| 精品久久无码中文字幕| 欧美日韩精品久久免费| 亚洲精品99久久久久中文字幕 | 久久久久国色AV免费看图片| 99久久国产综合精品麻豆| 久久人人爽人人爽人人片AV麻烦| 久久国产成人午夜aⅴ影院| 69国产成人综合久久精品| 久久一日本道色综合久久| 精品国产日韩久久亚洲| 亚洲精品国产第一综合99久久| 久久精品国产精品亚洲人人| 久久精品男人影院| …久久精品99久久香蕉国产| 无码人妻精品一区二区三区久久| 久久精品国产99国产精品导航 | 久久这里只有精品18| 免费无码国产欧美久久18| 久久久久久久久66精品片| 狠狠色丁香婷婷久久综合| 久久强奷乱码老熟女网站| 亚洲国产精品成人AV无码久久综合影院|