[people/pmueller/ipfire-2.x.git] / src / install+setup / install / main.c

/* SmoothWall install program.
 *
 * This program is distributed under the terms of the GNU General Public
 * Licence.  See the file COPYING for details.
 *
 * (c) Lawrence Manning, 2001
 * Contains main entry point, and misc functions.
 * 
 */

#include "install.h"
#define _GNU_SOURCE
 
#define CDROM_INSTALL 0
#define URL_INSTALL 1
#define DISK_INSTALL 2
#define INST_FILECOUNT 7000
#define UNATTENDED_CONF "/cdrom/boot/unattended.conf"

int raid_disk = 0;
FILE *flog = NULL;
char *mylog;

char **ctr;

extern char url[STRING_SIZE];

extern char *en_tr[];
extern char *de_tr[];

int detect_smp() {
	FILE *fd = NULL;
	char line[STRING_SIZE];
	int cpu_count = 0;

	if ((fd = fopen("/proc/cpuinfo", "r")) == NULL) {
		return 0;
	}
	while (fgets(line, STRING_SIZE, fd) != NULL) {
		if (strstr(line, "processor") == line) {
			cpu_count++;
		}
	}
	(void)fclose(fd);
	return (cpu_count > 1);
}

long calc_swapsize(long memory, long disk) {
	if (memory < 128) {
		return 256;
	}
	if (memory > 1024) {
		return 512;
	}

	return memory*2;
}

int main(int argc, char *argv[])
{
	char *langnames[] = { "Deutsch", "English", NULL };
	char *shortlangnames[] = { "de", "en", NULL };
	char **langtrs[] = { de_tr, en_tr, NULL };
	char hdletter;
	char harddrive[5], sourcedrive[5];	/* Device holder. */
	struct devparams hdparams, cdromparams; /* Params for CDROM and HD */
	int cdmounted = 0; /* Loop flag for inserting a cd. */
	int rc = 0;
	char commandstring[STRING_SIZE];
	char *installtypes[] = { "CDROM/USB", "HTTP/FTP", NULL };
	int installtype = CDROM_INSTALL;
	int choice;
	char shortlangname[10];
	char message[1000];
	char title[STRING_SIZE];
	int allok = 0;
	int allok_fastexit=0;
	struct keyvalue *ethernetkv = initkeyvalues();
	FILE *handle, *cmdfile;
	char line[STRING_SIZE];
	char string[STRING_SIZE];
	long maximum_free = 0, current_free;
	long memory = 0;
	long system_partition, boot_partition, root_partition, swap_file;
	int scsi_disk = 0;
	char *yesnoharddisk[] = { "NO", "YES", NULL };
	int unattended = 0;
	struct keyvalue *unattendedkv = initkeyvalues();
	int hardyn = 0;

	setlocale (LC_ALL, "");
	sethostname( SNAME , 10);

	memset(&hdparams, 0, sizeof(struct devparams));
	memset(&cdromparams, 0, sizeof(struct devparams));

	/* Log file/terminal stuff. */
	if (argc >= 2)
	{		
		if (!(flog = fopen(argv[1], "w+")))
			return 0;
	}
	else
		return 0;
	
	mylog = argv[1];
	
	fprintf(flog, "Install program started.\n");
		
	newtInit();
	newtCls();

	/* Do usb detection first for usb keyboard */
	if (! (cmdfile = fopen("/proc/cmdline", "r")))
	{
		fprintf(flog, "Couldn't open commandline: /proc/cmdline\n");
	} else {
		fgets(line, STRING_SIZE, cmdfile);
		if (strstr (line, "nousb") == NULL) {
			fprintf(flog, "Initializing USB controllers.\n");
			initialize_usb();
		} else {
			fprintf(flog, "Skipping USB detection.\n");
		}
		// check if we have to make an unattended install
		if (strstr (line, "unattended") != NULL) {		
		    unattended = 1;
		}
	}

	if (unattended) {
	    runcommandwithstatus("/bin/sleep 10", "WARNING: Unattended installation will start in 10 seconds...");
 	}
	
	/* German is the default */
	for (choice = 0; langnames[choice]; choice++)
	{
		if (strcmp(langnames[choice], "Deutsch") == 0)
			break;
	}
	if (!langnames[choice])
		goto EXIT;

	if (!unattended) {
	    rc = newtWinMenu("Language selection",
		    "Select the language you wish to use for the " NAME ".", 50, 5, 5, 8,
		    langnames, &choice, "Ok", NULL);
	}

	ctr = langtrs[choice];
	strcpy(shortlangname, shortlangnames[choice]);
	fprintf(flog, "Selected language: %s\n", shortlangname);

	mysystem("/bin/setfont lat0-16");

	newtDrawRootText(14, 0, NAME " " VERSION " - " SLOGAN );
	newtPushHelpLine(ctr[TR_HELPLINE]);
	sprintf (title, "%s %s - %s", NAME, VERSION, SLOGAN);

	if (!unattended) {
		sprintf(message, ctr[TR_WELCOME], NAME);
		newtWinMessage(title, ctr[TR_OK], message);

		sprintf(message, ctr[TR_SELECT_INSTALLATION_MEDIA_LONG], NAME);
		rc = newtWinMenu(ctr[TR_SELECT_INSTALLATION_MEDIA], message,
			50, 5, 5, 6, installtypes, &installtype, ctr[TR_OK],
			ctr[TR_CANCEL], NULL);
	} else {
	    rc = 1;
	    installtype = CDROM_INSTALL;
	}

	if (rc == 2)
		goto EXIT;

	// Starting hardware detection
	runcommandwithstatus("/bin/probehw.sh", ctr[TR_PROBING_HARDWARE]);

	/* CDROM INSTALL */
	if (installtype == CDROM_INSTALL) {
		switch (mysystem("/bin/mountsource.sh")) {
		    case 0:
			installtype = CDROM_INSTALL;
			cdmounted = 1;
			break;
		    case 1:
			installtype = DISK_INSTALL;
			break;
		    case 10:
	        	errorbox(ctr[TR_NO_CDROM]);
			goto EXIT;
		}

		/* read source drive letter */
		if ((handle = fopen("/tmp/source_device", "r")) == NULL) {
			errorbox(ctr[TR_ERROR_PROBING_CDROM]);
			goto EXIT;
		}
		fgets(sourcedrive, 5, handle);
		fprintf(flog, "Source drive: %s\n", sourcedrive);
		fclose(handle);

		snprintf(cdromparams.devnode, STRING_SIZE, "/dev/%s", sourcedrive);
		cdromparams.module = 0;
		fprintf(flog, "Source device: %s\n", cdromparams.devnode);
	}

 	/* Configure the network now! */
	if (installtype == URL_INSTALL) {
		/* Network driver and params. */
		if (!(networkmenu(ethernetkv))) {
			errorbox(ctr[TR_NETWORK_SETUP_FAILED]);
			goto EXIT;
		}

		/* Check for ipfire-<VERSION>.tbz2 */
		if (checktarball(SNAME "-" VERSION ".tbz2", ctr[TR_ENTER_URL])) {
			errorbox(ctr[TR_NO_IPCOP_TARBALL_FOUND]);
			goto EXIT;
		}
	}

	/* Get device for the HD.  This has to succeed. */
	if (!(hdletter = findidetype(IDE_HD)))
	{
		/* Need to clean this up at some point */
		if (!try_scsi("sda") || strstr(sourcedrive, "sda") != NULL) {
			if (!try_scsi("ida/c0d0")) {
				if (!try_scsi("cciss/c0d0")) {
					if (!try_scsi("rd/c0d0")) {
						if (!try_scsi("ataraid/d0")) {
							errorbox(ctr[TR_NO_HARDDISK]);
							goto EXIT;
						} else {
							raid_disk = 1;
							sprintf(harddrive, "ataraid/d0");
						}
					} else {
						raid_disk = 1;
						sprintf(harddrive, "rd/c0d0");
					}
				} else {
					raid_disk = 1;
					sprintf(harddrive, "cciss/c0d0");
				}
			} else {
				raid_disk = 1;
				sprintf(harddrive, "ida/c0d0");
			}
		} else {
		    if (strstr(sourcedrive, "sda") != NULL) {
			// probably installing from usb stick, try sdb
			if (try_scsi("sdb")) {
			    sprintf(harddrive, "sdb");
			}
			else {
			    errorbox(ctr[TR_NO_HARDDISK]);
			    goto EXIT;
			}
		    }
		    else {
			sprintf(harddrive, "sda");
		    }
		}
		scsi_disk = 1;
	} else
		sprintf(harddrive, "hd%c", hdletter);

	fprintf(flog, "Destination drive: %s\n", harddrive);

	/* load unattended configuration */
	if (unattended) {
	    fprintf(flog, "unattended: Reading unattended.conf\n");

	    (void) readkeyvalues(unattendedkv, UNATTENDED_CONF);
	}

	/* Make the hdparms struct and print the contents. */
	snprintf(hdparams.devnode, STRING_SIZE, "/dev/%s", harddrive);
	hdparams.module = 0;

	sprintf(message, ctr[TR_PREPARE_HARDDISK], hdparams.devnode);
	
	if (unattended) {
	    hardyn = 1;
	}
	
	while (! hardyn) {
		rc = newtWinMenu(title, message,
				 50, 5, 5, 6, yesnoharddisk,
				 &hardyn, ctr[TR_OK],
				 ctr[TR_CANCEL], NULL);
		if (rc == 2)
			goto EXIT;
	}

	if (rc == 2)
		goto EXIT;

	/* Calculate amount of memory in machine */
        if ((handle = fopen("/proc/meminfo", "r")))
        {
            while (fgets(line, STRING_SIZE-1, handle)) {
                if (sscanf (line, "MemTotal: %s kB", string)) {
                    memory = atoi(string) / 1024 ;
                }
            }
            fclose(handle);
        }

	/* Partition, mkswp, mkfs.
	 * before partitioning, first determine the sizes of each
	 * partition.  In order to do that we need to know the size of
	 * the disk. 
	 */
	/* Don't use mysystem here so we can redirect output */
	sprintf(commandstring, "/bin/sfdisk -s /dev/%s > /tmp/disksize 2> /dev/null", harddrive);
	system(commandstring);

	/* Calculate amount of disk space */
        if ((handle = fopen("/tmp/disksize", "r")))
        {
           	fgets(line, STRING_SIZE-1, handle);
            	if (sscanf (line, "%s", string)) {
			maximum_free = atoi(string) / 1024;
            	}
            	fclose(handle);
        }
	
	fprintf(flog, "maximum_free = %ld, memory = %ld", 
		maximum_free, memory);
	
	swap_file = calc_swapsize(memory, maximum_free);

	if (maximum_free < 512 + swap_file ) {
		if (maximum_free < 512) {
			errorbox(ctr[TR_DISK_TOO_SMALL]);
			goto EXIT;
		}

		if (!unattended) {
		    rc = newtWinChoice(title, ctr[TR_OK], ctr[TR_CANCEL], ctr[TR_CONTINUE_NO_SWAP]);
		}
		else {
		    rc = 1;
		}
		
		if (rc != 1)
			goto EXIT;
		swap_file = 0;
	}

	boot_partition = 20; /* in MB */
	current_free = maximum_free - boot_partition - swap_file;

	root_partition = 2048 ;
	if (current_free < 512) {
		errorbox(ctr[TR_DISK_TOO_SMALL]);
		goto EXIT;
	}

	current_free = current_free - root_partition;
	if (!swap_file) {
		root_partition = root_partition + swap_file;
	}

	system_partition = current_free;

	fprintf(flog, "boot = %ld, swap = %ld, mylog = %ld, root = %ld\n",
		boot_partition, swap_file, system_partition, root_partition);

	handle = fopen("/tmp/partitiontable", "w");

	/* Make swapfile */
	if (swap_file) {
		fprintf(handle, ",%ld,L,*\n,%ld,S,\n,%ld,L,\n,,L,\n",
			boot_partition, swap_file, root_partition);
	} else {
		fprintf(handle, ",%ld,L,*\n,0,0,\n,%ld,L,\n,,L,\n",
			boot_partition, root_partition);
	}

	fclose(handle);

	snprintf(commandstring, STRING_SIZE, "/bin/sfdisk -L -uM %s < /tmp/partitiontable", hdparams.devnode);
	if (runcommandwithstatus(commandstring, ctr[TR_PARTITIONING_DISK]))
	{
		errorbox(ctr[TR_UNABLE_TO_PARTITION]);
		goto EXIT;
	}

	mysystem("/sbin/udevstart");

	if (raid_disk)
		snprintf(commandstring, STRING_SIZE, "/bin/mke2fs -T ext2 -c %sp1", hdparams.devnode);
	else
		snprintf(commandstring, STRING_SIZE, "/bin/mke2fs -T ext2 -c %s1", hdparams.devnode);
	if (runcommandwithstatus(commandstring, ctr[TR_MAKING_BOOT_FILESYSTEM]))
	{
		errorbox(ctr[TR_UNABLE_TO_MAKE_BOOT_FILESYSTEM]);
		goto EXIT;
	}

	if (swap_file) {
		if (raid_disk)
			snprintf(commandstring, STRING_SIZE, "/sbin/mkswap %sp2", hdparams.devnode);	
		else
			snprintf(commandstring, STRING_SIZE, "/sbin/mkswap %s2", hdparams.devnode);
		if (runcommandwithstatus(commandstring, ctr[TR_MAKING_SWAPSPACE]))
		{
			errorbox(ctr[TR_UNABLE_TO_MAKE_SWAPSPACE]);
			goto EXIT;
		}
	}

	if (raid_disk)
		snprintf(commandstring, STRING_SIZE, "/sbin/mkreiserfs -f %sp3", hdparams.devnode);	
	else
		snprintf(commandstring, STRING_SIZE, "/sbin/mkreiserfs -f %s3", hdparams.devnode);	

	if (runcommandwithstatus(commandstring, ctr[TR_MAKING_ROOT_FILESYSTEM]))
	{
		errorbox(ctr[TR_UNABLE_TO_MAKE_ROOT_FILESYSTEM]);
		goto EXIT;
	}

	if (raid_disk)
		snprintf(commandstring, STRING_SIZE, "/sbin/mkreiserfs -f %sp4", hdparams.devnode);	
	else
		snprintf(commandstring, STRING_SIZE, "/sbin/mkreiserfs -f %s4", hdparams.devnode);	

	if (runcommandwithstatus(commandstring, ctr[TR_MAKING_LOG_FILESYSTEM]))
	{
		errorbox(ctr[TR_UNABLE_TO_MAKE_ROOT_FILESYSTEM]);
		goto EXIT;
	}

	/* Mount harddisk. */
	if (raid_disk)
		snprintf(commandstring, STRING_SIZE, "/bin/mount %sp3 /harddisk", hdparams.devnode);
	else
		snprintf(commandstring, STRING_SIZE, "/bin/mount %s3 /harddisk", hdparams.devnode);
	if (runcommandwithstatus(commandstring, ctr[TR_MOUNTING_ROOT_FILESYSTEM]))
	{
		errorbox(ctr[TR_UNABLE_TO_MOUNT_ROOT_FILESYSTEM]);
		goto EXIT;
	}

	mkdir("/harddisk/boot", S_IRWXU|S_IRWXG|S_IRWXO);
	mkdir("/harddisk/var", S_IRWXU|S_IRWXG|S_IRWXO);
	mkdir("/harddisk/var/log", S_IRWXU|S_IRWXG|S_IRWXO);
	
	if (raid_disk)
		snprintf(commandstring, STRING_SIZE, "/bin/mount %sp1 /harddisk/boot", hdparams.devnode);
	else
		snprintf(commandstring, STRING_SIZE, "/bin/mount %s1 /harddisk/boot", hdparams.devnode);

	if (runcommandwithstatus(commandstring, ctr[TR_MOUNTING_BOOT_FILESYSTEM]))
	{
		errorbox(ctr[TR_UNABLE_TO_MOUNT_BOOT_FILESYSTEM]);
		goto EXIT;
	}
	if (swap_file) {
		if (raid_disk)
			snprintf(commandstring, STRING_SIZE, "/sbin/swapon %sp2", hdparams.devnode);
		else
			snprintf(commandstring, STRING_SIZE, "/sbin/swapon %s2", hdparams.devnode);
		if (runcommandwithstatus(commandstring, ctr[TR_MOUNTING_SWAP_PARTITION]))
		{
			errorbox(ctr[TR_UNABLE_TO_MOUNT_SWAP_PARTITION]);
			goto EXIT;
		}
	}
	if (raid_disk)
		snprintf(commandstring, STRING_SIZE, "/bin/mount %sp4 /harddisk/var", hdparams.devnode);
	else
		snprintf(commandstring, STRING_SIZE, "/bin/mount %s4 /harddisk/var", hdparams.devnode);
	if (runcommandwithstatus(commandstring, ctr[TR_MOUNTING_LOG_FILESYSTEM]))
	{
		errorbox(ctr[TR_UNABLE_TO_MOUNT_LOG_FILESYSTEM]);
		goto EXIT;
	}

	if (installtype == URL_INSTALL) {
		snprintf(commandstring, STRING_SIZE,
			"/bin/wget -q -O - %s/" SNAME "-" VERSION ".tbz2 | /bin/tar -C /harddisk -xvjf -", url);
	}

	if (installtype == CDROM_INSTALL) {	
		snprintf(commandstring, STRING_SIZE,
			"/bin/tar -C /harddisk -xvjf /cdrom/" SNAME "-" VERSION ".tbz2");
	}
	
	if (runcommandwithprogress(60, 4, title, commandstring, INST_FILECOUNT,
		ctr[TR_INSTALLING_FILES]))
	{
		errorbox(ctr[TR_UNABLE_TO_INSTALL_FILES]);
		goto EXIT;
	}
		
	/* Save USB controller type to modules.conf */
	write_usb_modules_conf();
	
	/* Save language und local settings */
	write_lang_configs(shortlangname);

	/* touch the modules.dep files */
	snprintf(commandstring, STRING_SIZE, 
		"/bin/touch /harddisk/lib/modules/%s-ipfire/modules.dep",
		KERNEL_VERSION);
	mysystem(commandstring);
	snprintf(commandstring, STRING_SIZE, 
		"/bin/touch /harddisk/lib/modules/%s-ipfire-smp/modules.dep",
		KERNEL_VERSION);
	mysystem(commandstring);

	/* Rename uname */
	rename ("/harddisk/bin/uname.bak", "/harddisk/bin/uname");

	/* mount proc filesystem */
	mysystem("mkdir /harddisk/proc");
	mysystem("/bin/mount -t proc none /harddisk/proc");
	mysystem("/bin/mount --bind /dev /harddisk/dev");

	/* Build cache lang file */
	snprintf(commandstring, STRING_SIZE, "/sbin/chroot /harddisk /usr/bin/perl -e \"require '" CONFIG_ROOT "/lang.pl'; &Lang::BuildCacheLang\"");
	if (runcommandwithstatus(commandstring, ctr[TR_INSTALLING_LANG_CACHE]))
	{
		errorbox(ctr[TR_UNABLE_TO_INSTALL_LANG_CACHE]);
		goto EXIT;
	}

	/* Update /etc/fstab */
	replace("/harddisk/etc/fstab", "DEVICE", hdparams.devnode);

	/* if we detected SCSI/USB then fixup */
/*	mysystem("/bin/probecntrl.sh");
	if ((handle = fopen("/tmp/cntrldriver", "r")))
	{
		char *driver;
		fgets(line, STRING_SIZE-1, handle);
		fclose(handle);
		line[strlen(line) - 1] = 0;
		driver = strtok(line, ".");
		if (strlen(driver) > 1) {
			fprintf(flog, "Fixing up ipfirerd.img\n");
			mkdir("/harddisk/initrd", S_IRWXU|S_IRWXG|S_IRWXO);
			snprintf(commandstring, STRING_SIZE, "/sbin/chroot /harddisk /sbin/mkinitrd --with=scsi_mod %s --with=sd_mod --with=sr_mod /boot/ipfirerd.img %s-ipfire", driver, KERNEL_VERSION);
			runcommandwithstatus(commandstring, ctr[TR_BUILDING_INITRD]);
			snprintf(commandstring, STRING_SIZE, "/sbin/chroot /harddisk /sbin/mkinitrd --with=scsi_mod %s --with=sd_mod --with=sr_mod /boot/ipfirerd-smp.img %s-ipfire-smp", driver, KERNEL_VERSION);
			runcommandwithstatus(commandstring, ctr[TR_BUILDING_INITRD]);
			mysystem("/sbin/chroot /harddisk /bin/mv /boot/grub/scsigrub.conf /boot/grub/grub.conf");
		}
	} */

	if (raid_disk)
		sprintf(string, "root=%sp3", hdparams.devnode);
	else
		sprintf(string, "root=%s3", hdparams.devnode);
	replace( "/harddisk/boot/grub/grub.conf", "root=ROOT", string);
	replace( "/harddisk/boot/grub/grubbatch", "DEVICE", hdparams.devnode);

	/* restore permissions */
	chmod("/harddisk/boot/grub/grubbatch", S_IXUSR | S_IRUSR | S_IXGRP | S_IRGRP | S_IXOTH | S_IROTH);

	snprintf(commandstring, STRING_SIZE, 
		 "/sbin/chroot /harddisk /boot/grub/grubbatch");
	if (runcommandwithstatus(commandstring, ctr[TR_INSTALLING_GRUB])) {
		errorbox(ctr[TR_UNABLE_TO_INSTALL_GRUB]);
		goto EXIT;
	}

	/* Install bootsplash */
	mysystem("/bin/installbootsplash.sh");

	mysystem("ln -s grub.conf /harddisk/boot/grub/menu.lst");
	mysystem("umount /harddisk/proc");
	mysystem("umount /harddisk/dev");

	if (!unattended) {
		sprintf(message, ctr[TR_CONGRATULATIONS_LONG],
				NAME, SNAME, SNAME, NAME, NAME, NAME);
		newtWinMessage(ctr[TR_CONGRATULATIONS], ctr[TR_OK], message);
	}
	         
	allok = 1;

EXIT:
	fprintf(flog, "Install program ended.\n");	

	if (!(allok))
		newtWinMessage(title, ctr[TR_OK], ctr[TR_PRESS_OK_TO_REBOOT]);	
	
	freekeyvalues(ethernetkv);

	if (allok && !allok_fastexit)
	{
		/* /proc is needed by the module checker.  We have to mount it
		 * so it can be seen by setup, which is run chrooted. */
		if (system("/bin/mount proc -t proc /harddisk/proc"))
			printf("Unable to mount proc in /harddisk.");
		else
		{
			if (unattended) {
			    fprintf(flog, "Entering unattended setup\n");
			    if (unattended_setup(unattendedkv)) {
				snprintf(commandstring, STRING_SIZE, "/bin/sleep 10");
				runcommandwithstatus(commandstring, "Unattended installation finished, system will reboot");
			    } else {
				errorbox("Unattended setup failed.");
				goto EXIT;
			    }
			}

			newtFinished();
			fflush(flog);
			fclose(flog);

			if (!unattended) {
			    if (system("/sbin/chroot /harddisk /usr/local/sbin/setup /dev/tty2 INSTALL"))
				    printf("Unable to run setup.\n");
			}

			if (system("/bin/umount /harddisk/proc"))
				printf("Unable to umount /harddisk/proc.\n"); 
		}
	}
	fcloseall();

	if (swap_file) {
		if (raid_disk)
			snprintf(commandstring, STRING_SIZE, "/bin/swapoff %sp2", hdparams.devnode);
		else
			snprintf(commandstring, STRING_SIZE, "/bin/swapoff %s2", hdparams.devnode);
	}

	newtFinished();

	system("/bin/umount /harddisk/var");
	system("/bin/umount /harddisk/boot");
	system("/bin/umount /harddisk");
	  
	system("/etc/halt");

	return 0;
}
Commit	Line	Data
d6aaa55d MT	1	/* SmoothWall install program.
	2	*
	3	* This program is distributed under the terms of the GNU General Public
	4	* Licence. See the file COPYING for details.
	5	*
	6	* (c) Lawrence Manning, 2001
	7	* Contains main entry point, and misc functions.
	8	*
d6aaa55d	9	*/
10bc6f06	10
d6aaa55d	11	#include "install.h"
72d80898 MT	12	#define _GNU_SOURCE
72d80898 MT	13
d6aaa55d MT	14	#define CDROM_INSTALL 0
d6aaa55d MT	15	#define URL_INSTALL 1
72d80898	16	#define DISK_INSTALL 2
9833e7d8	17	#define INST_FILECOUNT 7000
33634aa8	18	#define UNATTENDED_CONF "/cdrom/boot/unattended.conf"
d6aaa55d MT	19
	20	int raid_disk = 0;
	21	FILE *flog = NULL;
	22	char *mylog;
10bc6f06	23
d6aaa55d MT	24	char **ctr;
d6aaa55d MT	25
d6aaa55d MT	26	extern char url[STRING_SIZE];
d6aaa55d MT	27
10bc6f06	28	extern char *en_tr[];
10bc6f06	29	extern char *de_tr[];
d6aaa55d	30
72d80898 MT	31	int detect_smp() {
	32	FILE *fd = NULL;
	33	char line[STRING_SIZE];
	34	int cpu_count = 0;
	35
	36	if ((fd = fopen("/proc/cpuinfo", "r")) == NULL) {
	37	return 0;
	38	}
	39	while (fgets(line, STRING_SIZE, fd) != NULL) {
	40	if (strstr(line, "processor") == line) {
	41	cpu_count++;
	42	}
	43	}
	44	(void)fclose(fd);
	45	return (cpu_count > 1);
	46	}
	47
72d80898 MT	48	long calc_swapsize(long memory, long disk) {
	49	if (memory < 128) {
	50	return 256;
	51	}
	52	if (memory > 1024) {
	53	return 512;
	54	}
	55
	56	return memory*2;
	57	}
	58
d6aaa55d MT	59	int main(int argc, char *argv[])
d6aaa55d MT	60	{
b4e3cd7f HS	61	char *langnames[] = { "Deutsch", "English", NULL };
	62	char *shortlangnames[] = { "de", "en", NULL };
	63	char **langtrs[] = { de_tr, en_tr, NULL };
c78a77eb	64	char hdletter;
72d80898 MT	65	char harddrive[5], sourcedrive[5]; /* Device holder. */
	66	struct devparams hdparams, cdromparams; /* Params for CDROM and HD */
	67	int cdmounted = 0; /* Loop flag for inserting a cd. */
	68	int rc = 0;
d6aaa55d	69	char commandstring[STRING_SIZE];
aa2870e6	70	char *installtypes[] = { "CDROM/USB", "HTTP/FTP", NULL };
72d80898	71	int installtype = CDROM_INSTALL;
d6aaa55d MT	72	int choice;
	73	char shortlangname[10];
	74	char message[1000];
	75	char title[STRING_SIZE];
	76	int allok = 0;
10bc6f06	77	int allok_fastexit=0;
d6aaa55d MT	78	struct keyvalue *ethernetkv = initkeyvalues();
	79	FILE handle, cmdfile;
	80	char line[STRING_SIZE];
	81	char string[STRING_SIZE];
72d80898 MT	82	long maximum_free = 0, current_free;
72d80898 MT	83	long memory = 0;
8e2e5cf3	84	long system_partition, boot_partition, root_partition, swap_file;
d6aaa55d	85	int scsi_disk = 0;
72d80898	86	char *yesnoharddisk[] = { "NO", "YES", NULL };
72d80898 MT	87	int unattended = 0;
72d80898 MT	88	struct keyvalue *unattendedkv = initkeyvalues();
c78a77eb	89	int hardyn = 0;
d6aaa55d MT	90
d6aaa55d MT	91	setlocale (LC_ALL, "");
10bc6f06	92	sethostname( SNAME , 10);
72d80898	93
d6aaa55d MT	94	memset(&hdparams, 0, sizeof(struct devparams));
	95	memset(&cdromparams, 0, sizeof(struct devparams));
	96
	97	/* Log file/terminal stuff. */
	98	if (argc >= 2)
	99	{
	100	if (!(flog = fopen(argv[1], "w+")))
	101	return 0;
	102	}
	103	else
	104	return 0;
	105
	106	mylog = argv[1];
	107
	108	fprintf(flog, "Install program started.\n");
	109
	110	newtInit();
	111	newtCls();
	112
	113	/* Do usb detection first for usb keyboard */
	114	if (! (cmdfile = fopen("/proc/cmdline", "r")))
	115	{
	116	fprintf(flog, "Couldn't open commandline: /proc/cmdline\n");
	117	} else {
	118	fgets(line, STRING_SIZE, cmdfile);
d6aaa55d MT	119	if (strstr (line, "nousb") == NULL) {
	120	fprintf(flog, "Initializing USB controllers.\n");
	121	initialize_usb();
	122	} else {
	123	fprintf(flog, "Skipping USB detection.\n");
	124	}
72d80898 MT	125	// check if we have to make an unattended install
	126	if (strstr (line, "unattended") != NULL) {
	127	unattended = 1;
	128	}
d6aaa55d	129	}
72d80898	130
72d80898	131	if (unattended) {
33634aa8	132	runcommandwithstatus("/bin/sleep 10", "WARNING: Unattended installation will start in 10 seconds...");
72d80898	133	}
d6aaa55d	134
72d80898	135	/* German is the default */
d6aaa55d MT	136	for (choice = 0; langnames[choice]; choice++)
d6aaa55d MT	137	{
b4e3cd7f	138	if (strcmp(langnames[choice], "Deutsch") == 0)
d6aaa55d MT	139	break;
	140	}
	141	if (!langnames[choice])
	142	goto EXIT;
	143
72d80898 MT	144	if (!unattended) {
	145	rc = newtWinMenu("Language selection",
	146	"Select the language you wish to use for the " NAME ".", 50, 5, 5, 8,
	147	langnames, &choice, "Ok", NULL);
	148	}
	149
d6aaa55d MT	150	ctr = langtrs[choice];
d6aaa55d MT	151	strcpy(shortlangname, shortlangnames[choice]);
406f019f	152	fprintf(flog, "Selected language: %s\n", shortlangname);
3d6e1202 MT	153
3d6e1202 MT	154	mysystem("/bin/setfont lat0-16");
72d80898	155
33634aa8	156	newtDrawRootText(14, 0, NAME " " VERSION " - " SLOGAN );
d6aaa55d	157	newtPushHelpLine(ctr[TR_HELPLINE]);
4809e64e	158	sprintf (title, "%s %s - %s", NAME, VERSION, SLOGAN);
d6aaa55d	159
72d80898 MT	160	if (!unattended) {
72d80898 MT	161	sprintf(message, ctr[TR_WELCOME], NAME);
72d80898 MT	162	newtWinMessage(title, ctr[TR_OK], message);
	163
	164	sprintf(message, ctr[TR_SELECT_INSTALLATION_MEDIA_LONG], NAME);
	165	rc = newtWinMenu(ctr[TR_SELECT_INSTALLATION_MEDIA], message,
	166	50, 5, 5, 6, installtypes, &installtype, ctr[TR_OK],
	167	ctr[TR_CANCEL], NULL);
330345c2	168	} else {
72d80898 MT	169	rc = 1;
	170	installtype = CDROM_INSTALL;
	171	}
	172
	173	if (rc == 2)
	174	goto EXIT;
	175
	176	// Starting hardware detection
	177	runcommandwithstatus("/bin/probehw.sh", ctr[TR_PROBING_HARDWARE]);
	178
9607771a MT	179	/* CDROM INSTALL */
9607771a MT	180	if (installtype == CDROM_INSTALL) {
9607771a MT	181	switch (mysystem("/bin/mountsource.sh")) {
	182	case 0:
	183	installtype = CDROM_INSTALL;
	184	cdmounted = 1;
	185	break;
	186	case 1:
	187	installtype = DISK_INSTALL;
	188	break;
	189	case 10:
	190	errorbox(ctr[TR_NO_CDROM]);
	191	goto EXIT;
	192	}
	193
	194	/* read source drive letter */
0b59f25c	195	if ((handle = fopen("/tmp/source_device", "r")) == NULL) {
33634aa8 MT	196	errorbox(ctr[TR_ERROR_PROBING_CDROM]);
33634aa8 MT	197	goto EXIT;
9607771a MT	198	}
	199	fgets(sourcedrive, 5, handle);
	200	fprintf(flog, "Source drive: %s\n", sourcedrive);
	201	fclose(handle);
	202
	203	snprintf(cdromparams.devnode, STRING_SIZE, "/dev/%s", sourcedrive);
	204	cdromparams.module = 0;
	205	fprintf(flog, "Source device: %s\n", cdromparams.devnode);
72d80898	206	}
9607771a MT	207
	208	/* Configure the network now! */
	209	if (installtype == URL_INSTALL) {
	210	/* Network driver and params. */
	211	if (!(networkmenu(ethernetkv))) {
	212	errorbox(ctr[TR_NETWORK_SETUP_FAILED]);
	213	goto EXIT;
	214	}
	215
330345c2	216	/* Check for ipfire-<VERSION>.tbz2 */
9607771a MT	217	if (checktarball(SNAME "-" VERSION ".tbz2", ctr[TR_ENTER_URL])) {
	218	errorbox(ctr[TR_NO_IPCOP_TARBALL_FOUND]);
	219	goto EXIT;
	220	}
72d80898 MT	221	}
	222
	223	/* Get device for the HD. This has to succeed. */
	224	if (!(hdletter = findidetype(IDE_HD)))
	225	{
	226	/* Need to clean this up at some point */
	227	if (!try_scsi("sda") \|\| strstr(sourcedrive, "sda") != NULL) {
	228	if (!try_scsi("ida/c0d0")) {
	229	if (!try_scsi("cciss/c0d0")) {
	230	if (!try_scsi("rd/c0d0")) {
	231	if (!try_scsi("ataraid/d0")) {
	232	errorbox(ctr[TR_NO_HARDDISK]);
	233	goto EXIT;
	234	} else {
	235	raid_disk = 1;
	236	sprintf(harddrive, "ataraid/d0");
	237	}
	238	} else {
	239	raid_disk = 1;
	240	sprintf(harddrive, "rd/c0d0");
	241	}
	242	} else {
	243	raid_disk = 1;
	244	sprintf(harddrive, "cciss/c0d0");
	245	}
	246	} else {
	247	raid_disk = 1;
	248	sprintf(harddrive, "ida/c0d0");
	249	}
	250	} else {
	251	if (strstr(sourcedrive, "sda") != NULL) {
	252	// probably installing from usb stick, try sdb
	253	if (try_scsi("sdb")) {
	254	sprintf(harddrive, "sdb");
	255	}
	256	else {
	257	errorbox(ctr[TR_NO_HARDDISK]);
	258	goto EXIT;
	259	}
	260	}
	261	else {
	262	sprintf(harddrive, "sda");
	263	}
	264	}
	265	scsi_disk = 1;
	266	} else
	267	sprintf(harddrive, "hd%c", hdletter);
	268
9607771a	269	fprintf(flog, "Destination drive: %s\n", harddrive);
d6aaa55d	270
72d80898 MT	271	/* load unattended configuration */
	272	if (unattended) {
	273	fprintf(flog, "unattended: Reading unattended.conf\n");
	274
	275	(void) readkeyvalues(unattendedkv, UNATTENDED_CONF);
	276	}
	277
	278	/* Make the hdparms struct and print the contents. */
	279	snprintf(hdparams.devnode, STRING_SIZE, "/dev/%s", harddrive);
	280	hdparams.module = 0;
	281
	282	sprintf(message, ctr[TR_PREPARE_HARDDISK], hdparams.devnode);
	283
	284	if (unattended) {
	285	hardyn = 1;
	286	}
	287
	288	while (! hardyn) {
	289	rc = newtWinMenu(title, message,
	290	50, 5, 5, 6, yesnoharddisk,
	291	&hardyn, ctr[TR_OK],
	292	ctr[TR_CANCEL], NULL);
	293	if (rc == 2)
	294	goto EXIT;
	295	}
5433e2c9 MT	296
	297	if (rc == 2)
	298	goto EXIT;
72d80898 MT	299
	300	/* Calculate amount of memory in machine */
	301	if ((handle = fopen("/proc/meminfo", "r")))
	302	{
	303	while (fgets(line, STRING_SIZE-1, handle)) {
	304	if (sscanf (line, "MemTotal: %s kB", string)) {
	305	memory = atoi(string) / 1024 ;
	306	}
	307	}
	308	fclose(handle);
	309	}
	310
	311	/* Partition, mkswp, mkfs.
	312	* before partitioning, first determine the sizes of each
	313	* partition. In order to do that we need to know the size of
	314	* the disk.
	315	*/
	316	/* Don't use mysystem here so we can redirect output */
0b59f25c	317	sprintf(commandstring, "/bin/sfdisk -s /dev/%s > /tmp/disksize 2> /dev/null", harddrive);
72d80898 MT	318	system(commandstring);
	319
	320	/* Calculate amount of disk space */
0b59f25c	321	if ((handle = fopen("/tmp/disksize", "r")))
72d80898 MT	322	{
	323	fgets(line, STRING_SIZE-1, handle);
	324	if (sscanf (line, "%s", string)) {
	325	maximum_free = atoi(string) / 1024;
	326	}
	327	fclose(handle);
	328	}
	329
	330	fprintf(flog, "maximum_free = %ld, memory = %ld",
	331	maximum_free, memory);
	332
	333	swap_file = calc_swapsize(memory, maximum_free);
	334
	335	if (maximum_free < 512 + swap_file ) {
	336	if (maximum_free < 512) {
	337	errorbox(ctr[TR_DISK_TOO_SMALL]);
	338	goto EXIT;
	339	}
	340
	341	if (!unattended) {
	342	rc = newtWinChoice(title, ctr[TR_OK], ctr[TR_CANCEL], ctr[TR_CONTINUE_NO_SWAP]);
	343	}
	344	else {
	345	rc = 1;
	346	}
	347
	348	if (rc != 1)
	349	goto EXIT;
	350	swap_file = 0;
	351	}
	352
8e2e5cf3	353	boot_partition = 20; /* in MB */
72d80898 MT	354	current_free = maximum_free - boot_partition - swap_file;
72d80898 MT	355
8e2e5cf3 MT	356	root_partition = 2048 ;
8e2e5cf3 MT	357	if (current_free < 512) {
72d80898 MT	358	errorbox(ctr[TR_DISK_TOO_SMALL]);
	359	goto EXIT;
	360	}
	361
	362	current_free = current_free - root_partition;
	363	if (!swap_file) {
	364	root_partition = root_partition + swap_file;
	365	}
	366
8e2e5cf3	367	system_partition = current_free;
72d80898 MT	368
72d80898 MT	369	fprintf(flog, "boot = %ld, swap = %ld, mylog = %ld, root = %ld\n",
8e2e5cf3	370	boot_partition, swap_file, system_partition, root_partition);
72d80898 MT	371
	372	handle = fopen("/tmp/partitiontable", "w");
	373
72d80898 MT	374	/* Make swapfile */
72d80898 MT	375	if (swap_file) {
9607771a	376	fprintf(handle, ",%ld,L,*\n,%ld,S,\n,%ld,L,\n,,L,\n",
72d80898 MT	377	boot_partition, swap_file, root_partition);
72d80898 MT	378	} else {
9607771a	379	fprintf(handle, ",%ld,L,*\n,0,0,\n,%ld,L,\n,,L,\n",
72d80898 MT	380	boot_partition, root_partition);
	381	}
	382
	383	fclose(handle);
	384
	385	snprintf(commandstring, STRING_SIZE, "/bin/sfdisk -L -uM %s < /tmp/partitiontable", hdparams.devnode);
	386	if (runcommandwithstatus(commandstring, ctr[TR_PARTITIONING_DISK]))
	387	{
	388	errorbox(ctr[TR_UNABLE_TO_PARTITION]);
	389	goto EXIT;
	390	}
	391
532a3663	392	mysystem("/sbin/udevstart");
72d80898 MT	393
72d80898 MT	394	if (raid_disk)
8e2e5cf3	395	snprintf(commandstring, STRING_SIZE, "/bin/mke2fs -T ext2 -c %sp1", hdparams.devnode);
72d80898	396	else
8e2e5cf3	397	snprintf(commandstring, STRING_SIZE, "/bin/mke2fs -T ext2 -c %s1", hdparams.devnode);
72d80898 MT	398	if (runcommandwithstatus(commandstring, ctr[TR_MAKING_BOOT_FILESYSTEM]))
	399	{
	400	errorbox(ctr[TR_UNABLE_TO_MAKE_BOOT_FILESYSTEM]);
	401	goto EXIT;
	402	}
	403
	404	if (swap_file) {
	405	if (raid_disk)
532a3663	406	snprintf(commandstring, STRING_SIZE, "/sbin/mkswap %sp2", hdparams.devnode);
72d80898	407	else
532a3663	408	snprintf(commandstring, STRING_SIZE, "/sbin/mkswap %s2", hdparams.devnode);
72d80898 MT	409	if (runcommandwithstatus(commandstring, ctr[TR_MAKING_SWAPSPACE]))
	410	{
	411	errorbox(ctr[TR_UNABLE_TO_MAKE_SWAPSPACE]);
	412	goto EXIT;
	413	}
	414	}
	415
	416	if (raid_disk)
76ed51e8	417	snprintf(commandstring, STRING_SIZE, "/sbin/mkreiserfs -f %sp3", hdparams.devnode);
72d80898	418	else
76ed51e8	419	snprintf(commandstring, STRING_SIZE, "/sbin/mkreiserfs -f %s3", hdparams.devnode);
72d80898 MT	420
	421	if (runcommandwithstatus(commandstring, ctr[TR_MAKING_ROOT_FILESYSTEM]))
	422	{
	423	errorbox(ctr[TR_UNABLE_TO_MAKE_ROOT_FILESYSTEM]);
	424	goto EXIT;
	425	}
	426
9607771a	427	if (raid_disk)
76ed51e8	428	snprintf(commandstring, STRING_SIZE, "/sbin/mkreiserfs -f %sp4", hdparams.devnode);
72d80898	429	else
76ed51e8	430	snprintf(commandstring, STRING_SIZE, "/sbin/mkreiserfs -f %s4", hdparams.devnode);
72d80898 MT	431
	432	if (runcommandwithstatus(commandstring, ctr[TR_MAKING_LOG_FILESYSTEM]))
	433	{
	434	errorbox(ctr[TR_UNABLE_TO_MAKE_ROOT_FILESYSTEM]);
	435	goto EXIT;
9607771a	436	}
72d80898 MT	437
	438	/* Mount harddisk. */
	439	if (raid_disk)
532a3663	440	snprintf(commandstring, STRING_SIZE, "/bin/mount %sp3 /harddisk", hdparams.devnode);
72d80898	441	else
532a3663	442	snprintf(commandstring, STRING_SIZE, "/bin/mount %s3 /harddisk", hdparams.devnode);
72d80898 MT	443	if (runcommandwithstatus(commandstring, ctr[TR_MOUNTING_ROOT_FILESYSTEM]))
	444	{
	445	errorbox(ctr[TR_UNABLE_TO_MOUNT_ROOT_FILESYSTEM]);
	446	goto EXIT;
	447	}
	448
	449	mkdir("/harddisk/boot", S_IRWXU\|S_IRWXG\|S_IRWXO);
	450	mkdir("/harddisk/var", S_IRWXU\|S_IRWXG\|S_IRWXO);
	451	mkdir("/harddisk/var/log", S_IRWXU\|S_IRWXG\|S_IRWXO);
	452
	453	if (raid_disk)
532a3663	454	snprintf(commandstring, STRING_SIZE, "/bin/mount %sp1 /harddisk/boot", hdparams.devnode);
72d80898	455	else
532a3663	456	snprintf(commandstring, STRING_SIZE, "/bin/mount %s1 /harddisk/boot", hdparams.devnode);
72d80898 MT	457
	458	if (runcommandwithstatus(commandstring, ctr[TR_MOUNTING_BOOT_FILESYSTEM]))
	459	{
	460	errorbox(ctr[TR_UNABLE_TO_MOUNT_BOOT_FILESYSTEM]);
	461	goto EXIT;
	462	}
	463	if (swap_file) {
	464	if (raid_disk)
532a3663	465	snprintf(commandstring, STRING_SIZE, "/sbin/swapon %sp2", hdparams.devnode);
72d80898	466	else
532a3663	467	snprintf(commandstring, STRING_SIZE, "/sbin/swapon %s2", hdparams.devnode);
72d80898 MT	468	if (runcommandwithstatus(commandstring, ctr[TR_MOUNTING_SWAP_PARTITION]))
	469	{
	470	errorbox(ctr[TR_UNABLE_TO_MOUNT_SWAP_PARTITION]);
	471	goto EXIT;
	472	}
	473	}
9607771a	474	if (raid_disk)
532a3663	475	snprintf(commandstring, STRING_SIZE, "/bin/mount %sp4 /harddisk/var", hdparams.devnode);
72d80898	476	else
532a3663	477	snprintf(commandstring, STRING_SIZE, "/bin/mount %s4 /harddisk/var", hdparams.devnode);
72d80898 MT	478	if (runcommandwithstatus(commandstring, ctr[TR_MOUNTING_LOG_FILESYSTEM]))
	479	{
	480	errorbox(ctr[TR_UNABLE_TO_MOUNT_LOG_FILESYSTEM]);
	481	goto EXIT;
9607771a	482	}
c78a77eb MT	483
	484	if (installtype == URL_INSTALL) {
	485	snprintf(commandstring, STRING_SIZE,
	486	"/bin/wget -q -O - %s/" SNAME "-" VERSION ".tbz2 \| /bin/tar -C /harddisk -xvjf -", url);
	487	}
	488
	489	if (installtype == CDROM_INSTALL) {
	490	snprintf(commandstring, STRING_SIZE,
	491	"/bin/tar -C /harddisk -xvjf /cdrom/" SNAME "-" VERSION ".tbz2");
	492	}
d6aaa55d	493
edd536b6 MT	494	if (runcommandwithprogress(60, 4, title, commandstring, INST_FILECOUNT,
edd536b6 MT	495	ctr[TR_INSTALLING_FILES]))
d6aaa55d MT	496	{
	497	errorbox(ctr[TR_UNABLE_TO_INSTALL_FILES]);
	498	goto EXIT;
	499	}
e57bc1fd	500
d6aaa55d MT	501	/* Save USB controller type to modules.conf */
d6aaa55d MT	502	write_usb_modules_conf();
406f019f MT	503
	504	/* Save language und local settings */
	505	write_lang_configs(shortlangname);
d6aaa55d MT	506
d6aaa55d MT	507	/* touch the modules.dep files */
10bc6f06	508	snprintf(commandstring, STRING_SIZE,
c78a77eb	509	"/bin/touch /harddisk/lib/modules/%s-ipfire/modules.dep",
10bc6f06 MT	510	KERNEL_VERSION);
10bc6f06 MT	511	mysystem(commandstring);
10bc6f06	512	snprintf(commandstring, STRING_SIZE,
c78a77eb	513	"/bin/touch /harddisk/lib/modules/%s-ipfire-smp/modules.dep",
10bc6f06 MT	514	KERNEL_VERSION);
10bc6f06 MT	515	mysystem(commandstring);
d6aaa55d MT	516
	517	/* Rename uname */
	518	rename ("/harddisk/bin/uname.bak", "/harddisk/bin/uname");
	519
9607771a MT	520	/* mount proc filesystem */
	521	mysystem("mkdir /harddisk/proc");
	522	mysystem("/bin/mount -t proc none /harddisk/proc");
	523	mysystem("/bin/mount --bind /dev /harddisk/dev");
	524
330345c2 MT	525	/* Build cache lang file */
	526	snprintf(commandstring, STRING_SIZE, "/sbin/chroot /harddisk /usr/bin/perl -e \"require '" CONFIG_ROOT "/lang.pl'; &Lang::BuildCacheLang\"");
	527	if (runcommandwithstatus(commandstring, ctr[TR_INSTALLING_LANG_CACHE]))
	528	{
	529	errorbox(ctr[TR_UNABLE_TO_INSTALL_LANG_CACHE]);
	530	goto EXIT;
	531	}
	532
	533	/* Update /etc/fstab */
	534	replace("/harddisk/etc/fstab", "DEVICE", hdparams.devnode);
73d9a908	535
330345c2	536	/* if we detected SCSI/USB then fixup */
406f019f	537	/* mysystem("/bin/probecntrl.sh");
330345c2	538	if ((handle = fopen("/tmp/cntrldriver", "r")))
22b9e405 MT	539	{
22b9e405 MT	540	char *driver;
330345c2 MT	541	fgets(line, STRING_SIZE-1, handle);
330345c2 MT	542	fclose(handle);
22b9e405 MT	543	line[strlen(line) - 1] = 0;
22b9e405 MT	544	driver = strtok(line, ".");
22b9e405 MT	545	if (strlen(driver) > 1) {
22b9e405 MT	546	fprintf(flog, "Fixing up ipfirerd.img\n");
22b9e405	547	mkdir("/harddisk/initrd", S_IRWXU\|S_IRWXG\|S_IRWXO);
5fd30232	548	snprintf(commandstring, STRING_SIZE, "/sbin/chroot /harddisk /sbin/mkinitrd --with=scsi_mod %s --with=sd_mod --with=sr_mod /boot/ipfirerd.img %s-ipfire", driver, KERNEL_VERSION);
22b9e405	549	runcommandwithstatus(commandstring, ctr[TR_BUILDING_INITRD]);
5fd30232	550	snprintf(commandstring, STRING_SIZE, "/sbin/chroot /harddisk /sbin/mkinitrd --with=scsi_mod %s --with=sd_mod --with=sr_mod /boot/ipfirerd-smp.img %s-ipfire-smp", driver, KERNEL_VERSION);
22b9e405	551	runcommandwithstatus(commandstring, ctr[TR_BUILDING_INITRD]);
532a3663	552	mysystem("/sbin/chroot /harddisk /bin/mv /boot/grub/scsigrub.conf /boot/grub/grub.conf");
9607771a	553	}
406f019f	554	} */
edd536b6 MT	555
	556	if (raid_disk)
	557	sprintf(string, "root=%sp3", hdparams.devnode);
	558	else
	559	sprintf(string, "root=%s3", hdparams.devnode);
	560	replace( "/harddisk/boot/grub/grub.conf", "root=ROOT", string);
edd536b6	561	replace( "/harddisk/boot/grub/grubbatch", "DEVICE", hdparams.devnode);
fd0763dc	562
edd536b6 MT	563	/* restore permissions */
	564	chmod("/harddisk/boot/grub/grubbatch", S_IXUSR \| S_IRUSR \| S_IXGRP \| S_IRGRP \| S_IXOTH \| S_IROTH);
	565
edd536b6	566	snprintf(commandstring, STRING_SIZE,
532a3663	567	"/sbin/chroot /harddisk /boot/grub/grubbatch");
edd536b6 MT	568	if (runcommandwithstatus(commandstring, ctr[TR_INSTALLING_GRUB])) {
	569	errorbox(ctr[TR_UNABLE_TO_INSTALL_GRUB]);
	570	goto EXIT;
	571	}
	572
22b9e405 MT	573	/* Install bootsplash */
	574	mysystem("/bin/installbootsplash.sh");
	575
	576	mysystem("ln -s grub.conf /harddisk/boot/grub/menu.lst");
	577	mysystem("umount /harddisk/proc");
	578	mysystem("umount /harddisk/dev");
	579
73d9a908 MT	580	if (!unattended) {
	581	sprintf(message, ctr[TR_CONGRATULATIONS_LONG],
	582	NAME, SNAME, SNAME, NAME, NAME, NAME);
	583	newtWinMessage(ctr[TR_CONGRATULATIONS], ctr[TR_OK], message);
	584	}
22b9e405 MT	585
22b9e405 MT	586	allok = 1;
edd536b6	587
d6aaa55d	588	EXIT:
10bc6f06	589	fprintf(flog, "Install program ended.\n");
d6aaa55d	590
10bc6f06	591	if (!(allok))
d6aaa55d	592	newtWinMessage(title, ctr[TR_OK], ctr[TR_PRESS_OK_TO_REBOOT]);
10bc6f06	593
d6aaa55d	594	freekeyvalues(ethernetkv);
d6aaa55d	595
10bc6f06	596	if (allok && !allok_fastexit)
d6aaa55d MT	597	{
	598	/* /proc is needed by the module checker. We have to mount it
	599	* so it can be seen by setup, which is run chrooted. */
532a3663	600	if (system("/bin/mount proc -t proc /harddisk/proc"))
d6aaa55d MT	601	printf("Unable to mount proc in /harddisk.");
	602	else
	603	{
c78a77eb MT	604	if (unattended) {
	605	fprintf(flog, "Entering unattended setup\n");
	606	if (unattended_setup(unattendedkv)) {
	607	snprintf(commandstring, STRING_SIZE, "/bin/sleep 10");
	608	runcommandwithstatus(commandstring, "Unattended installation finished, system will reboot");
	609	} else {
	610	errorbox("Unattended setup failed.");
	611	goto EXIT;
	612	}
	613	}
	614
	615	newtFinished();
	616	fflush(flog);
	617	fclose(flog);
3a1019f6 MT	618
3a1019f6 MT	619	if (!unattended) {
069680ac	620	if (system("/sbin/chroot /harddisk /usr/local/sbin/setup /dev/tty2 INSTALL"))
3a1019f6 MT	621	printf("Unable to run setup.\n");
3a1019f6 MT	622	}
3a1019f6	623
532a3663	624	if (system("/bin/umount /harddisk/proc"))
c78a77eb	625	printf("Unable to umount /harddisk/proc.\n");
d6aaa55d MT	626	}
d6aaa55d MT	627	}
d6aaa55d MT	628	fcloseall();
d6aaa55d MT	629
3a1019f6 MT	630	if (swap_file) {
	631	if (raid_disk)
	632	snprintf(commandstring, STRING_SIZE, "/bin/swapoff %sp2", hdparams.devnode);
	633	else
	634	snprintf(commandstring, STRING_SIZE, "/bin/swapoff %s2", hdparams.devnode);
	635	}
	636
	637	newtFinished();
	638
532a3663 MT	639	system("/bin/umount /harddisk/var");
	640	system("/bin/umount /harddisk/boot");
	641	system("/bin/umount /harddisk");
10bc6f06	642
d6aaa55d MT	643	system("/etc/halt");
	644
	645	return 0;
	646	}