pfSense

<?php

	util.inc

	part of m0n0wall (http://m0n0.ch/wall)

	All rights reserved.

	modification, are permitted provided that the following conditions are met:

	   this list of conditions and the following disclaimer.

	   notice, this list of conditions and the following disclaimer in the

	   documentation and/or other materials provided with the distribution.

	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");

}

/* sigkill a process by pid file */

function sigkillbypid($pidfile, $sig) {

	if (file_exists($pidfile)) {

}

/* kill a process by name */

function killbyname($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 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 "";

}

/* 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_reverse = long2ip($ip_long);

		return true;

	else

		return false;

}

/* returns true if $ipaddr is a valid dotted IPv4 address or an alias thereof */

function is_ipaddroralias($ipaddr) {

			if($alias['name'] == $ipaddr)

				return true;

		}

		return true;

	else

		return is_ipaddr($ipaddr);

/* returns true if $ipaddr is a valid dotted IPv4 address or any alias */

function is_ipaddroranyalias($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;

		return false;

		return false;

}

/* returns true if $subnet is a valid subnet in CIDR format or an alias thereof */

function is_subnetoralias($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;

	else

		return false;

}

/* returns true if $domain is a valid domain name */

function is_domain($domain) {

	if (!is_string($domain))

		return false;

	else

		return false;

}

/* returns true if $uname is a valid DynDNS username */

function is_dyndns_username($uname) {

	if (!is_string($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;

	if (count($maca) != 6)

		return false;

		if (($macel === "") || (strlen($macel) > 2))

			return false;

		if (preg_match("/[^0-9a-f]/i", $macel))

			return false;

	}

}

	if (in_array($name, $reserved, true))

	else

		return false;

}

/* returns true if $port is a valid TCP/UDP port */

function is_port($port) {

	if (!is_numericint($port))

		return false;

		return false;

	else

		return true;

}

function is_portrange($portrange) {

        $ports = explode(":", $portrange);

        if(count($ports) == 2 && is_port($ports[0]) && is_port($ports[1]))

                return true;

        else

                return false;

}

function is_valid_shaperbw($val) {

	return (preg_match("/^[0-9]+(Kb|Mb|Gb|%)$/", $val));

}

 *   get_interface_list() - Return a list of all physical interfaces

 *   along with MAC and status.

 *

 *   $mode = "active" - use ifconfig -lu

 *           "media"  - use ifconfig to check physical connection

 *   get_interface_list() - Return a list of all physical interfaces

 *   along with MAC and status.

 *

 *   $mode = "active" - use ifconfig -lu

 *           "media"  - use ifconfig to check physical connection

 *			status (much slower)

 */

function get_interface_list($mode = "active", $keyby = "physical", $vfaces = "") {

	if(!$vfaces) {

				'bridge',

				'ppp',

				'sl',

				'gif',

				'faith',

				'lo',

				'ng',

				'vlan',

				'pflog',

				'enc',

				'carp'

		);

	case "active":

                $upints = explode(" ", trim(shell_exec("/sbin/ifconfig -lu")));

        	break;

	case "media":

                $intlist = explode(" ", trim(shell_exec("/sbin/ifconfig -l")));

                $regexp = '/(' . implode('|', $intlist) . '):\s/';

                $ifstatus = preg_grep('/status:/', $ifconfig);

                	if(stristr($status, "active")) $upints[] = $int;

	}

        /* build interface list with netstat */

	array_shift($ipinfo);

	foreach($linkinfo as $link) {

		$friendly = "";

                $ifname = rtrim(trim($alink[0]), '*');

		if (!in_array(array_shift(preg_split('/\d/', $ifname)), $vfaces)) {

					"mac" => trim($alink[1]),

					"up" => in_array($ifname, $upints)

				);

				$aip = explode(" ", $ip);

				if($aip[0] == $ifname) {

					$toput['ipaddr'] = $aip[1];

				}

			}

				if($int['if'] == $ifname) $friendly = $name;

			}

			switch($keyby) {

			case "physical":

					$toput['friendly'] = $friendly;

				}

					$toput['if'] = $ifname;

					$iflist[$friendly] = $toput;

				}

			}

        }

        return $iflist;

	if (!$lock)

		die("WARNING: You must give a name as parameter to lock() function.");

	if (!file_exists("{$g['tmp_path']}/{$lock}.lock"))

		@touch("{$g['tmp_path']}/{$lock}.lock");

	$cfglckkeyconsumers++;

	if ($fp = fopen("{$g['tmp_path']}/{$lock}.lock", "w+")) {

		if (flock($fp, LOCK_EX))

			return $fp;

		else

			fclose($fp);

	}

/* unlock configuration file */

function unlock($cfglckkey = 0) {

	flock($cfglckkey, LOCK_UN);

	return;

	global $g;

	$retval = 0;

		if (!$_SERVER['REMOTE_ADDR'])

			echo "mwexec(): $command\n";

	}

                $mute = false;

		$output = implode(" ", $oarr);

		log_error("The command '$command' returned exit code '$retval', the output was '$output' ");

/* wrapper for exec() in background */

function mwexec_bg($command) {

	global $g;

		if (!$_SERVER['REMOTE_ADDR'])

			echo "mwexec(): $command\n";

	}

}

/* unlink a file, if it exists */

function unlink_if_exists($fn) {

/* make a global alias table (for faster lookups) */

		foreach ($config['aliases']['alias'] as $alias) {

			if ($alias['name'])

				$aliastable[$alias['name']] = $alias['address'];

		}

	}

}

/* check if an alias exists */

function is_alias($name) {

function alias_expand_value($name) {

	global $aliastable, $config;

		foreach($config['aliases']['alias'] as $alias) {

			if($alias['name'] == $name)

				return $alias['address'];

		}

/* expand a host or network alias, if necessary */

function alias_expand($name) {

		return null;

}

/* expand a host alias, if necessary */

function alias_expand_host($name) {

	global $aliastable;

		$ip_arr = explode(" ", $aliastable[$name]);

		foreach($ip_arr as $ip) {

			if (!is_ipaddr($ip))

				return null;

		}

	else

		return null;

}

/* expand a network alias, if necessary */

function alias_expand_net($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;

	$sn2 = gen_subnet_mask_long($relbits) & ip2long($subnet2);

		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 1;

/* obtain MAC address given an IP address by looking at the ARP table */

function arp_get_mac_by_ip($ip) {

		$arpi = explode(" ", $arpoutput[0]);

		$macaddr = $arpi[3];

		if (is_macaddr($macaddr))

			return $macaddr;

		else

			return false;

	}

}

function xml_safe_fieldname($fieldname) {

		);

	return strtolower(str_replace($replace, "", $fieldname));

    $mac =explode(":", $clientmac);

    global $config;

    $mac_format = $config['captiveportal']['radmac_format'] ? $config['captiveportal']['radmac_format'] : false;

    switch($mac_format) {

        case 'singledash':

        return "$mac[0]$mac[1]$mac[2]-$mac[3]$mac[4]$mac[5]";

        case 'ietf':

        return "$mac[0]-$mac[1]-$mac[2]-$mac[3]-$mac[4]-$mac[5]";

        case 'cisco':

        return "$mac[0]$mac[1].$mac[2]$mac[3].$mac[4]$mac[5]";

        case 'unformatted':

        return "$mac[0]$mac[1]$mac[2]$mac[3]$mac[4]$mac[5]";

        default:

        return $clientmac;

    }

}

	if (is_ipaddr($hostname))

		return $hostname;

	for ($i = 0; $i < $retries; $i++) {

		$ip = gethostbyname($hostname);

		if ($ip && $ip != $hostname) {

			/* success */

			return $ip;

		}

		sleep(1);

	}

	return false;

}