pfSense

<?php

/* $Id$ */

/*

	services.inc

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

	Copyright (C) 2003-2004 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.

*/

/* include all configuration functions */

require_once("functions.inc");

function services_dhcpd_configure() {

	global $config, $g;

	if(isset($config['system']['developerspew'])) {

		$mt = microtime();

		echo "services_dhcpd_configure($if) being called $mt\n";

	}

	/* configure DHCPD chroot */

	$fd = fopen("/tmp/dhcpd.sh","w");

	$status = `mount | grep "{$g['dhcpd_chroot_path']}/dev"`;

	fwrite($fd, "mkdir -p {$g['dhcpd_chroot_path']}\n");

	fwrite($fd, "mkdir -p {$g['dhcpd_chroot_path']}/dev\n");

	fwrite($fd, "mkdir -p {$g['dhcpd_chroot_path']}/etc\n");

	fwrite($fd, "mkdir -p {$g['dhcpd_chroot_path']}/usr/local/sbin\n");

	fwrite($fd, "mkdir -p {$g['dhcpd_chroot_path']}/var/db\n");

	fwrite($fd, "mkdir -p {$g['dhcpd_chroot_path']}/usr\n");

	fwrite($fd, "mkdir -p {$g['dhcpd_chroot_path']}/lib\n");

	fwrite($fd, "mkdir -p {$g['dhcpd_chroot_path']}/run\n");

	fwrite($fd, "chown -R dhcpd:_dhcp {$g['dhcpd_chroot_path']}/*\n");

	fwrite($fd, "cp /lib/libc.so.6 {$g['dhcpd_chroot_path']}/lib/\n");

	fwrite($fd, "cp /usr/local/sbin/dhcpd {$g['dhcpd_chroot_path']}/usr/local/sbin/\n");

	fwrite($fd, "chmod a+rx {$g['dhcpd_chroot_path']}/usr/local/sbin/dhcpd\n");

	if(!trim($status)) 

		fwrite($fd, "mount_devfs devfs {$g['dhcpd_chroot_path']}/dev\n");

	fclose($fd);

	mwexec("/bin/sh /tmp/dhcpd.sh");

	/* kill any running dhcpd */

	mwexec("killall dhcpd");

	$syscfg = $config['system'];

	$dhcpdcfg = $config['dhcpd'];

	/* DHCP enabled on any interfaces? */

	$dhcpdenable = false;

	foreach ($dhcpdcfg as $dhcpif => $dhcpifconf) {

		if (isset($dhcpifconf['enable']) &&

			(($dhcpif == "lan") ||

			(isset($config['interfaces'][$dhcpif]['enable']) &&

			$config['interfaces'][$dhcpif]['if'] && (!$config['interfaces'][$dhcpif]['bridge']))))

			$dhcpdenable = true;

	}

	if (!$dhcpdenable)

		return 0;

	if ($g['booting'])

		echo "Starting DHCP service... ";

	else

		sleep(1);

	/* write dhcpd.conf */

	$fd = fopen("{$g['dhcpd_chroot_path']}/etc/dhcpd.conf", "w");

	if (!$fd) {

		printf("Error: cannot open dhcpd.conf in services_dhcpd_configure().\n");

		return 1;

	}

	$dhcpdconf = <<<EOD

option domain-name "{$syscfg['domain']}";

default-lease-time 7200;

max-lease-time 86400;

authoritative;

log-facility local7;

ddns-update-style none;

EOD;

	$dhcpdifs = array();

	/*    loop through and deterimine if we need to setup

	 *    failover peer "bleh" entries

	 */

	$dhcpnum = 0;

	foreach ($dhcpdcfg as $dhcpif => $dhcpifconf) {

		if($dhcpifconf['failover_peerip'] <> "") {

			/*

			 *    yep, failover peer is defined.

			 *    does it match up to a defined vip?

			 */

			$skew = 110;

			$a_vip = &$config['virtualip']['vip'];

			if(is_array($a_vip)) {

				foreach ($a_vip as $vipent) {

					$int = guess_interface_from_ip($dhcpifconf['failover_peerip']);

					$intip = find_interface_ip($int);

					$real_dhcpif = convert_friendly_interface_to_real_interface_name($dhcpif);

					if($int == $real_dhcpif) {

						/* this is the interface! */

						if($vipent['advskew'] < "20")

							$skew = 0;

					}

				}

			} else {

				log_error("Warning!  DHCP Failover setup and no CARP virtual IP's defined!");

			}

			if($skew > 10) {

				$type = "secondary";

				$dhcpdconf_pri  = "mclt 600;\n";

				$my_port = "520";

				$peer_port = "519";

			} else {

				$my_port = "519";

				$peer_port = "520";

				$type = "primary";

				$dhcpdconf_pri  = "split 128;\n";

				$dhcpdconf_pri .= "  mclt 600;\n";

			}

			$dhcpdconf .= <<<EOPP

failover peer "dhcp{$dhcpnum}" { 

  {$type};

  address {$intip};

  port {$my_port};

  peer address {$dhcpifconf['failover_peerip']};

  peer port {$peer_port};

  max-response-delay 60;

  max-unacked-updates 10;

  {$dhcpdconf_pri}

  load balance max seconds 3;

}

EOPP;

		$dhcpnum++;

		}

	}

	$dhcpnum = 0;

	foreach ($dhcpdcfg as $dhcpif => $dhcpifconf) {

		$ifcfg = $config['interfaces'][$dhcpif];

		if (!isset($dhcpifconf['enable']) ||

			(($dhcpif != "lan") &&

			(!isset($ifcfg['enable']) || !$ifcfg['if'] || $ifcfg['bridge'])))

			continue;

		$subnet = gen_subnet($ifcfg['ipaddr'], $ifcfg['subnet']);

		$subnetmask = gen_subnet_mask($ifcfg['subnet']);

		$dnscfg = "";

		if ($dhcpifconf['domain']) {

			$dnscfg .= "	option domain-name \"{$dhcpifconf['domain']}\";\n";

		}

		if (is_array($dhcpifconf['dnsserver']) && ($dhcpifconf['dnsserver'][0])) {

			$dnscfg .= "	option domain-name-servers " . join(",", $dhcpifconf['dnsserver']) . ";";

		} else if (isset($config['dnsmasq']['enable'])) {

			$dnscfg .= "	option domain-name-servers " . $ifcfg['ipaddr'] . ";";

		} else if (is_array($syscfg['dnsserver']) && ($syscfg['dnsserver'][0])) {

			$dnscfg .= "	option domain-name-servers " . join(",", $syscfg['dnsserver']) . ";";

		}

		$dhcpdconf .= "subnet $subnet netmask $subnetmask {\n";

		$dhcpdconf .= "	pool {\n";

		/* is failover dns setup? */

		if (is_array($dhcpifconf['dnsserver']) && $dhcpifconf['dnsserver'][0] <> "") {

			$dhcpdconf .= "		option domain-name-servers {$dhcpifconf['dnsserver'][0]}";

			if($dhcpifconf['dnsserver'][1] <> "")

				$dhcpdconf .= ",{$dhcpifconf['dnsserver'][1]}";

			$dhcpdconf .= ";\n";

		}

		if($dhcpifconf['failover_peerip'] <> "") 

			$dhcpdconf .= "		deny dynamic bootp clients;\n";

		if (isset($dhcpifconf['denyunknown']))

		   $dhcpdconf .= "		deny unknown clients;\n";

		if ($dhcpifconf['gateway'])

			$routers = $dhcpifconf['gateway'];

		else

			$routers = $ifcfg['ipaddr'];

		if($dhcpifconf['failover_peerip'] <> "") {

			$dhcpdconf .= "		failover peer \"dhcp{$dhcpnum}\";\n";

			$dhcpnum++;

		}

		$dhcpdconf .= <<<EOD

		range {$dhcpifconf['range']['from']} {$dhcpifconf['range']['to']};

	}

	option routers {$routers};

$dnscfg

EOD;

		if ($dhcpifconf['defaultleasetime'])

			$dhcpdconf .= "	default-lease-time {$dhcpifconf['defaultleasetime']};\n";

		if ($dhcpifconf['maxleasetime'])

			$dhcpdconf .= "	max-lease-time {$dhcpifconf['maxleasetime']};\n";

		if (is_array($dhcpifconf['winsserver']) && $dhcpifconf['winsserver'][0]) {

			$dhcpdconf .= "	option netbios-name-servers " . join(",", $dhcpifconf['winsserver']) . ";\n";

			$dhcpdconf .= "	option netbios-node-type 8;\n";

		}

		if ($dhcpifconf['next-server'])

			$dhcpdconf .= "	next-server {$dhcpifconf['next-server']};\n";

		if ($dhcpifconf['filename'])

			$dhcpdconf .= "	filename \"{$dhcpifconf['filename']}\";\n";

		$dhcpdconf .= <<<EOD

}

EOD;

		/* add static mappings */

		if (is_array($dhcpifconf['staticmap'])) {

			$i = 0;

			foreach ($dhcpifconf['staticmap'] as $sm) {

				$dhcpdconf .= <<<EOD

host s_{$dhcpif}_{$i} {

	hardware ethernet {$sm['mac']};

EOD;

				if ($sm['ipaddr'])

					$dhcpdconf .= "	fixed-address {$sm['ipaddr']};\n";

				$dhcpdconf .= "}\n";

				$i++;

			}

		}

		$dhcpdifs[] = $ifcfg['if'];

	}

	fwrite($fd, $dhcpdconf);

	fclose($fd);

	/* create an empty leases database */

	touch("{$g['dhcpd_chroot_path']}/var/db/dhcpd.leases");

	/* fire up dhcpd in a chroot */

	mwexec("/usr/local/sbin/dhcpd -user dhcpd -group _dhcp -chroot {$g['dhcpd_chroot_path']} -cf {$g['dhcpd_chroot_path']}/etc/dhcpd.conf " .

		join(" ", $dhcpdifs));

	if ($g['booting']) {

		print "done.\n";

	}

	return 0;

}

function interfaces_staticarp_configure($if) {

	global $config, $g;

	if(isset($config['system']['developerspew'])) {

		$mt = microtime();

		echo "interfaces_staticarp_configure($if) being called $mt\n";

	}

        $ifcfg = $config['interfaces'][$if];

        /* Enable staticarp, if enabled */

        if(isset($config['dhcpd'][$if]['staticarp'])) {

                mwexec("/sbin/ifconfig " . escapeshellarg($ifcfg['if']) . " staticarp " );

                mwexec("/usr/sbin/arp -ad > /dev/null 2>&1 ");

                if (is_array($config['dhcpd'][$if]['staticmap'])) {

                        foreach ($config['dhcpd'][$if]['staticmap'] as $arpent) {

                                mwexec("/usr/sbin/arp -s " . escapeshellarg($arpent['ipaddr']) . " " . escapeshellarg($arpent['mac']));

                        }

                }

        } else {

                mwexec("/sbin/ifconfig " . escapeshellarg($ifcfg['if']) . " -staticarp " );

                mwexec("/usr/sbin/arp -ad > /dev/null 2>&1 ");

        }

        return 0;

}

function services_dhcrelay_configure() {

	global $config, $g;

	if(isset($config['system']['developerspew'])) {

		$mt = microtime();

		echo "services_dhcrelay_configure() being called $mt\n";

	}

	/* kill any running dhcrelay */

	killbypid("{$g['varrun_path']}/dhcrelay.pid");

	$dhcrelaycfg = $config['dhcrelay'];

	/* DHCPRelay enabled on any interfaces? */

	$dhcrelayenable = false;

	if(is_array($dhcrelaycfg)) {

		foreach ($dhcrelaycfg as $dhcrelayif => $dhcrelayifconf) {

			if (isset($dhcrelayifconf['enable']) &&

				(($dhcrelayif == "lan") ||

				(isset($config['interfaces'][$dhcrelayif]['enable']) &&

				$config['interfaces'][$dhcrelayif]['if'] && (!$config['interfaces'][$dhcrelayif]['bridge']))))

				$dhcrelayenable = true;

		}

	}

	if (!$dhcrelayenable)

		return 0;

	if ($g['booting'])

		echo "Starting DHCP relay service... ";

	else

		sleep(1);

	$dhcrelayifs = array();

	foreach ($dhcrelaycfg as $dhcrelayif => $dhcrelayifconf) {

		$ifcfg = $config['interfaces'][$dhcrelayif];

		if (!isset($dhcrelayifconf['enable']) ||

			(($dhcrelayif != "lan") &&

			(!isset($ifcfg['enable']) || !$ifcfg['if'] || $ifcfg['bridge'])))

			continue;

		$dhcrelayifs[] = $ifcfg['if'];

	}

	/* In order for the relay to work, it needs to be active on the

	   interface in which the destination server sits */

	foreach ($config['interfaces'] as $ifname) {

		$subnet = $ifname['ipaddr'] . "/" . $ifname['subnet'];

		if (ip_in_subnet($dhcrelaycfg['server'],$subnet))

			$destif = $ifname['if'];

	}

	if (!isset($destif))

		$destif = $config['interfaces']['wan']['if'];

	$dhcrelayifs[] = $destif;

	$dhcrelayifs = array_unique($dhcrelayifs);

	/* fire up dhcrelay */

	$cmd = "/usr/local/sbin/dhcrelay -i " .  join(" -i ", $dhcrelayifs);

	if (isset($dhcrelaycfg['agentoption']))

		$cmd .=  " -a -m replace";

	$cmd .= " {$dhcrelaycfg['server']}";

	mwexec($cmd);

	if (!$g['booting']) {

		/* set the reload filter dity flag */

		touch("{$g['tmp_path']}/filter_dirty");

	}

	return 0;

}

function services_dyndns_reset() {

	global $config, $g;

	if(isset($config['system']['developerspew'])) {

		$mt = microtime();

		echo "services_dyndns_reset() being called $mt\n";

	}

	if (file_exists("{$g['vardb_path']}/ez-ipupdate.cache")) {

		conf_mount_rw();

		unlink("{$g['vardb_path']}/ez-ipupdate.cache");

		conf_mount_ro();

	}

	if (file_exists("{$g['conf_path']}/ez-ipupdate.cache")) {

		conf_mount_rw();

		unlink("{$g['conf_path']}/ez-ipupdate.cache");

		conf_mount_ro();

	}

	return 0;

}

function services_dyndns_configure() {

	global $config, $g;

	if(isset($config['system']['developerspew'])) {

		$mt = microtime();

		echo "services_dyndns_configure() being called $mt\n";

	}

	$dyndnscfg = $config['dyndns'];

	$wancfg = $config['interfaces']['wan'];

	if (isset($dyndnscfg['enable'])) {

		if ($g['booting']) {

			echo "Starting DynDNS client... ";

			if(isset($config['system']['use_old_dyndns'])) {

				echo " [Using ez-ipupdate] ";

				services_dyndns_configure_old();

				return;

			}	

		} else {

			sleep(1);

			if(isset($config['system']['use_old_dyndns'])) {

				services_dyndns_configure_old();

				return;

			}			

		}

		/* load up the dyndns.class */

		require_once("dyndns.class");

		log_error("DynDns: Running updatedns()");

		$dns = new updatedns($dnsService = $config['dyndns']['type'],

							 $dnsHost = $config['dyndns']['host'],

							 $dnsUser = $config['dyndns']['username'],

							 $dnsPass = $config['dyndns']['password'],

							 $dnsWilcard = $config['dyndns']['wildcard'],

							 $dnsMX = $config['dyndns']['mx']);

		if ($g['booting'])

			echo "done.\n";

	}

	return 0;

}

function services_dyndns_configure_old() {

	global $config, $g;

	if(isset($config['system']['developerspew'])) {

		$mt = microtime();

		echo "services_dyndns_configure_old() being called $mt\n";

	}

        /* kill any running ez-ipupdate */

        /* ez-ipupdate needs SIGQUIT instead of SIGTERM */

        sigkillbypid("{$g['varrun_path']}/ez-ipupdate.pid", "QUIT");

        $dyndnscfg = $config['dyndns'];

        $wancfg = $config['interfaces']['wan'];

        if (isset($dyndnscfg['enable'])) {

                if ($g['booting'])

                        echo "Starting DynDNS client... ";

                else

                        sleep(1);

                /* determine WAN interface name */

                $wanif = get_real_wan_interface();

                /* write ez-ipupdate.conf */

                $fd = fopen("{$g['varetc_path']}/ez-ipupdate.conf", "w");

                if (!$fd) {

                        printf("Error: cannot open ez-ipupdate.conf in services_dyndns_configure().\n");

                        return 1;

                }

                $ezipupdateconf = <<<EOD

service-type={$dyndnscfg['type']}

user={$dyndnscfg['username']}:{$dyndnscfg['password']}

host={$dyndnscfg['host']}

interface={$wanif}

max-interval=2073600

pid-file={$g['varrun_path']}/ez-ipupdate.pid

cache-file={$g['vardb_path']}/ez-ipupdate.cache

execute=/etc/rc.dyndns.storecache

daemon

EOD;

                /* enable server[:port]? */

                if ($dyndnscfg['server']) {

                        if ($dyndnscfg['port'])

                                $ezipupdateconf .= "server={$dyndnscfg['server']}:{$dyndnscfg['port']}\n";

                        else

                                $ezipupdateconf .= "server={$dyndnscfg['server']}\n";

                }

                /* enable MX? */

                if ($dyndnscfg['mx']) {

                        $ezipupdateconf .= "mx={$dyndnscfg['mx']}\n";

                }

                /* enable wildcards? */

                if (isset($dyndnscfg['wildcard'])) {

                        $ezipupdateconf .= "wildcard\n";

                }

                fwrite($fd, $ezipupdateconf);

                fclose($fd);

                /* if we're booting, copy the cache file from /conf */

                if ($g['booting']) {

                        if (file_exists("{$g['conf_path']}/ez-ipupdate.cache")) {

                                copy("{$g['conf_path']}/ez-ipupdate.cache", "{$g['vardb_path']}/ez-ipupdate.cache");

                       }

                }

                /* run ez-ipupdate */

                mwexec("/usr/local/bin/ez-ipupdate -c {$g['varetc_path']}/ez-ipupdate.conf");

                if ($g['booting'])

                        echo "done\n";

        }

        return 0;

}

function services_dnsmasq_configure() {

	global $config, $g;

	if(isset($config['system']['developerspew'])) {

		$mt = microtime();

		echo "services_dnsmasq_configure() being called $mt\n";

	}

	/* kill any running dnsmasq */

	sigkillbypid("{$g['varrun_path']}/dnsmasq.pid", "TERM");

	if (isset($config['dnsmasq']['enable'])) {

		if ($g['booting'])

			echo "Starting DNS forwarder... ";

		else

			sleep(1);

		/* generate hosts file */

		system_hosts_generate();

		$args = "";

		if (isset($config['dnsmasq']['regdhcp'])) {

			$args .= " -l {$g['dhcpd_chroot_path']}/var/db/dhcpd.leases" .

				" -s {$config['system']['domain']}";

		}

                if (isset($config['dnsmasq']['domainoverrides']) && is_array($config['dnsmasq']['domainoverrides'])) {

                        foreach($config['dnsmasq']['domainoverrides'] as $override) {

                                $args .= ' --server=/' . $override['domain'] . '/' . $override['ip'];

                        }

                }

		/* run dnsmasq */

		mwexec("/usr/local/sbin/dnsmasq {$args}");

		if ($g['booting'])

			echo "done.\n";

	}

	if (!$g['booting']) {

		services_dhcpd_configure();

	}

	return 0;

}

function services_snmpd_configure() {

	global $config, $g;

	if(isset($config['system']['developerspew'])) {

		$mt = microtime();

		echo "services_snmpd_configure() being called $mt\n";

	}

	/* kill any running snmpd */

	sigkillbypid("{$g['varrun_path']}/snmpd.pid", "TERM");

	if (isset($config['snmpd']['enable'])) {

		if ($g['booting'])

			echo "Starting SNMP daemon... ";

		/* generate snmpd.conf */

		$fd = fopen("{$g['varetc_path']}/snmpd.conf", "w");

		if (!$fd) {

			printf("Error: cannot open snmpd.conf in services_snmpd_configure().\n");

			return 1;

		}

		$snmpdconf = <<<EOD

location := "{$config['snmpd']['syslocation']}"

contact := "{$config['snmpd']['syscontact']}"

read := "{$config['snmpd']['rocommunity']}"

EOD;

/* No docs on what write strings do there for disable for now.

		if(isset($config['snmpd']['rwenable']) && preg_match('/^\S+$/', $config['snmpd']['rwcommunity'])){

		    $snmpdconf .= <<<EOD

# write string

write := "{$config['snmpd']['rwcommunity']}"

EOD;

		}

*/

		if(isset($config['snmpd']['trapenable']) && preg_match('/^\S+$/', $config['snmpd']['trapserver'])){

		    $snmpdconf .= <<<EOD

# SNMP Trap support.

traphost := {$config['snmpd']['trapserver']}

trapport := {$config['snmpd']['trapserverport']}

trap := "{$config['snmpd']['trapstring']}"

EOD;

		}

		$snmpdconf .= <<<EOD

system := 1     # pfSense

%snmpd

begemotSnmpdDebugDumpPdus       = 2

begemotSnmpdDebugSyslogPri      = 7

begemotSnmpdCommunityString.0.1 = $(read)

EOD;

/* No docs on what write strings do there for disable for now.

		if(isset($config['snmpd']['rwcommunity']) && preg_match('/^\S+$/', $config['snmpd']['rwcommunity'])){

		    $snmpdconf .= <<<EOD

begemotSnmpdCommunityString.0.2 = $(write)

EOD;

		}

*/

		if(isset($config['snmpd']['trapenable']) && preg_match('/^\S+$/', $config['snmpd']['trapserver'])){

		    $snmpdconf .= <<<EOD

begemotTrapSinkStatus.[$(traphost)].$(trapport) = 4

begemotTrapSinkVersion.[$(traphost)].$(trapport) = 2

begemotTrapSinkComm.[$(traphost)].$(trapport) = $(trap)

EOD;

		}

		$snmpdconf .= <<<EOD

begemotSnmpdCommunityDisable    = 1

EOD;

		if(isset($config['snmpd']['bindlan'])) {

			$bind_to_ip = $config['interfaces']['lan']['ipaddr'];

		} else {

			$bind_to_ip = "0.0.0.0";

		}

		if(is_port( $config['snmpd']['pollport'] )) {

		    $snmpdconf .= <<<EOD

begemotSnmpdPortStatus.{$bind_to_ip}.{$config['snmpd']['pollport']} = 1

EOD;

		}

		$snmpdconf .= <<<EOD

begemotSnmpdLocalPortStatus."/var/run/snmpd.sock" = 1

begemotSnmpdLocalPortType."/var/run/snmpd.sock" = 4

# These are bsnmp macros not php vars.

sysContact      = $(contact)

sysLocation     = $(location)

sysObjectId     = 1.3.6.1.4.1.12325.1.1.2.1.$(system)

snmpEnableAuthenTraps = 2

EOD;

		if (is_array( $config['snmpd']['modules'] )) {

		    if(isset($config['snmpd']['modules']['mibii'])) {

			$snmpdconf .= <<<EOD

begemotSnmpdModulePath."mibII"  = "/usr/lib/snmp_mibII.so"

EOD;

		    }

		    if(isset($config['snmpd']['modules']['netgraph'])) {

			$snmpdconf .= <<<EOD

begemotSnmpdModulePath."netgraph" = "/usr/lib/snmp_netgraph.so"

%netgraph

begemotNgControlNodeName = "snmpd"

EOD;

		    }

		    if(isset($config['snmpd']['modules']['pf'])) {

			$snmpdconf .= <<<EOD

begemotSnmpdModulePath."pf"     = "/usr/lib/snmp_pf.so"

# config must end with blank line

EOD;

		    }

		}

		fwrite($fd, $snmpdconf);

		fclose($fd);

		if (isset($config['snmpd']['bindlan'])) {

			$bindlan = "";

		}

		/* run bsnmpd */

		mwexec("/usr/sbin/bsnmpd -c {$g['varetc_path']}/snmpd.conf" .

			"{$bindlan} -p {$g['varrun_path']}/snmpd.pid");

		if ($g['booting'])

			echo "done.\n";

	}

	return 0;

}

function services_proxyarp_configure() {

	global $config, $g;

	if(isset($config['system']['developerspew'])) {

		$mt = microtime();

		echo "services_proxyarp_configure() being called $mt\n";

	}

	/* kill any running choparp */

	killbyname("choparp");

	if (isset($config['virtualip']) && is_array($config['virtualip']['vip'])) {

		$paa = array();

		/* group by interface */

		foreach ($config['virtualip']['vip'] as $vipent) {

			if ($vipent['mode'] === "proxyarp") {

				if ($vipent['interface'])

					$if = $vipent['interface'];

				else

					$if = "wan";

				if (!is_array($paa[$if]))

					$paa[$if] = array();

				$paa[$if][] = $vipent;

			}

		}

		if (count($paa))

		foreach ($paa as $paif => $paents) {

			if ($paif == "wan" && !(is_ipaddr($config['interfaces']['wan']['ipaddr']) ||

                                       ($config['interfaces']['wan']['ipaddr'] == "dhcp") ||

                                       ($config['interfaces']['wan']['ipaddr'] == "bigpond")))

                               continue;

			$args = $config['interfaces'][$paif]['if'] . " auto";

			foreach ($paents as $paent) {

				if (isset($paent['subnet']))

					$args .= " " . escapeshellarg("{$paent['subnet']}/{$paent['subnet_bits']}");

				else if (isset($paent['range']))

					$args .= " " . escapeshellarg($paent['range']['from'] . "-" .

						$paent['range']['to']);

			}

			mwexec_bg("/usr/local/sbin/choparp " . $args);

		}

	}

}

function services_dnsupdate_process() {

	global $config, $g;

	if(isset($config['system']['developerspew'])) {

		$mt = microtime();

		echo "services_dnsupdate_process() being called $mt\n";

	}

	/* Dynamic DNS updating active? */

	if (isset($config['dnsupdate']['enable'])) {

		$wanip = get_current_wan_address();

		if ($wanip) {

			$keyname = $config['dnsupdate']['keyname'];

			/* trailing dot */

			if (substr($keyname, -1) != ".")

				$keyname .= ".";

			$hostname = $config['dnsupdate']['host'];

			/* trailing dot */

			if (substr($hostname, -1) != ".")

				$hostname .= ".";

			/* write private key file

			   this is dumb - public and private keys are the same for HMAC-MD5,

			   but nsupdate insists on having both */

			$fd = fopen("{$g['varetc_path']}/K{$keyname}+157+00000.private", "w");

			$privkey .= <<<EOD

Private-key-format: v1.2

Algorithm: 157 (HMAC)

Key: {$config['dnsupdate']['keydata']}

EOD;

			fwrite($fd, $privkey);

			fclose($fd);

			/* write public key file */

			if ($config['dnsupdate']['keytype'] == "zone") {

				$flags = 257;

				$proto = 3;

			} else if ($config['dnsupdate']['keytype'] == "host") {

				$flags = 513;

				$proto = 3;

			} else if ($config['dnsupdate']['keytype'] == "user") {

				$flags = 0;

				$proto = 2;

			}

			$fd = fopen("{$g['varetc_path']}/K{$keyname}+157+00000.key", "w");

			fwrite($fd, "{$keyname} IN KEY {$flags} {$proto} 157 {$config['dnsupdate']['keydata']}\n");

			fclose($fd);

			/* generate update instructions */

			$upinst =  "update delete {$config['dnsupdate']['host']} A\n";

			$upinst .= "update add {$config['dnsupdate']['host']} {$config['dnsupdate']['ttl']} A {$wanip}\n";

			$upinst .= "\n";	/* mind that trailing newline! */

			$fd = fopen("{$g['varetc_path']}/nsupdatecmds", "w");

			fwrite($fd, $upinst);