<?php
/**
 * @author Copyright (C) 2006 Lokkju, lokkju@lokkju.com
 * @version 1.0
 * @modified 10/19/2006
 * 
 * Other licenses may be available, please contact the above address for more details.
 *
 * This program is free software; you can redistribute it and/or modify it 
 * under the terms of the GNU General Public License as published by the Free 
 * Software Foundation; either version 2 of the License, or (at your option) 
 * any later version.
 * 
 * This program is distributed in the hope that it will be useful, but WITHOUT 
 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or 
 * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License for 
 * more details.
 * 
 * You should have received a copy of the GNU General Public License along 
 * with this program; if not, write to the Free Software Foundation, Inc., 59 
 * Temple Place - Suite 330, Boston, MA  02111-1307, USA.
 */
	require_once 'Console/Getopt.php';
	
	function applySettings($binary,$settings) {
		$magicOffset = 0;
		$magicString = "[INTERNALHELPDESK]\n";
		
		$settings = str_replace("\r","\n",$settings);
		
		if(!file_exists($binary) && !is_writable($binary)) {
			$error = "The $binary does not exist or you do not have permissions.\n";
			return false;
		}
		$ofh = fopen("$binary", 'rb');
		if ($ofh) {
			$offset = 0;
			while (!feof($ofh)) {
				$data = fread($ofh, 1024);
				$pos = strpos($data,"$magicString");
				if ($pos !== false) {
					$magicOffset = $offset + $pos;
					break;
				}
				$offset +=1024;
			}
			fclose($ofh);
		} else {
			$error = "Invalid filehandle for $binary.\n";
			return false;
		}
	
		if ($magicOffset == 0) {
			//$error = "Unable to find magic string in input file.  Please check your input binary file.\n";
			return false;
		}
	
		$nfh = fopen("$binary", "r+b");
		if ($nfh) {
			rewind($nfh);
			$res = fseek($nfh,$magicOffset+strlen($magicString));
			if ($res == -1) {
				//$error = "An odd error has occured, we can not seek to the correct location.\n";
				return false;
			}
			if(fwrite($nfh,$settings,1024-strlen($magicString)) === false) {
				//$error =  "an error occured writing to $binary\n";
				return false;
			}
			$res = fseek($nfh,$magicOffset);
			if ($res == -1) {
				//$error = "An odd error has occured, we can not seek to the correct location.\n";
				return false;
			}
			$data = fread($nfh,strlen($magicString)+strlen($settings));
			fclose($nfh);
		}
		return true;// "Successfully embedded $settings in $binary.\n";
	}

	function usage() {
		echo "This script is used to apply a helpdesk.txt file to a version of UltraVNC SC\nthat supports helpdesk.txt embeding.\n";
		echo "	php apply_helpdesk.php <winvnc.exe> <helpdesk.txt>\n";
		echo "\n";	
	}
	
	$args = Console_Getopt::readPHPArgv();
	
	if (sizeof($args) < 3) {
		usage();
		exit();	
	}
	$originalbinary = $args[1];
	$helpdeskfile = $args[2];
	
	if(!file_exists($helpdeskfile)) {
		echo "The $helpdeskfile does not exists, or can not be accessed.\n";
		exit(1);	
	}
	
	$helpdesktext = file_get_contents ($helpdeskfile,false,NULL,0,1024);
	if(applySettings($originalbinary,$helpdesktext)) {
		echo "Success!\n";
	}
	else 
	{
		echo "Error!\n";
	}
?>