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         char download_url[STRING_SIZE];
 235 } config = {
 236         .unattended = 0,
 237         .serial_console = 0,
 238         .require_networking = 0,
 239         .perform_download = 0,
 240         .download_url = DOWNLOAD_URL,
 241 };
 242
 243 static void parse_command_line(struct config* c) {
 244         char buffer[STRING_SIZE];
 245         char cmdline[STRING_SIZE];
 246
 247         FILE* f = fopen("/proc/cmdline", "r");
 248         if (!f)
 249                 return;
 250
 251         int r = fread(&cmdline, 1, sizeof(cmdline) - 1, f);
 252         if (r > 0) {
 253                 char* token = strtok(cmdline, " ");
 254
 255                 while (token) {
 256                         strncpy(buffer, token, sizeof(buffer));
 257                         char* val = buffer;
 258                         char* key = strsep(&val, "=");
 259
 260                         // serial console
 261                         if (strcmp(token, "console=ttyS0") == 0)
 262                                 c->serial_console = 1;
 263
 264                         // enable networking?
 265                         else if (strcmp(token, "installer.net") == 0)
 266                                 c->require_networking = 1;
 267
 268                         // unattended mode
 269                         else if (strcmp(token, "installer.unattended") == 0)
 270                                 c->unattended = 1;
 271
 272                         // download url
 273                         else if (strcmp(key, "installer.download-url") == 0) {
 274                                 strncpy(c->download_url, val, sizeof(c->download_url));
 275                                 c->perform_download = 1;
 276
 277                                 // Require networking for the download
 278                                 c->require_networking = 1;
 279                         }
 280
 281                         token = strtok(NULL, " ");
 282                 }
 283         }
 284
 285         fclose(f);
 286 }
 287
 288 int main(int argc, char *argv[]) {
 289         struct hw* hw = hw_init();
 290         const char* logfile = NULL;
 291
 292         // Read /etc/system-release
 293         char* system_release = get_system_release();
 294
 295         char discl_msg[40000] = "Disclaimer\n";
 296
 297         char* sourcedrive = NULL;
 298         int rc = 0;
 299         char commandstring[STRING_SIZE];
 300         int choice;
 301         char language[STRING_SIZE];
 302         char message[STRING_SIZE];
 303         char title[STRING_SIZE];
 304         int allok = 0;
 305         FILE *copying;
 306
 307         setlocale(LC_ALL, "");
 308         sethostname(SNAME, 10);
 309
 310         /* Log file/terminal stuff. */
 311         FILE* flog = NULL;
 312         if (argc >= 2) {
 313                 logfile = argv[1];
 314
 315                 if (!(flog = fopen(logfile, "w+")))
 316                         return 0;
 317         } else {
 318                 return 0;
 319         }
 320
 321         fprintf(flog, "Install program started.\n");
 322
 323         newtInit();
 324         newtCls();
 325
 326         // Determine the size of the screen
 327         int screen_cols = 0;
 328         int screen_rows = 0;
 329
 330         newtGetScreenSize(&screen_cols, &screen_rows);
 331
 332         // Draw title
 333         char* roottext = center_string(system_release, screen_cols);
 334         newtDrawRootText(0, 0, roottext);
 335
 336         snprintf(title, sizeof(title), "%s - %s", NAME, SLOGAN);
 337
 338         // Parse parameters from the kernel command line
 339         parse_command_line(&config);
 340
 341         if (config.unattended) {
 342                 splashWindow(title, _("Warning: Unattended installation will start in 10 seconds..."), 10);
 343         }
 344
 345         // Load common modules
 346         mysystem(logfile, "/sbin/modprobe vfat"); // USB key
 347         hw_stop_all_raid_arrays(logfile);
 348
 349         if (!config.unattended) {
 350                 // Language selection
 351                 char* langnames[NUM_LANGS + 1];
 352
 353                 for (unsigned int i = 0; i < NUM_LANGS; i++) {
 354                         if (strcmp(languages[i].name, DEFAULT_LANG) == 0)
 355                                 choice = i;
 356
 357                         langnames[i] = languages[i].name;
 358                 }
 359                 langnames[NUM_LANGS] = NULL;
 360
 361                 rc = newtWinMenu(_("Language selection"), _("Select the language you wish to use for the installation."),
 362                         50, 5, 5, 8, langnames, &choice, _("OK"), NULL);
 363
 364                 assert(choice <= NUM_LANGS);
 365
 366                 fprintf(flog, "Selected language: %s (%s)\n", languages[choice].name, languages[choice].code);
 367                 snprintf(language, sizeof(language), "%s", languages[choice].code);
 368
 369                 setenv("LANGUAGE", language, 1);
 370                 setlocale(LC_ALL, language);
 371         }
 372
 373         char* helpline = center_string(_("<Tab>/<Alt-Tab> between elements | <Space> selects | <F12> next screen"), screen_cols);
 374         newtPushHelpLine(helpline);
 375
 376         if (!config.unattended) {
 377                 snprintf(message, sizeof(message),
 378                         _("Welcome to the %s installation program.\n\n"
 379                         "Selecting Cancel on any of the following screens will reboot the computer."), NAME);
 380                 newtWinMessage(title, _("Start installation"), message);
 381         }
 382
 383         /* Search for a source drive that holds the right
 384          * version of the image we are going to install. */
 385         if (!config.perform_download) {
 386                 sourcedrive = hw_find_source_medium(hw);
 387                 fprintf(flog, "Source drive: %s\n", sourcedrive);
 388         }
 389
 390         /* If we could not find a source drive, we will try
 391          * downloading the install image */
 392         if (!sourcedrive)
 393                 config.perform_download = 1;
 394
 395         if (config.perform_download) {
 396                 if (!config.unattended) {
 397                         // Show the right message to the user
 398                         char reason[STRING_SIZE];
 399                         if (config.perform_download) {
 400                                 snprintf(reason, sizeof(reason),
 401                                         _("The installer will now try downloading the installation image."));
 402                         } else {
 403                                 snprintf(reason, sizeof(reason),
 404                                         _("No source drive could be found.\n\n"
 405                                         "You can try downloading the required installation image."));
 406                         }
 407                         snprintf(message, sizeof(message), "%s %s", reason,
 408                                 _("Please make sure to connect your machine to a network and "
 409                                 "the installer will try connect to acquire an IP address."));
 410
 411                         rc = newtWinOkCancel(title, message, 55, 12,
 412                                 _("Download installation image"), _("Cancel"));
 413
 414                         if (rc != 0)
 415                                 goto EXIT;
 416                 }
 417
 418                 // Make sure that we enable networking before download
 419                 config.require_networking = 1;
 420         }
 421
 422         // Try starting the networking if we require it
 423         if (config.require_networking) {
 424                 while (1) {
 425                         statuswindow(60, 4, title, _("Trying to start networking (DHCP)..."));
 426
 427                         rc = hw_start_networking(logfile);
 428                         newtPopWindow();
 429
 430                         // Networking was successfully started
 431                         if (rc == 0) {
 432                                 break;
 433
 434                         // An error happened, ask the user what to do
 435                         } else {
 436                                 rc = newtWinOkCancel(title, _("Networking could not be started "
 437                                         "but is required to go on with the installation.\n\n"
 438                                         "Please connect your machine to a network with a "
 439                                         "DHCP server and retry."), 50, 10, _("Retry"), _("Cancel"));
 440
 441                                 if (rc)
 442                                         goto EXIT;
 443                         }
 444                 }
 445
 446                 // Download the image if required
 447                 if (config.perform_download) {
 448                         fprintf(flog, "Download URL: %s\n", config.download_url);
 449                         snprintf(commandstring, sizeof(commandstring), "/usr/bin/downloadsource.sh %s %s",
 450                                 SOURCE_TEMPFILE, config.download_url);
 451
 452                         while (!sourcedrive) {
 453                                 rc = runcommandwithstatus(commandstring, title, _("Downloading installation image..."), logfile);
 454
 455                                 FILE* f = fopen(SOURCE_TEMPFILE, "r");
 456                                 if (f) {
 457                                         sourcedrive = SOURCE_TEMPFILE;
 458                                         fclose(f);
 459                                 } else {
 460                                         char reason[STRING_SIZE] = "-";
 461                                         if (rc == 2)
 462                                                 snprintf(reason, sizeof(STRING_SIZE), _("MD5 checksum mismatch"));
 463
 464                                         snprintf(message, sizeof(message),
 465                                                 _("The installation image could not be downloaded.\n  Reason: %s\n\n%s"),
 466                                                 reason, config.download_url);
 467
 468                                         rc = newtWinOkCancel(title, message, 75, 12, _("Retry"), _("Cancel"));
 469                                         if (rc)
 470                                                 goto EXIT;
 471                                 }
 472                         }
 473                 }
 474         }
 475
 476         assert(sourcedrive);
 477
 478         int r = hw_mount(sourcedrive, SOURCE_MOUNT_PATH, "iso9660", MS_RDONLY);
 479         if (r) {
 480                 snprintf(message, sizeof(message), _("Could not mount %s to %s:\n  %s\n"),
 481                         sourcedrive, SOURCE_MOUNT_PATH, strerror(errno));
 482                 errorbox(message);
 483                 goto EXIT;
 484         }
 485
 486         if (!config.unattended) {
 487                 // Read the license file.
 488                 if (!(copying = fopen(LICENSE_FILE, "r"))) {
 489                         sprintf(discl_msg, "Could not open license file: %s\n", LICENSE_FILE);
 490                         fprintf(flog, "%s", discl_msg);
 491                 } else {
 492                         fread(discl_msg, 1, 40000, copying);
 493                         fclose(copying);
 494
 495                         if (newtLicenseBox(_("License Agreement"), discl_msg, 75, 20)) {
 496                                 errorbox(_("License not accepted!"));
 497
 498                                 goto EXIT;
 499                         }
 500                 }
 501         }
 502
 503         int part_type = HW_PART_TYPE_NORMAL;
 504
 505         // Scan for disks to install on.
 506         struct hw_disk** disks = hw_find_disks(hw, sourcedrive);
 507
 508         struct hw_disk** selected_disks = NULL;
 509         unsigned int num_selected_disks = 0;
 510
 511         // Check how many disks have been found and what
 512         // we can do with them.
 513         unsigned int num_disks = hw_count_disks((const struct hw_disk**)disks);
 514
 515         while (1) {
 516                 // no harddisks found
 517                 if (num_disks == 0) {
 518                         errorbox(_("No hard disk found."));
 519                         goto EXIT;
 520
 521                 // exactly one disk has been found
 522                 // or if we are running in unattended mode, we will select
 523                 // the first disk and go with that one
 524                 } else if ((num_disks == 1) || (config.unattended && num_disks >= 1)) {
 525                         selected_disks = hw_select_first_disk((const struct hw_disk**)disks);
 526
 527                 // more than one usable disk has been found and
 528                 // the user needs to choose what to do with them
 529                 } else {
 530                         const char* disk_names[num_disks];
 531                         int disk_selection[num_disks];
 532
 533                         for (unsigned int i = 0; i < num_disks; i++) {
 534                                 disk_names[i] = disks[i]->description;
 535                                 disk_selection[i] = 0;
 536                         }
 537
 538                         while (!selected_disks) {
 539                                 rc = newtChecklist(_("Disk Selection"),
 540                                         _("Select the disk(s) you want to install IPFire on. "
 541                                         "First those will be partitioned, and then the partitions will have a filesystem put on them.\n\n"
 542                                         "ALL DATA ON THE DISK WILL BE DESTROYED."),
 543                                         50, 20, num_disks, disk_names, disk_selection);
 544
 545                                 // Error
 546                                 if (rc < 0) {
 547                                         goto EXIT;
 548
 549                                 // Nothing has been selected
 550                                 } else if (rc == 0) {
 551                                         errorbox(_("No disk has been selected.\n\n"
 552                                                 "Please select one or more disks you want to install IPFire on."));
 553
 554                                 } else {
 555                                         selected_disks = hw_select_disks(disks, disk_selection);
 556                                 }
 557                         }
 558                 }
 559
 560                 // Don't print the auto-selected harddisk setup in
 561                 // unattended mode.
 562                 if (config.unattended)
 563                         break;
 564
 565                 num_selected_disks = hw_count_disks((const struct hw_disk**)selected_disks);
 566
 567                 if (num_selected_disks == 1) {
 568                         snprintf(message, sizeof(message),
 569                                 _("The installation program will now prepare the chosen harddisk:\n\n  %s\n\n"
 570                                 "Do you agree to continue?"), (*selected_disks)->description);
 571                         rc = newtWinOkCancel(_("Disk Setup"), message, 50, 10,
 572                                 _("Delete all data"), _("Cancel"));
 573
 574                         if (rc == 0)
 575                                 break;
 576
 577                 } else if (num_selected_disks == 2) {
 578                         snprintf(message, sizeof(message),
 579                                 _("The installation program will now set up a RAID configuration on the selected harddisks:\n\n  %s\n  %s\n\n"
 580                                 "Do you agree to continue?"), selected_disks[0]->description, selected_disks[1]->description);
 581                         rc = newtWinOkCancel(_("RAID Setup"), message, 50, 14,
 582                                 _("Delete all data"), _("Cancel"));
 583
 584                         if (rc == 0) {
 585                                 part_type = HW_PART_TYPE_RAID1;
 586
 587                                 break;
 588                         }
 589
 590                 // Currently not supported
 591                 } else {
 592                         errorbox(_("Your disk configuration is currently not supported."));
 593                         fprintf(flog, "Num disks selected: %d\n", num_selected_disks);
 594                 }
 595
 596                 if (selected_disks) {
 597                         hw_free_disks(selected_disks);
 598                         selected_disks = NULL;
 599                 }
 600         }
 601
 602         hw_free_disks(disks);
 603
 604         struct hw_destination* destination = hw_make_destination(part_type, selected_disks);
 605
 606         if (!destination) {
 607                 errorbox(_("Your harddisk is too small."));
 608                 goto EXIT;
 609         }
 610
 611         fprintf(flog, "Destination drive: %s\n", destination->path);
 612         fprintf(flog, "  bootldr: %s (%lluMB)\n", destination->part_bootldr, BYTES2MB(destination->size_bootldr));
 613         fprintf(flog, "  boot   : %s (%lluMB)\n", destination->part_boot, BYTES2MB(destination->size_boot));
 614         fprintf(flog, "  swap   : %s (%lluMB)\n", destination->part_swap, BYTES2MB(destination->size_swap));
 615         fprintf(flog, "  root   : %s (%lluMB)\n", destination->part_root, BYTES2MB(destination->size_root));
 616         fprintf(flog, "  data   : %s (%lluMB)\n", destination->part_data, BYTES2MB(destination->size_data));
 617         fprintf(flog, "Memory   : %lluMB\n", BYTES2MB(hw_memory()));
 618
 619         // Warn the user if there is not enough space to create a swap partition
 620         if (!config.unattended && !*destination->part_swap) {
 621                 rc = newtWinChoice(title, _("OK"), _("Cancel"),
 622                         _("Your harddisk is very small, but you can continue without a swap partition."));
 623
 624                 if (rc != 1)
 625                         goto EXIT;
 626         }
 627
 628         // Filesystem selection
 629         if (!config.unattended) {
 630                 struct filesystems {
 631                         int fstype;
 632                         const char* description;
 633                 } filesystems[] = {
 634                         { HW_FS_EXT4,            _("ext4 Filesystem") },
 635                         { HW_FS_EXT4_WO_JOURNAL, _("ext4 Filesystem without journal") },
 636                         { HW_FS_XFS,             _("XFS Filesystem") },
 637                         { HW_FS_REISERFS,        _("ReiserFS Filesystem") },
 638                         { 0, NULL },
 639                 };
 640                 unsigned int num_filesystems = sizeof(filesystems) / sizeof(*filesystems);
 641
 642                 char* fs_names[num_filesystems];
 643                 int fs_choice = 0;
 644                 for (unsigned int i = 0; i < num_filesystems; i++) {
 645                         if (HW_FS_DEFAULT == filesystems[i].fstype)
 646                                 fs_choice = i;
 647
 648                         fs_names[i] = &filesystems[i].description;
 649                 }
 650
 651                 rc = newtWinMenu(_("Filesystem Selection"), _("Please choose your filesystem:"),
 652                         50, 5, 5, 6, fs_names, &fs_choice, _("OK"), _("Cancel"), NULL);
 653
 654                 if (rc == 2)
 655                         goto EXIT;
 656
 657                 destination->filesystem = filesystems[fs_choice].fstype;
 658         }
 659
 660         // Setting up RAID if needed.
 661         if (destination->is_raid) {
 662                 statuswindow(60, 4, title, _("Building RAID..."));
 663
 664                 rc = hw_setup_raid(destination, logfile);
 665                 if (rc) {
 666                         errorbox(_("Unable to build the RAID."));
 667                         goto EXIT;
 668                 }
 669
 670                 newtPopWindow();
 671         } else {
 672                 // We will have to destroy all RAID setups that may have
 673                 // been on the devices that we want to use now.
 674                 hw_destroy_raid_superblocks(destination, logfile);
 675         }
 676
 677         // Execute the partitioning...
 678         statuswindow(60, 4, title, _("Partitioning disk..."));
 679
 680         rc = hw_create_partitions(destination, logfile);
 681         if (rc) {
 682                 errorbox(_("Unable to partition the disk."));
 683                 goto EXIT;
 684         }
 685
 686         newtPopWindow();
 687
 688         // Execute the formatting...
 689         statuswindow(60, 4, title, _("Creating filesystems..."));
 690
 691         rc = hw_create_filesystems(destination, logfile);
 692         if (rc) {
 693                 errorbox(_("Unable to create filesystems."));
 694                 goto EXIT;
 695         }
 696
 697         rc = hw_mount_filesystems(destination, DESTINATION_MOUNT_PATH);
 698         if (rc) {
 699                 errorbox(_("Unable to mount filesystems."));
 700                 goto EXIT;
 701         }
 702
 703         newtPopWindow();
 704
 705         // Extract files...
 706         snprintf(commandstring, STRING_SIZE,
 707                 "/bin/tar -C /harddisk  -xvf /cdrom/distro.img --lzma 2>/dev/null");
 708
 709         if (runcommandwithprogress(60, 4, title, commandstring, INST_FILECOUNT,
 710                         _("Installing the system..."), logfile)) {
 711                 errorbox(_("Unable to install the system."));
 712                 goto EXIT;
 713         }
 714
 715         // Write fstab
 716         rc = hw_write_fstab(destination);
 717         if (rc) {
 718                 fprintf(flog, "Could not write /etc/fstab\n");
 719                 goto EXIT;
 720         }
 721
 722         /* Save language und local settings */
 723         write_lang_configs(language);
 724
 725         /* Build cache lang file */
 726         snprintf(commandstring, STRING_SIZE, "/usr/sbin/chroot /harddisk /usr/bin/perl -e \"require '" CONFIG_ROOT "/lang.pl'; &Lang::BuildCacheLang\"");
 727         if (runcommandwithstatus(commandstring, title, _("Installing the language cache..."), logfile)) {
 728                 errorbox(_("Unable to install the language cache."));
 729                 goto EXIT;
 730         }
 731
 732         // Installing bootloader...
 733         statuswindow(60, 4, title, _("Installing the bootloader..."));
 734
 735         /* Serial console ? */
 736         if (config.serial_console) {
 737                 /* grub */
 738                 FILE* f = fopen(DESTINATION_MOUNT_PATH "/etc/default/grub", "a");
 739                 if (!f) {
 740                         errorbox(_("Unable to open /etc/default/grub for writing."));
 741                         goto EXIT;
 742                 }
 743
 744                 fprintf(f, "GRUB_TERMINAL=\"serial\"\n");
 745                 fprintf(f, "GRUB_SERIAL_COMMAND=\"serial --unit=0 --speed=%d\"\n", SERIAL_BAUDRATE);
 746                 fclose(f);
 747
 748                 replace(DESTINATION_MOUNT_PATH "/etc/default/grub", "panic=10", "panic=10 console=ttyS0,115200n8");
 749
 750                 /* inittab */
 751                 replace("/harddisk/etc/inittab", "1:2345:respawn:", "#1:2345:respawn:");
 752                 replace("/harddisk/etc/inittab", "2:2345:respawn:", "#2:2345:respawn:");
 753                 replace("/harddisk/etc/inittab", "3:2345:respawn:", "#3:2345:respawn:");
 754                 replace("/harddisk/etc/inittab", "4:2345:respawn:", "#4:2345:respawn:");
 755                 replace("/harddisk/etc/inittab", "5:2345:respawn:", "#5:2345:respawn:");
 756                 replace("/harddisk/etc/inittab", "6:2345:respawn:", "#6:2345:respawn:");
 757                 replace("/harddisk/etc/inittab", "#7:2345:respawn:", "7:2345:respawn:");
 758         }
 759
 760         rc = hw_install_bootloader(destination, logfile);
 761         if (rc) {
 762                 errorbox(_("Unable to install the bootloader."));
 763                 goto EXIT;
 764         }
 765
 766         newtPopWindow();
 767
 768         /* Set marker that the user has already accepted the gpl */
 769         mysystem(logfile, "/usr/bin/touch /harddisk/var/ipfire/main/gpl_accepted");
 770
 771         /* Copy restore file from cdrom */
 772         char* backup_file = hw_find_backup_file(logfile, SOURCE_MOUNT_PATH);
 773         if (backup_file) {
 774                 rc = 0;
 775                 if (!config.unattended) {
 776                         rc = newtWinOkCancel(title, _("A backup file has been found on the installation image.\n\n"
 777                                 "Do you want to restore the backup?"), 50, 10, _("Yes"), _("No"));
 778                 }
 779
 780                 if (rc == 0) {
 781                         rc = hw_restore_backup(logfile, backup_file, DESTINATION_MOUNT_PATH);
 782
 783                         if (rc) {
 784                                 errorbox(_("An error occured when the backup file was restored."));
 785                                 goto EXIT;
 786                         }
 787                 }
 788
 789                 free(backup_file);
 790         }
 791
 792         // Umount the destination drive
 793         hw_umount_filesystems(destination, DESTINATION_MOUNT_PATH);
 794
 795         // Stop the RAID array if we are using RAID
 796         if (destination->is_raid)
 797                 hw_stop_all_raid_arrays(logfile);
 798
 799         // Umount source drive and eject
 800         hw_umount(SOURCE_MOUNT_PATH);
 801
 802         snprintf(commandstring, STRING_SIZE, "/usr/bin/eject %s", sourcedrive);
 803         mysystem(logfile, commandstring);
 804
 805         if (!config.unattended) {
 806                 snprintf(message, sizeof(message), _(
 807                         "%s was successfully installed!\n\n"
 808                         "Please remove any installation mediums from this system and hit the reboot button. "
 809                         "Once the system has restarted you will be asked to setup networking and system passwords. "
 810                         "After that, you should point your web browser at https://%s:444 (or what ever you name "
 811                         "your %s) for the web configuration console."), NAME, SNAME, NAME);
 812                 newtWinMessage(_("Congratulations!"), _("Reboot"), message);
 813         }
 814
 815         allok = 1;
 816
 817 EXIT:
 818         fprintf(flog, "Install program ended.\n");
 819         fflush(flog);
 820         fclose(flog);
 821
 822         if (!allok)
 823                 newtWinMessage(title, _("OK"), _("Setup has failed. Press Ok to reboot."));
 824
 825         newtFinished();
 826
 827         // Free resources
 828         free(system_release);
 829         free(roottext);
 830         free(helpline);
 831
 832         free(sourcedrive);
 833         free(destination);
 834
 835         hw_stop_all_raid_arrays(logfile);
 836
 837         if (selected_disks)
 838                 hw_free_disks(selected_disks);
 839
 840         hw_free(hw);
 841
 842         fcloseall();
 843
 844         if (allok == 1)
 845                 return 0;
 846
 847         return 1;
 848 }