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
16 #include <sys/mount.h>
23 #define _(x) dgettext("installer", x)
25 #define INST_FILECOUNT 21000
26 #define UNATTENDED_CONF "/cdrom/boot/unattended.conf"
27 #define LICENSE_FILE "/cdrom/COPYING"
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 newtComponent btn_ok
= newtButton((width
- 16) / 3, height
- 4, btn_txt_ok
);
115 newtComponent btn_cancel
= newtButton((width
- 16) / 3 * 2 + 9, height
- 4,
118 newtFormAddComponents(form
, btn_ok
, btn_cancel
, NULL
);
120 newtComponent answer
= newtRunForm(form
);
122 if (answer
== btn_ok
) {
126 newtFormDestroy(form
);
132 static int newtLicenseBox(const char* title
, const char* text
, int width
, int height
) {
135 newtCenteredWindow(width
, height
, title
);
137 newtComponent form
= newtForm(NULL
, NULL
, 0);
139 newtComponent textbox
= newtTextbox(1, 1, width
- 2, height
- 7,
140 NEWT_FLAG_WRAP
|NEWT_FLAG_SCROLL
);
141 newtTextboxSetText(textbox
, text
);
142 newtFormAddComponent(form
, textbox
);
145 newtComponent checkbox
= newtCheckbox(3, height
- 3, _("I accept this license"),
148 newtComponent btn
= newtButton(width
- 15, height
- 4, _("OK"));
150 newtFormAddComponents(form
, checkbox
, btn
, NULL
);
152 newtComponent answer
= newtRunForm(form
);
153 if (answer
== btn
&& choice
== '*')
156 newtFormDestroy(form
);
162 int write_lang_configs(const char *lang
) {
163 struct keyvalue
*kv
= initkeyvalues();
165 /* default stuff for main/settings. */
166 replacekeyvalue(kv
, "LANGUAGE", lang
);
167 replacekeyvalue(kv
, "HOSTNAME", SNAME
);
168 replacekeyvalue(kv
, "THEME", "ipfire");
169 writekeyvalues(kv
, "/harddisk" CONFIG_ROOT
"/main/settings");
175 static char* get_system_release() {
176 char system_release
[STRING_SIZE
] = "\0";
178 FILE* f
= fopen("/etc/system-release", "r");
180 fgets(system_release
, sizeof(system_release
), f
);
184 return strdup(system_release
);
187 static char* center_string(const char* str
, int width
) {
188 unsigned int str_len
= strlen(str
);
190 unsigned int indent_length
= (width
- str_len
) / 2;
191 char indent
[indent_length
+ 1];
193 for (unsigned int i
= 0; i
< indent_length
; i
++) {
196 indent
[indent_length
] = '\0';
199 if (asprintf(&string
, "%s%s", indent
, str
) < 0)
205 #define DEFAULT_LANG "English"
211 } languages
[NUM_LANGS
+ 1] = {
212 { "nl", "Dutch (Nederlands)" },
214 { "fr", "French (Français)" },
215 { "de", "German (Deutsch)" },
216 { "pl", "Polish (Polski)" },
217 { "ru", "Russian (Русский)" },
218 { "es", "Spanish (Español)" },
219 { "tr", "Turkish (Türkçe)" },
223 int main(int argc
, char *argv
[]) {
224 struct hw
* hw
= hw_init();
225 const char* logfile
= NULL
;
227 // Read /etc/system-release
228 char* system_release
= get_system_release();
230 char discl_msg
[40000] = "Disclaimer\n";
232 char* sourcedrive
= NULL
;
234 char commandstring
[STRING_SIZE
];
236 char shortlangname
[10];
237 char message
[STRING_SIZE
];
238 char title
[STRING_SIZE
];
240 FILE *handle
, *cmdfile
, *copying
;
241 char line
[STRING_SIZE
];
244 int serialconsole
= 0;
245 struct keyvalue
*unattendedkv
= initkeyvalues();
246 char restore_file
[STRING_SIZE
] = "";
248 setlocale (LC_ALL
, "");
249 sethostname( SNAME
, 10);
251 /* Log file/terminal stuff. */
256 if (!(flog
= fopen(logfile
, "w+")))
262 fprintf(flog
, "Install program started.\n");
267 // Determine the size of the screen
271 newtGetScreenSize(&screen_cols
, &screen_rows
);
274 char* roottext
= center_string(system_release
, screen_cols
);
275 newtDrawRootText(0, 0, roottext
);
277 sprintf (title
, "%s %s - %s", NAME
, VERSION
, SLOGAN
);
279 if (! (cmdfile
= fopen("/proc/cmdline", "r")))
281 fprintf(flog
, "Couldn't open commandline: /proc/cmdline\n");
283 fgets(line
, STRING_SIZE
, cmdfile
);
285 // check if we have to make an unattended install
286 if (strstr (line
, "unattended") != NULL
) {
288 runcommandwithstatus("/bin/sleep 10", title
, "WARNING: Unattended installation will start in 10 seconds...", NULL
);
290 // check if we have to patch for serial console
291 if (strstr (line
, "console=ttyS0") != NULL
) {
296 // Load common modules
297 mysystem(logfile
, "/sbin/modprobe vfat"); // USB key
298 hw_stop_all_raid_arrays(logfile
);
301 // Language selection
302 char* langnames
[NUM_LANGS
+ 1];
304 for (unsigned int i
= 0; i
< NUM_LANGS
; i
++) {
305 if (strcmp(languages
[i
].name
, DEFAULT_LANG
) == 0)
308 langnames
[i
] = languages
[i
].name
;
310 langnames
[NUM_LANGS
] = NULL
;
312 rc
= newtWinMenu(_("Language selection"), _("Select the language you wish to use for the installation."),
313 50, 5, 5, 8, langnames
, &choice
, _("OK"), NULL
);
315 assert(choice
<= NUM_LANGS
);
317 fprintf(flog
, "Selected language: %s (%s)\n", languages
[choice
].name
, languages
[choice
].code
);
318 setlocale(LC_ALL
, languages
[choice
].code
);
321 char* helpline
= center_string(_("<Tab>/<Alt-Tab> between elements | <Space> selects | <F12> next screen"), screen_cols
);
322 newtPushHelpLine(helpline
);
325 snprintf(message
, sizeof(message
),
326 _("Welcome to the %s installation program. "
327 "Selecting Cancel on any of the following screens will reboot the computer."), NAME
);
328 newtWinMessage(title
, _("Start installation"), message
);
331 /* Search for a source drive that holds the right
332 * version of the image we are going to install. */
333 sourcedrive
= hw_find_source_medium(hw
);
335 fprintf(flog
, "Source drive: %s\n", sourcedrive
);
337 newtWinMessage(title
, _("OK"), _("No local source media found. Starting download."));
338 runcommandwithstatus("/bin/downloadsource.sh", title
, _("Downloading installation image ..."), logfile
);
339 if ((handle
= fopen("/tmp/source_device", "r")) == NULL
) {
340 errorbox(_("Download error"));
344 fgets(sourcedrive
, 5, handle
);
350 int r
= hw_mount(sourcedrive
, SOURCE_MOUNT_PATH
, "iso9660", MS_RDONLY
);
352 fprintf(flog
, "Could not mount %s to %s\n", sourcedrive
, SOURCE_MOUNT_PATH
);
353 fprintf(flog
, strerror(errno
));
357 /* load unattended configuration */
359 fprintf(flog
, "unattended: Reading unattended.conf\n");
361 (void) readkeyvalues(unattendedkv
, UNATTENDED_CONF
);
362 findkey(unattendedkv
, "RESTORE_FILE", restore_file
);
366 // Read the license file.
367 if (!(copying
= fopen(LICENSE_FILE
, "r"))) {
368 sprintf(discl_msg
, "Could not open license file: %s\n", LICENSE_FILE
);
369 fprintf(flog
, discl_msg
);
371 fread(discl_msg
, 1, 40000, copying
);
374 if (newtLicenseBox(title
, discl_msg
, 75, 20)) {
375 errorbox(_("License not accepted!"));
382 int part_type
= HW_PART_TYPE_NORMAL
;
384 // Scan for disks to install on.
385 struct hw_disk
** disks
= hw_find_disks(hw
);
387 struct hw_disk
** selected_disks
= NULL
;
388 unsigned int num_selected_disks
= 0;
390 // Check how many disks have been found and what
391 // we can do with them.
392 unsigned int num_disks
= hw_count_disks(disks
);
395 // no harddisks found
396 if (num_disks
== 0) {
397 errorbox(_("No hard disk found."));
400 // exactly one disk has been found
401 } else if (num_disks
== 1) {
402 selected_disks
= hw_select_disks(disks
, NULL
);
404 // more than one usable disk has been found and
405 // the user needs to choose what to do with them
407 const char* disk_names
[num_disks
];
408 int disk_selection
[num_disks
];
410 for (unsigned int i
= 0; i
< num_disks
; i
++) {
411 disk_names
[i
] = &disks
[i
]->description
;
412 disk_selection
[i
] = 0;
415 while (!selected_disks
) {
416 rc
= newtChecklist(_("Disk Selection"),
417 _("Select the disk(s) you want to install IPFire on. "
418 "First those will be partitioned, and then the partitions will have a filesystem put on them.\n\n"
419 "ALL DATA ON THE DISK WILL BE DESTROYED."),
420 50, 20, num_disks
, disk_names
, disk_selection
);
426 // Nothing has been selected
427 } else if (rc
== 0) {
428 errorbox(_("No disk has been selected.\n\n"
429 "Please select one or more disks you want to install IPFire on."));
432 selected_disks
= hw_select_disks(disks
, disk_selection
);
437 num_selected_disks
= hw_count_disks(selected_disks
);
439 if (num_selected_disks
== 1) {
440 snprintf(message
, sizeof(message
),
441 _("The installation program will now prepare the chosen harddisk:\n\n %s\n\n"
442 "Do you agree to continue?"), (*selected_disks
)->description
);
443 rc
= newtWinOkCancel(_("Disk Setup"), message
, 50, 10,
444 _("Delete all data"), _("Cancel"));
449 } else if (num_selected_disks
== 2) {
450 snprintf(message
, sizeof(message
),
451 _("The installation program will now set up a RAID configuration on the selected harddisks:\n\n %s\n %s\n\n"
452 "Do you agree to continue?"), (*selected_disks
)->description
, (*selected_disks
+ 1)->description
);
453 rc
= newtWinOkCancel(_("RAID Setup"), message
, 50, 14,
454 _("Delete all data"), _("Cancel"));
457 part_type
= HW_PART_TYPE_RAID1
;
462 // Currently not supported
464 errorbox(_("You disk configuration is currently not supported."));
467 if (selected_disks
) {
468 hw_free_disks(selected_disks
);
469 selected_disks
= NULL
;
473 hw_free_disks(disks
);
475 struct hw_destination
* destination
= hw_make_destination(part_type
, selected_disks
);
478 errorbox(_("Your harddisk is too small."));
482 fprintf(flog
, "Destination drive: %s\n", destination
->path
);
483 fprintf(flog
, " bootldr: %s (%lluMB)\n", destination
->part_bootldr
, BYTES2MB(destination
->size_bootldr
));
484 fprintf(flog
, " boot : %s (%lluMB)\n", destination
->part_boot
, BYTES2MB(destination
->size_boot
));
485 fprintf(flog
, " swap : %s (%lluMB)\n", destination
->part_swap
, BYTES2MB(destination
->size_swap
));
486 fprintf(flog
, " root : %s (%lluMB)\n", destination
->part_root
, BYTES2MB(destination
->size_root
));
487 fprintf(flog
, " data : %s (%lluMB)\n", destination
->part_data
, BYTES2MB(destination
->size_data
));
489 // Warn the user if there is not enough space to create a swap partition
490 if (!unattended
&& !*destination
->part_swap
) {
491 rc
= newtWinChoice(title
, _("OK"), _("Cancel"),
492 _("Your harddisk is very small, but you can continue with an very small swap. (Use with caution)."));
498 // Filesystem selection
502 const char* description
;
504 { HW_FS_EXT4
, _("ext4 Filesystem") },
505 { HW_FS_EXT4_WO_JOURNAL
, _("ext4 Filesystem without journal") },
506 { HW_FS_XFS
, _("XFS Filesystem") },
507 { HW_FS_REISERFS
, _("ReiserFS Filesystem") },
510 unsigned int num_filesystems
= sizeof(filesystems
) / sizeof(*filesystems
);
512 char* fs_names
[num_filesystems
];
514 for (unsigned int i
= 0; i
< num_filesystems
; i
++) {
515 if (HW_FS_DEFAULT
== filesystems
[i
].fstype
)
518 fs_names
[i
] = filesystems
[i
].description
;
521 rc
= newtWinMenu(_("Filesystem Selection"), _("Please choose your filesystem:"),
522 50, 5, 5, 6, fs_names
, &fs_choice
, _("OK"), _("Cancel"), NULL
);
527 destination
->filesystem
= filesystems
[fs_choice
].fstype
;
530 // Setting up RAID if needed.
531 if (destination
->is_raid
) {
532 statuswindow(60, 4, title
, _("Building RAID..."));
534 rc
= hw_setup_raid(destination
, logfile
);
536 errorbox(_("Unable to build the RAID."));
543 // Execute the partitioning...
544 statuswindow(60, 4, title
, _("Partitioning disk..."));
546 rc
= hw_create_partitions(destination
, logfile
);
548 errorbox(_("Unable to partition the disk."));
554 // Execute the formatting...
555 statuswindow(60, 4, title
, _("Creating filesystems..."));
557 rc
= hw_create_filesystems(destination
, logfile
);
559 errorbox(_("Unable to create filesystems."));
563 rc
= hw_mount_filesystems(destination
, DESTINATION_MOUNT_PATH
);
565 errorbox(_("Unable to mount filesystems."));
572 snprintf(commandstring
, STRING_SIZE
,
573 "/bin/tar -C /harddisk -xvf /cdrom/distro.img --lzma 2>/dev/null");
575 if (runcommandwithprogress(60, 4, title
, commandstring
, INST_FILECOUNT
,
576 _("Installing the system..."), logfile
)) {
577 errorbox(_("Unable to install the system."));
582 rc
= hw_write_fstab(destination
);
584 fprintf(flog
, "Could not write /etc/fstab\n");
588 /* Save language und local settings */
589 write_lang_configs(shortlangname
);
591 /* Build cache lang file */
592 snprintf(commandstring
, STRING_SIZE
, "/usr/sbin/chroot /harddisk /usr/bin/perl -e \"require '" CONFIG_ROOT
"/lang.pl'; &Lang::BuildCacheLang\"");
593 if (runcommandwithstatus(commandstring
, title
, _("Installing the language cache..."), logfile
)) {
594 errorbox(_("Unable to install the language cache."));
598 // Installing bootloader...
599 statuswindow(60, 4, title
, _("Installing the bootloader..."));
601 rc
= hw_install_bootloader(destination
, logfile
);
603 errorbox(_("Unable to install the bootloader."));
609 /* Serial console ? */
612 replace("/harddisk/boot/grub/grub.conf", "splashimage", "#splashimage");
613 replace("/harddisk/boot/grub/grub.conf", "#serial", "serial");
614 replace("/harddisk/boot/grub/grub.conf", "#terminal", "terminal");
615 replace("/harddisk/boot/grub/grub.conf", " panic=10 ", " console=ttyS0,115200n8 panic=10 ");
618 replace("/harddisk/etc/inittab", "1:2345:respawn:", "#1:2345:respawn:");
619 replace("/harddisk/etc/inittab", "2:2345:respawn:", "#2:2345:respawn:");
620 replace("/harddisk/etc/inittab", "3:2345:respawn:", "#3:2345:respawn:");
621 replace("/harddisk/etc/inittab", "4:2345:respawn:", "#4:2345:respawn:");
622 replace("/harddisk/etc/inittab", "5:2345:respawn:", "#5:2345:respawn:");
623 replace("/harddisk/etc/inittab", "6:2345:respawn:", "#6:2345:respawn:");
624 replace("/harddisk/etc/inittab", "#7:2345:respawn:", "7:2345:respawn:");
627 /* Set marker that the user has already accepted the gpl */
628 mysystem(logfile
, "/usr/bin/touch /harddisk/var/ipfire/main/gpl_accepted");
630 /* Copy restore file from cdrom */
631 if (unattended
&& (strlen(restore_file
) > 0)) {
632 fprintf(flog
, "unattended: Copy restore file\n");
633 snprintf(commandstring
, STRING_SIZE
,
634 "cp /cdrom/%s /harddisk/var/ipfire/backup", restore_file
);
635 mysystem(logfile
, commandstring
);
638 // Umount source drive and eject
639 hw_umount(SOURCE_MOUNT_PATH
);
641 snprintf(commandstring
, STRING_SIZE
, "/usr/bin/eject %s", sourcedrive
);
642 mysystem(logfile
, commandstring
);
645 snprintf(message
, sizeof(message
), _("%s was successfully installed. "
646 "Please remove any installation mediums from this system. "
647 "Setup will now run where you may configure networking and the system passwords. "
648 "After Setup has been completed, you should point your web browser at https://%s:444 "
649 "(or whatever you name your %s), and configure dialup networking (if required) and "
650 "remote access."), NAME
, SNAME
, NAME
);
651 newtWinMessage(_("Congratulations!"), _("Reboot"), message
);
657 fprintf(flog
, "Install program ended.\n");
660 newtWinMessage(title
, _("OK"), _("Press Ok to reboot."));
670 free(system_release
);
679 hw_umount_filesystems(destination
, DESTINATION_MOUNT_PATH
);
683 hw_stop_all_raid_arrays(logfile
);
686 hw_free_disks(selected_disks
);