src/installer/main.c

   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.6
   8  *
   9  */
  10 #define _GNU_SOURCE
  11
  12 #include <assert.h>
  13 #include <errno.h>
  14 #include <libsmooth.h>
  15 #include <stdio.h>
  16 #include <stdlib.h>
  17 #include <string.h>
  18 #include <sys/mount.h>
  19
  20 #include "hw.h"
  21
  22 // Translation
  23 #include <libintl.h>
  24 #define _(x) dgettext("installer", x)
  25
  26 #define INST_FILECOUNT 21000
  27 #define LICENSE_FILE    "/cdrom/COPYING"
  28 #define SOURCE_TEMPFILE "/tmp/downloaded-image.iso"
  29
  30 extern char url[STRING_SIZE];
  31
  32 static int newtChecklist(const char* title, const char* message,
  33                 unsigned int width, unsigned int height, unsigned int num_entries,
  34                 const char** entries, int* states) {
  35         int ret;
  36         const int list_height = 4;
  37
  38         char cbstates[num_entries];
  39
  40         for (unsigned int i = 0; i < num_entries; i++) {
  41                 cbstates[i] = states[i] ? '*' : ' ';
  42         }
  43
  44         newtCenteredWindow(width, height, title);
  45
  46         newtComponent textbox = newtTextbox(1, 1, width - 2, height - 6 - list_height,
  47                 NEWT_FLAG_WRAP);
  48         newtTextboxSetText(textbox, message);
  49
  50         int top = newtTextboxGetNumLines(textbox) + 2;
  51
  52         newtComponent form = newtForm(NULL, NULL, 0);
  53
  54         newtComponent sb = NULL;
  55         if (list_height < num_entries) {
  56                 sb = newtVerticalScrollbar(
  57                         width - 4, top + 1, list_height,
  58                         NEWT_COLORSET_CHECKBOX, NEWT_COLORSET_ACTCHECKBOX);
  59
  60                 newtFormAddComponent(form, sb);
  61         }
  62
  63         newtComponent subform = newtForm(sb, NULL, 0);
  64         newtFormSetBackground(subform, NEWT_COLORSET_CHECKBOX);
  65
  66         newtFormSetHeight(subform, list_height);
  67         newtFormSetWidth(subform, width - 10);
  68
  69         for (unsigned int i = 0; i < num_entries; i++) {
  70                 newtComponent cb = newtCheckbox(4, top + i, entries[i], cbstates[i],
  71                         NULL, &cbstates[i]);
  72
  73                 newtFormAddComponent(subform, cb);
  74         }
  75
  76         newtFormAddComponents(form, textbox, subform, NULL);
  77
  78         newtComponent btn_okay   = newtButton((width - 18) / 3, height - 4, _("OK"));
  79         newtComponent btn_cancel = newtButton((width - 18) / 3 * 2 + 9, height - 4, _("Cancel"));
  80         newtFormAddComponents(form, btn_okay, btn_cancel, NULL);
  81
  82         newtComponent answer = newtRunForm(form);
  83
  84         if ((answer == NULL) || (answer == btn_cancel)) {
  85                 ret = -1;
  86         } else {
  87                 ret = 0;
  88
  89                 for (unsigned int i = 0; i < num_entries; i++) {
  90                         states[i] = (cbstates[i] != ' ');
  91
  92                         if (states[i])
  93                                 ret++;
  94                 }
  95         }
  96
  97         newtFormDestroy(form);
  98         newtPopWindow();
  99
 100         return ret;
 101 }
 102
 103 static int newtWinOkCancel(const char* title, const char* message, int width, int height,
 104                 const char* btn_txt_ok, const char* btn_txt_cancel) {
 105         int ret = 1;
 106
 107         newtCenteredWindow(width, height, title);
 108
 109         newtComponent form = newtForm(NULL, NULL, 0);
 110
 111         newtComponent textbox = newtTextbox(1, 1, width - 2, height - 6, NEWT_FLAG_WRAP);
 112         newtTextboxSetText(textbox, message);
 113         newtFormAddComponent(form, textbox);
 114
 115         unsigned int btn_width_ok = strlen(btn_txt_ok);
 116         unsigned int btn_width_cancel = strlen(btn_txt_cancel);
 117
 118         newtComponent btn_ok = newtButton((width / 3) - (btn_width_ok / 2) - 2, height - 4, btn_txt_ok);
 119         newtComponent btn_cancel = newtButton((width * 2 / 3) - (btn_width_cancel / 2) - 2, height - 4,
 120                 btn_txt_cancel);
 121
 122         newtFormAddComponents(form, btn_ok, btn_cancel, NULL);
 123
 124         newtComponent answer = newtRunForm(form);
 125
 126         if (answer == btn_ok) {
 127                 ret = 0;
 128         }
 129
 130         newtFormDestroy(form);
 131         newtPopWindow();
 132
 133         return ret;
 134 }
 135
 136 static int newtLicenseBox(const char* title, const char* text, int width, int height) {
 137         int ret = 1;
 138
 139         newtCenteredWindow(width, height, title);
 140
 141         newtComponent form = newtForm(NULL, NULL, 0);
 142
 143         newtComponent textbox = newtTextbox(1, 1, width - 2, height - 7,
 144                 NEWT_FLAG_WRAP|NEWT_FLAG_SCROLL);
 145         newtTextboxSetText(textbox, text);
 146         newtFormAddComponent(form, textbox);
 147
 148         char choice;
 149         newtComponent checkbox = newtCheckbox(3, height - 3, _("I accept this license"),
 150                 ' ', " *", &choice);
 151
 152         newtComponent btn = newtButton(width - 15, height - 4, _("OK"));
 153
 154         newtFormAddComponents(form, checkbox, btn, NULL);
 155
 156         newtComponent answer = newtRunForm(form);
 157         if (answer == btn && choice == '*')
 158                 ret = 0;
 159
 160         newtFormDestroy(form);
 161         newtPopWindow();
 162
 163         return ret;
 164 }
 165
 166 int write_lang_configs(char* lang) {
 167         struct keyvalue *kv = initkeyvalues();
 168
 169         /* default stuff for main/settings. */
 170         replacekeyvalue(kv, "LANGUAGE", lang);
 171         replacekeyvalue(kv, "HOSTNAME", SNAME);
 172         replacekeyvalue(kv, "THEME", "ipfire");
 173         writekeyvalues(kv, "/harddisk" CONFIG_ROOT "/main/settings");
 174         freekeyvalues(kv);
 175
 176         return 1;
 177 }
 178
 179 static char* get_system_release() {
 180         char system_release[STRING_SIZE] = "\0";
 181
 182         FILE* f = fopen("/etc/system-release", "r");
 183         if (f) {
 184                 fgets(system_release, sizeof(system_release), f);
 185                 fclose(f);
 186         }
 187
 188         return strdup(system_release);
 189 }
 190
 191 static char* center_string(const char* str, int width) {
 192         unsigned int str_len = strlen(str);
 193
 194         unsigned int indent_length = (width - str_len) / 2;
 195         char indent[indent_length + 1];
 196
 197         for (unsigned int i = 0; i < indent_length; i++) {
 198                 indent[i] = ' ';
 199         }
 200         indent[indent_length] = '\0';
 201
 202         char* string = NULL;
 203         if (asprintf(&string, "%s%s", indent, str) < 0)
 204                 return NULL;
 205
 206         return string;
 207 }
 208
 209 #define DEFAULT_LANG "English"
 210 #define NUM_LANGS 10
 211
 212 static struct lang {
 213         const char* code;
 214         char* name;
 215 } languages[NUM_LANGS + 1] = {
 216         { "da.utf8",    "Danish (Dansk)" },
 217         { "nl_NL.utf8", "Dutch (Nederlands)" },
 218         { "en_US.utf8", "English" },
 219         { "fr_FR.utf8", "French (Français)" },
 220         { "de_DE.utf8", "German (Deutsch)" },
 221         { "pl_PL.utf8", "Polish (Polski)" },
 222         { "pt_BR.utf8", "Portuguese (Brasil)" },
 223         { "ru_RU.utf8", "Russian (Русский)" },
 224         { "es_ES.utf8", "Spanish (Español)" },
 225         { "tr_TR.utf8", "Turkish (Türkçe)" },
 226         { NULL, NULL },
 227 };
 228
 229 static struct config {
 230         int unattended;
 231         int serial_console;
 232         int require_networking;
 233         int perform_download;
 234         int disable_swap;
 235         char download_url[STRING_SIZE];
 236         char postinstall[STRING_SIZE];
 237 } config = {
 238         .unattended = 0,
 239         .serial_console = 0,
 240         .require_networking = 0,
 241         .perform_download = 0,
 242         .disable_swap = 0,
 243         .download_url = DOWNLOAD_URL,
 244         .postinstall = "\0",
 245 };
 246
 247 static void parse_command_line(struct config* c) {
 248         char buffer[STRING_SIZE];
 249         char cmdline[STRING_SIZE];
 250
 251         FILE* f = fopen("/proc/cmdline", "r");
 252         if (!f)
 253                 return;
 254
 255         int r = fread(&cmdline, 1, sizeof(cmdline) - 1, f);
 256         if (r > 0) {
 257                 char* token = strtok(cmdline, " ");
 258
 259                 while (token) {
 260                         strncpy(buffer, token, sizeof(buffer));
 261                         char* val = buffer;
 262                         char* key = strsep(&val, "=");
 263
 264                         // serial console
 265                         if (strcmp(token, "console=ttyS0") == 0)
 266                                 c->serial_console = 1;
 267
 268                         // enable networking?
 269                         else if (strcmp(token, "installer.net") == 0)
 270                                 c->require_networking = 1;
 271
 272                         // unattended mode
 273                         else if (strcmp(token, "installer.unattended") == 0)
 274                                 c->unattended = 1;
 275
 276                         // disable swap
 277                         else if (strcmp(token, "installer.disable-swap") == 0)
 278                                 c->disable_swap = 1;
 279
 280                         // download url
 281                         else if (strcmp(key, "installer.download-url") == 0) {
 282                                 strncpy(c->download_url, val, sizeof(c->download_url));
 283                                 c->perform_download = 1;
 284
 285                                 // Require networking for the download
 286                                 c->require_networking = 1;
 287
 288                         // postinstall script
 289                         } else if (strcmp(key, "installer.postinstall") == 0) {
 290                                 strncpy(c->postinstall, val, sizeof(c->postinstall));
 291
 292                                 // Require networking for the download
 293                                 c->require_networking = 1;
 294                         }
 295
 296                         token = strtok(NULL, " ");
 297                 }
 298         }
 299
 300         fclose(f);
 301 }
 302
 303 int main(int argc, char *argv[]) {
 304         struct hw* hw = hw_init();
 305         const char* logfile = NULL;
 306
 307         // Read /etc/system-release
 308         char* system_release = get_system_release();
 309
 310         char discl_msg[40000] = "Disclaimer\n";
 311
 312         char* sourcedrive = NULL;
 313         int rc = 0;
 314         char commandstring[STRING_SIZE];
 315         int choice;
 316         char language[STRING_SIZE];
 317         char message[STRING_SIZE];
 318         char title[STRING_SIZE];
 319         int allok = 0;
 320         FILE *copying;
 321
 322         setlocale(LC_ALL, "");
 323         sethostname(SNAME, 10);
 324
 325         /* Log file/terminal stuff. */
 326         FILE* flog = NULL;
 327         if (argc >= 2) {
 328                 logfile = argv[1];
 329
 330                 if (!(flog = fopen(logfile, "w+")))
 331                         return 0;
 332         } else {
 333                 return 0;
 334         }
 335
 336         fprintf(flog, "Install program started.\n");
 337
 338         newtInit();
 339         newtCls();
 340
 341         // Determine the size of the screen
 342         int screen_cols = 0;
 343         int screen_rows = 0;
 344
 345         newtGetScreenSize(&screen_cols, &screen_rows);
 346
 347         // Draw title
 348         char* roottext = center_string(system_release, screen_cols);
 349         newtDrawRootText(0, 0, roottext);
 350
 351         snprintf(title, sizeof(title), "%s - %s", NAME, SLOGAN);
 352
 353         // Parse parameters from the kernel command line
 354         parse_command_line(&config);
 355
 356         if (config.unattended) {
 357                 splashWindow(title, _("Warning: Unattended installation will start in 10 seconds..."), 10);
 358         }
 359
 360         // Load common modules
 361         mysystem(logfile, "/sbin/modprobe vfat"); // USB key
 362         hw_stop_all_raid_arrays(logfile);
 363
 364         if (!config.unattended) {
 365                 // Language selection
 366                 char* langnames[NUM_LANGS + 1];
 367
 368                 for (unsigned int i = 0; i < NUM_LANGS; i++) {
 369                         if (strcmp(languages[i].name, DEFAULT_LANG) == 0)
 370                                 choice = i;
 371
 372                         langnames[i] = languages[i].name;
 373                 }
 374                 langnames[NUM_LANGS] = NULL;
 375
 376                 rc = newtWinMenu(_("Language selection"), _("Select the language you wish to use for the installation."),
 377                         50, 5, 5, 8, langnames, &choice, _("OK"), NULL);
 378
 379                 assert(choice <= NUM_LANGS);
 380
 381                 fprintf(flog, "Selected language: %s (%s)\n", languages[choice].name, languages[choice].code);
 382                 snprintf(language, sizeof(language), "%s", languages[choice].code);
 383
 384                 setenv("LANGUAGE", language, 1);
 385                 setlocale(LC_ALL, language);
 386         }
 387
 388         char* helpline = center_string(_("<Tab>/<Alt-Tab> between elements | <Space> selects | <F12> next screen"), screen_cols);
 389         newtPushHelpLine(helpline);
 390
 391         if (!config.unattended) {
 392                 snprintf(message, sizeof(message),
 393                         _("Welcome to the %s installation program.\n\n"
 394                         "Selecting Cancel on any of the following screens will reboot the computer."), NAME);
 395                 newtWinMessage(title, _("Start installation"), message);
 396         }
 397
 398         /* Search for a source drive that holds the right
 399          * version of the image we are going to install. */
 400         if (!config.perform_download) {
 401                 sourcedrive = hw_find_source_medium(hw);
 402                 fprintf(flog, "Source drive: %s\n", sourcedrive);
 403         }
 404
 405         /* If we could not find a source drive, we will try
 406          * downloading the install image */
 407         if (!sourcedrive)
 408                 config.perform_download = 1;
 409
 410         if (config.perform_download) {
 411                 if (!config.unattended) {
 412                         // Show the right message to the user
 413                         char reason[STRING_SIZE];
 414                         if (config.perform_download) {
 415                                 snprintf(reason, sizeof(reason),
 416                                         _("The installer will now try downloading the installation image."));
 417                         } else {
 418                                 snprintf(reason, sizeof(reason),
 419                                         _("No source drive could be found.\n\n"
 420                                         "You can try downloading the required installation image."));
 421                         }
 422                         snprintf(message, sizeof(message), "%s %s", reason,
 423                                 _("Please make sure to connect your machine to a network and "
 424                                 "the installer will try connect to acquire an IP address."));
 425
 426                         rc = newtWinOkCancel(title, message, 55, 12,
 427                                 _("Download installation image"), _("Cancel"));
 428
 429                         if (rc != 0)
 430                                 goto EXIT;
 431                 }
 432
 433                 // Make sure that we enable networking before download
 434                 config.require_networking = 1;
 435         }
 436
 437         // Try starting the networking if we require it
 438         if (config.require_networking) {
 439                 while (1) {
 440                         statuswindow(60, 4, title, _("Trying to start networking (DHCP)..."));
 441
 442                         rc = hw_start_networking(logfile);
 443                         newtPopWindow();
 444
 445                         // Networking was successfully started
 446                         if (rc == 0) {
 447                                 break;
 448
 449                         // An error happened, ask the user what to do
 450                         } else {
 451                                 rc = newtWinOkCancel(title, _("Networking could not be started "
 452                                         "but is required to go on with the installation.\n\n"
 453                                         "Please connect your machine to a network with a "
 454                                         "DHCP server and retry."), 50, 10, _("Retry"), _("Cancel"));
 455
 456                                 if (rc)
 457                                         goto EXIT;
 458                         }
 459                 }
 460
 461                 // Download the image if required
 462                 if (config.perform_download) {
 463                         fprintf(flog, "Download URL: %s\n", config.download_url);
 464                         snprintf(commandstring, sizeof(commandstring), "/usr/bin/downloadsource.sh %s %s",
 465                                 SOURCE_TEMPFILE, config.download_url);
 466
 467                         while (!sourcedrive) {
 468                                 rc = runcommandwithstatus(commandstring, title, _("Downloading installation image..."), logfile);
 469
 470                                 FILE* f = fopen(SOURCE_TEMPFILE, "r");
 471                                 if (f) {
 472                                         sourcedrive = SOURCE_TEMPFILE;
 473                                         fclose(f);
 474                                 } else {
 475                                         char reason[STRING_SIZE] = "-";
 476                                         if (rc == 2)
 477                                                 snprintf(reason, sizeof(STRING_SIZE), _("MD5 checksum mismatch"));
 478
 479                                         snprintf(message, sizeof(message),
 480                                                 _("The installation image could not be downloaded.\n  Reason: %s\n\n%s"),
 481                                                 reason, config.download_url);
 482
 483                                         rc = newtWinOkCancel(title, message, 75, 12, _("Retry"), _("Cancel"));
 484                                         if (rc)
 485                                                 goto EXIT;
 486                                 }
 487                         }
 488                 }
 489         }
 490
 491         assert(sourcedrive);
 492
 493         int r = hw_mount(sourcedrive, SOURCE_MOUNT_PATH, "iso9660", MS_RDONLY);
 494         if (r) {
 495                 snprintf(message, sizeof(message), _("Could not mount %s to %s:\n  %s\n"),
 496                         sourcedrive, SOURCE_MOUNT_PATH, strerror(errno));
 497                 errorbox(message);
 498                 goto EXIT;
 499         }
 500
 501         if (!config.unattended) {
 502                 // Read the license file.
 503                 if (!(copying = fopen(LICENSE_FILE, "r"))) {
 504                         sprintf(discl_msg, "Could not open license file: %s\n", LICENSE_FILE);
 505                         fprintf(flog, "%s", discl_msg);
 506                 } else {
 507                         fread(discl_msg, 1, 40000, copying);
 508                         fclose(copying);
 509
 510                         if (newtLicenseBox(_("License Agreement"), discl_msg, 75, 20)) {
 511                                 errorbox(_("License not accepted!"));
 512
 513                                 goto EXIT;
 514                         }
 515                 }
 516         }
 517
 518         int part_type = HW_PART_TYPE_NORMAL;
 519
 520         // Scan for disks to install on.
 521         struct hw_disk** disks = hw_find_disks(hw, sourcedrive);
 522
 523         struct hw_disk** selected_disks = NULL;
 524         unsigned int num_selected_disks = 0;
 525
 526         // Check how many disks have been found and what
 527         // we can do with them.
 528         unsigned int num_disks = hw_count_disks((const struct hw_disk**)disks);
 529
 530         while (1) {
 531                 // no harddisks found
 532                 if (num_disks == 0) {
 533                         errorbox(_("No hard disk found."));
 534                         goto EXIT;
 535
 536                 // exactly one disk has been found
 537                 // or if we are running in unattended mode, we will select
 538                 // the first disk and go with that one
 539                 } else if ((num_disks == 1) || (config.unattended && num_disks >= 1)) {
 540                         selected_disks = hw_select_first_disk((const struct hw_disk**)disks);
 541
 542                 // more than one usable disk has been found and
 543                 // the user needs to choose what to do with them
 544                 } else {
 545                         const char* disk_names[num_disks];
 546                         int disk_selection[num_disks];
 547
 548                         for (unsigned int i = 0; i < num_disks; i++) {
 549                                 disk_names[i] = disks[i]->description;
 550                                 disk_selection[i] = 0;
 551                         }
 552
 553                         while (!selected_disks) {
 554                                 rc = newtChecklist(_("Disk Selection"),
 555                                         _("Select the disk(s) you want to install IPFire on. "
 556                                         "First those will be partitioned, and then the partitions will have a filesystem put on them.\n\n"
 557                                         "ALL DATA ON THE DISK WILL BE DESTROYED."),
 558                                         50, 20, num_disks, disk_names, disk_selection);
 559
 560                                 // Error
 561                                 if (rc < 0) {
 562                                         goto EXIT;
 563
 564                                 // Nothing has been selected
 565                                 } else if (rc == 0) {
 566                                         errorbox(_("No disk has been selected.\n\n"
 567                                                 "Please select one or more disks you want to install IPFire on."));
 568
 569                                 } else {
 570                                         selected_disks = hw_select_disks(disks, disk_selection);
 571                                 }
 572                         }
 573                 }
 574
 575                 // Don't print the auto-selected harddisk setup in
 576                 // unattended mode.
 577                 if (config.unattended)
 578                         break;
 579
 580                 num_selected_disks = hw_count_disks((const struct hw_disk**)selected_disks);
 581
 582                 if (num_selected_disks == 1) {
 583                         snprintf(message, sizeof(message),
 584                                 _("The installation program will now prepare the chosen harddisk:\n\n  %s\n\n"
 585                                 "Do you agree to continue?"), (*selected_disks)->description);
 586                         rc = newtWinOkCancel(_("Disk Setup"), message, 50, 10,
 587                                 _("Delete all data"), _("Cancel"));
 588
 589                         if (rc == 0)
 590                                 break;
 591
 592                 } else if (num_selected_disks == 2) {
 593                         snprintf(message, sizeof(message),
 594                                 _("The installation program will now set up a RAID configuration on the selected harddisks:\n\n  %s\n  %s\n\n"
 595                                 "Do you agree to continue?"), selected_disks[0]->description, selected_disks[1]->description);
 596                         rc = newtWinOkCancel(_("RAID Setup"), message, 50, 14,
 597                                 _("Delete all data"), _("Cancel"));
 598
 599                         if (rc == 0) {
 600                                 part_type = HW_PART_TYPE_RAID1;
 601
 602                                 break;
 603                         }
 604
 605                 // Currently not supported
 606                 } else {
 607                         errorbox(_("Your disk configuration is currently not supported."));
 608                         fprintf(flog, "Num disks selected: %d\n", num_selected_disks);
 609                 }
 610
 611                 if (selected_disks) {
 612                         hw_free_disks(selected_disks);
 613                         selected_disks = NULL;
 614                 }
 615         }
 616
 617         hw_free_disks(disks);
 618
 619         struct hw_destination* destination = hw_make_destination(part_type, selected_disks, config.disable_swap);
 620
 621         if (!destination) {
 622                 errorbox(_("Your harddisk is too small."));
 623                 goto EXIT;
 624         }
 625
 626         fprintf(flog, "Destination drive: %s\n", destination->path);
 627         fprintf(flog, "  bootldr: %s (%lluMB)\n", destination->part_bootldr, BYTES2MB(destination->size_bootldr));
 628         fprintf(flog, "  boot   : %s (%lluMB)\n", destination->part_boot, BYTES2MB(destination->size_boot));
 629         fprintf(flog, "  swap   : %s (%lluMB)\n", destination->part_swap, BYTES2MB(destination->size_swap));
 630         fprintf(flog, "  root   : %s (%lluMB)\n", destination->part_root, BYTES2MB(destination->size_root));
 631         fprintf(flog, "  data   : %s (%lluMB)\n", destination->part_data, BYTES2MB(destination->size_data));
 632         fprintf(flog, "Memory   : %lluMB\n", BYTES2MB(hw_memory()));
 633
 634         // Warn the user if there is not enough space to create a swap partition
 635         if (!config.unattended) {
 636                 if (!config.disable_swap && !*destination->part_swap) {
 637                         rc = newtWinChoice(title, _("OK"), _("Cancel"),
 638                                 _("Your harddisk is very small, but you can continue without a swap partition."));
 639
 640                         if (rc != 1)
 641                                 goto EXIT;
 642                 }
 643         }
 644
 645         // Filesystem selection
 646         if (!config.unattended) {
 647                 struct filesystems {
 648                         int fstype;
 649                         char* description;
 650                 } filesystems[] = {
 651                         { HW_FS_EXT4,            _("ext4 Filesystem") },
 652                         { HW_FS_EXT4_WO_JOURNAL, _("ext4 Filesystem without journal") },
 653                         { HW_FS_XFS,             _("XFS Filesystem") },
 654                         { HW_FS_REISERFS,        _("ReiserFS Filesystem") },
 655                         { 0, NULL },
 656                 };
 657                 unsigned int num_filesystems = sizeof(filesystems) / sizeof(*filesystems);
 658
 659                 char* fs_names[num_filesystems];
 660                 int fs_choice = 0;
 661                 for (unsigned int i = 0; i < num_filesystems; i++) {
 662                         if (HW_FS_DEFAULT == filesystems[i].fstype)
 663                                 fs_choice = i;
 664
 665                         fs_names[i] = filesystems[i].description;
 666                 }
 667
 668                 rc = newtWinMenu(_("Filesystem Selection"), _("Please choose your filesystem:"),
 669                         50, 5, 5, 6, fs_names, &fs_choice, _("OK"), _("Cancel"), NULL);
 670
 671                 if (rc == 2)
 672                         goto EXIT;
 673
 674                 destination->filesystem = filesystems[fs_choice].fstype;
 675         }
 676
 677         // Setting up RAID if needed.
 678         if (destination->is_raid) {
 679                 statuswindow(60, 4, title, _("Building RAID..."));
 680
 681                 rc = hw_setup_raid(destination, logfile);
 682                 if (rc) {
 683                         errorbox(_("Unable to build the RAID."));
 684                         goto EXIT;
 685                 }
 686
 687                 newtPopWindow();
 688         } else {
 689                 // We will have to destroy all RAID setups that may have
 690                 // been on the devices that we want to use now.
 691                 hw_destroy_raid_superblocks(destination, logfile);
 692         }
 693
 694         // Execute the partitioning...
 695         statuswindow(60, 4, title, _("Partitioning disk..."));
 696
 697         rc = hw_create_partitions(destination, logfile);
 698         if (rc) {
 699                 errorbox(_("Unable to partition the disk."));
 700                 goto EXIT;
 701         }
 702
 703         newtPopWindow();
 704
 705         // Execute the formatting...
 706         statuswindow(60, 4, title, _("Creating filesystems..."));
 707
 708         rc = hw_create_filesystems(destination, logfile);
 709         if (rc) {
 710                 errorbox(_("Unable to create filesystems."));
 711                 goto EXIT;
 712         }
 713
 714         rc = hw_mount_filesystems(destination, DESTINATION_MOUNT_PATH);
 715         if (rc) {
 716                 errorbox(_("Unable to mount filesystems."));
 717                 goto EXIT;
 718         }
 719
 720         newtPopWindow();
 721
 722         // Extract files...
 723         snprintf(commandstring, STRING_SIZE,
 724                 "/bin/tar -C /harddisk  -xvf /cdrom/distro.img --lzma 2>/dev/null");
 725
 726         if (runcommandwithprogress(60, 4, title, commandstring, INST_FILECOUNT,
 727                         _("Installing the system..."), logfile)) {
 728                 errorbox(_("Unable to install the system."));
 729                 goto EXIT;
 730         }
 731
 732         // Write fstab
 733         rc = hw_write_fstab(destination);
 734         if (rc) {
 735                 fprintf(flog, "Could not write /etc/fstab\n");
 736                 goto EXIT;
 737         }
 738
 739         /* Save language und local settings */
 740         write_lang_configs(language);
 741
 742         /* Build cache lang file */
 743         snprintf(commandstring, STRING_SIZE, "/usr/sbin/chroot /harddisk /usr/bin/perl -e \"require '" CONFIG_ROOT "/lang.pl'; &Lang::BuildCacheLang\"");
 744         if (runcommandwithstatus(commandstring, title, _("Installing the language cache..."), logfile)) {
 745                 errorbox(_("Unable to install the language cache."));
 746                 goto EXIT;
 747         }
 748
 749         // Installing bootloader...
 750         statuswindow(60, 4, title, _("Installing the bootloader..."));
 751
 752         /* Serial console ? */
 753         if (config.serial_console) {
 754                 /* grub */
 755                 FILE* f = fopen(DESTINATION_MOUNT_PATH "/etc/default/grub", "a");
 756                 if (!f) {
 757                         errorbox(_("Unable to open /etc/default/grub for writing."));
 758                         goto EXIT;
 759                 }
 760
 761                 fprintf(f, "GRUB_TERMINAL=\"serial\"\n");
 762                 fprintf(f, "GRUB_SERIAL_COMMAND=\"serial --unit=0 --speed=%d\"\n", SERIAL_BAUDRATE);
 763                 fclose(f);
 764
 765                 replace(DESTINATION_MOUNT_PATH "/etc/default/grub", "panic=10", "panic=10 console=ttyS0,115200n8");
 766
 767                 /* inittab */
 768                 replace("/harddisk/etc/inittab", "1:2345:respawn:", "#1:2345:respawn:");
 769                 replace("/harddisk/etc/inittab", "2:2345:respawn:", "#2:2345:respawn:");
 770                 replace("/harddisk/etc/inittab", "3:2345:respawn:", "#3:2345:respawn:");
 771                 replace("/harddisk/etc/inittab", "4:2345:respawn:", "#4:2345:respawn:");
 772                 replace("/harddisk/etc/inittab", "5:2345:respawn:", "#5:2345:respawn:");
 773                 replace("/harddisk/etc/inittab", "6:2345:respawn:", "#6:2345:respawn:");
 774                 replace("/harddisk/etc/inittab", "#7:2345:respawn:", "7:2345:respawn:");
 775         }
 776
 777         rc = hw_install_bootloader(destination, logfile);
 778         if (rc) {
 779                 errorbox(_("Unable to install the bootloader."));
 780                 goto EXIT;
 781         }
 782
 783         newtPopWindow();
 784
 785         /* Set marker that the user has already accepted the gpl */
 786         mysystem(logfile, "/usr/bin/touch /harddisk/var/ipfire/main/gpl_accepted");
 787
 788         /* Copy restore file from cdrom */
 789         char* backup_file = hw_find_backup_file(logfile, SOURCE_MOUNT_PATH);
 790         if (backup_file) {
 791                 rc = 0;
 792                 if (!config.unattended) {
 793                         rc = newtWinOkCancel(title, _("A backup file has been found on the installation image.\n\n"
 794                                 "Do you want to restore the backup?"), 50, 10, _("Yes"), _("No"));
 795                 }
 796
 797                 if (rc == 0) {
 798                         rc = hw_restore_backup(logfile, backup_file, DESTINATION_MOUNT_PATH);
 799
 800                         if (rc) {
 801                                 errorbox(_("An error occured when the backup file was restored."));
 802                                 goto EXIT;
 803                         }
 804                 }
 805
 806                 free(backup_file);
 807         }
 808
 809         // Umount the destination drive
 810         hw_umount_filesystems(destination, DESTINATION_MOUNT_PATH);
 811
 812         // Stop the RAID array if we are using RAID
 813         if (destination->is_raid)
 814                 hw_stop_all_raid_arrays(logfile);
 815
 816         // Umount source drive and eject
 817         hw_umount(SOURCE_MOUNT_PATH);
 818
 819         // Download and execute the postinstall script
 820         if (*config.postinstall) {
 821                 snprintf(commandstring, sizeof(commandstring),
 822                         "/usr/bin/execute-postinstall.sh %s %s", DESTINATION_MOUNT_PATH, config.postinstall);
 823
 824                 if (runcommandwithstatus(commandstring, title, _("Running post-install script..."), logfile)) {
 825                         errorbox(_("Post-install script failed."));
 826                         goto EXIT;
 827                 }
 828         }
 829
 830         snprintf(commandstring, STRING_SIZE, "/usr/bin/eject %s", sourcedrive);
 831         mysystem(logfile, commandstring);
 832
 833         if (!config.unattended) {
 834                 snprintf(message, sizeof(message), _(
 835                         "%s was successfully installed!\n\n"
 836                         "Please remove any installation mediums from this system and hit the reboot button. "
 837                         "Once the system has restarted you will be asked to setup networking and system passwords. "
 838                         "After that, you should point your web browser at https://%s:444 (or what ever you name "
 839                         "your %s) for the web configuration console."), NAME, SNAME, NAME);
 840                 newtWinMessage(_("Congratulations!"), _("Reboot"), message);
 841         }
 842
 843         allok = 1;
 844
 845 EXIT:
 846         fprintf(flog, "Install program ended.\n");
 847         fflush(flog);
 848         fclose(flog);
 849
 850         if (!allok)
 851                 newtWinMessage(title, _("OK"), _("Setup has failed. Press Ok to reboot."));
 852
 853         newtFinished();
 854
 855         // Free resources
 856         free(system_release);
 857         free(roottext);
 858         free(helpline);
 859
 860         free(sourcedrive);
 861         free(destination);
 862
 863         hw_stop_all_raid_arrays(logfile);
 864
 865         if (selected_disks)
 866                 hw_free_disks(selected_disks);
 867
 868         hw_free(hw);
 869
 870         fcloseall();
 871
 872         if (allok == 1)
 873                 return 0;
 874
 875         return 1;
 876 }