<?php
/*
util.inc
part of FreeNAS (http://www.freenas.org)
Copyright (C) 2005-2006 Olivier Cochard-Labbé <olivier@freenas.org>.
All rights reserved.
Based on m0n0wall (http://m0n0.ch/wall)
Copyright (C) 2003-2006 Manuel Kasper <mk@neon1.net>.
All rights reserved.
Redistribution and use in source and binary forms, with or without
modification, are permitted provided that the following conditions are met:
1. Redistributions of source code must retain the above copyright notice,
this list of conditions and the following disclaimer.
2. Redistributions in binary form must reproduce the above copyright
notice, this list of conditions and the following disclaimer in the
documentation and/or other materials provided with the distribution.
THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES,
INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY
AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY,
OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
POSSIBILITY OF SUCH DAMAGE.
*/
/* kill a process by pid file */
function killbypid($pidfile) {
sigkillbypid($pidfile, "TERM");
unlink_if_exists($pidfile);
}
/* sigkill a process by pid file */
function sigkillbypid($pidfile, $sig) {
if (file_exists($pidfile)) {
mwexec("/bin/kill -s $sig `/bin/cat " . $pidfile . "`");
}
}
/* kill a process by name */
function killbyname($procname) {
return mwexec("/usr/bin/killall " . escapeshellarg($procname));
}
/* Force kill a process by name */
function forcekillbyname($procname) {
return mwexec("/usr/bin/killall -9 " . escapeshellarg($procname));
}
/* return the subnet address given a host address and a subnet bit count */
function gen_subnet($ipaddr, $bits) {
if (!is_ipaddr($ipaddr) || !is_numeric($bits))
return "";
return long2ip(ip2long($ipaddr) & gen_subnet_mask_long($bits));
}
/* return the highest (broadcast) address in the subnet given a host address and a subnet bit count */
function gen_subnet_max($ipaddr, $bits) {
if (!is_ipaddr($ipaddr) || !is_numeric($bits))
return "";
return long2ip(ip2long($ipaddr) | ~gen_subnet_mask_long($bits));
}
/* returns a subnet mask (long given a bit count) */
function gen_subnet_mask_long($bits) {
$sm = 0;
for ($i = 0; $i < $bits; $i++) {
$sm >>= 1;
$sm |= 0x80000000;
}
return $sm;
}
/* same as above but returns a string */
function gen_subnet_mask($bits) {
return long2ip(gen_subnet_mask_long($bits));
}
function is_numericint($arg) {
return (preg_match("/[^0-9]/", $arg) ? false : true);
}
/* returns true if $ipaddr is a valid dotted IPv4 address */
function is_ipaddr($ipaddr) {
if (!is_string($ipaddr))
return false;
$ip_long = ip2long($ipaddr);
$ip_reverse = long2ip($ip_long);
if ($ipaddr == $ip_reverse)
return true;
else
return false;
}
/* returns true if $ipaddr is a valid dotted IPv4 address or an alias thereof */
function is_ipaddroralias($ipaddr) {
global $aliastable;
if (isset($aliastable[$ipaddr]) && is_ipaddr($aliastable[$ipaddr]))
return true;
else
return is_ipaddr($ipaddr);
}
/* returns true if $ipaddr is a valid dotted IPv4 address or any alias */
function is_ipaddroranyalias($ipaddr) {
global $aliastable;
if (isset($aliastable[$ipaddr]))
return true;
else
return is_ipaddr($ipaddr);
}
/* returns true if $subnet is a valid subnet in CIDR format */
function is_subnet($subnet) {
if (!is_string($subnet))
return false;
list($hp,$np) = explode('/', $subnet);
if (!is_ipaddr($hp))
return false;
if (!is_numeric($np) || ($np < 1) || ($np > 32))
return false;
return true;
}
/* returns true if $subnet is a valid subnet in CIDR format or an alias thereof */
function is_subnetoralias($subnet) {
global $aliastable;
if (isset($aliastable[$subnet]) && is_subnet($aliastable[$subnet]))
return true;
else
return is_subnet($subnet);
}
/* returns true if $hostname is a valid hostname */
function is_hostname($hostname) {
if (!is_string($hostname))
return false;
if (preg_match("/^[a-z0-9\-]+$/i", $hostname))
return true;
else
return false;
}
/* returns true if $desc is a valid description (alphanum and space, _ , - , .)*/
function is_validdesc($desc)
{
if (!is_string($desc))
return false;
if (preg_match("/^[A-Za-z0-9]([A-Za-z0-9_\-\.\s]*[A-Za-z0-9])*$/", $desc))
return true;
else
return false;
}
/* returns true if $login is a valid login name (alphanum,dot, _ , -)*/
function is_validlogin($login)
{
if (!is_string($login))
return false;
if (preg_match("/^[A-Za-z0-9]([A-Za-z0-9_\-\.\s]*[A-Za-z0-9])*$/", $login))
return true;
else
return false;
}
/* returns true if $login is a valid share name (alphanum,dot, _ , -)*/
function is_validsharename($sharename)
{
if (!is_string($sharename))
return false;
if (preg_match("/^[A-Za-z0-9]([A-Za-z0-9_\-\.\s]*[A-Za-z0-9])*$/", $sharename))
return true;
else
return false;
}
/* returns true if $domain is a valid domain name */
function is_domain($domain) {
if (!is_string($domain))
return false;
if (preg_match("/^([a-z0-9\-]+\.?)*$/i", $domain))
return true;
else
return false;
}
/* returns true if $uname is a valid DynDNS username */
function is_dyndns_username($uname) {
if (!is_string($uname))
return false;
if (preg_match("/[^a-z0-9\-.@_]/i", $uname))
return false;
else
return true;
}
/* returns true if $macaddr is a valid MAC address */
function is_macaddr($macaddr) {
if (!is_string($macaddr))
return false;
$maca = explode(":", $macaddr);
if (count($maca) != 6)
return false;
foreach ($maca as $macel) {
if (($macel === "") || (strlen($macel) > 2))
return false;
if (preg_match("/[^0-9a-f]/i", $macel))
return false;
}
return true;
}
/* returns true if $name is a valid name for an alias */
function is_validaliasname($name) {
if (!is_string($name))
return false;
if (!preg_match("/[^a-zA-Z0-9]/", $name))
return true;
else
return false;
}
/* returns true if $port is a valid TCP/UDP port */
function is_port($port) {
if (!is_numericint($port))
return false;
if (($port < 1) || ($port > 65535))
return false;
else
return true;
}
/* returns true if $mtu is a valid MTU size */
function is_mtu($mtu) {
if (!is_numericint($mtu))
return false;
if (($mtu < 100) || ($mtu > 9000))
return false;
else
return true;
}
function get_interface_list() {
global $g;
/* build interface list with netstat */
exec("/usr/bin/netstat -inW -f link", $linkinfo);
array_shift($linkinfo);
$iflist = array();
foreach ($linkinfo as $link) {
$alink = preg_split("/\s+/", $link);
$ifname = chop($alink[0]);
if (substr($ifname, -1) == "*")
$ifname = substr($ifname, 0, strlen($ifname) - 1);
/* FreeNAS add the plip interface to be excluded too */
if (!preg_match("/^(ppp|sl|gif|faith|lo|vlan|tun|plip)/", $ifname)) {
$iflist[$ifname] = array();
$iflist[$ifname]['mac'] = chop($alink[3]);
$iflist[$ifname]['up'] = false;
/* find out if the link on this interface is up */
unset($ifinfo);
exec("/sbin/ifconfig {$ifname}", $ifinfo);
foreach ($ifinfo as $ifil) {
if (preg_match("/status: (.*)$/", $ifil, $matches)) {
if ($matches[1] == "active")
$iflist[$ifname]['up'] = true;
break;
}
}
}
}
return $iflist;
}
function get_mounts_list()
{
// Return list of mounted disk
//example: Array
// [0] => Array
// (
// [mp] => /mnt/ad0s1
// [mdisk] => ad0s1
// )
global $g;
exec("/sbin/mount",$rawdata);
$mountlist = array();
$i=0;
foreach ($rawdata as $line)
{
$aline = explode(" ", $line);
if ((chop($aline[0]) == "/dev/md0") || (chop($aline[0]) == "devfs") || (chop($aline[0]) == "/dev/fd0"))
continue;
$mountlist[$i]['mp']=chop($aline[2]);
// Get the complete name /dev/devicename
$complete=explode("/",chop($aline[0]));
$devname=$complete[2];
// Test if it's a gvinum or gmirror device
if ((strcmp($devname,"gvinum") == 0) || (strcmp($devname,"mirror") == 0))
$devname=$complete[3];
$mountlist[$i]['mdisk']=$devname;
$i++;
}
return $mountlist;
}
function get_mount_use()
{
// Return list of mounted use
//example: Array
// [mount_point_name] => Array
// (
// [capacity] => 48%
// [used] => 2.4G
// [avail] => 2.6G
// [size] => 5.4G
// )
global $config, $g;
exec("/bin/df -h",$rawdata);
$result=array();
foreach ($rawdata as $line) {
/* separe the line by space*/
$aline = preg_split("/[\s,]+/", $line);
$tmp=explode("/",chop($aline[5]));
$mounted_on=$tmp[2];
$capacity = chop($aline[4]);
$avail = chop($aline[3]);
$used = chop($aline[2]);
$size = chop($aline[1]);
if (is_array($config['mounts']['mount'])) {
foreach ($config['mounts']['mount'] as $mountcfg) {
if (strcmp($mounted_on,$mountcfg['sharename']) == 0) {
$result[$mounted_on] = array();
$result[$mounted_on]['capacity']=$capacity;
$result[$mounted_on]['avail']=$avail;
$result[$mounted_on]['used']=$used;
$result[$mounted_on]['size']=$size;
}
}
}
else
return 0;
}
//print_r($result);
return $result;
}
function get_sraid_disks_list()
{
/* Return list of ALL software volume: gvinum, gmirror */
$disklist = array_merge((array)get_gvinum_disks_list(),(array)get_gmirror_disks_list());
return $disklist;
}
function get_gvinum_disks_list()
{
/* Get information about gvinum volume */
global $g;
/* Return list of Software RAID disk */
//[volumename] => Array
// (
// [type] => Software RAID - gvinum
// [desc] => UP
// [size] => 6149 MB
// )
/* Send the shell cmd and get the result*/
exec("/sbin/gvinum list",$rawdata);
foreach ($rawdata as $line) {
/* Split the line using the space as separator */
$aline = preg_split("/\s+/", $line);
/* Get the line that begin with the letter 'V' */
if ($aline[0] != "V")
continue ;
$diskname = chop($aline[1]);
$disklist[$diskname]=array();
$disklist[$diskname]['type'] = "Software RAID - gvinum";
$disklist[$diskname]['size'] = "$aline[7] $aline[8]" ;
$disklist[$diskname]['desc'] = $aline[3];
}
return $disklist;
}
function get_gmirror_disks_list()
{
/* Get information about gmirror volume */
global $g;
//[volumename] => Array
// (
// [type] => Software RAID - gmirror
// [desc] => COMPLETE
// [size] => 6149M
// )
/* Display all configured gmirror volume*/
exec("/sbin/gmirror list",$rawdata);
$foundname = 0 ;
$founddesc = 0 ;
$goodname = 0 ;
foreach ($rawdata as $line) {
/* Use space for break the line */
$aline = preg_split("/\s+/", $line);
// First Step: Getting the array name
// look for this output:
// Geom name: pouet
if ( (strcmp($aline[0],"Geom") == 0) && (strcmp($aline[1],"name:") == 0) ) {
$diskname = $aline[2];
$disklist[$diskname]=array();
$foundname = 1 ;
continue ;
}
// Second Step: Getting the array status
// look for this output:
// State: COMPLETE
if ( (strcmp($aline[0],"State:") == 0) && $foundname) {
$desc = $aline[1];
$disklist[$diskname]['desc'] = $desc;
$founddesc=1;
continue ;
}
// Third Step: Getting the array Size
// look for this output:
// Name: mirror/pouet
// Mediasize: 107373568 (102M)
if (preg_match("/Name: mirror\/(.*)$/", $line, $matches)) {
if ($matches[1]=$diskname) {
$goodname=1;
continue ;
}
}
if (($aline[0] = "Mediasize:") && $goodname) {
// extract the size between the ( )
preg_match("/.*\\(([^\)]*)\).*/",$aline[3],$match);
$disklist[$diskname]['size'] = $match[1];
$disklist[$diskname]['type'] = "Software RAID - gmirror";
// init the check variable for the next RAID volume
$foundname = 0 ;
$founddesc = 0 ;
$goodname = 0 ;
continue ;
}
}
return $disklist;
}
function get_ata_disks_list()
{
/* Return list of ATA disk */
//[ad0] => Array
// (
// [type] => IDE
// [desc] => QUANTUM FIREBALL EX6.4A/A0A.0D00
// [size] => 6149MB
// )
global $g;
/* Recupere le dmesg */
exec("/sbin/dmesg",$rawdmesg);
$disklist = array();
/******* Getting IDE disk informations *******/
exec("/sbin/atacontrol list",$rawdata);
foreach ($rawdata as $line) {
/* Separe la ligne par les espace */
$aline = preg_split("/\s+/", $line);
/* Si ATA alors NEXT */
if ($aline[0] == "ATA")
continue ;
$diskname = chop($aline[2]);
/* Exlude CDROM (acdX) and Empty (no) */
if (!preg_match("/^(acd)/", $diskname ) & $diskname != "no") {
$disklist[$diskname]=array();
$disklist[$diskname]['type'] = "IDE";
/* Match the description witch is include between < and > */
preg_match("/.*\<([^>]*)>.*/",$line,$match);
$disklist[$diskname]['desc'] = $match[1];
/* Looking for the disk size */
foreach ($rawdmesg as $dmesgline) {
/* Take only the first dmesg line */
if (!$disklist[$diskname]['size']) {
/* Separe la ligne par les espace */
$dmesgtab = explode(" ", $dmesgline);
$dmesgtab[0] = rtrim($dmesgtab[0],":");
if ($dmesgtab[0]!="" &&(strcasecmp($dmesgtab[0],$diskname) == 0))
$disklist[$diskname]['size'] = $dmesgtab[1];
}
}
}
}
return $disklist;
}
function get_scsi_disks_list()
{
/* Recupere la liste des disques SCSI */
//[ad0] => Array
// (
// [type] => IDE
// [desc] => QUANTUM FIREBALL EX6.4A/A0A.0D00
// [size] => 6149MB
// )
global $g;
/* Recupere le dmesg */
exec("/sbin/dmesg",$rawdmesg);
/* on envoie la commande d'affichage de la liste des disques*/
exec("/sbin/camcontrol devlist",$rawdata);
foreach ($rawdata as $line) {
/* Get information include between parenthese: (pass0,da0) or (da0,pass0)*/
preg_match("/.*\(([^>]*)\).*/",$line,$match);
/* Sépare le resultat par la virgule */
$temp = preg_split("/,/", $match[1]);
// Check if diskname is the first (da0,pass0) or the second (pass0,da0) arguement
$diskname = $temp[1];
if ($diskname[0] == "p")
$diskname = $temp[0];
/* On exlus les lecteurs cd */
if (!preg_match("/^(cd)/", $diskname )) {
$disklist[$diskname]=array();
$disklist[$diskname]['type'] = "SCSI";
/* Recupčre la description: ce qu'il y a entre < et > */
preg_match("/.*\<([^>]*)>.*/",$line,$match);
$disklist[$diskname]['desc'] = $match[1];
/* Looking for the disk size */
foreach ($rawdmesg as $dmesgline) {
/* Separe la ligne par les espace */
$dmesgtab = explode(" ", $dmesgline);
$dmesgtab[0] = rtrim($dmesgtab[0],":");
if ($dmesgtab[0]!="" &&(strcasecmp($dmesgtab[0],$diskname) == 0))
$disklist[$diskname]['size'] = $dmesgtab[1];
}
}
}
return $disklist;
}
function get_hraid_disks_list()
{
/* Recupere la liste des disques RAID */
$kerneldisks = explode(" ", trim(preg_replace("/kern.disks: /", "", exec("/sbin/sysctl kern.disks"))));
/* Recupere la liste des disques ATA et SCSI */
$diskdetected = array_merge((array)get_ata_disks_list(),(array)get_scsi_disks_list());
/* Recupere le dmesg */
exec("/sbin/dmesg",$rawdmesg);
foreach ($kerneldisks as $diskname) {
$allready=1;
// Check of this entry is IDE or SCSI (allready detected)
foreach ($diskdetected as $diskfoundk => $diskfoundv) {
if (strcasecmp($diskfoundk,$diskname) == 0)
$allready=0;
}
if ($allready) {
/* If not an IDE and SCSI disk */
$disklist[$diskname]=array();
$disklist[$diskname]['type'] = "RAID";
/* Looking for the disk size in the dmesg */
foreach ($rawdmesg as $dmesgline) {
/* Separe la ligne par les espace */
$dmesgtab = explode(" ", $dmesgline);
$dmesgtab[0] = rtrim($dmesgtab[0],":");
// si la ligne commence par le nom du disque: attention il y a 2 lignes
if ($dmesgtab[0]!="" &&(strcasecmp($dmesgtab[0],$diskname) == 0)) {
// the first line as this example "aacd0: <RAID 5> on aac0"
if (strcasecmp(substr($dmesgtab[1], 0, 1),"<") == 0) {
/* Match the description witch is include between < and > */
preg_match("/.*\<([^>]*)>.*/",$dmesgline,$match);
$disklist[$diskname]['desc'] = $match[1];
}
else {
// si c'est la deuxieme ligne, elle ressemble a "aacd0: 138850MB (284365824 sectors)"
$disklist[$diskname]['size'] = $dmesgtab[1];
}
}
}
}
}
return $disklist;
}
function get_physical_disks_list()
{
/* Return list of ALL disk: physical, hardware RAID and Software RAID disk */
$disklist = array_merge((array)get_ata_disks_list(),(array)get_scsi_disks_list(),(array)get_hraid_disks_list());
return $disklist;
}
function get_all_disks_list()
{
/* Return list of ALL disk: physical, hardware RAID and Software RAID disk */
$disklist = array_merge((array)get_ata_disks_list(),(array)get_scsi_disks_list(),(array)get_hraid_disks_list(), (array)get_sraid_disks_list());
return $disklist;
}
function get_disks_size($diskname)
{
/* Return size of the disk */
$disklist=get_physical_disks_list();
$disksize=0;
foreach ($disklist as $diskk => $diskv) {
if (strcmp($diskk,$diskname)==0)
$disksize=$diskv['size'];
}
return $disksize;
}
function get_cdrom_list()
{
/* Return list of IDE AND SCSI CDROM */
// exemple: Array
// [acd0] => Array
// (
// [type] => IDE
// [desc] => TDK CDRW241040B/57S2
// )
global $g;
/* Recupere la liste des disques IDE */
exec("/sbin/atacontrol list",$rawdata);
/* Recupere le dmesg */
exec("/sbin/dmesg",$rawdmesg);
$disklist = array();
/* Variable $i utilisé pour l'index du tableau */
$i=0;
foreach ($rawdata as $line) {
/* Separe la ligne par les espace */
$aline = preg_split("/\s+/", $line);
/* Si ATA alors NEXT */
if ($aline[0] == "ATA")
continue ;
$diskname = chop($aline[2]);
/* Exlude disk (adX) and Empty (no) */
if (!preg_match("/^(ad)/", $diskname ) & $diskname != "no") {
$disklist[$diskname]=array();
// $disklist[$i]['name'] = chop($aline[2]);
$disklist[$diskname]['type'] = "IDE";
/* Match the description witch is include between < and > */
preg_match("/.*\<([^>]*)>.*/",$line,$match);
$disklist[$diskname]['desc'] = $match[1];
$i++;
}
}
/* Get the SCSI disk list */
/* Cleaning used variable and initialize array */
unset($rawdata);
unset($dmesgtab);
reset($rawdmesg);
/* Get the result of the command camcontrol*/
exec("/sbin/camcontrol devlist",$rawdata);
foreach ($rawdata as $line) {
/* Get information include between parenthese: (pass0,da0) or (da0,pass0)*/
preg_match("/.*\(([^>]*)\).*/",$line,$match);
/* Sépare le resultat par la virgule */
$temp = preg_split("/,/", $match[1]);
// Check if diskname is the first (da0,pass0) or the second (pass0,da0) arguement
$diskname = $temp[1];
if ($diskname[0] == "p")
$diskname = $temp[0];
/* On exlus les lecteurs disque dur da */
if (!preg_match("/^(da)/", $diskname )) {
$disklist[$diskname]=array();
$disklist[$diskname]['type'] = "SCSI";
/* Recupčre la description: ce qu'il y a entre < et > */
preg_match("/.*\<([^>]*)>.*/",$line,$match);
$disklist[$diskname]['desc'] = $match[1];
$i++;
}
}
return $disklist;
}
/* wrapper for exec() */
function mwexec($command) {
global $g;
if ($g['debug']) {
if (!$_SERVER['REMOTE_ADDR'])
echo "mwexec(): $command\n";
passthru($command, $retval);
} else {
exec("$command > /dev/null 2>&1", $oarr, $retval);
}
return $retval;
}
/* wrapper for exec() in background */
function mwexec_bg($command) {
global $g;
if ($g['debug']) {
if (!$_SERVER['REMOTE_ADDR'])
echo "mwexec(): $command\n";
}
exec("nohup $command > /dev/null 2>&1 &");
}
/* unlink a file, if it exists */
function unlink_if_exists($fn) {
if (file_exists($fn))
unlink($fn);
}
/* make a global alias table (for faster lookups) */
function alias_make_table() {
global $config, $g, $aliastable;
$aliastable = array();
if (is_array($config['aliases']['alias'])) {
foreach ($config['aliases']['alias'] as $alias) {
if ($alias['name'])
$aliastable[$alias['name']] = $alias['address'];
}
}
}
/* check if an alias exists */
function is_alias($name) {
global $aliastable;
return isset($aliastable[$name]);
}
/* expand a host or network alias, if necessary */
function alias_expand($name) {
global $aliastable;
if (isset($aliastable[$name]))
return $aliastable[$name];
else if (is_ipaddr($name) || is_subnet($name))
return $name;
else
return null;
}
/* expand a host alias, if necessary */
function alias_expand_host($name) {
global $aliastable;
if (isset($aliastable[$name]) && is_ipaddr($aliastable[$name]))
return $aliastable[$name];
else if (is_ipaddr($name))
return $name;
else
return null;
}
/* expand a network alias, if necessary */
function alias_expand_net($name) {
global $aliastable;
if (isset($aliastable[$name]) && is_subnet($aliastable[$name]))
return $aliastable[$name];
else if (is_subnet($name))
return $name;
else
return null;
}
/* find out whether two subnets overlap */
function check_subnets_overlap($subnet1, $bits1, $subnet2, $bits2) {
if (!is_numeric($bits1))
$bits1 = 32;
if (!is_numeric($bits2))
$bits2 = 32;
if ($bits1 < $bits2)
$relbits = $bits1;
else
$relbits = $bits2;
$sn1 = gen_subnet_mask_long($relbits) & ip2long($subnet1);
$sn2 = gen_subnet_mask_long($relbits) & ip2long($subnet2);
if ($sn1 == $sn2)
return true;
else
return false;
}
/* compare two IP addresses */
function ipcmp($a, $b) {
if (ip2long($a) < ip2long($b))
return -1;
else if (ip2long($a) > ip2long($b))
return 1;
else
return 0;
}
/* return true if $addr is in $subnet, false if not */
function ip_in_subnet($addr,$subnet) {
list($ip, $mask) = explode('/', $subnet);
$mask = 0xffffffff << (32 - $mask);
return ((ip2long($addr) & $mask) == (ip2long($ip) & $mask));
}
/* verify (and remove) the digital signature on a file - returns 0 if OK */
function verify_digital_signature($fname) {
global $g;
return mwexec("/usr/local/bin/verifysig " .
escapeshellarg("{$g['etc_path']}/pubkey.pem") . " " .
escapeshellarg($fname));
}
/* obtain MAC address given an IP address by looking at the ARP table */
function arp_get_mac_by_ip($ip) {
exec("/usr/sbin/arp -n {$ip}", $arpoutput);
if ($arpoutput[0]) {
$arpi = explode(" ", $arpoutput[0]);
$macaddr = $arpi[3];
if (is_macaddr($macaddr))
return $macaddr;
else
return false;
}
return false;
}
/* get the interface name */
function get_ifname($if)
{
// Check if 'auto' mode is activated.
if ($if == "auto") {
$interfaces = explode(" ", exec("/sbin/ifconfig -l"));
$if = $interfaces[0];
}
return $if;
}
/* get local IP address */
function get_ipaddr($if)
{
$if = get_ifname($if);
unset($ipaddr);
exec("/usr/bin/netstat -inW -f inet -I {$if}", $inetinfo);
array_shift($inetinfo);
foreach($inetinfo as $inet)
{
$ainet = preg_split("/\s+/", $inet);
$ifname = chop($ainet[0]);
if (strcmp($ifname,$if) == 0)
{
$ipaddr = chop($ainet[3]);
break;
}
}
return $ipaddr;
}
/* get local MAC address */
function get_macaddr($if)
{
$if = get_ifname($if);
unset($macaddr);
exec("/usr/bin/netstat -inW -f link -I {$if}", $linkinfo);
array_shift($linkinfo);
foreach($linkinfo as $link)
{
$alink = preg_split("/\s+/", $link);
$ifname = chop($alink[0]);
if (strcmp($ifname,$if) == 0)
{
$macaddr = chop($alink[3]);
break;
}
}
return $macaddr;
}
?>
