Загрузка цп

Разработка своих веб-приложений и страничек

Re: Загрузка цп

Сообщение DPX-Infinity » 15 сен 2009, 21:10

не пашет в каком смысле? выдаёт ошибку, даёт неверные результаты, ничего не печатает? больше надо инфы, больше.
Изображение
Переходите на Jabber! За ним будущее!
Желаю вам опенсорса!
Аватара пользователя
DPX-Infinity
Активный участник
 
Сообщения: 723
Зарегистрирован: 02 сен 2007, 20:45
Откуда: Саратов

Re: Загрузка цп

Сообщение doliar » 15 сен 2009, 21:14

:shock:
А что разве не понятно что он не вытянул функцию: rfts
Поэтому у него и не работает :)
Изображение

Консультаций по TBDev через icq неосуществляю!
Аватара пользователя
doliar
Автор
 
Сообщения: 732
Зарегистрирован: 16 янв 2008, 15:05
Откуда: Саратов, Волжский р-он
Домен: tbdev-info.vfose.ru

Re: Загрузка цп

Сообщение vk » 15 сен 2009, 23:30

DPX-Infinity писал(а):не пашет в каком смысле? выдаёт ошибку, даёт неверные результаты, ничего не печатает? больше надо инфы, больше.

Пустая стр и ничего кроме...
doliar писал(а)::shock:
А что разве не понятно что он не вытянул функцию: rfts
Поэтому у него и не работает :)

поподробнее плиз, где что упущено
vk
Активный участник
 
Сообщения: 95
Зарегистрирован: 22 фев 2009, 15:24

Re: Загрузка цп

Сообщение doliar » 16 сен 2009, 09:54

Код: Выделить всёРазвернуть

function rfts
($strFileName, &$strRet, $intLines = 0, $intBytes = 4096, $booErrorRep = true) {
  $strFile = "";
  $intCurLine = 1;
  if (file_exists($strFileName)) {
    if ($fd = fopen($strFileName, 'r')) {
      while (!feof($fd)) {
        $strFile.= fgets($fd, $intBytes);
        if ($intLines <= $intCurLine && $intLines != 0) {
          break;
        } else {
          $intCurLine++;
        }
      }
      fclose($fd);
      $strRet = $strFile;
    } else {
      if ($booErrorRep) {
        die('fopen(' . $strFileName . ') file can not read by phpsysinfo');
      }
      return false;
    }
  } else {
    if ($booErrorRep) {
      die('file_exists(' . $strFileName . ') the file does not exist on your machine');
    }
    return false;
  }
  return true;
}

function computer_load($avgs = false) {
    if ($avgs) {
        if (rfts('/proc/loadavg', $buf)) {   // Изменения здесь
            $result = preg_split("/\s/", $buf, 4);
            // don't need the extra values, only first three
            unset($result[3]);
        } else {
            $result = array('N.A.', 'N.A.', 'N.A.');
        }
    } else {
        if (rfts('/proc/stat', $buf, 1)) {
            sscanf($buf, "%*s %Ld %Ld %Ld %Ld", $ab, $ac, $ad, $ae);
            // Find out the CPU load
            // user + sys = load
            // total = total
            $load = $ab+$ac+$ad; // cpu.user + cpu.sys
            $total = $ab+$ac+$ad+$ae; // cpu.total
            // we need a second value, wait 1 second befor getting (< 1 second no good value will occour)
            sleep(1);
            rfts('/proc/stat', $buf, 1);
            sscanf($buf, "%*s %Ld %Ld %Ld %Ld", $ab, $ac, $ad, $ae);
            $load2 = $ab+$ac+$ad;
            $total2 = $ab+$ac+$ad+$ae;
            $result = (100*($load2-$load)) /($total2-$total);   // И здесь
        }
    }
    return $result;
}
 

error_reporting
(E_ALL & ~E_NOTICE);
echo computer_load(); 


Вот так должно работать. Если канечно ОС линукс.
Изображение

Консультаций по TBDev через icq неосуществляю!
Аватара пользователя
doliar
Автор
 
Сообщения: 732
Зарегистрирован: 16 янв 2008, 15:05
Откуда: Саратов, Волжский р-он
Домен: tbdev-info.vfose.ru

Re: Загрузка цп

Сообщение DPX-Infinity » 17 сен 2009, 07:57

а, ну мб) я уже не помню какие там встроенные функции в пхп)
Изображение
Переходите на Jabber! За ним будущее!
Желаю вам опенсорса!
Аватара пользователя
DPX-Infinity
Активный участник
 
Сообщения: 723
Зарегистрирован: 02 сен 2007, 20:45
Откуда: Саратов

Пред.

Вернуться в PHP, HTML, CSS...

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 22

cron