Project

General

Profile

Download (48.6 KB) Statistics
| Branch: | Tag: | Revision:
1
<?php
2
/****h* pfSense/pkg-utils
3
 * NAME
4
 *   pkg-utils.inc - Package subsystem
5
 * DESCRIPTION
6
 *   This file contains various functions used by the pfSense package system.
7
 * HISTORY
8
 *   $Id$
9
 ******
10
 *
11
 * Copyright (C) 2010 Ermal Luci
12
 * Copyright (C) 2005-2006 Colin Smith (ethethlay@gmail.com)
13
 * All rights reserved.
14
 * Redistribution and use in source and binary forms, with or without
15
 * modification, are permitted provided that the following conditions are met:
16
 *
17
 * 1. Redistributions of source code must retain the above copyright notice,
18
 * this list of conditions and the following disclaimer.
19
 *
20
 * 2. Redistributions in binary form must reproduce the above copyright
21
 * notice, this list of conditions and the following disclaimer in the
22
 * documentation and/or other materials provided with the distribution.
23
 *
24
 * THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES,
25
 * INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY
26
 * AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
27
 * AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY,
28
 * OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
29
 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
30
 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
31
 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
32
 * RISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
33
 * POSSIBILITY OF SUCH DAMAGE.
34
 *
35
 */
36

    
37
/*
38
	pfSense_BUILDER_BINARIES:	/usr/bin/cd	/usr/bin/tar	/usr/sbin/fifolog_create	/bin/chmod
39
	pfSense_BUILDER_BINARIES:	/usr/sbin/pkg_add	/usr/sbin/pkg_info	/usr/sbin/pkg_delete	/bin/rm
40
	pfSense_MODULE:	pkg
41
*/
42

    
43
require_once("globals.inc");
44
require_once("xmlrpc.inc");
45
require_once("service-utils.inc");
46
if(file_exists("/cf/conf/use_xmlreader"))
47
	require_once("xmlreader.inc");
48
else
49
	require_once("xmlparse.inc");
50
require_once("service-utils.inc");
51
require_once("pfsense-utils.inc");
52

    
53
if(!function_exists("update_status")) {
54
	function update_status($status) {
55
		echo $status . "\n";
56
	}
57
}
58
if(!function_exists("update_output_window")) {
59
	function update_output_window($status) {
60
		echo $status . "\n";
61
	}
62
}
63

    
64
if (!function_exists("pkg_debug")) {
65
	/* set up logging if needed */
66
	function pkg_debug($msg) {
67
		global $g, $debug, $fd_log;
68

    
69
		if (!$debug)
70
			return;
71

    
72
		if (!$fd_log) {
73
			if (!$fd_log = fopen("{$g['tmp_path']}/pkg_mgr_{$package}.log", "w"))
74
				update_output_window("Warning, could not open log for writing.");
75
		}
76
		@fwrite($fd_log, $msg);
77
	}
78
}
79

    
80
$vardb = "/var/db/pkg";
81
safe_mkdir($vardb);
82
$g['platform'] = trim(file_get_contents("/etc/platform"));
83

    
84
if(!is_dir("/usr/local/pkg") or !is_dir("/usr/local/pkg/pf")) {
85
	conf_mount_rw();
86
	safe_mkdir("/usr/local/pkg");
87
	safe_mkdir("/usr/local/pkg/pf");	
88
	conf_mount_ro();
89
}
90

    
91
/****f* pkg-utils/remove_package
92
 * NAME
93
 *   remove_package - Removes package from FreeBSD if it exists
94
 * INPUTS
95
 *   $packagestring	- name/string to check for
96
 * RESULT
97
 *   none
98
 * NOTES
99
 *   
100
 ******/
101
function remove_freebsd_package($packagestring) {
102
	// The packagestring passed in must be the full PBI package name, 
103
	// as displayed by the pbi_info utility. e.g. "package-1.2.3_4-i386" 
104
	// It must NOT have ".pbi" on the end.
105
	exec("/usr/local/sbin/pbi_info {$packagestring} | /usr/bin/awk '/Prefix/ {print $2}'",$pbidir);
106
	$pbidir = $pbidir[0];
107
	if ($pbidir == "") {
108
		log_error("PBI dir for {$packagestring} was not found - cannot cleanup PBI files");
109
	}
110
	else {
111
		$linkdirs = array('bin','sbin');
112
		foreach($linkdirs as $dir) {
113
			$target_dir = $pbidir . "/" . $dir;
114
			if(is_dir($target_dir)) {
115
				$files = scandir($target_dir);
116
				foreach($files as $f) {
117
					if($f != '.' && $f != '..') {
118
						// Only try to unlink the file if it is a link to the expected pbi dir.
119
						$local_name = "/usr/local/{$dir}/{$f}";
120
						if(is_link($local_name)) {
121
							if(substr(readlink($local_name),0,strlen($target_dir)) == $target_dir) {
122
								unlink($local_name);
123
							}
124
						}
125
					}
126
				}
127
			}
128
		}
129

    
130
		exec("/usr/local/sbin/pbi_delete {$packagestring} 2>>/tmp/pbi_delete_errors.txt");
131
	}
132
}
133

    
134
/****f* pkg-utils/is_package_installed
135
 * NAME
136
 *   is_package_installed - Check whether a package is installed.
137
 * INPUTS
138
 *   $packagename	- name of the package to check
139
 * RESULT
140
 *   boolean	- true if the package is installed, false otherwise
141
 * NOTES
142
 *   This function is deprecated - get_pkg_id() can already check for installation.
143
 ******/
144
function is_package_installed($packagename) {
145
	$pkg = get_pkg_id($packagename);
146
	if($pkg == -1)
147
		return false;
148
	return true;
149
}
150

    
151
/****f* pkg-utils/get_pkg_id
152
 * NAME
153
 *   get_pkg_id - Find a package's numeric ID.
154
 * INPUTS
155
 *   $pkg_name	- name of the package to check
156
 * RESULT
157
 *   integer    - -1 if package is not found, >-1 otherwise
158
 ******/
159
function get_pkg_id($pkg_name) {
160
	global $config;
161

    
162
	if (is_array($config['installedpackages']['package'])) {
163
		foreach($config['installedpackages']['package'] as $idx => $pkg) {
164
			if($pkg['name'] == $pkg_name)
165
				return $idx;
166
		}
167
	}
168
	return -1;
169
}
170

    
171
/****f* pkg-utils/get_pkg_internal_name
172
 * NAME
173
 *   get_pkg_internal_name - Find a package's internal name (e.g. squid3 internal name is squid)
174
 * INPUTS
175
 *   $package - array of package data from config
176
 * RESULT
177
 *   string - internal name (if defined) or default to package name
178
 ******/
179
function get_pkg_internal_name($package) {
180
	if (isset($package['internal_name']) && ($package['internal_name'] != "")) {
181
		/* e.g. name is Ipguard-dev, internal name is ipguard */
182
		$pkg_internal_name = $package['internal_name'];
183
	} else {
184
		$pkg_internal_name = $package['name'];
185
	}
186
	return $pkg_internal_name;
187
}
188

    
189
/****f* pkg-utils/get_pkg_info
190
 * NAME
191
 *   get_pkg_info - Retrieve package information from pfsense.com.
192
 * INPUTS
193
 *   $pkgs - 'all' to retrieve all packages, an array containing package names otherwise
194
 *   $info - 'all' to retrieve all information, an array containing keys otherwise
195
 * RESULT
196
 *   $raw_versions - Array containing retrieved information, indexed by package name.
197
 ******/
198
function get_pkg_info($pkgs = 'all', $info = 'all') {
199
	global $g;
200

    
201
	$freebsd_version = php_uname("r");
202
	$freebsd_machine = php_uname("m");
203
	$params = array(
204
		"pkg" => $pkgs, 
205
		"info" => $info, 
206
		"freebsd_version" => $freebsd_version[0],
207
		"freebsd_machine" => $freebsd_machine
208
	);
209
	$resp = call_pfsense_method('pfsense.get_pkgs', $params, 10);
210
	return $resp ? $resp : array();
211
}
212

    
213
function get_pkg_sizes($pkgs = 'all') {
214
	global $config, $g;
215

    
216
	$freebsd_version = php_uname("r");
217
	$freebsd_machine = php_uname("m");
218
	$params = array(
219
		"pkg" => $pkgs, 
220
		"freebsd_version" => $freebsd_version,
221
		"freebsd_machine" => $freebsd_machine
222
	);
223
	$msg = new XML_RPC_Message('pfsense.get_pkg_sizes', array(php_value_to_xmlrpc($params)));
224
	$xmlrpc_base_url = isset($config['system']['altpkgrepo']['enable']) ? $config['system']['altpkgrepo']['xmlrpcbaseurl'] : $g['xmlrpcbaseurl'];
225
	$cli = new XML_RPC_Client($g['xmlrpcpath'], $xmlrpc_base_url);
226
	$resp = $cli->send($msg, 10);
227
	if(!is_object($resp))
228
		log_error("Could not get response from XMLRPC server!");
229
 	else if (!$resp->faultCode()) {
230
		$raw_versions = $resp->value();
231
		return xmlrpc_value_to_php($raw_versions);
232
	}
233

    
234
	return array();
235
}
236

    
237
/*
238
 * resync_all_package_configs() Force packages to setup their configuration and rc.d files.
239
 * This function may also print output to the terminal indicating progress.
240
 */
241
function resync_all_package_configs($show_message = false) {
242
	global $config, $pkg_interface, $g;
243

    
244
	log_error(gettext("Resyncing configuration for all packages."));
245

    
246
	if (!is_array($config['installedpackages']['package']))
247
		return;
248

    
249
	if($show_message == true)
250
		echo "Syncing packages:";
251

    
252
	conf_mount_rw();
253

    
254
	foreach($config['installedpackages']['package'] as $idx => $package) {
255
		if (empty($package['name']))
256
			continue;
257
		if($show_message == true)
258
			echo " " . $package['name'];
259
		get_pkg_depends($package['name'], "all");
260
		if($g['booting'] != true)
261
			stop_service(get_pkg_internal_name($package));
262
		sync_package($idx, true, true);
263
		if($pkg_interface == "console") 
264
			echo "\n" . gettext("Syncing packages:");
265
	}
266

    
267
	if($show_message == true)
268
		echo " done.\n";
269

    
270
	@unlink("/conf/needs_package_sync");
271
	conf_mount_ro();
272
}
273

    
274
/*
275
 * is_freebsd_pkg_installed() - Check /var/db/pkg to determine whether or not a FreeBSD
276
 *				package is installed.
277
 */
278
function is_freebsd_pkg_installed($pkg) {
279
	if(!$pkg) 
280
		return;
281
	$output = "";
282
	exec("/usr/local/sbin/pbi_info \"{$pkg}\"", $output, $retval);
283

    
284
	return (intval($retval) == 0);
285
}
286

    
287
/*
288
 * get_pkg_depends($pkg_name, $filetype = ".xml", $format = "files", return_nosync = 1):  Return a package's dependencies.
289
 *
290
 * $filetype = "all" || ".xml", ".tgz", etc.
291
 * $format = "files" (full filenames) || "names" (stripped / parsed depend names)
292
 * $return_nosync = 1 (return depends that have nosync set) | 0 (ignore packages with nosync)
293
 *
294
 */
295
function get_pkg_depends($pkg_name, $filetype = ".xml", $format = "files", $return_nosync = 1) {
296
	global $config;
297

    
298
	$pkg_id = get_pkg_id($pkg_name);
299
	if($pkg_id == -1)
300
		return -1; // This package doesn't really exist - exit the function.
301
	else if (!isset($config['installedpackages']['package'][$pkg_id]))
302
		return; // No package belongs to the pkg_id passed to this function.
303

    
304
	$package =& $config['installedpackages']['package'][$pkg_id];
305
	if(!file_exists("/usr/local/pkg/" . $package['configurationfile'])) {
306
		log_error(sprintf(gettext('The %1$s package is missing required dependencies and must be reinstalled. %2$s'), $package['name'], $package['configurationfile']));
307
		uninstall_package($package['name']);
308
		if (install_package($package['name']) < 0) {
309
			log_error("Failed reinstalling package {$package['name']}.");
310
			return false;
311
		}
312
	}
313
	$pkg_xml = parse_xml_config_pkg("/usr/local/pkg/" . $package['configurationfile'], "packagegui");
314
	if (!empty($pkg_xml['additional_files_needed'])) {
315
		foreach($pkg_xml['additional_files_needed'] as $item) {
316
			if ($return_nosync == 0 && isset($item['nosync']))
317
				continue; // Do not return depends with nosync set if not required.
318
			$depend_file = substr(strrchr($item['item']['0'], '/'),1); // Strip URLs down to filenames.
319
			$depend_name = substr(substr($depend_file,0,strpos($depend_file,".")+1),0,-1); // Strip filename down to dependency name.
320
			if (($filetype != "all") && (!preg_match("/{$filetype}/i", $depend_file)))
321
					continue;
322
			if ($item['prefix'] != "")
323
				$prefix = $item['prefix'];
324
			else
325
				$prefix = "/usr/local/pkg/";
326
			// Ensure that the prefix exists to avoid installation errors.
327
			if(!is_dir($prefix)) 
328
				exec("/bin/mkdir -p {$prefix}");
329
			if(!file_exists($prefix . $depend_file))
330
				log_error(sprintf(gettext("The %s package is missing required dependencies and must be reinstalled."), $package['name']));
331
			switch ($format) {
332
			case "files":
333
				$depends[] = $prefix . $depend_file;
334
				break;
335
			case "names":
336
				switch ($filetype) {
337
				case "all":
338
					if(preg_match("/\.xml/i", $depend_file)) {
339
						$depend_xml = parse_xml_config_pkg("/usr/local/pkg/{$depend_file}", "packagegui");
340
						if (!empty($depend_xml))
341
							$depends[] = $depend_xml['name'];
342
					} else
343
						$depends[] = $depend_name; // If this dependency isn't package XML, use the stripped filename.
344
					break;
345
				case ".xml":
346
					$depend_xml = parse_xml_config_pkg("/usr/local/pkg/" . $depend_file, "packagegui");
347
					if (!empty($depend_xml))
348
						$depends[] = $depend_xml['name'];
349
					break;
350
				default:
351
					$depends[] = $depend_name; // If we aren't looking for XML, use the stripped filename (it's all we have).
352
					break;
353
				}
354
			}
355
		}
356
		return $depends;
357
	}
358
}
359

    
360
function uninstall_package($pkg_name) {
361
	global $config, $static_output;
362
	global $builder_package_install;
363

    
364
	// Back up /usr/local/lib libraries first if
365
	// not running from the builder code.
366
	// also take into account rrd binaries
367
	if(!$builder_package_install) {
368
		if(!file_exists("/tmp/pkg_libs.tgz")) {
369
			$static_output .= "Backing up libraries... ";
370
			update_output_window($static_output);
371
			mwexec("/usr/bin/tar czPf /tmp/pkg_libs.tgz `/bin/cat /etc/pfSense_md5.txt | /usr/bin/grep 'local/lib' | /usr/bin/awk '{ print $2 }' | /usr/bin/cut -d'(' -f2 | /usr/bin/cut -d')' -f1`", true);
372
			mwexec("/usr/bin/tar czPf /tmp/pkg_bins.tgz `/bin/cat /etc/pfSense_md5.txt | /usr/bin/grep 'rrd' | /usr/bin/awk '{ print $2 }' | /usr/bin/cut -d'(' -f2 | /usr/bin/cut -d')' -f1`", true);
373
			$static_output .= "\n";
374
		}
375
	}
376

    
377
	$id = get_pkg_id($pkg_name);
378
	if ($id >= 0) {
379
		stop_service(get_pkg_internal_name($config['installedpackages']['package'][$id]));
380
		$pkg_depends =& $config['installedpackages']['package'][$id]['depends_on_package_pbi'];
381
		$static_output .= "Removing package...\n";
382
		update_output_window($static_output);
383
		if (is_array($pkg_depends)) {
384
			foreach ($pkg_depends as $pkg_depend)
385
				delete_package($pkg_depend);
386
		} else {
387
			// The packages (1 or more) are all in one long string.
388
			// We need to pass them 1 at a time to delete_package.
389
			// Compress any multiple whitespace (sp, tab, cr, lf...) into a single space char.
390
			$pkg_dep_str = preg_replace("'\s+'", ' ', $pkg_depends);
391
			// Get rid of any leading or trailing space.
392
			$pkg_dep_str = trim($pkg_dep_str);
393
			// Now we have a space-separated string. Make it into an array and process it.
394
			$pkg_dep_array = explode(" ", $pkg_dep_str);
395
			foreach ($pkg_dep_array as $pkg_depend) {
396
				delete_package($pkg_depend);
397
			}
398
		}
399
	}
400
	delete_package_xml($pkg_name);
401

    
402
	// Restore libraries that we backed up if not 
403
	// running from the builder code.
404
	if(!$builder_package_install) {
405
		$static_output .= "Cleaning up... ";
406
		update_output_window($static_output);
407
		mwexec("/usr/bin/tar xzPfk /tmp/pkg_libs.tgz -C /", true);
408
		mwexec("/usr/bin/tar xzPfk /tmp/pkg_bins.tgz -C /", true);
409
		@unlink("/tmp/pkg_libs.tgz");
410
		@unlink("/tmp/pkg_bins.tgz");
411
		$static_output .= gettext("done.") . "\n";
412
		update_output_window($static_output);
413
	}
414
}
415

    
416
function force_remove_package($pkg_name) {
417
	delete_package_xml($pkg_name);
418
}
419

    
420
/*
421
 * sync_package($pkg_name, $sync_depends = true, $show_message = false) Force a package to setup its configuration and rc.d files.
422
 */
423
function sync_package($pkg_name, $sync_depends = true, $show_message = false) {
424
	global $config, $config_parsed;
425
	global $builder_package_install;
426
	
427
	// If this code is being called by pfspkg_installer 
428
	// which the builder system uses then return (ignore).
429
	if($builder_package_install)
430
		return;
431
	
432
	if(empty($config['installedpackages']['package']))
433
		return;
434
	if(!is_numeric($pkg_name)) {
435
		$pkg_id = get_pkg_id($pkg_name);
436
		if($pkg_id == -1)
437
			return -1; // This package doesn't really exist - exit the function.
438
	} else {
439
		$pkg_id = $pkg_name;
440
		if(empty($config['installedpackages']['package'][$pkg_id]))
441
			return;  // No package belongs to the pkg_id passed to this function.
442
	}
443
	if (is_array($config['installedpackages']['package'][$pkg_id]))
444
		$package =& $config['installedpackages']['package'][$pkg_id];
445
	else
446
		return; /* empty package tag */
447
	if(!file_exists("/usr/local/pkg/" . $package['configurationfile'])) {
448
		log_error(sprintf(gettext("The %s package is missing its configuration file and must be reinstalled."), $package['name']));
449
		force_remove_package($package['name']);
450
		return -1;
451
	}
452
	$pkg_config = parse_xml_config_pkg("/usr/local/pkg/" . $package['configurationfile'], "packagegui");
453
	if(isset($pkg_config['nosync']))
454
		return;
455
	/* Bring in package include files */
456
	if (!empty($pkg_config['include_file'])) {
457
		$include_file = $pkg_config['include_file'];
458
		if (file_exists($include_file))
459
			require_once($include_file);
460
		else {
461
			/* XXX: What the heck is this?! */
462
			log_error("Reinstalling package {$package['name']} because its include file({$include_file}) is missing!");
463
			uninstall_package($package['name']);
464
			if (install_package($package['name']) < 0) {
465
				log_error("Reinstalling package {$package['name']} failed. Take appropriate measures!!!");
466
				return -1;
467
			}
468
		}
469
	}
470

    
471
	if(!empty($pkg_config['custom_php_global_functions']))
472
		eval($pkg_config['custom_php_global_functions']);
473
	if(!empty($pkg_config['custom_php_resync_config_command']))
474
		eval($pkg_config['custom_php_resync_config_command']);
475
	if($sync_depends == true) {
476
		$depends = get_pkg_depends($pkg_name, ".xml", "files", 1); // Call dependency handler and do a little more error checking.
477
		if(is_array($depends)) {
478
			foreach($depends as $item) {
479
				if(!file_exists($item)) {
480
					require_once("notices.inc");
481
					file_notice($package['name'], sprintf(gettext("The %s package is missing required dependencies and must be reinstalled."), $package['name']), "Packages", "/pkg_mgr_install.php?mode=reinstallpkg&pkg={$package['name']}", 1);
482
					log_error("Could not find {$item}. Reinstalling package.");
483
					uninstall_package($pkg_name);
484
					if (install_package($pkg_name) < 0) {
485
						log_error("Reinstalling package {$package['name']} failed. Take appropriate measures!!!");
486
						return -1;
487
					}
488
				} else {
489
					$item_config = parse_xml_config_pkg($item, "packagegui");
490
					if (empty($item_config))
491
						continue;
492
					if(isset($item_config['nosync']))
493
						continue;
494
					if (!empty($item_config['include_file'])) {
495
						if (file_exists($item_config['include_file']))	
496
							require_once($item_config['include_file']);
497
						else {
498
							log_error("Not calling package sync code for dependency {$item_config['name']} of {$package['name']} because some include files are missing.");
499
							continue;
500
						}
501
					}
502
					if($item_config['custom_php_global_functions'] <> "")
503
						eval($item_config['custom_php_global_functions']);
504
					if($item_config['custom_php_resync_config_command'] <> "")
505
						eval($item_config['custom_php_resync_config_command']);
506
					if($show_message == true)
507
						print " " . $item_config['name'];
508
				}
509
			}
510
		}
511
	}
512
}
513

    
514
/*
515
 * pkg_fetch_recursive: Download and install a FreeBSD PBI package. This function provides output to
516
 * 			a progress bar and output window.
517
 */
518
function pkg_fetch_recursive($pkgname, $filename, $dependlevel = 0, $base_url = "") {
519
	global $static_output, $g;
520

    
521
	// Clean up incoming filenames
522
	$filename = str_replace("  ", " ", $filename);
523
	$filename = str_replace("\n", " ", $filename);
524
	$filename = str_replace("  ", " ", $filename);
525

    
526
	$pkgs = explode(" ", $filename);
527
	foreach($pkgs as $filename) {
528
		$filename = trim($filename);
529
		if (($g['platform'] == "nanobsd") || ($g['platform'] == "embedded")) {
530
			$pkgtmpdir = "/usr/bin/env PKG_TMPDIR=/root/ ";
531
			$pkgstagingdir = "/root/tmp";
532
			if (!is_dir($pkgstagingdir))
533
				mkdir($pkgstagingdir);
534
			$pkgstaging = "-o {$pkgstagingdir}/instmp.XXXXXX";
535
			$fetchdir = $pkgstagingdir;
536
		} else {
537
			$fetchdir = $g['tmp_path'];
538
		}
539

    
540
		/* FreeBSD has no PBI's hosted, so fall back to our own URL for now. (Maybe fail to PC-BSD?) */
541
		$arch = php_uname("m");
542
		$arch = ($arch == "i386") ? "" : $arch . '/';
543
		$rel = get_freebsd_version();
544
		$priv_url = "http://files.pfsense.org/packages/{$arch}{$rel}/All/";
545
		if (empty($base_url))
546
			$base_url = $priv_url;
547
		if (substr($base_url, -1) == "/")
548
			$base_url = substr($base_url, 0, -1);
549
		$fetchto = "{$fetchdir}/apkg_{$filename}";
550
		$static_output .= "\n" . str_repeat(" ", $dependlevel * 2 + 1) . "Downloading {$base_url}/{$filename} ... ";
551
		if (download_file_with_progress_bar("{$base_url}/{$filename}", $fetchto) !== true) {
552
			if ($base_url != $priv_url && download_file_with_progress_bar("{$priv_url}/{$filename}", $fetchto) !== true) {
553
				$static_output .= " could not download from there or {$priv_url}/{$filename}.\n";
554
				update_output_window($static_output);
555
				return false;
556
			} else if ($base_url == $priv_url) {
557
				$static_output .= " failed to download.\n";
558
				update_output_window($static_output);
559
				return false;
560
			} else {
561
				$static_output .= " [{$osname} repository]\n";
562
				update_output_window($static_output);
563
			}
564
		}
565
		$static_output .= " (extracting)\n";
566
		update_output_window($static_output);
567

    
568
		$pkgaddout = "";
569

    
570
		exec("/usr/local/sbin/pbi_add {$pkgstaging} -f -v --no-checksig {$fetchto} 2>&1", $pkgaddout);
571
		pkg_debug($pkgname . " " . print_r($pkgaddout, true) . "\npbi_add successfully completed.\n");
572
		setup_library_paths();
573
		exec("/usr/local/sbin/pbi_info " . preg_replace('/\.pbi$/','',$filename) . " | /usr/bin/awk '/Prefix/ {print $2}'",$pbidir);
574
		$pbidir = $pbidir[0];
575
		$linkdirs = array('bin','sbin');
576
		foreach($linkdirs as $dir) {
577
			if(is_dir("{$pbidir}/{$dir}")) {
578
				$files = scandir("{$pbidir}/{$dir}");
579
				foreach($files as $f) {
580
					if(!file_exists("/usr/local/{$dir}/{$f}")) {
581
						symlink("{$pbidir}/{$dir}/{$f}","/usr/local/{$dir}/{$f}");
582
					}
583
				}
584
			}
585
		}
586
	}
587
	return true;
588
}
589

    
590
function install_package($package, $pkg_info = "", $force_install = false) {
591
	global $g, $config, $static_output, $pkg_interface;
592

    
593
	/* safe side. Write config below will send to ro again. */
594
	conf_mount_rw();
595

    
596
	if($pkg_interface == "console") 	
597
		echo "\n";
598
	/* fetch package information if needed */
599
	if(empty($pkg_info) or !is_array($pkg_info[$package])) {
600
		$pkg_info = get_pkg_info(array($package));
601
		$pkg_info = $pkg_info[$package]; // We're only dealing with one package, so we can strip away the extra array.
602
		if (empty($pkg_info)) {
603
			conf_mount_ro();
604
			return -1;
605
		}
606
	}
607
	if (!$force_install) {
608
		$compatible = true;
609
		$version = rtrim(file_get_contents("/etc/version"));
610
		
611
		if (isset($pkg_info['required_version']))
612
			$compatible = (pfs_version_compare("", $version, $pkg_info['required_version']) >= 0);
613
		if (isset($pkg_info['maximum_version']))
614
			$compatible = $compatible && (pfs_version_compare("", $version, $pkg_info['maximum_version']) <= 0);
615
		
616
		if (!$compatible) {
617
			log_error(sprintf(gettext('Package %s is not supported on this version.'), $pkg_info['name']));
618
			$static_output .= sprintf(gettext("Package %s is not supported on this version."), $pkg_info['name']);
619
			update_status($static_output);
620
			
621
			conf_mount_ro();
622
			return -1;
623
		}
624
	}
625
	pkg_debug(gettext("Beginning package installation.") . "\n");
626
	log_error(sprintf(gettext('Beginning package installation for %s .'), $pkg_info['name']));
627
	$static_output .= sprintf(gettext("Beginning package installation for %s ."), $pkg_info['name']);
628
	update_status($static_output);
629
	/* fetch the package's configuration file */
630
	if($pkg_info['config_file'] != "") {
631
		$static_output .= "\n" . gettext("Downloading package configuration file... ");
632
		update_output_window($static_output);
633
		pkg_debug(gettext("Downloading package configuration file...") . "\n");
634
		$fetchto = substr(strrchr($pkg_info['config_file'], '/'), 1);
635
		download_file_with_progress_bar($pkg_info['config_file'], '/usr/local/pkg/' . $fetchto);
636
		if(!file_exists('/usr/local/pkg/' . $fetchto)) {
637
			pkg_debug(gettext("ERROR! Unable to fetch package configuration file. Aborting installation.") . "\n");
638
			if($pkg_interface == "console")
639
				print "\n" . gettext("ERROR! Unable to fetch package configuration file. Aborting package installation.") . "\n";
640
			else {
641
				$static_output .= gettext("failed!\n\nInstallation aborted.\n");
642
				update_output_window($static_output);
643
				echo "<br>Show <a href=\"pkg_mgr_install.php?showlog=true\">install log</a></center>";
644
			}
645
			conf_mount_ro();
646
			return -1;
647
		}
648
		$static_output .= gettext("done.") . "\n";
649
		update_output_window($static_output);
650
	}
651
	/* add package information to config.xml */
652
	$pkgid = get_pkg_id($pkg_info['name']);
653
	$static_output .= gettext("Saving updated package information...") . " ";
654
	update_output_window($static_output);
655
	if($pkgid == -1) {
656
		$config['installedpackages']['package'][] = $pkg_info;
657
		$changedesc = sprintf(gettext("Installed %s package."),$pkg_info['name']);
658
		$to_output = gettext("done.") . "\n";
659
	} else {
660
		$config['installedpackages']['package'][$pkgid] = $pkg_info;
661
		$changedesc = sprintf(gettext("Overwrote previous installation of %s."), $pkg_info['name']);
662
		$to_output = gettext("overwrite!") . "\n";
663
	}
664
	if(file_exists('/conf/needs_package_sync'))
665
		@unlink('/conf/needs_package_sync');
666
	conf_mount_ro();
667
	write_config("Intermediate config write during package install for {$pkg_info['name']}.");
668
	$static_output .= $to_output;
669
	update_output_window($static_output);
670
	/* install other package components */
671
	if (!install_package_xml($package)) {
672
		uninstall_package($package);
673
		write_config($changedesc);
674
		$static_output .= gettext("Failed to install package.") . "\n";
675
		update_output_window($static_output);
676
		return -1;
677
	} else {
678
		$static_output .= gettext("Writing configuration... ");
679
		update_output_window($static_output);
680
		write_config($changedesc);
681
		$static_output .= gettext("done.") . "\n";
682
		update_output_window($static_output);
683
		if($pkg_info['after_install_info']) 
684
			update_output_window($pkg_info['after_install_info']);	
685
	}
686
}
687

    
688
function get_after_install_info($package) {
689
	global $pkg_info;
690
	/* fetch package information if needed */
691
	if(!$pkg_info or !is_array($pkg_info[$package])) {
692
		$pkg_info = get_pkg_info(array($package));
693
		$pkg_info = $pkg_info[$package]; // We're only dealing with one package, so we can strip away the extra array.
694
	}
695
	if($pkg_info['after_install_info'])
696
		return $pkg_info['after_install_info'];
697
}
698

    
699
function eval_once($toeval) {
700
	global $evaled;
701
	if(!$evaled) $evaled = array();
702
	$evalmd5 = md5($toeval);
703
	if(!in_array($evalmd5, $evaled)) {
704
		@eval($toeval);
705
		$evaled[] = $evalmd5;
706
	}
707
	return;
708
}
709

    
710
function install_package_xml($pkg) {
711
	global $g, $config, $static_output, $pkg_interface, $config_parsed;
712

    
713
	if(($pkgid = get_pkg_id($pkg)) == -1) {
714
		$static_output .= sprintf(gettext("The %s package is not installed.%sInstallation aborted."), $pkg, "\n\n");
715
		update_output_window($static_output);
716
		if($pkg_interface <> "console") {
717
			echo "\n<script language=\"JavaScript\">document.progressbar.style.visibility='hidden';</script>";
718
			echo "\n<script language=\"JavaScript\">document.progholder.style.visibility='hidden';</script>";
719
		}
720
		sleep(1);
721
		return false;
722
	} else
723
		$pkg_info = $config['installedpackages']['package'][$pkgid];
724

    
725
	/* pkg_add the package and its dependencies */
726
	if($pkg_info['depends_on_package_base_url'] != "") {
727
		if($pkg_interface == "console") 
728
			echo "\n";
729
		update_status(gettext("Installing") . " " . $pkg_info['name'] . " " . gettext("and its dependencies."));
730
		$static_output .= gettext("Downloading") . " " . $pkg_info['name'] . " " . gettext("and its dependencies... ");
731
		$static_orig = $static_output;
732
		$static_output .= "\n";
733
		update_output_window($static_output);
734
		foreach((array) $pkg_info['depends_on_package_pbi'] as $pkgdep) {
735
			$pkg_name = substr(reverse_strrchr($pkgdep, "."), 0, -1);
736
			$static_output = $static_orig . "\nChecking for package installation... ";
737
			update_output_window($static_output);
738
			if (!is_freebsd_pkg_installed($pkg_name)) {
739
				if (!pkg_fetch_recursive($pkg_name, $pkgdep, 0, $pkg_info['depends_on_package_base_url'])) {
740
					$static_output .= "of {$pkg_name} failed!\n\nInstallation aborted.";
741
					update_output_window($static_output);
742
					pkg_debug(gettext("Package WAS NOT installed properly.") . "\n");
743
					if($pkg_interface <> "console") {
744
						echo "\n<script language=\"JavaScript\">document.progressbar.style.visibility='hidden';</script>";
745
						echo "\n<script language=\"JavaScript\">document.progholder.style.visibility='hidden';</script>";
746
					}
747
					sleep(1);
748
					return false;
749
				}
750
			}
751
		}
752
	}
753
	$configfile = substr(strrchr($pkg_info['config_file'], '/'), 1);
754
	if(file_exists("/usr/local/pkg/" . $configfile)) {
755
		$static_output .= gettext("Loading package configuration... ");
756
		update_output_window($static_output);
757
		$pkg_config = parse_xml_config_pkg("/usr/local/pkg/" . $configfile, "packagegui");
758
		$static_output .= gettext("done.") . "\n";
759
		update_output_window($static_output);
760
		$static_output .= gettext("Configuring package components...\n");
761
		if (!empty($pkg_config['filter_rules_needed']))
762
			$config['installedpackages']['package'][$pkgid]['filter_rule_function'] = $pkg_config['filter_rules_needed'];
763
		update_output_window($static_output);
764
		/* modify system files */
765
		if(is_array($pkg_config['modify_system']) && is_array($pkg_config['modify_system']['item'])) {
766
			$static_output .= gettext("System files... ");
767
			update_output_window($static_output);
768
			foreach($pkg_config['modify_system']['item'] as $ms) {
769
				if($ms['textneeded']) {
770
					add_text_to_file($ms['modifyfilename'], $ms['textneeded']);
771
				}
772
			}
773
			$static_output .= gettext("done.") . "\n";
774
			update_output_window($static_output);
775
		}
776
		/* download additional files */
777
		if(is_array($pkg_config['additional_files_needed'])) {
778
			$static_output .= gettext("Additional files... ");
779
			$static_orig = $static_output;
780
			update_output_window($static_output);
781
			foreach($pkg_config['additional_files_needed'] as $afn) {
782
				$filename = get_filename_from_url($afn['item'][0]);
783
				if($afn['chmod'] <> "")
784
					$pkg_chmod = $afn['chmod'];
785
				else
786
					$pkg_chmod = "";
787

    
788
				if($afn['prefix'] <> "")
789
					$prefix = $afn['prefix'];
790
				else
791
					$prefix = "/usr/local/pkg/";
792

    
793
				if(!is_dir($prefix)) 
794
					safe_mkdir($prefix);
795
 				$static_output .= $filename . " ";
796
				update_output_window($static_output);
797
				if (download_file_with_progress_bar($afn['item'][0], $prefix . $filename) !== true) {
798
					$static_output .= "failed.\n";
799
					@unlink($prefix . $filename);
800
					update_output_window($static_output);
801
					return false;
802
				}
803
				if(stristr($filename, ".tgz") <> "") {
804
					pkg_debug(gettext("Extracting tarball to -C for ") . $filename . "...\n");
805
					$tarout = "";
806
					exec("/usr/bin/tar xvzf " . $prefix . $filename . " -C / 2>&1", $tarout);
807
					pkg_debug(print_r($tarout, true) . "\n");
808
				}
809
				if($pkg_chmod <> "") {
810
					pkg_debug(sprintf(gettext('Changing file mode to %1$s for %2$s%3$s%4$s'), $pkg_chmod, $prefix, $filename, "\n"));
811
					@chmod($prefix . $filename, $pkg_chmod);
812
					system("/bin/chmod {$pkg_chmod} {$prefix}{$filename}");
813
				}
814
				$static_output = $static_orig;
815
				update_output_window($static_output);
816
			}
817
			$static_output .= gettext("done.") . "\n";
818
			update_output_window($static_output);
819
		}
820
		/*   if a require exists, include it.  this will
821
		 *   show us where an error exists in a package
822
		 *   instead of making us blindly guess
823
		 */
824
		$missing_include = false;
825
		if($pkg_config['include_file'] <> "") {
826
			$static_output = gettext("Loading package instructions...") . "\n";
827
			update_output_window($static_output);
828
			pkg_debug("require_once('{$pkg_config['include_file']}')\n");
829
			if (file_exists($pkg_config['include_file']))
830
				require_once($pkg_config['include_file']);
831
			else {
832
				$missing_include = true;
833
				$static_output .= "Include " . basename($pkg_config['include_file']) . " is missing!\n";
834
				update_output_window($static_output);
835
				/* XXX: Should undo the steps before this?! */
836
				return false;
837
			}
838
		}
839

    
840
		/* custom commands */
841
		$static_output .= gettext("Custom commands...") . "\n";
842
		update_output_window($static_output);
843
		if ($missing_include == false) {
844
			if($pkg_config['custom_php_global_functions'] <> "") {
845
				$static_output .= gettext("Executing custom_php_global_functions()...");
846
				update_output_window($static_output);
847
				eval_once($pkg_config['custom_php_global_functions']);
848
				$static_output .= gettext("done.") . "\n";
849
				update_output_window($static_output);
850
			}
851
			if($pkg_config['custom_php_install_command']) {
852
				$static_output .= gettext("Executing custom_php_install_command()...");
853
				update_output_window($static_output);
854
				/* XXX: create symlinks for conf files into the PBI directories.
855
				 *	change packages to store configs at /usr/pbi/pkg/etc and remove this
856
				 */
857
				eval_once($pkg_config['custom_php_install_command']);
858
				// Note: pkg may be mixed-case, e.g. "squidGuard" but the PBI names are lowercase.
859
				// e.g. "squidguard-1.4_4-i386" so feed lowercase to pbi_info below.
860
				// Also add the "-" so that examples like "squid-" do not match "squidguard-".
861
				$pkg_name_for_pbi_match = strtolower($pkg) . "-";
862
				exec("/usr/local/sbin/pbi_info | grep '^{$pkg_name_for_pbi_match}' | xargs /usr/local/sbin/pbi_info | awk '/Prefix/ {print $2}'",$pbidirarray);
863
				$pbidir0 = $pbidirarray[0];
864
				exec("find /usr/local/etc/ -name *.conf | grep \"{$pkg}\"",$files);
865
				foreach($files as $f) {
866
					$pbiconf = str_replace('/usr/local',$pbidir0,$f);
867
					if(is_file($pbiconf) || is_link($pbiconf)) {
868
						unlink($pbiconf);
869
					}
870
					if(is_dir(dirname($pbiconf))) {
871
						symlink($f,$pbiconf);
872
					} else {
873
						log_error("The dir for {$pbiconf} does not exist. Cannot add symlink to {$f}.");
874
					}
875
				}
876
				eval_once($pkg_config['custom_php_install_command']);
877
				$static_output .= gettext("done.") . "\n";
878
				update_output_window($static_output);
879
			}
880
			if($pkg_config['custom_php_resync_config_command'] <> "") {
881
				$static_output .= gettext("Executing custom_php_resync_config_command()...");
882
				update_output_window($static_output);
883
				eval_once($pkg_config['custom_php_resync_config_command']);
884
				$static_output .= gettext("done.") . "\n";
885
				update_output_window($static_output);
886
			}
887
		}
888
		/* sidebar items */
889
		if(is_array($pkg_config['menu'])) {
890
			$static_output .= gettext("Menu items... ");
891
			update_output_window($static_output);
892
			foreach($pkg_config['menu'] as $menu) {
893
				if(is_array($config['installedpackages']['menu'])) {
894
					foreach($config['installedpackages']['menu'] as $amenu)
895
						if($amenu['name'] == $menu['name'])
896
							continue 2;
897
				} else
898
					$config['installedpackages']['menu'] = array();
899
				$config['installedpackages']['menu'][] = $menu;
900
			}
901
			$static_output .= gettext("done.") . "\n";
902
			update_output_window($static_output);
903
		}
904
		/* integrated tab items */
905
		if(is_array($pkg_config['tabs']['tab'])) {
906
			$static_output .= gettext("Integrated Tab items... ");
907
			update_output_window($static_output);
908
			foreach($pkg_config['tabs']['tab'] as $tab) {
909
				if(is_array($config['installedpackages']['tab'])) {
910
					foreach($config['installedpackages']['tab'] as $atab)
911
						if($atab['name'] == $tab['name'])
912
							continue 2;
913
				} else
914
					$config['installedpackages']['tab'] = array();
915
				$config['installedpackages']['tab'][] = $tab;
916
			}
917
			$static_output .= gettext("done.") . "\n";
918
			update_output_window($static_output);
919
		}
920
		/* services */
921
		if(is_array($pkg_config['service'])) {
922
			$static_output .= gettext("Services... ");
923
			update_output_window($static_output);
924
			foreach($pkg_config['service'] as $service) {
925
				if(is_array($config['installedpackages']['service'])) {
926
					foreach($config['installedpackages']['service'] as $aservice)
927
						if($aservice['name'] == $service['name'])
928
							continue 2;
929
				} else
930
					$config['installedpackages']['service'] = array();
931
				$config['installedpackages']['service'][] = $service;
932
			}
933
			$static_output .= gettext("done.") . "\n";
934
			update_output_window($static_output);
935
		}
936
	} else {
937
		$static_output .= gettext("Loading package configuration... failed!") . "\n\n" . gettext("Installation aborted.");
938
		update_output_window($static_output);
939
		pkg_debug(gettext("Unable to load package configuration. Installation aborted.") ."\n");
940
		if($pkg_interface <> "console") {
941
			echo "\n<script language=\"JavaScript\">document.progressbar.style.visibility='hidden';</script>";
942
			echo "\n<script language=\"JavaScript\">document.progholder.style.visibility='hidden';</script>";
943
		}
944
		sleep(1);
945
		return false;
946
	}
947

    
948
	/* set up package logging streams */
949
	if($pkg_info['logging']) {
950
		mwexec("/usr/sbin/fifolog_create -s 32768 {$g['varlog_path']}/{$pkg_info['logging']['logfilename']}");
951
		@chmod($g['varlog_path'] . '/' . $pkg_info['logging']['logfilename'], 0600);
952
		add_text_to_file("/etc/syslog.conf", $pkg_info['logging']['facilityname'] . "\t\t\t\t" . $pkg_info['logging']['logfilename']);
953
		pkg_debug("Adding text to file /etc/syslog.conf\n");
954
		system_syslogd_start();
955
	}
956

    
957
	return true;
958
}
959

    
960
function does_package_depend($pkg) {
961
	// Should not happen, but just in case.
962
	if(!$pkg)
963
		return;
964
	$pkg_var_db_dir = glob("/var/db/pkg/{$pkg}*");
965
	// If this package has dependency then return true
966
	foreach($pkg_var_db_dir as $pvdd) {
967
		if (file_exists("{$vardb}/{$pvdd}/+REQUIRED_BY") && count(file("{$vardb}/{$pvdd}/+REQUIRED_BY")) > 0) 
968
			return true;
969
	}	
970
	// Did not find a record of dependencies, so return false.
971
	return false;
972
}
973

    
974
function delete_package($pkg) {
975
	global $config, $g, $static_output, $vardb;
976

    
977
	if(!$pkg) 
978
		return;
979

    
980
	// Note: $pkg has the full PBI package name followed by ".pbi". Strip off ".pbi".
981
	$pkg = substr(reverse_strrchr($pkg, "."), 0, -1);
982

    
983
	if($pkg)
984
		$static_output .= sprintf(gettext("Starting package deletion for %s..."),$pkg);
985
	update_output_window($static_output);
986

    
987
	remove_freebsd_package($pkg);
988
	$static_output .= "done.\n";
989
	update_output_window($static_output);
990

    
991
	/* Rescan directories for what has been left and avoid fooling other programs. */
992
	mwexec("/sbin/ldconfig");
993

    
994
	return;
995
}
996

    
997
function delete_package_xml($pkg) {
998
	global $g, $config, $static_output, $pkg_interface;
999

    
1000
	conf_mount_rw();
1001

    
1002
	$pkgid = get_pkg_id($pkg);
1003
	if ($pkgid == -1) {
1004
		$static_output .= sprintf(gettext("The %s package is not installed.%sDeletion aborted."), $pkg, "\n\n");
1005
		update_output_window($static_output);
1006
		if($pkg_interface <> "console") {
1007
			echo "\n<script language=\"JavaScript\">document.progressbar.style.visibility='hidden';</script>";
1008
			echo "\n<script language=\"JavaScript\">document.progholder.style.visibility='hidden';</script>";
1009
		}
1010
		ob_flush();
1011
		sleep(1);
1012
		conf_mount_ro();
1013
		return;
1014
	}
1015
	pkg_debug(sprintf(gettext("Removing %s package... "),$pkg));
1016
	$static_output .= sprintf(gettext("Removing %s components..."),$pkg) . "\n";
1017
	update_output_window($static_output);
1018
	/* parse package configuration */
1019
	$packages = &$config['installedpackages']['package'];
1020
	$tabs =& $config['installedpackages']['tab'];
1021
	$menus =& $config['installedpackages']['menu'];
1022
	$services = &$config['installedpackages']['service'];
1023
	$pkg_info =& $packages[$pkgid];
1024
	if(file_exists("/usr/local/pkg/" . $pkg_info['configurationfile'])) {
1025
		$pkg_config = parse_xml_config_pkg("/usr/local/pkg/" . $packages[$pkgid]['configurationfile'], "packagegui");
1026
		/* remove tab items */
1027
		if(is_array($pkg_config['tabs'])) {
1028
			$static_output .= gettext("Tabs items... ");
1029
			update_output_window($static_output);
1030
			if(is_array($pkg_config['tabs']['tab']) && is_array($tabs)) {
1031
				foreach($pkg_config['tabs']['tab'] as $tab) {
1032
					foreach($tabs as $key => $insttab) {
1033
						if($insttab['name'] == $tab['name']) {
1034
							unset($tabs[$key]);
1035
							break;
1036
						}
1037
					}
1038
				}
1039
			}
1040
			$static_output .= gettext("done.") . "\n";
1041
			update_output_window($static_output);
1042
		}
1043
		/* remove menu items */
1044
		if(is_array($pkg_config['menu'])) {
1045
			$static_output .= gettext("Menu items... ");
1046
			update_output_window($static_output);
1047
			if (is_array($pkg_config['menu']) && is_array($menus)) {
1048
				foreach($pkg_config['menu'] as $menu) {
1049
					foreach($menus as $key => $instmenu) {
1050
						if($instmenu['name'] == $menu['name']) {
1051
							unset($menus[$key]);
1052
							break;
1053
						}
1054
					}
1055
				}
1056
			}
1057
			$static_output .= gettext("done.") . "\n";
1058
			update_output_window($static_output);
1059
		}
1060
		/* remove services */
1061
		if(is_array($pkg_config['service'])) {
1062
			$static_output .= gettext("Services... ");
1063
			update_output_window($static_output);
1064
			if (is_array($pkg_config['service']) && is_array($services)) {
1065
				foreach($pkg_config['service'] as $service) {
1066
					foreach($services as $key => $instservice) {
1067
						if($instservice['name'] == $service['name']) {
1068
							if($g['booting'] != true)
1069
								stop_service($service['name']);
1070
							if($service['rcfile']) {
1071
								$prefix = RCFILEPREFIX;
1072
								if (!empty($service['prefix']))
1073
									$prefix = $service['prefix'];
1074
								if (file_exists("{$prefix}{$service['rcfile']}"))
1075
									@unlink("{$prefix}{$service['rcfile']}");
1076
							}
1077
							unset($services[$key]);
1078
						}
1079
					}
1080
				}
1081
			}
1082
			$static_output .= gettext("done.") . "\n";
1083
			update_output_window($static_output);
1084
		}
1085
		/*
1086
		 * XXX: Otherwise inclusion of config.inc again invalidates actions taken.
1087
		 * 	Same is done during installation.
1088
		 */
1089
		write_config("Intermediate config write during package removal for {$pkg}.");
1090

    
1091
		/*
1092
		 * If a require exists, include it.  this will
1093
		 * show us where an error exists in a package
1094
		 * instead of making us blindly guess
1095
		 */
1096
		$missing_include = false;
1097
		if($pkg_config['include_file'] <> "") {
1098
			$static_output .= gettext("Loading package instructions...") . "\n";
1099
			update_output_window($static_output);
1100
			pkg_debug("require_once(\"{$pkg_config['include_file']}\")\n");
1101
			if (file_exists($pkg_config['include_file']))
1102
				require_once($pkg_config['include_file']);
1103
			else {
1104
				$missing_include = true;
1105
				update_output_window($static_output);
1106
				$static_output .= "Include file " . basename($pkg_config['include_file']) . " could not be found for inclusion.\n";
1107
			}
1108
		}
1109
		/* ermal
1110
		 * NOTE: It is not possible to handle parse errors on eval.
1111
		 * So we prevent it from being run at all to not interrupt all the other code.
1112
		 */
1113
		if ($missing_include == false) {
1114
			/* evalate this package's global functions and pre deinstall commands */
1115
			if($pkg_config['custom_php_global_functions'] <> "")
1116
				eval_once($pkg_config['custom_php_global_functions']);
1117
			if($pkg_config['custom_php_pre_deinstall_command'] <> "")
1118
				eval_once($pkg_config['custom_php_pre_deinstall_command']);
1119
		}
1120
		/* system files */
1121
		if(is_array($pkg_config['modify_system']) && is_array($pkg_config['modify_system']['item'])) {
1122
			$static_output .= gettext("System files... ");
1123
			update_output_window($static_output);
1124
			foreach($pkg_config['modify_system']['item'] as $ms)
1125
				if($ms['textneeded']) remove_text_from_file($ms['modifyfilename'], $ms['textneeded']);
1126

    
1127
			$static_output .= gettext("done.") . "\n";
1128
			update_output_window($static_output);
1129
		}
1130
		/* deinstall commands */
1131
		if($pkg_config['custom_php_deinstall_command'] <> "") {
1132
			$static_output .= gettext("Deinstall commands... ");
1133
			update_output_window($static_output);
1134
			if ($missing_include == false) {
1135
				eval_once($pkg_config['custom_php_deinstall_command']);
1136
				$static_output .= gettext("done.") . "\n";
1137
			} else
1138
				$static_output .= "\nNot executing custom deinstall hook because an include is missing.\n";
1139
			update_output_window($static_output);
1140
		}
1141
		if($pkg_config['include_file'] <> "") {
1142
			$static_output .= gettext("Removing package instructions...");
1143
			update_output_window($static_output);
1144
			pkg_debug(sprintf(gettext("Remove '%s'"), $pkg_config['include_file']) . "\n");
1145
			unlink_if_exists("/usr/local/pkg/" . $pkg_config['include_file']);
1146
			$static_output .= gettext("done.") . "\n";
1147
			update_output_window($static_output);
1148
		}
1149
		/* remove all additional files */
1150
		if(is_array($pkg_config['additional_files_needed'])) {
1151
			$static_output .= gettext("Auxiliary files... ");
1152
			update_output_window($static_output);
1153
			foreach($pkg_config['additional_files_needed'] as $afn) {
1154
				$filename = get_filename_from_url($afn['item'][0]);
1155
				if($afn['prefix'] <> "")
1156
					$prefix = $afn['prefix'];
1157
				else
1158
					$prefix = "/usr/local/pkg/";
1159
				unlink_if_exists($prefix . $filename);
1160
			}
1161
			$static_output .= gettext("done.") . "\n";
1162
			update_output_window($static_output);
1163
		}
1164
		/* package XML file */
1165
		$static_output .= gettext("Package XML... ");
1166
		update_output_window($static_output);
1167
		unlink_if_exists("/usr/local/pkg/" . $packages[$pkgid]['configurationfile']);
1168
		$static_output .= gettext("done.") . "\n";
1169
		update_output_window($static_output);
1170
	}
1171
	/* syslog */
1172
	if(is_array($pkg_info['logging']) && $pkg_info['logging']['logfile_name'] <> "") {
1173
		$static_output .= "Syslog entries... ";
1174
		update_output_window($static_output);
1175
		remove_text_from_file("/etc/syslog.conf", $pkg_info['logging']['facilityname'] . "\t\t\t\t" . $pkg_info['logging']['logfilename']);
1176
		system_syslogd_start();
1177
		@unlink("{$g['varlog_path']}/{$pkg_info['logging']['logfilename']}");
1178
		$static_output .= "done.\n";
1179
		update_output_window($static_output);
1180
	}
1181
	
1182
	conf_mount_ro();
1183
	/* remove config.xml entries */
1184
	$static_output .= gettext("Configuration... ");
1185
	update_output_window($static_output);
1186
	unset($config['installedpackages']['package'][$pkgid]);
1187
	$static_output .= gettext("done.") . "\n";
1188
	update_output_window($static_output);
1189
	write_config("Removed {$pkg} package.\n");
1190
}
1191

    
1192
function expand_to_bytes($size) {
1193
	$conv = array(
1194
			"G" =>	"3",
1195
			"M" =>  "2",
1196
			"K" =>  "1",
1197
			"B" =>  "0"
1198
		);
1199
	$suffix = substr($size, -1);
1200
	if(!in_array($suffix, array_keys($conv))) return $size;
1201
	$size = substr($size, 0, -1);
1202
	for($i = 0; $i < $conv[$suffix]; $i++) {
1203
		$size *= 1024;
1204
	}
1205
	return $size;
1206
}
1207

    
1208
function get_pkg_db() {
1209
	global $g;
1210
	return return_dir_as_array($g['vardb_path'] . '/pkg');
1211
}
1212

    
1213
function walk_depend($depend, $pkgdb = "", $alreadyseen = "") {
1214
	if(!$pkgdb)
1215
		$pkgdb = get_pkg_db();
1216
	if(!is_array($alreadyseen))
1217
		$alreadyseen = array();
1218
	if (!is_array($depend))
1219
		$depend = array();
1220
	foreach($depend as $adepend) {
1221
		$pkgname = reverse_strrchr($adepend['name'], '.');
1222
		if(in_array($pkgname, $alreadyseen)) {
1223
			continue;
1224
		} elseif(!in_array($pkgname, $pkgdb)) {
1225
			$size += expand_to_bytes($adepend['size']);
1226
			$alreadyseen[] = $pkgname;
1227
			if(is_array($adepend['depend'])) $size += walk_depend($adepend['depend'], $pkgdb, $alreadyseen);
1228
		}
1229
	}
1230
	return $size;
1231
}
1232

    
1233
function get_package_install_size($pkg = 'all', $pkg_info = "") {
1234
	global $config, $g;
1235
	if((!is_array($pkg)) and ($pkg != 'all'))
1236
		$pkg = array($pkg);
1237
	$pkgdb = get_pkg_db();
1238
	if(!$pkg_info)
1239
		$pkg_info = get_pkg_sizes($pkg);
1240
	foreach($pkg as $apkg) {
1241
		if(!$pkg_info[$apkg])
1242
			continue;
1243
		$toreturn[$apkg] = expand_to_bytes(walk_depend(array($pkg_info[$apkg]), $pkgdb));
1244
	}
1245
	return $toreturn;
1246
}
1247

    
1248
function squash_from_bytes($size, $round = "") {
1249
	$conv = array(1 => "B", "K", "M", "G");
1250
	foreach($conv as $div => $suffix) {
1251
		$sizeorig = $size;
1252
		if(($size /= 1024) < 1) {
1253
			if($round) {
1254
				$sizeorig = round($sizeorig, $round);
1255
			}
1256
			return $sizeorig . $suffix;
1257
		}
1258
	}
1259
	return;
1260
}
1261

    
1262
function pkg_reinstall_all() {
1263
	global $g, $config;
1264

    
1265
	@unlink('/conf/needs_package_sync');
1266
	if (is_array($config['installedpackages']['package'])) {
1267
		echo gettext("One moment please, reinstalling packages...\n");
1268
		echo gettext(" >>> Trying to fetch package info...");
1269
		log_error(gettext("Attempting to reinstall all packages"));
1270
		$pkg_info = get_pkg_info();
1271
		if ($pkg_info) {
1272
			echo " Done.\n";
1273
		} else {
1274
			$xmlrpc_base_url = isset($config['system']['altpkgrepo']['enable']) ? $config['system']['altpkgrepo']['xmlrpcbaseurl'] : $g['xmlrpcbaseurl'];
1275
			$error = sprintf(gettext(' >>> Unable to communicate with %1$s. Please verify DNS and interface configuration, and that %2$s has functional Internet connectivity.'), $xmlrpc_base_url, $g['product_name']);
1276
			echo "\n{$error}\n";
1277
			log_error(gettext("Cannot reinstall packages: ") . $error);
1278
			return;
1279
		}
1280
		$todo = array();
1281
		$all_names = array();
1282
		foreach($config['installedpackages']['package'] as $package) {
1283
			$todo[] = array('name' => $package['name'], 'version' => $package['version']);
1284
			$all_names[] = $package['name'];
1285
		}
1286
		$package_name_list = gettext("List of packages to reinstall: ") . implode(", ", $all_names);
1287
		echo " >>> {$package_name_list}\n";
1288
		log_error($package_name_list);
1289

    
1290
		foreach($todo as $pkgtodo) {
1291
			$static_output = "";
1292
			if($pkgtodo['name']) {
1293
				log_error(gettext("Uninstalling package") . " {$pkgtodo['name']}");
1294
				uninstall_package($pkgtodo['name']);
1295
				log_error(gettext("Finished uninstalling package") . " {$pkgtodo['name']}");
1296
				log_error(gettext("Reinstalling package") . " {$pkgtodo['name']}");
1297
				install_package($pkgtodo['name']);
1298
				log_error(gettext("Finished installing package") . " {$pkgtodo['name']}");
1299
			}
1300
		}
1301
		log_error(gettext("Finished reinstalling all packages."));
1302
	} else
1303
		echo "No packages are installed.";
1304
}
1305

    
1306
function stop_packages() {
1307
	require_once("config.inc");
1308
	require_once("functions.inc");
1309
	require_once("filter.inc");
1310
	require_once("shaper.inc");
1311
	require_once("captiveportal.inc");
1312
	require_once("pkg-utils.inc");
1313
	require_once("pfsense-utils.inc");
1314
	require_once("service-utils.inc");
1315

    
1316
	global $config, $g;
1317

    
1318
	log_error("Stopping all packages.");
1319

    
1320
	$rcfiles = glob(RCFILEPREFIX . "*.sh");
1321
	if (!$rcfiles)
1322
		$rcfiles = array();
1323
	else {
1324
		$rcfiles = array_flip($rcfiles);
1325
		if (!$rcfiles)
1326
			$rcfiles = array();
1327
	}
1328

    
1329
	if (is_array($config['installedpackages']['package'])) {
1330
		foreach($config['installedpackages']['package'] as $package) {
1331
			echo " Stopping package {$package['name']}...";
1332
			$internal_name = get_pkg_internal_name($package);
1333
			stop_service($internal_name);
1334
			unset($rcfiles[RCFILEPREFIX . strtolower($internal_name) . ".sh"]);
1335
			echo "done.\n";
1336
		}
1337
	}
1338

    
1339
	$shell = @popen("/bin/sh", "w");
1340
	if ($shell) {
1341
		foreach ($rcfiles as $rcfile => $number) {
1342
			echo " Stopping {$rcfile}...";
1343
			if (!@fwrite($shell, "{$rcfile} stop >>/tmp/bootup_messages 2>&1")) {
1344
				if ($shell)
1345
					pclose($shell);
1346
				$shell = @popen("/bin/sh", "w");
1347
			}
1348
			echo "done.\n";
1349
		}
1350

    
1351
		pclose($shell);
1352
	}
1353
}
1354

    
1355
function get_pkg_interfaces_select_source($include_localhost=false) {
1356
	$interfaces = get_configured_interface_with_descr();
1357
	$ssifs = array();
1358
	foreach ($interfaces as $iface => $ifacename) {
1359
		$tmp["name"]  = $ifacename;
1360
		$tmp["value"] = $iface;
1361
		$ssifs[] = $tmp;
1362
	}
1363
	if ($include_localhost) {
1364
		$tmp["name"]  = "Localhost";
1365
		$tmp["value"] = "lo0";
1366
		$ssifs[] = $tmp;
1367
	}
1368
	return $ssifs;
1369
}
1370
?>
(40-40/66)