1 /* SmoothWall install program.
3 * This program is distributed under the terms of the GNU General Public
4 * Licence. See the file COPYING for details.
6 * (c) Lawrence Manning, 2001
7 * Contains main entry point, and misc functions.6
13 #include <libsmooth.h>
17 #include <sys/mount.h>
23 #define _(x) dgettext("installer", x)
25 #define INST_FILECOUNT 21000
26 #define LICENSE_FILE "/cdrom/COPYING"
27 #define SOURCE_TEMPFILE "/tmp/downloaded-image.iso"
29 extern char url
[STRING_SIZE
];
31 static int newtChecklist(const char* title
, const char* message
,
32 unsigned int width
, unsigned int height
, unsigned int num_entries
,
33 const char** entries
, int* states
) {
35 const int list_height
= 4;
37 char cbstates
[num_entries
];
39 for (unsigned int i
= 0; i
< num_entries
; i
++) {
40 cbstates
[i
] = states
[i
] ? '*' : ' ';
43 newtCenteredWindow(width
, height
, title
);
45 newtComponent textbox
= newtTextbox(1, 1, width
- 2, height
- 6 - list_height
,
47 newtTextboxSetText(textbox
, message
);
49 int top
= newtTextboxGetNumLines(textbox
) + 2;
51 newtComponent form
= newtForm(NULL
, NULL
, 0);
53 newtComponent sb
= NULL
;
54 if (list_height
< num_entries
) {
55 sb
= newtVerticalScrollbar(
56 width
- 4, top
+ 1, list_height
,
57 NEWT_COLORSET_CHECKBOX
, NEWT_COLORSET_ACTCHECKBOX
);
59 newtFormAddComponent(form
, sb
);
62 newtComponent subform
= newtForm(sb
, NULL
, 0);
63 newtFormSetBackground(subform
, NEWT_COLORSET_CHECKBOX
);
65 newtFormSetHeight(subform
, list_height
);
66 newtFormSetWidth(subform
, width
- 10);
68 for (unsigned int i
= 0; i
< num_entries
; i
++) {
69 newtComponent cb
= newtCheckbox(4, top
+ i
, entries
[i
], cbstates
[i
],
72 newtFormAddComponent(subform
, cb
);
75 newtFormAddComponents(form
, textbox
, subform
, NULL
);
77 newtComponent btn_okay
= newtButton((width
- 18) / 3, height
- 4, _("OK"));
78 newtComponent btn_cancel
= newtButton((width
- 18) / 3 * 2 + 9, height
- 4, _("Cancel"));
79 newtFormAddComponents(form
, btn_okay
, btn_cancel
, NULL
);
81 newtComponent answer
= newtRunForm(form
);
83 if ((answer
== NULL
) || (answer
== btn_cancel
)) {
88 for (unsigned int i
= 0; i
< num_entries
; i
++) {
89 states
[i
] = (cbstates
[i
] != ' ');
96 newtFormDestroy(form
);
102 static int newtWinOkCancel(const char* title
, const char* message
, int width
, int height
,
103 const char* btn_txt_ok
, const char* btn_txt_cancel
) {
106 newtCenteredWindow(width
, height
, title
);
108 newtComponent form
= newtForm(NULL
, NULL
, 0);
110 newtComponent textbox
= newtTextbox(1, 1, width
- 2, height
- 6, NEWT_FLAG_WRAP
);
111 newtTextboxSetText(textbox
, message
);
112 newtFormAddComponent(form
, textbox
);
114 unsigned int btn_width_ok
= strlen(btn_txt_ok
);
115 unsigned int btn_width_cancel
= strlen(btn_txt_cancel
);
117 newtComponent btn_ok
= newtButton((width
/ 3) - (btn_width_ok
/ 2) - 2, height
- 4, btn_txt_ok
);
118 newtComponent btn_cancel
= newtButton((width
* 2 / 3) - (btn_width_cancel
/ 2) - 2, height
- 4,
121 newtFormAddComponents(form
, btn_ok
, btn_cancel
, NULL
);
123 newtComponent answer
= newtRunForm(form
);
125 if (answer
== btn_ok
) {
129 newtFormDestroy(form
);
135 static int newtLicenseBox(const char* title
, const char* text
, int width
, int height
) {
138 newtCenteredWindow(width
, height
, title
);
140 newtComponent form
= newtForm(NULL
, NULL
, 0);
142 newtComponent textbox
= newtTextbox(1, 1, width
- 2, height
- 7,
143 NEWT_FLAG_WRAP
|NEWT_FLAG_SCROLL
);
144 newtTextboxSetText(textbox
, text
);
145 newtFormAddComponent(form
, textbox
);
148 newtComponent checkbox
= newtCheckbox(3, height
- 3, _("I accept this license"),
151 newtComponent btn
= newtButton(width
- 15, height
- 4, _("OK"));
153 newtFormAddComponents(form
, checkbox
, btn
, NULL
);
155 newtComponent answer
= newtRunForm(form
);
156 if (answer
== btn
&& choice
== '*')
159 newtFormDestroy(form
);
165 int write_lang_configs(const char *lang
) {
166 struct keyvalue
*kv
= initkeyvalues();
168 /* default stuff for main/settings. */
169 replacekeyvalue(kv
, "LANGUAGE", lang
);
170 replacekeyvalue(kv
, "HOSTNAME", SNAME
);
171 replacekeyvalue(kv
, "THEME", "ipfire");
172 writekeyvalues(kv
, "/harddisk" CONFIG_ROOT
"/main/settings");
178 static char* get_system_release() {
179 char system_release
[STRING_SIZE
] = "\0";
181 FILE* f
= fopen("/etc/system-release", "r");
183 fgets(system_release
, sizeof(system_release
), f
);
187 return strdup(system_release
);
190 static char* center_string(const char* str
, int width
) {
191 unsigned int str_len
= strlen(str
);
193 unsigned int indent_length
= (width
- str_len
) / 2;
194 char indent
[indent_length
+ 1];
196 for (unsigned int i
= 0; i
< indent_length
; i
++) {
199 indent
[indent_length
] = '\0';
202 if (asprintf(&string
, "%s%s", indent
, str
) < 0)
208 #define DEFAULT_LANG "English"
214 } languages
[NUM_LANGS
+ 1] = {
215 { "da.utf8", "Danish (Dansk)" },
216 { "nl_NL.utf8", "Dutch (Nederlands)" },
217 { "en_US.utf8", "English" },
218 { "fr_FR.utf8", "French (Français)" },
219 { "de_DE.utf8", "German (Deutsch)" },
220 { "pl_PL.utf8", "Polish (Polski)" },
221 { "pt_BR.utf8", "Portuguese (Brasil)" },
222 { "ru_RU.utf8", "Russian (Русский)" },
223 { "es_ES.utf8", "Spanish (Español)" },
224 { "tr_TR.utf8", "Turkish (Türkçe)" },
228 static struct config
{
231 int require_networking
;
235 .require_networking
= 0,
238 static void parse_command_line(struct config
* c
) {
239 char cmdline
[STRING_SIZE
];
241 FILE* f
= fopen("/proc/cmdline", "r");
245 int r
= fread(&cmdline
, 1, sizeof(cmdline
) - 1, f
);
247 char* token
= strtok(&cmdline
, " ");
251 if (strcmp(token
, "console=ttyS0") == 0)
252 c
->serial_console
= 1;
254 // enable networking?
255 else if (strcmp(token
, "installer.net") == 0)
256 c
->require_networking
= 1;
259 else if (strcmp(token
, "installer.unattended") == 0)
262 token
= strtok(NULL
, " ");
269 int main(int argc
, char *argv
[]) {
270 struct hw
* hw
= hw_init();
271 const char* logfile
= NULL
;
273 // Read /etc/system-release
274 char* system_release
= get_system_release();
276 char discl_msg
[40000] = "Disclaimer\n";
278 char* sourcedrive
= NULL
;
280 char commandstring
[STRING_SIZE
];
282 char language
[STRING_SIZE
];
283 char message
[STRING_SIZE
];
284 char title
[STRING_SIZE
];
286 FILE *handle
, *copying
;
287 char line
[STRING_SIZE
];
289 setlocale (LC_ALL
, "");
290 sethostname( SNAME
, 10);
292 /* Log file/terminal stuff. */
297 if (!(flog
= fopen(logfile
, "w+")))
303 fprintf(flog
, "Install program started.\n");
308 // Determine the size of the screen
312 newtGetScreenSize(&screen_cols
, &screen_rows
);
315 char* roottext
= center_string(system_release
, screen_cols
);
316 newtDrawRootText(0, 0, roottext
);
318 snprintf(title
, sizeof(title
), "%s - %s", NAME
, SLOGAN
);
320 // Parse parameters from the kernel command line
321 parse_command_line(&config
);
323 if (config
.unattended
) {
324 splashWindow(title
, _("Warning: Unattended installation will start in 10 seconds..."), 10);
327 // Load common modules
328 mysystem(logfile
, "/sbin/modprobe vfat"); // USB key
329 hw_stop_all_raid_arrays(logfile
);
331 if (!config
.unattended
) {
332 // Language selection
333 char* langnames
[NUM_LANGS
+ 1];
335 for (unsigned int i
= 0; i
< NUM_LANGS
; i
++) {
336 if (strcmp(languages
[i
].name
, DEFAULT_LANG
) == 0)
339 langnames
[i
] = languages
[i
].name
;
341 langnames
[NUM_LANGS
] = NULL
;
343 rc
= newtWinMenu(_("Language selection"), _("Select the language you wish to use for the installation."),
344 50, 5, 5, 8, langnames
, &choice
, _("OK"), NULL
);
346 assert(choice
<= NUM_LANGS
);
348 fprintf(flog
, "Selected language: %s (%s)\n", languages
[choice
].name
, languages
[choice
].code
);
349 snprintf(language
, sizeof(language
), languages
[choice
].code
);
351 setenv("LANGUAGE", language
, 1);
352 setlocale(LC_ALL
, language
);
355 char* helpline
= center_string(_("<Tab>/<Alt-Tab> between elements | <Space> selects | <F12> next screen"), screen_cols
);
356 newtPushHelpLine(helpline
);
358 if (!config
.unattended
) {
359 snprintf(message
, sizeof(message
),
360 _("Welcome to the %s installation program.\n\n"
361 "Selecting Cancel on any of the following screens will reboot the computer."), NAME
);
362 newtWinMessage(title
, _("Start installation"), message
);
365 /* Search for a source drive that holds the right
366 * version of the image we are going to install. */
367 sourcedrive
= hw_find_source_medium(hw
);
368 fprintf(flog
, "Source drive: %s\n", sourcedrive
);
370 /* If we could not find a source drive, we will try
371 * downloading the install image */
373 if (!config
.unattended
) {
374 // Show the right message to the user
375 char reason
[STRING_SIZE
];
376 if (config
.require_networking
) {
377 snprintf(reason
, sizeof(reason
),
378 _("The installer will now try downloading the installation image."));
380 snprintf(reason
, sizeof(reason
),
381 _("No source drive could be found.\n\n"
382 "You can try downloading the required installation image."));
384 snprintf(message
, sizeof(message
), "%s %s", reason
,
385 _("Please make sure to connect your machine to a network and "
386 "the installer will try connect to acquire an IP address."));
388 rc
= newtWinOkCancel(title
, message
, 55, 12,
389 _("Download installation image"), _("Cancel"));
395 config
.require_networking
= 1;
398 // Try starting the networking if we require it
399 if (config
.require_networking
) {
401 statuswindow(60, 4, title
, _("Trying to start networking (DHCP)..."));
403 rc
= hw_start_networking(logfile
);
406 // Networking was successfully started
410 // An error happened, ask the user what to do
412 rc
= newtWinOkCancel(title
, _("Networking could not be started "
413 "but is required to go on with the installation.\n\n"
414 "Please connect your machine to a network with a "
415 "DHCP server and retry."), 50, 10, _("Retry"), _("Cancel"));
422 // Download the image if required
423 while (!sourcedrive
) {
424 snprintf(commandstring
, sizeof(commandstring
), "/usr/bin/downloadsource.sh %s", SOURCE_TEMPFILE
);
425 runcommandwithstatus(commandstring
, title
, _("Downloading installation image..."), logfile
);
427 FILE* f
= fopen(SOURCE_TEMPFILE
, "r");
429 sourcedrive
= SOURCE_TEMPFILE
;
432 rc
= newtWinOkCancel(title
, _("The installation image could not be downloaded."),
433 60, 8, _("Retry"), _("Cancel"));
443 int r
= hw_mount(sourcedrive
, SOURCE_MOUNT_PATH
, "iso9660", MS_RDONLY
);
445 fprintf(flog
, "Could not mount %s to %s\n", sourcedrive
, SOURCE_MOUNT_PATH
);
446 fprintf(flog
, strerror(errno
));
450 if (!config
.unattended
) {
451 // Read the license file.
452 if (!(copying
= fopen(LICENSE_FILE
, "r"))) {
453 sprintf(discl_msg
, "Could not open license file: %s\n", LICENSE_FILE
);
454 fprintf(flog
, discl_msg
);
456 fread(discl_msg
, 1, 40000, copying
);
459 if (newtLicenseBox(_("License Agreement"), discl_msg
, 75, 20)) {
460 errorbox(_("License not accepted!"));
467 int part_type
= HW_PART_TYPE_NORMAL
;
469 // Scan for disks to install on.
470 struct hw_disk
** disks
= hw_find_disks(hw
, sourcedrive
);
472 struct hw_disk
** selected_disks
= NULL
;
473 unsigned int num_selected_disks
= 0;
475 // Check how many disks have been found and what
476 // we can do with them.
477 unsigned int num_disks
= hw_count_disks(disks
);
480 // no harddisks found
481 if (num_disks
== 0) {
482 errorbox(_("No hard disk found."));
485 // exactly one disk has been found
486 // or if we are running in unattended mode, we will select
487 // the first disk and go with that one
488 } else if ((num_disks
== 1) || (config
.unattended
&& num_disks
>= 1)) {
489 selected_disks
= hw_select_first_disk(disks
);
491 // more than one usable disk has been found and
492 // the user needs to choose what to do with them
494 const char* disk_names
[num_disks
];
495 int disk_selection
[num_disks
];
497 for (unsigned int i
= 0; i
< num_disks
; i
++) {
498 disk_names
[i
] = &disks
[i
]->description
;
499 disk_selection
[i
] = 0;
502 while (!selected_disks
) {
503 rc
= newtChecklist(_("Disk Selection"),
504 _("Select the disk(s) you want to install IPFire on. "
505 "First those will be partitioned, and then the partitions will have a filesystem put on them.\n\n"
506 "ALL DATA ON THE DISK WILL BE DESTROYED."),
507 50, 20, num_disks
, disk_names
, disk_selection
);
513 // Nothing has been selected
514 } else if (rc
== 0) {
515 errorbox(_("No disk has been selected.\n\n"
516 "Please select one or more disks you want to install IPFire on."));
519 selected_disks
= hw_select_disks(disks
, disk_selection
);
524 // Don't print the auto-selected harddisk setup in
526 if (config
.unattended
)
529 num_selected_disks
= hw_count_disks(selected_disks
);
531 if (num_selected_disks
== 1) {
532 snprintf(message
, sizeof(message
),
533 _("The installation program will now prepare the chosen harddisk:\n\n %s\n\n"
534 "Do you agree to continue?"), (*selected_disks
)->description
);
535 rc
= newtWinOkCancel(_("Disk Setup"), message
, 50, 10,
536 _("Delete all data"), _("Cancel"));
541 } else if (num_selected_disks
== 2) {
542 snprintf(message
, sizeof(message
),
543 _("The installation program will now set up a RAID configuration on the selected harddisks:\n\n %s\n %s\n\n"
544 "Do you agree to continue?"), selected_disks
[0]->description
, selected_disks
[1]->description
);
545 rc
= newtWinOkCancel(_("RAID Setup"), message
, 50, 14,
546 _("Delete all data"), _("Cancel"));
549 part_type
= HW_PART_TYPE_RAID1
;
554 // Currently not supported
556 errorbox(_("Your disk configuration is currently not supported."));
557 fprintf(flog
, "Num disks selected: %d\n", num_selected_disks
);
560 if (selected_disks
) {
561 hw_free_disks(selected_disks
);
562 selected_disks
= NULL
;
566 hw_free_disks(disks
);
568 struct hw_destination
* destination
= hw_make_destination(part_type
, selected_disks
);
571 errorbox(_("Your harddisk is too small."));
575 fprintf(flog
, "Destination drive: %s\n", destination
->path
);
576 fprintf(flog
, " bootldr: %s (%lluMB)\n", destination
->part_bootldr
, BYTES2MB(destination
->size_bootldr
));
577 fprintf(flog
, " boot : %s (%lluMB)\n", destination
->part_boot
, BYTES2MB(destination
->size_boot
));
578 fprintf(flog
, " swap : %s (%lluMB)\n", destination
->part_swap
, BYTES2MB(destination
->size_swap
));
579 fprintf(flog
, " root : %s (%lluMB)\n", destination
->part_root
, BYTES2MB(destination
->size_root
));
580 fprintf(flog
, " data : %s (%lluMB)\n", destination
->part_data
, BYTES2MB(destination
->size_data
));
581 fprintf(flog
, "Memory : %lluMB\n", BYTES2MB(hw_memory()));
583 // Warn the user if there is not enough space to create a swap partition
584 if (!config
.unattended
&& !*destination
->part_swap
) {
585 rc
= newtWinChoice(title
, _("OK"), _("Cancel"),
586 _("Your harddisk is very small, but you can continue without a swap partition."));
592 // Filesystem selection
593 if (!config
.unattended
) {
596 const char* description
;
598 { HW_FS_EXT4
, _("ext4 Filesystem") },
599 { HW_FS_EXT4_WO_JOURNAL
, _("ext4 Filesystem without journal") },
600 { HW_FS_XFS
, _("XFS Filesystem") },
601 { HW_FS_REISERFS
, _("ReiserFS Filesystem") },
604 unsigned int num_filesystems
= sizeof(filesystems
) / sizeof(*filesystems
);
606 char* fs_names
[num_filesystems
];
608 for (unsigned int i
= 0; i
< num_filesystems
; i
++) {
609 if (HW_FS_DEFAULT
== filesystems
[i
].fstype
)
612 fs_names
[i
] = filesystems
[i
].description
;
615 rc
= newtWinMenu(_("Filesystem Selection"), _("Please choose your filesystem:"),
616 50, 5, 5, 6, fs_names
, &fs_choice
, _("OK"), _("Cancel"), NULL
);
621 destination
->filesystem
= filesystems
[fs_choice
].fstype
;
624 // Setting up RAID if needed.
625 if (destination
->is_raid
) {
626 statuswindow(60, 4, title
, _("Building RAID..."));
628 rc
= hw_setup_raid(destination
, logfile
);
630 errorbox(_("Unable to build the RAID."));
636 // We will have to destroy all RAID setups that may have
637 // been on the devices that we want to use now.
638 hw_destroy_raid_superblocks(destination
, logfile
);
641 // Execute the partitioning...
642 statuswindow(60, 4, title
, _("Partitioning disk..."));
644 rc
= hw_create_partitions(destination
, logfile
);
646 errorbox(_("Unable to partition the disk."));
652 // Execute the formatting...
653 statuswindow(60, 4, title
, _("Creating filesystems..."));
655 rc
= hw_create_filesystems(destination
, logfile
);
657 errorbox(_("Unable to create filesystems."));
661 rc
= hw_mount_filesystems(destination
, DESTINATION_MOUNT_PATH
);
663 errorbox(_("Unable to mount filesystems."));
670 snprintf(commandstring
, STRING_SIZE
,
671 "/bin/tar -C /harddisk -xvf /cdrom/distro.img --lzma 2>/dev/null");
673 if (runcommandwithprogress(60, 4, title
, commandstring
, INST_FILECOUNT
,
674 _("Installing the system..."), logfile
)) {
675 errorbox(_("Unable to install the system."));
680 rc
= hw_write_fstab(destination
);
682 fprintf(flog
, "Could not write /etc/fstab\n");
686 /* Save language und local settings */
687 write_lang_configs(language
);
689 /* Build cache lang file */
690 snprintf(commandstring
, STRING_SIZE
, "/usr/sbin/chroot /harddisk /usr/bin/perl -e \"require '" CONFIG_ROOT
"/lang.pl'; &Lang::BuildCacheLang\"");
691 if (runcommandwithstatus(commandstring
, title
, _("Installing the language cache..."), logfile
)) {
692 errorbox(_("Unable to install the language cache."));
696 // Installing bootloader...
697 statuswindow(60, 4, title
, _("Installing the bootloader..."));
699 /* Serial console ? */
700 if (config
.serial_console
) {
702 FILE* f
= fopen(DESTINATION_MOUNT_PATH
"/etc/default/grub", "a");
704 errorbox(_("Unable to open /etc/default/grub for writing."));
708 fprintf(f
, "GRUB_TERMINAL=\"serial\"\n");
709 fprintf(f
, "GRUB_SERIAL_COMMAND=\"serial --unit=0 --speed=%d\"\n", SERIAL_BAUDRATE
);
712 replace(DESTINATION_MOUNT_PATH
"/etc/default/grub", "panic=10", "panic=10 console=ttyS0,115200n8");
715 replace("/harddisk/etc/inittab", "1:2345:respawn:", "#1:2345:respawn:");
716 replace("/harddisk/etc/inittab", "2:2345:respawn:", "#2:2345:respawn:");
717 replace("/harddisk/etc/inittab", "3:2345:respawn:", "#3:2345:respawn:");
718 replace("/harddisk/etc/inittab", "4:2345:respawn:", "#4:2345:respawn:");
719 replace("/harddisk/etc/inittab", "5:2345:respawn:", "#5:2345:respawn:");
720 replace("/harddisk/etc/inittab", "6:2345:respawn:", "#6:2345:respawn:");
721 replace("/harddisk/etc/inittab", "#7:2345:respawn:", "7:2345:respawn:");
724 rc
= hw_install_bootloader(destination
, logfile
);
726 errorbox(_("Unable to install the bootloader."));
732 /* Set marker that the user has already accepted the gpl */
733 mysystem(logfile
, "/usr/bin/touch /harddisk/var/ipfire/main/gpl_accepted");
735 /* Copy restore file from cdrom */
736 char* backup_file
= hw_find_backup_file(logfile
, SOURCE_MOUNT_PATH
);
739 if (!config
.unattended
) {
740 rc
= newtWinOkCancel(title
, _("A backup file has been found on the installation image.\n\n"
741 "Do you want to restore the backup?"), 50, 10, _("Yes"), _("No"));
745 rc
= hw_restore_backup(logfile
, backup_file
, DESTINATION_MOUNT_PATH
);
748 errorbox(_("An error occured when the backup file was restored."));
756 // Umount the destination drive
757 hw_umount_filesystems(destination
, DESTINATION_MOUNT_PATH
);
759 // Stop the RAID array if we are using RAID
760 if (destination
->is_raid
)
761 hw_stop_all_raid_arrays(logfile
);
763 // Umount source drive and eject
764 hw_umount(SOURCE_MOUNT_PATH
);
766 snprintf(commandstring
, STRING_SIZE
, "/usr/bin/eject %s", sourcedrive
);
767 mysystem(logfile
, commandstring
);
769 if (!config
.unattended
) {
770 snprintf(message
, sizeof(message
), _(
771 "%s was successfully installed!\n\n"
772 "Please remove any installation mediums from this system and hit the reboot button. "
773 "Once the system has restarted you will be asked to setup networking and system passwords. "
774 "After that, you should point your web browser at https://%s:444 (or what ever you name "
775 "your %s) for the web configuration console."), NAME
, SNAME
, NAME
);
776 newtWinMessage(_("Congratulations!"), _("Reboot"), message
);
782 fprintf(flog
, "Install program ended.\n");
787 newtWinMessage(title
, _("OK"), _("Setup has failed. Press Ok to reboot."));
792 free(system_release
);
799 hw_stop_all_raid_arrays(logfile
);
802 hw_free_disks(selected_disks
);