Função para verificar load average do servidor

Funciona na maioria dos servers compartilhados:

function get_server_load($windows = 0) {
        $os = strtolower(PHP_OS);
        if(strpos($os, "win") === false) {
  if(file_exists("/proc/loadavg")) {
         $load = file_get_contents("/proc/loadavg");
         $load = explode(' ', $load);
         return $load[0];
  }
  elseif(function_exists("shell_exec")) {
         $load = explode(' ', `uptime`);
         return $load[count($load)-1];
  }
  else {
         return "";
  }
        }
        elseif($windows) {
  if(class_exists("COM")) {
         $wmi = new COM("WinMgmts:\\.");
         $cpus = $wmi->InstancesOf("Win32_Processor");
         
         $cpuload = 0;
         $i = 0;
         while ($cpu = $cpus->Next()) {
    $cpuload += $cpu->LoadPercentage;
    $i++;
         }
         
         $cpuload = round($cpuload / $i, 2);
         return "$cpuload%";
  }
  else {
         return "";
  }
        }
}

Use com moderação 😉

Inserindo dados de um select multiplo no banco de dados

Para que o php reconheça todas as opções setadas em um select múltiplo, devemos por [] após o nome do select

<form method=POST...>
<select name=estados[]' multiple>
<option value='SP'>SP</option>
<option value='RJ'>RJ</option>
<option value='RS'>RS</option>
</select>
</form>

Para campos do tipo SET no MySQL, basta usar um implode pra popular os dados:

<?php
$estados = implode(',', $_POST['estados']);

Alguns regex (expressões regulares) úteis

Tinha isso guardado num txt bem antigo, mas me são de grande utilidade:

#Email:
^([0-9,a-z,A-Z]+)([.,_,-]([0-9,a-z,A-Z]+))*[@]([0-9,a-z,A-Z]+)([.,_,-]([0-9,a-z,A-Z]+))*[.]([a-z,A-Z]){2,3}([0-9,a-z,A-Z])?$

#CEP:
^[0-9]{5}-{1}[0-9]{3}$

#Data (mm/dd/yyyy):
^((0?[1-9]|[12]d)/(0?[1-9]|1[0-2])|30/(0?[13-9]|1[0-2])|31/(0?[13578]|1[02]))/(19|20)?d{2}$

#Data (dd/mm/yyyy):
^(0[1-9]|[12][0-9]|3[01])\/(0[1-9]|1[012])\/[12][0-9]{3}$
#Hora:
^(?:[01]d|2[0-3]):[0-5]d:[0-5]d$

#Decimal:
^[+-]?((d+|d{1,3}(,d{3})+)(.d*)?|.d+)$

#float ou int
^([0-9])+(\.[0-9]{1,2})?$

#CPF:
^[0-9]{3}.[0-9]{3}.[0-9]{3}-[0-9]{2}$

Lista de Mobile User Agents

O site abaixo contém uma lista bem completa de user agent usado por dispositivos móveis, na maioria celulares.

http://www.zytrax.com/tech/web/mobile_ids.html

Se deseja parsear o site e obter uma lista limpa, pode usar o código abaixo que é disponibilizado no próprio site

$page = file_get_contents('http://www.zytrax.com/tech/web/mobile_ids.html');
preg_match_all('/<(p(?:re)?)[^>]*class="g-c-[ns]"[^>]*>(.*?)</1>/s', $page, $m);

$agents = array();
foreach($m[2] as $agent) {
  $split = explode("n", trim($agent));
  foreach($split as $item) {
    $agents[] = trim($item);
  }
}
// $agents now holds every user agent string, one per array index, trimmed
foreach($agents as $agent) {
 echo($agent."n");
}

———————————————-
Posted Listening: “Starbreaker – Judas Priest”

Método para validar erros em expressões regulares

Em um determinado momento, tive a necessidade de efetuar validações em expressões regulares inseridas pelo usuário em textbox.

Abaixo segue método que eu utilizei para esta validação:

function validaRegex($regex, $escapar=false)
	{
		if($escapar) $regex = str_replace('/', '/', addslashes($regex));
		$teste = null;
		ini_set('track_errors', 1);
		$teste = @preg_match("/{$regex}/", "<a href="http://$1" target="_blank">[LINK]</a>", $teste);
		$ret = @strip_tags($php_errormsg);
		ini_set('track_errors', 0);
		$r = explode(':', $ret);
		return ($ret) ? array(false, trim($r[1])) : Array(true);
	}

Para explicar o funcionamento:
A variável $teste  (sim, faltou criatividade) recebe o resultado do preg_match, sendo que este recebe no primeiro parametro o valor digitado pelo usuário e o segundo parametro pode ser qualquer porcaria que vier em mente, já que o que nos interessa é se o regex do usuário tem erro ou não

O retorno é um array, sendo que a posição [0] retorna True ou False, e, havendo erro  no regex, a posição [1] retorna a mensagem de erro do php

———————————————-
Posted Listening: “Lights Out – UFO”

Function para retornar todos os IPs de um range

Esses tempos tive a necessidade de obter uma lista de todos os ips contidos em um range.

Se fossem somente ranges /24 seria muito fácil, porém para o sistema que eu estava desenvolvendo havia necessidade de escalabilidade, podendo ser inserido qualquer range como /16 /30 /28, etc.

Depois de procurar muito no oráculo google achei algo que se aproximava do que eu precisava, a classe net/ipv4 do PEAR, eu digo que se aproximava porque ela retorna o primeiro e o último IP de qualquer range, mas não a lista completa.

Com a classe ipv4 em mãos, resolví escrever a function abaixo que me retorna a lista completa:

function calculateIpRange($cidr) {
        $cidr = trim($cidr);
        if(!preg_match("/[0-9]{1,3}.[0-9]{1,3}.[0-9]{1,3}.[0-9]{1,3}/[0-9]{1,2}/", $cidr)){
                return Array(false, 'O IP deve estar no formato XXX.XXX.XXX.XXX/XX --> Exemplo 192.168.0.50/28');
        }
        if(!@include_once 'Net/IPv4.php')
        {
                return Array(false, 'Classe Net_IPv4 não está instalada --> http://pear.php.net/package/Net_IPv4/');
        }

        if(!is_callable('Net_IPv4', 'parseAddress'))
        {
                return Array(false, 'Metodo Net_IPv4::parseAddress inexistente');
        }
        $ip_calc = Net_IPv4::parseAddress($cidr);
        if($ip_calc->message)
        {
                return Array(False, $ip_calc->message);
        }

        $s = sprintf("%u",ip2long($ip_calc->network));
        $e = sprintf("%u",ip2long($ip_calc->broadcast));
        for($i=$s;$i<=$e;$i++){
                $r[] = long2ip($i);
        }
        return Array(
                true,
                'info' => Array(
                        'total' => sizeof($r),
                        'source'        => $cidr,
                        'network' => $ip_calc->network,
                        'broadcast' => $ip_calc->broadcast,
                        'netmask'       => $ip_calc->netmask
                ),
                'data' => $r
        );
}

NOTA: Este método necessita da classe net/ipv4 do pear instalada no servidor, o que pode ser realizado com o comando abaixo:

pear install Net_IPv4-1.3.4

Na dúvida, consulte seu provedor para instalação da mesma no servidor 😉

———————————————-
Posted Listening: “Starblind – Iron Maiden”