/*
**    Path sandbox for the gentoo linux portage package system, initially
**    based on the ROCK Linux Wrapper for getting a list of created files
**
**  to integrate with bash, bash should have been built like this
**
**  ./configure --prefix=<prefix> --host=<host> --without-gnu-malloc
**
**  it's very important that the --enable-static-link option is NOT specified
**    
**    Copyright (C) 2001 Geert Bevin, Uwyn, http://www.uwyn.com
**    Distributed under the terms of the GNU General Public License, v2 or later 
**    Author : Geert Bevin <gbevin@uwyn.com>
**  $Header: /var/cvsroot/gentoo-src/portage/src/sandbox-1.1/Attic/sandbox.c,v 1.20.2.1 2004/12/01 22:14:09 carpaski Exp $
*/

/* #define _GNU_SOURCE */

#include <errno.h>
#include <fcntl.h>
#include <signal.h>
#include <stdio.h>
#include <stdlib.h>
#include <limits.h>
#include <string.h>
#include <sys/file.h>
#include <sys/stat.h>
#include <sys/time.h>
#include <sys/types.h>
#include <sys/resource.h>
#include <sys/wait.h>
#include <unistd.h>
#include <fcntl.h>
#include "sandbox.h"

int preload_adaptable = 1;
int cleaned_up = 0;
int print_debug = 0;
int stop_called = 0;

/* Read pids file, and load active pids into an array.  Return number of pids in array */
int
load_active_pids(int fd, int **pids)
{
	char *data = NULL;
	char *ptr = NULL, *ptr2 = NULL;
	int my_pid;
	int num_pids = 0;
	long len;

	pids[0] = NULL;

	len = file_length(fd);

	/* Allocate and zero datablock to read pids file */
	data = (char *) malloc((len + 1) * sizeof (char));
	memset(data, 0, len + 1);

	/* Start at beginning of file */
	lseek(fd, 0L, SEEK_SET);

	/* read entire file into a buffer */
	read(fd, data, len);

	ptr = data;

	/* Loop and read all pids */
	while (1) {
		/* Find new line */
		ptr2 = strchr(ptr, '\n');
		if (ptr2 == NULL)
			break;										/* No more PIDs */

		/* Clear the \n. And  ptr  should have a null-terminated decimal string */
		ptr2[0] = 0;

		my_pid = atoi(ptr);

		/* If the PID is still alive, add it to our array */
		if ((0 != my_pid) && (0 == kill(my_pid, 0))) {
			pids[0] = (int *) realloc(pids[0], (num_pids + 1) * sizeof (int));
			pids[0][num_pids] = my_pid;
			num_pids++;
		}

		/* Put ptr past the NULL we just wrote */
		ptr = ptr2 + 1;
	}

	if (data)
		free(data);
	data = NULL;

	return num_pids;
}

/* Read ld.so.preload file, and loads dirs into an array.  Return number of entries in array */
int
load_preload_libs(int fd, char ***preloads)
{
	char *data = NULL;
	char *ptr = NULL, *ptr2 = NULL;
	int num_entries = 0;
	long len;

	preloads[0] = NULL;

	len = file_length(fd);

	/* Allocate and zero datablock to read pids file */
	data = (char *) malloc((len + 1) * sizeof (char));
	memset(data, 0, len + 1);

	/* Start at beginning of file */
	lseek(fd, 0L, SEEK_SET);

	/* read entire file into a buffer */
	read(fd, data, len);

	ptr = data;

	/* Loop and read all pids */
	while (1) {
		/* Find new line */
		ptr2 = strchr(ptr, '\n');

		/* Clear the \n. And  ptr  should have a null-terminated decimal string
		 * Don't break from the loop though because the last line may not
		 * terminated with a \n
		 */
		if (NULL != ptr2)
			ptr2[0] = 0;

		/* If listing does not match our libname, add it to the array */
		if ((strlen(ptr)) && (NULL == strstr(ptr, LIB_NAME))) {
			preloads[0] =
					(char **) realloc(preloads[0], (num_entries + 1) * sizeof (char **));
			preloads[0][num_entries] = strdup(ptr);
			num_entries++;
		}

		if (NULL == ptr2)
			break;										/* No more PIDs */

		/* Put ptr past the NULL we just wrote */
		ptr = ptr2 + 1;
	}

	if (data)
		free(data);
	data = NULL;

	return num_entries;
}

void
cleanup()
{
	int i = 0;
	int success = 1;
	int pids_file = -1, num_of_pids = 0;
	int *pids_array = NULL;
	char pid_string[255];
	char *sandbox_pids_file;
#ifdef USE_LD_SO_PRELOAD
	int preload_file = -1, num_of_preloads = 0;
	char preload_entry[255];
	char **preload_array = NULL;
#endif

	/* Generate sandbox pids-file path */
	sandbox_pids_file = get_sandbox_pids_file();

	/* Remove this sandbox's bash pid from the global pids
	 * file if it has rights to adapt the ld.so.preload file */
	if ((1 == preload_adaptable) && (0 == cleaned_up)) {
		cleaned_up = 1;
		success = 1;

		if (print_debug)
			printf("Cleaning up pids file.\n");

		/* Stat the PIDs file, make sure it exists and is a regular file */
		if (file_exist(sandbox_pids_file, 1) <= 0) {
			fprintf(stderr, ">>> pids file is not a regular file");
			success = 0;
			/* We should really not fail if the pidsfile is missing here, but
			 * rather just exit cleanly, as there is still some cleanup to do */
			return;
		}

		pids_file = file_open(sandbox_pids_file, "r+", 1, 0664, "portage");
		if (-1 == pids_file) {
			success = 0;
			/* Nothing more to do here */
			return;
		}

		/* Load "still active" pids into an array */
		num_of_pids = load_active_pids(pids_file, &pids_array);
		//printf("pids: %d\r\n", num_of_pids);

#ifdef USE_LD_SO_PRELOAD
		/* clean the /etc/ld.so.preload file if no other sandbox
		 * processes are running anymore */
		if (1 == num_of_pids) {
			success = 1;

			if (print_debug)
				printf("Cleaning up /etc/ld.so.preload.\n");

			preload_file = file_open("/etc/ld.so.preload", "r+", 1, 0644);
			if (-1 != preload_file) {
				/* Load all the preload libraries into an array */
				num_of_preloads = load_preload_libs(preload_file, &preload_array);
				//printf("num preloads: %d\r\n", num_of_preloads);
				/* Clear file */
				file_truncate(preload_file);

				/* store the other preload libraries back into the /etc/ld.so.preload file */
				if (num_of_preloads > 0) {
					for (i = 0; i < num_of_preloads; i++) {
						sprintf(preload_entry, "%s\n", preload_array[i]);
						if (write
								(preload_file,
								 preload_entry,
								 strlen(preload_entry)) != strlen(preload_entry)) {
							perror(">>> /etc/ld.so.preload file write");
							success = 0;
							break;
						}
					}
				}

				/* Free memory used to store preload array */
				for (i = 0; i < num_of_preloads; i++) {
					if (preload_array[i])
						free(preload_array[i]);
					preload_array[i] = NULL;
				}
				if (preload_array)
					free(preload_array);
				preload_array = NULL;

				file_close(preload_file);
				preload_file = -1;
			}
		}
#endif

		file_truncate(pids_file);

		/* if pids are still running, write only the running pids back to the file */
		if (num_of_pids > 1) {
			for (i = 0; i < num_of_pids; i++) {
				if (pids_array[i] != getpid()) {
					sprintf(pid_string, "%d\n", pids_array[i]);

					if (write(pids_file, pid_string, strlen(pid_string)) !=
							strlen(pid_string)) {
						perror(">>> pids file write");
						success = 0;
						break;
					}
				}
			}

			file_close(pids_file);
			pids_file = -1;
		} else {

			file_close(pids_file);
			pids_file = -1;

			/* remove the pidsfile, as this was the last sandbox */
			unlink(sandbox_pids_file);
		}

		if (pids_array != NULL)
			free(pids_array);
		pids_array = NULL;
	}

	free(sandbox_pids_file);
	if (0 == success)
		return;
}

void
stop(int signum)
{
	if (stop_called == 0) {
		stop_called = 1;
		printf("Caught signal %d in pid %d\r\n", signum, getpid());
	cleanup();
	} else {
		fprintf(stderr, "Pid %d alreadly caught signal and is still cleaning up\n", getpid());
	}
}

void
setenv_sandbox_write(char *home_dir, char *portage_tmp_dir, char *var_tmp_dir,
										 char *tmp_dir)
{
	char buf[1024];
	
	/* bzero out entire buffer then append trailing 0 */
	memset(buf, 0, sizeof(buf));

	if (!getenv(ENV_SANDBOX_WRITE)) {
		/* these could go into make.globals later on */
		snprintf(buf, sizeof(buf),
			"%s:%s/.gconfd/lock:%s/.bash_history:",		\
			"/dev/zero:/dev/fd/:/dev/null:/dev/pts/:"	\
			"/dev/vc/:/dev/tty:/tmp/:"			\
			"/dev/shm/ngpt:/var/log/scrollkeeper.log:"	\
			"/usr/tmp/conftest:/usr/lib/conftest:"		\
			"/usr/lib32/conftest:/usr/lib64/conftest:"	\
			"/usr/tmp/cf:/usr/lib/cf:/usr/lib32/cf:/usr/lib64/cf",
			home_dir, home_dir);

		if (NULL == portage_tmp_dir) {
			strncat(buf, tmp_dir, sizeof(buf));
			strncat(buf, ":", sizeof(buf));
			strncat(buf, var_tmp_dir, sizeof(buf));
			strncat(buf, ":/tmp/:/var/tmp/", sizeof(buf));
		} else {
			strncat(buf, portage_tmp_dir, sizeof(buf));
			strncat(buf, ":", sizeof(buf));
			strncat(buf, tmp_dir, sizeof(buf));
			strncat(buf, ":", sizeof(buf));
			strncat(buf, var_tmp_dir, sizeof(buf));
			strncat(buf, ":/tmp/:/var/tmp/", sizeof(buf));
		}
		buf[sizeof(buf) - 1] = '\0';
		setenv(ENV_SANDBOX_WRITE, buf, 1);
	}
}

void
setenv_sandbox_predict(char *home_dir)
{
	char buf[1024];

	memset(buf, 0, sizeof(buf));

	if (!getenv(ENV_SANDBOX_PREDICT)) {
		/* these should go into make.globals later on */
		snprintf(buf, sizeof(buf), "%s/.:"	\
				"/usr/lib/python2.0/:"	\
				"/usr/lib/python2.1/:"	\
				"/usr/lib/python2.2/:"	\
				"/usr/lib/python2.3/:"	\
				"/usr/lib/python2.4/:"	\
				"/usr/lib/python2.5/:"	\
				"/usr/lib/python3.0/:",
			home_dir);

		buf[sizeof(buf) - 1] = '\0';
		setenv(ENV_SANDBOX_PREDICT, buf, 1);
	}
}

int
print_sandbox_log(char *sandbox_log)
{
	int sandbox_log_file = -1;
	char *beep_count_env = NULL;
	int i, color, beep_count = 0;
	long len = 0;
	char *buffer = NULL;

	sandbox_log_file = file_open(sandbox_log, "r", 1, 0664, "portage");
	if (-1 == sandbox_log_file)
		return 0;

	len = file_length(sandbox_log_file);
	buffer = (char *) malloc((len + 1) * sizeof (char));
	memset(buffer, 0, len + 1);
	read(sandbox_log_file, buffer, len);
	file_close(sandbox_log_file);

	color = ( (getenv("NOCOLOR") != NULL) ? 0 : 1);

	if (color) printf("\e[31;01m");
	printf("--------------------------- ACCESS VIOLATION SUMMARY ---------------------------");
	if (color) printf("\033[0m");
	if (color) printf("\e[31;01m");
	printf("\nLOG FILE = \"%s\"", sandbox_log);
	if (color) printf("\033[0m");
	printf("\n\n");
	printf("%s", buffer);
	if (buffer)
		free(buffer);
	buffer = NULL;
	printf
			("\e[31;01m--------------------------------------------------------------------------------\033[0m\n");

	beep_count_env = getenv(ENV_SANDBOX_BEEP);
	if (beep_count_env)
		beep_count = atoi(beep_count_env);
	else
		beep_count = DEFAULT_BEEP_COUNT;

	for (i = 0; i < beep_count; i++) {
		fputc('\a', stderr);
		if (i < beep_count - 1)
			sleep(1);
	}
	return 1;
}

int
spawn_shell(char *argv_bash[])
{
#ifdef USE_SYSTEM_SHELL
	int i = 0;
	char *sh = NULL;
	int first = 1;
	int ret;
	long len = 0;

	while (1) {
		if (NULL == argv_bash[i])
			break;
		if (NULL != sh)
			len = strlen(sh);
		sh = (char *) realloc(sh, len + strlen(argv_bash[i]) + 5);
		if (first) {
			sh[0] = 0;
			first = 0;
		}
		strcat(sh, "\"");
		strcat(sh, argv_bash[i]);
		strcat(sh, "\" ");

		//printf("%s\n", argv_bash[i]);
		i++;
	}
	printf("%s\n", sh);
	ret = system(sh);
	if (sh)
		free(sh);
	sh = NULL;

	if (-1 == ret)
		return 0;
	return 1;

#else
# ifndef NO_FORK
	int pid;
	int status = 0;
	int ret = 0;

	pid = fork();

	/* Child's process */
	if (0 == pid) {
# endif
		execv(argv_bash[0], argv_bash);
# ifndef NO_FORK
		return 0;
	} else if (pid < 0) {
		return 0;
	}
	ret = waitpid(pid, &status, 0);
	if ((-1 == ret) || (status > 0))
		return 0;
# endif
	return 1;
#endif
}

int
main(int argc, char **argv)
{
	int i = 0, success = 1;
#ifdef USE_LD_SO_PRELOAD
	int preload_file = -1;
#endif
	int sandbox_log_presence = 0;
	int sandbox_log_file = -1;
	int pids_file = -1;
	long len;

	int *pids_array = NULL;
	int num_of_pids = 0;

	// char run_arg[255];
	char portage_tmp_dir[PATH_MAX];
	char var_tmp_dir[PATH_MAX];
	char tmp_dir[PATH_MAX];
	char sandbox_log[255];
	char sandbox_debug_log[255];
	char sandbox_dir[255];
	char sandbox_lib[255];
	char *sandbox_pids_file;
	char sandbox_rc[255];
	char pid_string[255];
	char **argv_bash = NULL;

	char *run_str = "-c";
	char *home_dir = NULL;
	char *tmp_string = NULL;
#ifdef USE_LD_SO_PRELOAD
	char **preload_array = NULL;
	int num_of_preloads = 0;
#endif

	/* Only print info if called with no arguments .... */
	if (argc < 2)
		print_debug = 1;

	if (print_debug)
		printf
				("========================== Gentoo linux path sandbox ===========================\n");

	/* check if a sandbox is already running */
	if (NULL != getenv(ENV_SANDBOX_ON)) {
		fprintf(stderr,
						"Not launching a new sandbox instance\nAnother one is already running in this process hierarchy.\n");
		exit(1);
	} else {

		/* determine the location of all the sandbox support files */
		if (print_debug)
			printf("Detection of the support files.\n");

		/* Generate base sandbox path */
		tmp_string = get_sandbox_path(argv[0]);
		strncpy(sandbox_dir, tmp_string, 254);
		if (tmp_string)
			free(tmp_string);
		tmp_string = NULL;
		strcat(sandbox_dir, "/");

		/* Generate sandbox lib path */
		tmp_string = get_sandbox_lib(sandbox_dir);
		strncpy(sandbox_lib, tmp_string, 254);
		if (tmp_string)
			free(tmp_string);
		tmp_string = NULL;

		/* Generate sandbox pids-file path */
		sandbox_pids_file = get_sandbox_pids_file();

		/* Generate sandbox bashrc path */
		tmp_string = get_sandbox_rc(sandbox_dir);
		strncpy(sandbox_rc, tmp_string, 254);
		if (tmp_string)
			free(tmp_string);
		tmp_string = NULL;

		/* verify the existance of required files */
		if (print_debug)
			printf("Verification of the required files.\n");

#ifndef SB_HAVE_64BIT_ARCH
		if (file_exist(sandbox_lib, 0) <= 0) {
			fprintf(stderr, "Could not open the sandbox library at '%s'.\n",
							sandbox_lib);
			return -1;
		} 
#endif
		if (file_exist(sandbox_rc, 0) <= 0) {
			fprintf(stderr, "Could not open the sandbox rc file at '%s'.\n",
							sandbox_rc);
			return -1;
		}
#ifdef USE_LD_SO_PRELOAD
		/* ensure that the /etc/ld.so.preload file contains an entry for the sandbox lib */
		if (print_debug)
			printf("Setting up the ld.so.preload file.\n");

		/* check if the /etc/ld.so.preload is a regular file */
		if (file_exist("/etc/ld.so.preload", 1) < 0) {
			fprintf(stderr, ">>> /etc/ld.so.preload file is not a regular file\n");
			exit(1);
		}

		if (getuid() == 0) {
			/* Our r+ also will create the file if it doesn't exist */
			preload_file = file_open("/etc/ld.so.preload", "r+", 1, 0644);
			if (-1 == preload_file) {
				preload_adaptable = 0;
/*      exit(1);*/
			}
		} else {
			/* Avoid permissions warnings if we're not root */
			preload_adaptable = 0;
		}

		/* Only update /etc/ld.so.preload if we can write to it ... */
		if (1 == preload_adaptable) {
			/* Load entries of preload table */
			num_of_preloads = load_preload_libs(preload_file, &preload_array);

			/* Zero out our ld.so.preload file */
			file_truncate(preload_file);

			/* Write contents of preload file */
			for (i = 0; i < num_of_preloads + 1; i++) {
				/* First entry should be our sandbox library */
				if (0 == i) {
					if (write
							(preload_file, sandbox_lib,
							 strlen(sandbox_lib)) != strlen(sandbox_lib)) {
						perror(">>> /etc/ld.so.preload file write");
						success = 0;
						break;
					}
				} else {
					/* Output all other preload entries */
					if (write
							(preload_file, preload_array[i - 1],
							 strlen(preload_array[i - 1])) != strlen(preload_array[i - 1])) {
						perror(">>> /etc/ld.so.preload file write");
						success = 0;
						break;
					}
				}
				/* Don't forget the return character after each line! */
				if (1 != write(preload_file, "\n", 1)) {
					perror(">>> /etc/ld.so.preload file write");
					success = 0;
					break;
				}
			}

			for (i = 0; i < num_of_preloads; i++) {
				if (preload_array[i])
					free(preload_array[i]);
				preload_array[i] = NULL;
			}
			if (preload_array)
				free(preload_array);
			num_of_preloads = 0;
			preload_array = NULL;
		}

		/* That's all we needed to do with the preload file */
		if (0 < preload_file)
			file_close(preload_file);
		preload_file = -1;
#endif

		/* set up the required environment variables */
		if (print_debug)
			printf("Setting up the required environment variables.\n");

		/* Generate sandbox log full path */
		tmp_string = get_sandbox_log();
		strncpy(sandbox_log, tmp_string, 254);
		if (tmp_string)
			free(tmp_string);
		tmp_string = NULL;

		setenv(ENV_SANDBOX_LOG, sandbox_log, 1);

		snprintf(sandbox_debug_log, sizeof(sandbox_debug_log), "%s%s%s",
						 DEBUG_LOG_FILE_PREFIX, pid_string, LOG_FILE_EXT);
		setenv(ENV_SANDBOX_DEBUG_LOG, sandbox_debug_log, 1);

		home_dir = getenv("HOME");
		if (!home_dir) {
			home_dir = "/tmp";
			setenv("HOME", home_dir, 1);
		}

		/* drobbins: we need to expand these paths using realpath() so that PORTAGE_TMPDIR
		 * can contain symlinks (example, /var is a symlink, /var/tmp is a symlink.)  Without
		 * this, access is denied to /var/tmp, hurtin' ebuilds.
		 */

		{	char *e;
			e = getenv("PORTAGE_TMPDIR");
			if ( e && ( strlen(e) < sizeof(portage_tmp_dir)-1 ) && (strlen(e) > 1) )
				realpath(e, portage_tmp_dir);

		}
		realpath("/var/tmp", var_tmp_dir);
		realpath("/tmp", tmp_dir);

		setenv(ENV_SANDBOX_DIR, sandbox_dir, 1);
		setenv(ENV_SANDBOX_LIB, sandbox_lib, 1);
		setenv("LD_PRELOAD", sandbox_lib, 1);

		if (!getenv(ENV_SANDBOX_DENY))
			setenv(ENV_SANDBOX_DENY, LD_PRELOAD_FILE, 1);

		if (!getenv(ENV_SANDBOX_READ))
			setenv(ENV_SANDBOX_READ, "/", 1);

		/* Set up Sandbox Write path */
		setenv_sandbox_write(home_dir, portage_tmp_dir, var_tmp_dir, tmp_dir);
		setenv_sandbox_predict(home_dir);

		setenv(ENV_SANDBOX_ON, "1", 0);

		/* if the portage temp dir was present, cd into it */
		if (NULL != portage_tmp_dir)
			chdir(portage_tmp_dir);

		argv_bash = (char **) malloc(6 * sizeof (char *));
		argv_bash[0] = strdup("/bin/bash");
		argv_bash[1] = strdup("-rcfile");
		argv_bash[2] = strdup(sandbox_rc);

		if (argc < 2)
			argv_bash[3] = NULL;
		else
			argv_bash[3] = strdup(run_str);	/* "-c" */

		argv_bash[4] = NULL;				/* strdup(run_arg); */
		argv_bash[5] = NULL;

		if (argc >= 2) {
			for (i = 1; i < argc; i++) {
				if (NULL == argv_bash[4])
					len = 0;
				else
					len = strlen(argv_bash[4]);

				argv_bash[4] =
						(char *) realloc(argv_bash[4],
														 (len + strlen(argv[i]) + 2) * sizeof (char));

				if (0 == len)
					argv_bash[4][0] = 0;
				if (1 != i)
					strcat(argv_bash[4], " ");

				strcat(argv_bash[4], argv[i]);
			}
		}

		/* set up the required signal handlers */
		signal(SIGHUP, &stop);
		signal(SIGINT, &stop);
		signal(SIGQUIT, &stop);
		signal(SIGTERM, &stop);

		/* this one should NEVER be set in ebuilds, as it is the one
		 * private thing libsandbox.so use to test if the sandbox
		 * should be active for this pid, or not.
		 *
		 * azarah (3 Aug 2002)
		 */

		setenv("SANDBOX_ACTIVE", "armedandready", 1);

		/* Load our PID into PIDs file */
		success = 1;
		if (file_exist(sandbox_pids_file, 1) < 0) {
			success = 0;
			fprintf(stderr, ">>> %s is not a regular file\n", sandbox_pids_file);
		} else {
			pids_file = file_open(sandbox_pids_file, "r+", 1, 0664, "portage");
			if (-1 == pids_file)
				success = 0;
		}
		if (1 == success) {
			/* Grab still active pids */
			num_of_pids = load_active_pids(pids_file, &pids_array);

			/* Zero out file */
			file_truncate(pids_file);

			/* Output active pids, and append our pid */
			for (i = 0; i < num_of_pids + 1; i++) {
				/* Time for our entry */
				if (i == num_of_pids)
					sprintf(pid_string, "%d\n", getpid());
				else
					sprintf(pid_string, "%d\n", pids_array[i]);

				if (write(pids_file, pid_string, strlen(pid_string)) !=
						strlen(pid_string)) {
					perror(">>> pids file write");
					success = 0;
					break;
				}
			}
			/* Clean pids_array */
			if (pids_array)
				free(pids_array);
			pids_array = NULL;
			num_of_pids = 0;

			/* We're done with the pids file */
			file_close(pids_file);
		}

		/* Something went wrong, bail out */
		if (0 == success) {
			perror(">>> pids file write");
			exit(1);
		}

		/* STARTING PROTECTED ENVIRONMENT */
		if (print_debug) {
			printf("The protected environment has been started.\n");
			printf
					("--------------------------------------------------------------------------------\n");
		}

		if (print_debug)
			printf("Shell being started in forked process.\n");

		/* Start Bash */
		if (!spawn_shell(argv_bash)) {
			if (print_debug)
				fprintf(stderr, ">>> shell process failed to spawn\n");
			success = 0;
		}

		/* Free bash stuff */
		for (i = 0; i < 6; i++) {
			if (argv_bash[i])
				free(argv_bash[i]);
			argv_bash[i] = NULL;
		}
		if (argv_bash)
			free(argv_bash);
		argv_bash = NULL;

		if (print_debug)
			printf("Cleaning up sandbox process\n");

		cleanup();

		if (print_debug) {
			printf
					("========================== Gentoo linux path sandbox ===========================\n");
			printf("The protected environment has been shut down.\n");
		}

		if (file_exist(sandbox_log, 0)) {
			sandbox_log_presence = 1;
			success = 1;
			if (!print_sandbox_log(sandbox_log))
				success = 0;

#if 0
			if (!success)
				exit(1);
#endif

			sandbox_log_file = -1;
		} else if (print_debug) {
			printf
					("--------------------------------------------------------------------------------\n");
		}

		if ((sandbox_log_presence) || (!success))
			return 1;
		else
			return 0;
	}
}

// vim:expandtab noai:cindent ai