Subversion Repositories SvarDOS

Rev

Rev 42 | Rev 47 | Go to most recent revision | Only display areas with differences | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 42 Rev 46
1
/*
1
/*
2
 * SVAROG386 INSTALL
2
 * SVAROG386 INSTALL
3
 * COPYRIGHT (C) 2016 MATEUSZ VISTE
3
 * COPYRIGHT (C) 2016 MATEUSZ VISTE
4
 *
4
 *
5
 * http://svarog386.sf.net
5
 * http://svarog386.sf.net
6
 */
6
 */
7
 
7
 
8
#include <dos.h>
8
#include <dos.h>
9
#include <direct.h>  /* mkdir() */
9
#include <direct.h>  /* mkdir() */
10
#include <stdio.h>   /* printf() and friends */
10
#include <stdio.h>   /* printf() and friends */
11
#include <stdlib.h>  /* system() */
11
#include <stdlib.h>  /* system() */
12
#include <string.h>  /* memcpy() */
12
#include <string.h>  /* memcpy() */
13
#include <unistd.h>
13
#include <unistd.h>
14
 
14
 
15
#include "kitten\kitten.h"
15
#include "kitten\kitten.h"
16
 
16
 
17
#include "input.h"
17
#include "input.h"
18
#include "video.h"
18
#include "video.h"
19
 
19
 
20
 
20
 
21
/* color scheme (color, mono) */
21
/* color scheme (color, mono) */
22
static unsigned short COLOR_TITLEBAR[2] = {0x7000,0x7000};
22
static unsigned short COLOR_TITLEBAR[2] = {0x7000,0x7000};
23
static unsigned short COLOR_BODY[2] = {0x1700,0x0700};
23
static unsigned short COLOR_BODY[2] = {0x1700,0x0700};
24
static unsigned short COLOR_SELECT[2] = {0x7000,0x7000};
24
static unsigned short COLOR_SELECT[2] = {0x7000,0x7000};
25
static unsigned short COLOR_SELECTCUR[2] = {0x1F00,0x0700};
25
static unsigned short COLOR_SELECTCUR[2] = {0x1F00,0x0700};
26
 
26
 
27
/* mono flag */
27
/* mono flag */
28
static int mono = 0;
28
static int mono = 0;
29
 
29
 
30
 
30
 
31
/* reboot the computer */
31
/* reboot the computer */
32
static void reboot(void) {
32
static void reboot(void) {
33
  void ((far *bootroutine)()) = (void (far *)()) 0xFFFF0000L;
33
  void ((far *bootroutine)()) = (void (far *)()) 0xFFFF0000L;
34
  int far *rstaddr = (int far *)0x00400072L; /* BIOS boot flag is at 0040:0072 */
34
  int far *rstaddr = (int far *)0x00400072L; /* BIOS boot flag is at 0040:0072 */
35
  *rstaddr = 0x1234; /* 0x1234 = warm boot, 0 = cold boot */
35
  *rstaddr = 0x1234; /* 0x1234 = warm boot, 0 = cold boot */
36
  (*bootroutine)(); /* jump to the BIOS reboot routine at FFFF:0000 */
36
  (*bootroutine)(); /* jump to the BIOS reboot routine at FFFF:0000 */
37
}
37
}
38
 
38
 
39
 
39
 
40
/* an NLS wrapper around video_putstring() */
40
/* an NLS wrapper around video_putstring() */
41
static void putstringnls(int y, int x, unsigned short attr, int nlsmaj, int nlsmin, char *s) {
41
static void putstringnls(int y, int x, unsigned short attr, int nlsmaj, int nlsmin, char *s) {
42
  s = kittengets(nlsmaj, nlsmin, s);
42
  s = kittengets(nlsmaj, nlsmin, s);
43
  video_putstring(y, x, attr, s);
43
  video_putstring(y, x, attr, s);
44
}
44
}
45
 
45
 
46
 
46
 
47
#define LDEC(x,y) (((unsigned short)x << 8) | (unsigned short)y)
47
#define LDEC(x,y) (((unsigned short)x << 8) | (unsigned short)y)
48
/* provides codepage and country files required by lang */
48
/* provides codepage and country files required by lang */
49
static int getnlscp(char *lang, int *egafile) {
49
static int getnlscp(char *lang, int *egafile) {
50
  unsigned short l;
50
  unsigned short l;
51
  l = lang[0];
51
  l = lang[0];
52
  l <<= 8;
52
  l <<= 8;
53
  l |= lang[1];
53
  l |= lang[1];
54
  switch (l) {
54
  switch (l) {
55
    case LDEC('E','N'):
55
    case LDEC('E','N'):
56
      *egafile = 0;
56
      *egafile = 0;
57
      return(437);
57
      return(437);
58
    case LDEC('P','L'):
58
    case LDEC('P','L'):
59
      *egafile = 10;
59
      *egafile = 10;
60
      return(991);
60
      return(991);
61
  }
61
  }
62
  *egafile = 0;
62
  *egafile = 0;
63
  return(437);
63
  return(437);
64
}
64
}
65
 
65
 
66
 
66
 
67
static int menuselect(int ypos, int xpos, int height, char **list) {
67
static int menuselect(int ypos, int xpos, int height, char **list) {
68
  int i, offset = 0, res = 0, count, width = 0;
68
  int i, offset = 0, res = 0, count, width = 0;
69
  /* count how many languages there is */
69
  /* count how many languages there is */
70
  for (count = 0; list[count] != NULL; count++) {
70
  for (count = 0; list[count] != NULL; count++) {
71
    int len = strlen(list[count]);
71
    int len = strlen(list[count]);
72
    if (len > width) width = len;
72
    if (len > width) width = len;
73
  }
73
  }
74
 
74
 
75
  /* if xpos negative, means 'center out' */
75
  /* if xpos negative, means 'center out' */
76
  if (xpos < 0) xpos = 39 - (width >> 1);
76
  if (xpos < 0) xpos = 39 - (width >> 1);
77
 
77
 
78
  video_putchar(ypos, xpos+width+2, COLOR_SELECT[mono], 0xBF);         /*       \ */
78
  video_putchar(ypos, xpos+width+2, COLOR_SELECT[mono], 0xBF);         /*       \ */
79
  video_putchar(ypos, xpos-1, COLOR_SELECT[mono], 0xDA);               /*  /      */
79
  video_putchar(ypos, xpos-1, COLOR_SELECT[mono], 0xDA);               /*  /      */
80
  video_putchar(ypos+height-1, xpos-1, COLOR_SELECT[mono], 0xC0);      /*  \      */
80
  video_putchar(ypos+height-1, xpos-1, COLOR_SELECT[mono], 0xC0);      /*  \      */
81
  video_putchar(ypos+height-1, xpos+width+2, COLOR_SELECT[mono], 0xD9);/*      /  */
81
  video_putchar(ypos+height-1, xpos+width+2, COLOR_SELECT[mono], 0xD9);/*      /  */
82
  video_putcharmulti(ypos, xpos, COLOR_SELECT[mono], 0xC4, width + 2, 1);
82
  video_putcharmulti(ypos, xpos, COLOR_SELECT[mono], 0xC4, width + 2, 1);
83
  video_putcharmulti(ypos+height-1, xpos, COLOR_SELECT[mono], 0xC4, width + 2, 1);
83
  video_putcharmulti(ypos+height-1, xpos, COLOR_SELECT[mono], 0xC4, width + 2, 1);
84
  video_putcharmulti(ypos+1, xpos-1, COLOR_SELECT[mono], 0xB3, height - 2, 80);
84
  video_putcharmulti(ypos+1, xpos-1, COLOR_SELECT[mono], 0xB3, height - 2, 80);
85
  video_putcharmulti(ypos+1, xpos+width+2, COLOR_SELECT[mono], 0xB3, height - 2, 80);
85
  video_putcharmulti(ypos+1, xpos+width+2, COLOR_SELECT[mono], 0xB3, height - 2, 80);
86
 
86
 
87
  for (;;) {
87
  for (;;) {
88
    int key;
88
    int key;
89
    /* list of selectable items */
89
    /* list of selectable items */
90
    for (i = 0; i < height - 2; i++) {
90
    for (i = 0; i < height - 2; i++) {
91
      if (i + offset == res) {
91
      if (i + offset == res) {
92
        video_putchar(ypos + 1 + i, xpos, COLOR_SELECTCUR[mono], 16);
92
        video_putchar(ypos + 1 + i, xpos, COLOR_SELECTCUR[mono], 16);
93
        video_putchar(ypos + 1 + i, xpos+width+1, COLOR_SELECTCUR[mono], 17);
93
        video_putchar(ypos + 1 + i, xpos+width+1, COLOR_SELECTCUR[mono], 17);
94
        video_movecursor(ypos + 1 + i, xpos);
94
        video_movecursor(ypos + 1 + i, xpos);
95
        video_putstringfix(ypos + 1 + i, xpos+1, COLOR_SELECTCUR[mono], list[i + offset], width);
95
        video_putstringfix(ypos + 1 + i, xpos+1, COLOR_SELECTCUR[mono], list[i + offset], width);
96
      } else if (i + offset < count) {
96
      } else if (i + offset < count) {
97
        video_putchar(ypos + 1 + i, xpos, COLOR_SELECT[mono], ' ');
97
        video_putchar(ypos + 1 + i, xpos, COLOR_SELECT[mono], ' ');
98
        video_putchar(ypos + 1 + i, xpos+width+1, COLOR_SELECT[mono], ' ');
98
        video_putchar(ypos + 1 + i, xpos+width+1, COLOR_SELECT[mono], ' ');
99
        video_putstringfix(ypos + 1 + i, xpos+1, COLOR_SELECT[mono], list[i + offset], width);
99
        video_putstringfix(ypos + 1 + i, xpos+1, COLOR_SELECT[mono], list[i + offset], width);
100
      } else {
100
      } else {
101
        video_putcharmulti(ypos + 1 + i, xpos, COLOR_SELECT[mono], ' ', width+2, 1);
101
        video_putcharmulti(ypos + 1 + i, xpos, COLOR_SELECT[mono], ' ', width+2, 1);
102
      }
102
      }
103
    }
103
    }
104
    key = input_getkey();
104
    key = input_getkey();
105
    if (key == 0x0D) { /* ENTER */
105
    if (key == 0x0D) { /* ENTER */
106
      return(res);
106
      return(res);
107
    } else if (key == 0x148) { /* up */
107
    } else if (key == 0x148) { /* up */
108
      if (res > 0) {
108
      if (res > 0) {
109
        res--;
109
        res--;
110
        if (res < offset) offset = res;
110
        if (res < offset) offset = res;
111
      }
111
      }
112
    } else if (key == 0x150) { /* down */
112
    } else if (key == 0x150) { /* down */
113
      if (res+1 < count) {
113
      if (res+1 < count) {
114
        res++;
114
        res++;
115
        if (res > offset + height - 3) offset = res - (height - 3);
115
        if (res > offset + height - 3) offset = res - (height - 3);
116
      }
116
      }
117
    } else if (key == 0x147) { /* home */
117
    } else if (key == 0x147) { /* home */
118
      res = 0;
118
      res = 0;
119
      offset = 0;
119
      offset = 0;
120
    } else if (key == 0x14F) { /* end */
120
    } else if (key == 0x14F) { /* end */
121
      res = count - 1;
121
      res = count - 1;
122
      if (res > offset + height - 3) offset = res - (height - 3);
122
      if (res > offset + height - 3) offset = res - (height - 3);
123
    } else if (key == 0x1B) {  /* ESC */
123
    } else if (key == 0x1B) {  /* ESC */
124
      return(-1);
124
      return(-1);
125
    } else {
125
    } else {
126
      char buf[8];
126
      char buf[8];
127
      sprintf(buf, "0x%02X ", key);
127
      sprintf(buf, "0x%02X ", key);
128
      video_putstring(1, 0, COLOR_BODY[mono], buf);
128
      video_putstring(1, 0, COLOR_BODY[mono], buf);
129
    }
129
    }
130
  }
130
  }
131
}
131
}
132
 
132
 
133
static void newscreen(void) {
133
static void newscreen(void) {
134
  int x;
134
  int x;
135
  char *title;
135
  char *title;
136
  title = kittengets(0, 0, "SVAROG386 INSTALLATION");
136
  title = kittengets(0, 0, "SVAROG386 INSTALLATION");
137
  for (x = 0; x < 80; x++) video_putchar(0, x, COLOR_TITLEBAR[mono], ' ');
137
  for (x = 0; x < 80; x++) video_putchar(0, x, COLOR_TITLEBAR[mono], ' ');
138
  video_putstring(0, 40 - (strlen(title) >> 1), COLOR_TITLEBAR[mono], title);
138
  video_putstring(0, 40 - (strlen(title) >> 1), COLOR_TITLEBAR[mono], title);
139
  video_clear(COLOR_BODY[mono], 80);
139
  video_clear(COLOR_BODY[mono], 80);
140
  video_movecursor(25,0);
140
  video_movecursor(25,0);
141
}
141
}
142
 
142
 
143
static int selectlang(char *lang) {
143
static int selectlang(char *lang) {
144
  int choice;
144
  int choice;
145
  int x;
145
  int x;
146
  char *msg;
146
  char *msg;
147
  char *code;
147
  char *code;
148
  char *langlist[] = {
148
  char *langlist[] = {
149
    "English\0EN",
149
    "English\0EN",
150
    "French\0FR",
150
    "French\0FR",
151
    "German\0DE",
151
    "German\0DE",
152
    "Italian\0IT",
152
    "Italian\0IT",
153
    "Polish\0PL",
153
    "Polish\0PL",
154
    "Russian\0RU",
154
    "Russian\0RU",
155
    "Slovenian\0SL",
155
    "Slovenian\0SL",
156
    "Spanish\0ES",
156
    "Spanish\0ES",
157
    "Turkish\0TR",
157
    "Turkish\0TR",
158
    NULL
158
    NULL
159
  };
159
  };
160
 
160
 
161
  newscreen();
161
  newscreen();
162
  msg = kittengets(1, 0, "Welcome to Svarog386");
162
  msg = kittengets(1, 0, "Welcome to Svarog386");
163
  x = 40 - (strlen(msg) >> 1);
163
  x = 40 - (strlen(msg) >> 1);
164
  video_putstring(4, x, COLOR_BODY[mono], msg);
164
  video_putstring(4, x, COLOR_BODY[mono], msg);
165
  video_putcharmulti(5, x, COLOR_BODY[mono], '=', strlen(msg), 1);
165
  video_putcharmulti(5, x, COLOR_BODY[mono], '=', strlen(msg), 1);
166
  putstringnls(8, 2, COLOR_BODY[mono], 1, 1, "Please select your language from the list below:");
166
  putstringnls(8, 2, COLOR_BODY[mono], 1, 1, "Please select your language from the list below:");
167
  choice = menuselect(10, -1, 12, langlist);
167
  choice = menuselect(10, -1, 12, langlist);
168
  if (choice < 0) return(-1);
168
  if (choice < 0) return(-1);
169
  /* write short language code into lang */
169
  /* write short language code into lang */
170
  for (code = langlist[choice]; *code != 0; code++);
170
  for (code = langlist[choice]; *code != 0; code++);
171
  memcpy(lang, code + 1, 2);
171
  memcpy(lang, code + 1, 2);
172
  lang[2] = 0;
172
  lang[2] = 0;
173
  return(0);
173
  return(0);
174
}
174
}
175
 
175
 
176
 
176
 
177
/* returns 0 if installation must proceed, non-zero otherwise */
177
/* returns 0 if installation must proceed, non-zero otherwise */
178
static int welcomescreen(void) {
178
static int welcomescreen(void) {
179
  char *choice[] = {"Install Svarog386 to disk", "Quit to DOS", NULL};
179
  char *choice[] = {"Install Svarog386 to disk", "Quit to DOS", NULL};
180
  choice[0] = kittengets(0, 1, choice[0]);
180
  choice[0] = kittengets(0, 1, choice[0]);
181
  choice[1] = kittengets(0, 2, choice[1]);
181
  choice[1] = kittengets(0, 2, choice[1]);
182
  newscreen();
182
  newscreen();
183
  putstringnls(4, 1, COLOR_BODY[mono], 2, 0, "You are about to install Svarog386: a free, MSDOS-compatible operating system");
183
  putstringnls(4, 1, COLOR_BODY[mono], 2, 0, "You are about to install Svarog386: a free, MSDOS-compatible operating system");
184
  putstringnls(5, 1, COLOR_BODY[mono], 2, 1, "based on the FreeDOS kernel. Svarog386 targets 386+ computers and comes with a");
184
  putstringnls(5, 1, COLOR_BODY[mono], 2, 1, "based on the FreeDOS kernel. Svarog386 targets 386+ computers and comes with a");
185
  putstringnls(6, 1, COLOR_BODY[mono], 2, 2, "variety of third-party applications.");
185
  putstringnls(6, 1, COLOR_BODY[mono], 2, 2, "variety of third-party applications.");
186
  putstringnls(8, 1, COLOR_BODY[mono], 2, 3, "WARNING: If your PC has another operating system installed, this other system");
186
  putstringnls(8, 1, COLOR_BODY[mono], 2, 3, "WARNING: If your PC has another operating system installed, this other system");
187
  putstringnls(9, 1, COLOR_BODY[mono], 2, 4, "         might be unable to boot once Svarog386 is installed.");
187
  putstringnls(9, 1, COLOR_BODY[mono], 2, 4, "         might be unable to boot once Svarog386 is installed.");
188
  return(menuselect(13, -1, 4, choice));
188
  return(menuselect(13, -1, 4, choice));
189
}
189
}
190
 
190
 
191
 
191
 
192
/* returns 1 if drive is removable, 0 if not, -1 on error */
192
/* returns 1 if drive is removable, 0 if not, -1 on error */
193
static int isdriveremovable(int drv) {
193
static int isdriveremovable(int drv) {
194
  union REGS r;
194
  union REGS r;
195
  r.x.ax = 0x4408;
195
  r.x.ax = 0x4408;
196
  r.h.bl = drv;
196
  r.h.bl = drv;
197
  int86(0x21, &r, &r);
197
  int86(0x21, &r, &r);
198
  /* CF set on error, AX set to 0 if removable, 1 if fixed */
198
  /* CF set on error, AX set to 0 if removable, 1 if fixed */
199
  if (r.x.cflag != 0) return(-1);
199
  if (r.x.cflag != 0) return(-1);
200
  if (r.x.ax == 0) return(1);
200
  if (r.x.ax == 0) return(1);
201
  return(0);
201
  return(0);
202
}
202
}
203
 
203
 
204
 
204
 
205
/* returns total disk space of drive drv (in MiB, max 2048), or -1 if drive invalid */
205
/* returns total disk space of drive drv (in MiB, max 2048), or -1 if drive invalid */
206
static int disksize(int drv) {
206
static int disksize(int drv) {
207
  long res;
207
  long res;
208
  union REGS r;
208
  union REGS r;
209
  r.h.ah = 0x36; /* DOS 2+ get free disk space */
209
  r.h.ah = 0x36; /* DOS 2+ get free disk space */
210
  r.h.dl = drv;
210
  r.h.dl = drv;
211
  int86(0x21, &r, &r);
211
  int86(0x21, &r, &r);
212
  if (r.x.ax == 0xffffu) return(-1); /* AX set to FFFFh if drive invalid */
212
  if (r.x.ax == 0xffffu) return(-1); /* AX set to FFFFh if drive invalid */
213
  res = r.x.ax;
213
  res = r.x.ax;
214
  res *= r.x.bx;
214
  res *= r.x.bx;
215
  res *= r.x.cx;
215
  res *= r.x.cx;
216
  return(res >> 20); /* return result after converting bytes to MiB */
216
  return(res >> 20); /* return result after converting bytes to MiB */
217
}
217
}
218
 
218
 
219
 
219
 
220
/* returns 0 if disk is empty, non-zero otherwise */
220
/* returns 0 if disk is empty, non-zero otherwise */
221
static int diskempty(int drv) {
221
static int diskempty(int drv) {
222
  unsigned int rc;
222
  unsigned int rc;
223
  int res;
223
  int res;
224
  char buff[8];
224
  char buff[8];
225
  struct find_t fileinfo;
225
  struct find_t fileinfo;
226
  sprintf(buff, "%c:\\*.*", 'A' + drv - 1);
226
  sprintf(buff, "%c:\\*.*", 'A' + drv - 1);
227
  rc = _dos_findfirst(buff, _A_NORMAL | _A_SUBDIR | _A_HIDDEN | _A_SYSTEM, &fileinfo);
227
  rc = _dos_findfirst(buff, _A_NORMAL | _A_SUBDIR | _A_HIDDEN | _A_SYSTEM, &fileinfo);
228
  if (rc == 0) {
228
  if (rc == 0) {
229
    res = 1; /* call successfull means disk is not empty */
229
    res = 1; /* call successfull means disk is not empty */
230
  } else {
230
  } else {
231
    res = 0;
231
    res = 0;
232
  }
232
  }
233
  /* _dos_findclose(&fileinfo); */ /* apparently required only on OS/2 */
233
  /* _dos_findclose(&fileinfo); */ /* apparently required only on OS/2 */
234
  return(res);
234
  return(res);
235
}
235
}
236
 
236
 
237
 
237
 
238
static int preparedrive(void) {
238
static int preparedrive(void) {
239
  int driveremovable;
239
  int driveremovable;
240
  int selecteddrive = 3; /* hardcoded to 'C:' for now */
240
  int selecteddrive = 3; /* hardcoded to 'C:' for now */
241
  int cselecteddrive;
241
  int cselecteddrive;
242
  int ds;
242
  int ds;
243
  char buff[128];
243
  char buff[128];
244
  cselecteddrive = 'A' + selecteddrive - 1;
244
  cselecteddrive = 'A' + selecteddrive - 1;
245
  for (;;) {
245
  for (;;) {
246
    newscreen();
246
    newscreen();
247
    driveremovable = isdriveremovable(selecteddrive);
247
    driveremovable = isdriveremovable(selecteddrive);
248
    if (driveremovable < 0) {
248
    if (driveremovable < 0) {
249
      char *list[] = { "Create an automatic partition", "Run the FDISK partitioning tool", "Quit to DOS", NULL};
249
      char *list[] = { "Create an automatic partition", "Run the FDISK partitioning tool", "Quit to DOS", NULL};
250
      list[0] = kittengets(0, 3, list[0]);
250
      list[0] = kittengets(0, 3, list[0]);
251
      list[1] = kittengets(0, 4, list[1]);
251
      list[1] = kittengets(0, 4, list[1]);
252
      list[2] = kittengets(0, 2, list[2]);
252
      list[2] = kittengets(0, 2, list[2]);
253
      sprintf(buff, kittengets(3, 0, "ERROR: Drive %c: could not be found. Perhaps your hard disk needs to be"), cselecteddrive);
253
      sprintf(buff, kittengets(3, 0, "ERROR: Drive %c: could not be found. Perhaps your hard disk needs to be"), cselecteddrive);
254
      video_putstring(4, 2, COLOR_BODY[mono], buff);
254
      video_putstring(4, 2, COLOR_BODY[mono], buff);
255
      putstringnls(5, 2, COLOR_BODY[mono], 3, 1, "       partitioned first. Please create at least one partition on your");
255
      putstringnls(5, 2, COLOR_BODY[mono], 3, 1, "       partitioned first. Please create at least one partition on your");
256
      putstringnls(6, 2, COLOR_BODY[mono], 3, 2, "       hard disk, so Svarog386 can be installed on it. Note, that");
256
      putstringnls(6, 2, COLOR_BODY[mono], 3, 2, "       hard disk, so Svarog386 can be installed on it. Note, that");
257
      sprintf(buff, kittengets(3, 3, "       Svarog386 requires at least %d MiB of available disk space."), 16);
257
      sprintf(buff, kittengets(3, 3, "       Svarog386 requires at least %d MiB of available disk space."), 16);
258
      video_putstring(7, 2, COLOR_BODY[mono], buff);
258
      video_putstring(7, 2, COLOR_BODY[mono], buff);
259
      putstringnls(9, 2, COLOR_BODY[mono], 3, 4, "You can use the FDISK partitioning tool for creating the required partition");
259
      putstringnls(9, 2, COLOR_BODY[mono], 3, 4, "You can use the FDISK partitioning tool for creating the required partition");
260
      putstringnls(10, 2, COLOR_BODY[mono], 3, 5, "manually, or you can let the installer partitioning your disk");
260
      putstringnls(10, 2, COLOR_BODY[mono], 3, 5, "manually, or you can let the installer partitioning your disk");
261
      putstringnls(11, 2, COLOR_BODY[mono], 3, 6, "automatically. You can also abort the installation to use any other");
261
      putstringnls(11, 2, COLOR_BODY[mono], 3, 6, "automatically. You can also abort the installation to use any other");
262
      putstringnls(12, 2, COLOR_BODY[mono], 3, 7, "partition manager of your choice.");
262
      putstringnls(12, 2, COLOR_BODY[mono], 3, 7, "partition manager of your choice.");
263
      switch (menuselect(14, -1, 5, list)) {
263
      switch (menuselect(14, -1, 5, list)) {
264
        case 0:
264
        case 0:
265
          system("FDISK /AUTO");
265
          system("FDISK /AUTO");
266
          break;
266
          break;
267
        case 1:
267
        case 1:
268
          video_clear(0x0700, 0);
268
          video_clear(0x0700, 0);
269
          video_movecursor(0, 0);
269
          video_movecursor(0, 0);
270
          system("FDISK");
270
          system("FDISK");
271
          break;
271
          break;
272
        case 2:
272
        case 2:
273
          return(-1);
273
          return(-1);
274
      }
274
      }
275
      newscreen();
275
      newscreen();
276
      putstringnls(11, 10, COLOR_BODY[mono], 3, 8, "Your computer will reboot now.");
276
      putstringnls(11, 10, COLOR_BODY[mono], 3, 8, "Your computer will reboot now.");
277
      putstringnls(12, 10, COLOR_BODY[mono], 0, 5, "Press any key...");
277
      putstringnls(12, 10, COLOR_BODY[mono], 0, 5, "Press any key...");
278
      input_getkey();
278
      input_getkey();
279
      reboot();
279
      reboot();
280
      return(-1);
280
      return(-1);
281
    } else if (driveremovable > 0) {
281
    } else if (driveremovable > 0) {
282
      sprintf(buff, kittengets(3, 9, "ERROR: Drive %c: is a removable device. Installation aborted."), cselecteddrive);
282
      sprintf(buff, kittengets(3, 9, "ERROR: Drive %c: is a removable device. Installation aborted."), cselecteddrive);
283
      video_putstring(9, 2, COLOR_BODY[mono], buff);
283
      video_putstring(9, 2, COLOR_BODY[mono], buff);
284
      putstringnls(11, 2, COLOR_BODY[mono], 0, 5, "Press any key...");
284
      putstringnls(11, 2, COLOR_BODY[mono], 0, 5, "Press any key...");
285
      return(-1);
285
      return(-1);
286
    }
286
    }
287
    /* if not formatted, propose to format it right away (try to create a directory) */
287
    /* if not formatted, propose to format it right away (try to create a directory) */
288
    sprintf(buff, "%c:\\SVWRTEST.123", cselecteddrive);
288
    sprintf(buff, "%c:\\SVWRTEST.123", cselecteddrive);
289
    if (mkdir(buff) != 0) {
289
    if (mkdir(buff) != 0) {
290
      char *list[] = { "Proceed with formatting", "Quit to DOS", NULL};
290
      char *list[] = { "Proceed with formatting", "Quit to DOS", NULL};
291
      list[0] = kittengets(0, 6, list[0]);
291
      list[0] = kittengets(0, 6, list[0]);
292
      list[1] = kittengets(0, 2, list[1]);
292
      list[1] = kittengets(0, 2, list[1]);
293
      sprintf(buff, kittengets(3, 10, "ERROR: Drive %c: seems to be unformated."), cselecteddrive);
293
      sprintf(buff, kittengets(3, 10, "ERROR: Drive %c: seems to be unformated."), cselecteddrive);
294
      video_putstring(7, 2, COLOR_BODY[mono], buff);
294
      video_putstring(7, 2, COLOR_BODY[mono], buff);
295
      putstringnls(8, 2, COLOR_BODY[mono], 3, 11, "       Do you wish to format it?");
295
      putstringnls(8, 2, COLOR_BODY[mono], 3, 11, "       Do you wish to format it?");
296
      if (menuselect(12, -1, 4, list) != 0) return(-1);
296
      if (menuselect(12, -1, 4, list) != 0) return(-1);
297
      video_clear(0x0700, 0);
297
      video_clear(0x0700, 0);
298
      video_movecursor(0, 0);
298
      video_movecursor(0, 0);
299
      sprintf(buff, "FORMAT %c: /Q /U /Z:seriously /V:SVAROG386", cselecteddrive);
299
      sprintf(buff, "FORMAT %c: /Q /U /Z:seriously /V:SVAROG386", cselecteddrive);
300
      system(buff);
300
      system(buff);
301
      continue;
301
      continue;
302
    }
302
    }
303
    sprintf(buff, "%c:\\SVWRTEST.123", cselecteddrive);
303
    sprintf(buff, "%c:\\SVWRTEST.123", cselecteddrive);
304
    rmdir(buff);
304
    rmdir(buff);
305
    /* check total disk space */
305
    /* check total disk space */
306
    ds = disksize(selecteddrive);
306
    ds = disksize(selecteddrive);
307
    if (ds < 16) {
307
    if (ds < 16) {
308
      sprintf(buff, kittengets(3, 12, "ERROR: Drive %c: is not big enough!"), cselecteddrive);
308
      sprintf(buff, kittengets(3, 12, "ERROR: Drive %c: is not big enough!"), cselecteddrive);
309
      video_putstring(9, 2, COLOR_BODY[mono], buff);
309
      video_putstring(9, 2, COLOR_BODY[mono], buff);
310
      sprintf(buff, kittengets(3, 13, "      Svarog386 requires a disk of at least %d MiB."), 16);
310
      sprintf(buff, kittengets(3, 13, "      Svarog386 requires a disk of at least %d MiB."), 16);
311
      video_putstring(10, 2, COLOR_BODY[mono], buff);
311
      video_putstring(10, 2, COLOR_BODY[mono], buff);
312
      putstringnls(12, 2, COLOR_BODY[mono], 0, 5, "Press any key...");
312
      putstringnls(12, 2, COLOR_BODY[mono], 0, 5, "Press any key...");
313
      input_getkey();
313
      input_getkey();
314
      return(-1);
314
      return(-1);
315
    }
315
    }
316
    /* is the disk empty? */
316
    /* is the disk empty? */
317
    if (diskempty(selecteddrive) != 0) {
317
    if (diskempty(selecteddrive) != 0) {
318
      char *list[] = { "Proceed with formatting", "Quit to DOS", NULL};
318
      char *list[] = { "Proceed with formatting", "Quit to DOS", NULL};
319
      list[0] = kittengets(0, 6, list[0]);
319
      list[0] = kittengets(0, 6, list[0]);
320
      list[1] = kittengets(0, 2, list[1]);
320
      list[1] = kittengets(0, 2, list[1]);
321
      sprintf(buff, kittengets(3, 14, "ERROR: Drive %c: is not empty. Svarog386 must be installed on an empty disk."), cselecteddrive);
321
      sprintf(buff, kittengets(3, 14, "ERROR: Drive %c: is not empty. Svarog386 must be installed on an empty disk."), cselecteddrive);
322
      video_putstring(7, 2, COLOR_BODY[mono], buff);
322
      video_putstring(7, 2, COLOR_BODY[mono], buff);
323
      putstringnls(8, 2, COLOR_BODY[mono], 3, 15, "       You can format the disk now, to make it empty. Note however, that");
323
      putstringnls(8, 2, COLOR_BODY[mono], 3, 15, "       You can format the disk now, to make it empty. Note however, that");
324
      putstringnls(9, 2, COLOR_BODY[mono], 3, 16, "       this will ERASE ALL CURRENT DATA on your disk.");
324
      putstringnls(9, 2, COLOR_BODY[mono], 3, 16, "       this will ERASE ALL CURRENT DATA on your disk.");
325
      if (menuselect(12, -1, 4, list) != 0) return(-1);
325
      if (menuselect(12, -1, 4, list) != 0) return(-1);
326
      video_clear(0x0700, 0);
326
      video_clear(0x0700, 0);
327
      video_movecursor(0, 0);
327
      video_movecursor(0, 0);
328
      sprintf(buff, "FORMAT %c: /Q /U /Z:seriously /V:SVAROG386", cselecteddrive);
328
      sprintf(buff, "FORMAT %c: /Q /U /Z:seriously /V:SVAROG386", cselecteddrive);
329
      system(buff);
329
      system(buff);
330
      continue;
330
      continue;
331
    } else {
331
    } else {
332
      /* final confirmation */
332
      /* final confirmation */
333
      char *list[] = { "Install Svarog386", "Quit to DOS", NULL};
333
      char *list[] = { "Install Svarog386", "Quit to DOS", NULL};
334
      list[0] = kittengets(0, 1, list[0]);
334
      list[0] = kittengets(0, 1, list[0]);
335
      list[1] = kittengets(0, 2, list[1]);
335
      list[1] = kittengets(0, 2, list[1]);
336
      sprintf(buff, kittengets(3, 17, "The installation of Svarog386 to %c: is about to begin."), cselecteddrive);
336
      sprintf(buff, kittengets(3, 17, "The installation of Svarog386 to %c: is about to begin."), cselecteddrive);
337
      video_putstring(7, 2, COLOR_BODY[mono], buff);
337
      video_putstring(7, 2, COLOR_BODY[mono], buff);
338
      if (menuselect(10, -1, 4, list) != 0) return(-1);
338
      if (menuselect(10, -1, 4, list) != 0) return(-1);
339
      sprintf(buff, "SYS A: %c:", cselecteddrive);
339
      sprintf(buff, "SYS A: %c:", cselecteddrive);
340
      system(buff);
340
      system(buff);
341
      sprintf(buff, "%c:\\TEMP", cselecteddrive);
341
      sprintf(buff, "%c:\\TEMP", cselecteddrive);
342
      mkdir(buff);
342
      mkdir(buff);
343
      return(cselecteddrive);
343
      return(cselecteddrive);
344
    }
344
    }
345
  }
345
  }
346
}
346
}
347
 
347
 
348
 
348
 
349
static void bootfilesgen(int targetdrv, char *lang) {
349
static void bootfilesgen(int targetdrv, char *lang) {
350
  char buff[128];
350
  char buff[128];
351
  FILE *fd;
351
  FILE *fd;
352
  /*** AUTOEXEC.BAT ***/
352
  /*** AUTOEXEC.BAT ***/
353
  sprintf(buff, "%c:\\AUTOEXEC.BAT", targetdrv);
353
  sprintf(buff, "%c:\\AUTOEXEC.BAT", targetdrv);
354
  fd = fopen(buff, "wb");
354
  fd = fopen(buff, "wb");
355
  if (fd == NULL) return;
355
  if (fd == NULL) return;
356
  fprintf(fd, "@ECHO OFF\r\n");
356
  fprintf(fd, "@ECHO OFF\r\n");
357
  fprintf(fd, "SET TEMP=%c:\\TEMP\r\n", targetdrv);
357
  fprintf(fd, "SET TEMP=%c:\\TEMP\r\n", targetdrv);
358
  fprintf(fd, "SET DOSDIR=%c:\\SYSTEM\\SVAROG.386\r\n", targetdrv);
358
  fprintf(fd, "SET DOSDIR=%c:\\SYSTEM\\SVAROG.386\r\n", targetdrv);
359
  fprintf(fd, "SET NLSPATH=%%DOSDIR%%\\NLS\r\n", targetdrv);
359
  fprintf(fd, "SET NLSPATH=%%DOSDIR%%\\NLS\r\n", targetdrv);
360
  fprintf(fd, "SET LANG=%s\r\n", lang);
360
  fprintf(fd, "SET LANG=%s\r\n", lang);
361
  fprintf(fd, "SET DIRCMD=/OGNE/P\r\n");
361
  fprintf(fd, "SET DIRCMD=/OGNE/P\r\n");
362
  fprintf(fd, "SET FDNPKG.CFG=%c:\\SYSTEM\\CFG\\FDNPKG.CFG\r\n");
362
  fprintf(fd, "SET FDNPKG.CFG=%c:\\SYSTEM\\CFG\\FDNPKG.CFG\r\n");
363
  fprintf(fd, "SET WATTCP.CFG=%c:\\SYSTEM\\CFG\\WATTCP.CFG\r\n");
363
  fprintf(fd, "SET WATTCP.CFG=%c:\\SYSTEM\\CFG\\WATTCP.CFG\r\n");
364
  fprintf(fd, "PATH %%DOSDIR%%\\BIN;%%DOSDIR%%\\LINKS\r\n");
364
  fprintf(fd, "PATH %%DOSDIR%%\\BIN;%%DOSDIR%%\\LINKS\r\n");
365
  fprintf(fd, "PROMPT $P$G\r\n");
365
  fprintf(fd, "PROMPT $P$G\r\n");
366
  fprintf(fd, "ALIAS REBOOT=FDAPM COLDBOOT\r\n");
366
  fprintf(fd, "ALIAS REBOOT=FDAPM COLDBOOT\r\n");
367
  fprintf(fd, "ALIAS HALT=FDAPM POWEROFF\r\n");
367
  fprintf(fd, "ALIAS HALT=FDAPM POWEROFF\r\n");
368
  fprintf(fd, "\r\n\r\n");
368
  fprintf(fd, "\r\n\r\n");
369
  fprintf(fd, "MODE CON CP PREPARE=((991) %c:\\SYSTEM\\SVAROG.386\\CPI\\EGA10.CPX)\r\n");
369
  fprintf(fd, "MODE CON CP PREPARE=((991) %c:\\SYSTEM\\SVAROG.386\\CPI\\EGA10.CPX)\r\n");
370
  fprintf(fd, "MODE CON CP SELECT=991\r\n");
370
  fprintf(fd, "MODE CON CP SELECT=991\r\n");
371
  fprintf(fd, "\r\n");
371
  fprintf(fd, "\r\n");
372
  fprintf(fd, "SHSUCDX /d:FDCD0001\r\n");
372
  fprintf(fd, "SHSUCDX /d:FDCD0001\r\n");
373
  fclose(fd);
373
  fclose(fd);
374
  /*** CONFIG.SYS ***/
374
  /*** CONFIG.SYS ***/
375
  sprintf(buff, "%c:\\CONFIG.SYS", targetdrv);
375
  sprintf(buff, "%c:\\CONFIG.SYS", targetdrv);
376
  fd = fopen(buff, "wb");
376
  fd = fopen(buff, "wb");
377
  if (fd == NULL) return;
377
  if (fd == NULL) return;
378
  fprintf(fd, "DOS=UMB,HIGH\r\n");
378
  fprintf(fd, "DOS=UMB,HIGH\r\n");
379
  fprintf(fd, "FILES=50\r\n");
379
  fprintf(fd, "FILES=50\r\n");
380
  fprintf(fd, "DEVICE=%c:\\SYSTEM\\SVAROG.386\\BIN\\HIMEM.EXE\r\n", targetdrv);
380
  fprintf(fd, "DEVICE=%c:\\SYSTEM\\SVAROG.386\\BIN\\HIMEM.EXE\r\n", targetdrv);
381
  fprintf(fd, "SHELLHIGH=%c:\\SYSTEM\\SVAROG.386\\BIN\\COMMAND.COM /E:512", targetdrv);
381
  fprintf(fd, "SHELLHIGH=%c:\\SYSTEM\\SVAROG.386\\BIN\\COMMAND.COM /E:512", targetdrv);
382
  fprintf(fd, "REM COUNTRY=001,437,%c:\\SYSTEM\\SVAROG.386\r\n", targetdrv);
382
  fprintf(fd, "REM COUNTRY=001,437,%c:\\SYSTEM\\SVAROG.386\r\n", targetdrv);
383
  fprintf(fd, "DEVICE=%c:\\SYSTEM\\SVAROG.386\\BIN\\CDROM.SYS /D:FDCD0001\r\n", targetdrv);
383
  fprintf(fd, "DEVICE=%c:\\SYSTEM\\SVAROG.386\\BIN\\CDROM.SYS /D:FDCD0001\r\n", targetdrv);
384
  fclose(fd);
384
  fclose(fd);
385
}
385
}
386
 
386
 
387
 
387
 
388
static void installpackages(void) {
388
static void installpackages(int targetdrv) {
389
  char *pkglist[] = {
389
  char *pkglist[] = {
390
    "APPEND",
390
    "APPEND",
391
    "ASSIGN",
391
    "ASSIGN",
392
    "ATTRIB",
392
    "ATTRIB",
393
    "CHKDSK",
393
    "CHKDSK",
394
    "CHOICE",
394
    "CHOICE",
395
    "COMMAND",
395
    "COMMAND",
396
    "COMP",
396
    "COMP",
397
    "CPIDOS",
397
    "CPIDOS",
398
    "CTMOUSE",
398
    "CTMOUSE",
399
    "DEBUG",
399
    "DEBUG",
400
    "DEFRAG",
400
    "DEFRAG",
401
    "DELTREE",
401
    "DELTREE",
402
    "DEVLOAD",
402
    "DEVLOAD",
403
    "DISKCOMP",
403
    "DISKCOMP",
404
    "DISKCOPY",
404
    "DISKCOPY",
405
    "DISPLAY",
405
    "DISPLAY",
406
    "DOSFSCK",
406
    "DOSFSCK",
407
    "EDIT",
407
    "EDIT",
408
    "EDLIN",
408
    "EDLIN",
409
    "EXE2BIN",
409
    "EXE2BIN",
410
    "FC",
410
    "FC",
411
    "FDAPM",
411
    "FDAPM",
412
    "FDISK",
412
    "FDISK",
413
    "FDNPKG",
413
    "FDNPKG",
414
    "FIND",
414
    "FIND",
415
    "FORMAT",
415
    "FORMAT",
416
    "HELP",
416
    "HELP",
417
    "HIMEMX",
417
    "HIMEMX",
418
    "KERNEL",
418
    "KERNEL",
419
    "KEYB",
419
    "KEYB",
420
    "LABEL",
420
    "LABEL",
421
    "LBACACHE",
421
    "LBACACHE",
422
    "MEM",
422
    "MEM",
423
    "MIRROR",
423
    "MIRROR",
424
    "MODE",
424
    "MODE",
425
    "MORE",
425
    "MORE",
426
    "MOVE",
426
    "MOVE",
427
    "NANSI",
427
    "NANSI",
428
    "NLSFUNC",
428
    "NLSFUNC",
429
    "PRINT",
429
    "PRINT",
430
    "RDISK",
430
    "RDISK",
431
    "RECOVER",
431
    "RECOVER",
432
    "REPLACE",
432
    "REPLACE",
433
    "SHARE",
433
    "SHARE",
434
    "SHSUCDX",
434
    "SHSUCDX",
435
    "SORT",
435
    "SORT",
436
    "SWSUBST",
436
    "SWSUBST",
437
    "TREE",
437
    "TREE",
438
    "UNDELETE",
438
    "UNDELETE",
439
    "XCOPY",
439
    "XCOPY",
440
    NULL
440
    NULL
441
  };
441
  };
442
  int i, pkglistlen;
442
  int i, pkglistlen;
-
 
443
  char buff[64];
443
  newscreen();
444
  newscreen();
444
  /* count how long the pkg list is */
445
  /* count how long the pkg list is */
445
  for (pkglistlen = 0; pkglist[pkglistlen] != NULL; pkglistlen++);
446
  for (pkglistlen = 0; pkglist[pkglistlen] != NULL; pkglistlen++);
-
 
447
  /* set DOSDIR and friends */
-
 
448
  snprintf(buff, sizeof(buff), "%c:\\SYSTEM\\SVAROG.386", targetdrv);
-
 
449
  setenv("DOSDIR", buff, 1);
-
 
450
  snprintf(buff, sizeof(buff), "%c:\\TEMP", targetdrv);
-
 
451
  setenv("TEMP", buff, 1);
446
  /* install packages */
452
  /* install packages */
447
  for (i = 0; pkglist[i] != NULL; i++) {
453
  for (i = 0; pkglist[i] != NULL; i++) {
448
    char buff[128];
454
    char buff[128];
449
    snprintf(buff, sizeof(buff), kittengets(4, 0, "Installing package %d/%d: %s"), i+1, pkglistlen, pkglist[i]);
455
    snprintf(buff, sizeof(buff), kittengets(4, 0, "Installing package %d/%d: %s"), i+1, pkglistlen, pkglist[i]);
450
    strcat(buff, "       ");
456
    strcat(buff, "       ");
451
    video_putstring(10, 2, COLOR_BODY[mono], buff);
457
    video_putstring(10, 2, COLOR_BODY[mono], buff);
452
    sprintf(buff, "FDNPKG INSTALL %s > NUL");
458
    sprintf(buff, "FDINST INSTALL X:\\BASE\\%s.ZIP > NUL", pkglist[i]);
453
    system(buff);
459
    system(buff);
454
  }
460
  }
455
}
461
}
456
 
462
 
457
 
463
 
458
static void finalreboot(void) {
464
static void finalreboot(void) {
459
  newscreen();
465
  newscreen();
460
  putstringnls(10, 2, COLOR_BODY[mono], 5, 0, "Svarog386 installation is over. Your computer will reboot now.");
466
  putstringnls(10, 2, COLOR_BODY[mono], 5, 0, "Svarog386 installation is over. Your computer will reboot now.");
461
  putstringnls(11, 2, COLOR_BODY[mono], 5, 1, "Please remove the installation disk from your drive.");
467
  putstringnls(11, 2, COLOR_BODY[mono], 5, 1, "Please remove the installation disk from your drive.");
462
  putstringnls(13, 2, COLOR_BODY[mono], 0, 5, "Press any key...");
468
  putstringnls(13, 2, COLOR_BODY[mono], 0, 5, "Press any key...");
463
  input_getkey();
469
  input_getkey();
464
  reboot();
470
  reboot();
465
}
471
}
466
 
472
 
467
 
473
 
468
static void loadcp(char *lang) {
474
static void loadcp(char *lang) {
469
  int cp, egafile;
475
  int cp, egafile;
470
  char buff[64];
476
  char buff[64];
471
  cp = getnlscp(lang, &egafile);
477
  cp = getnlscp(lang, &egafile);
472
  if (cp == 437) return;
478
  if (cp == 437) return;
473
  video_movecursor(1, 0);
479
  video_movecursor(1, 0);
474
  if (egafile == 1) {
480
  if (egafile == 1) {
475
    sprintf(buff, "MODE CON CP PREP=((%d) A:\\EGA.CPX)", cp);
481
    sprintf(buff, "MODE CON CP PREP=((%d) A:\\EGA.CPX)", cp);
476
  } else {
482
  } else {
477
    sprintf(buff, "MODE CON CP PREP=((%d) A:\\EGA%d.CPX)", cp, egafile);
483
    sprintf(buff, "MODE CON CP PREP=((%d) A:\\EGA%d.CPX)", cp, egafile);
478
  }
484
  }
479
  system(buff);
485
  system(buff);
480
  sprintf(buff, "MODE CON CP SEL=%d", cp);
486
  sprintf(buff, "MODE CON CP SEL=%d", cp);
481
  system(buff);
487
  system(buff);
482
  /* below I re-init the video controller - apparently this is required if
488
  /* below I re-init the video controller - apparently this is required if
483
   * I want the new glyph symbols to be actually applied */
489
   * I want the new glyph symbols to be actually applied */
484
  {
490
  {
485
  union REGS r;
491
  union REGS r;
486
  r.h.ah = 0x0F; /* get current video mode */
492
  r.h.ah = 0x0F; /* get current video mode */
487
  int86(0x10, &r, &r); /* r.h.al contains the current video mode now */
493
  int86(0x10, &r, &r); /* r.h.al contains the current video mode now */
488
  r.h.ah = 0; /* set video mode (to whatever is set in AL) */
494
  r.h.ah = 0; /* set video mode (to whatever is set in AL) */
489
  int86(0x10, &r, &r);
495
  int86(0x10, &r, &r);
490
  }
496
  }
491
}
497
}
492
 
498
 
493
 
499
 
494
int main(void) {
500
int main(void) {
495
  char lang[4];
501
  char lang[4];
496
  int targetdrv;
502
  int targetdrv;
497
 
503
 
498
  /* init screen and detect mono status */
504
  /* init screen and detect mono status */
499
  mono = video_init();
505
  mono = video_init();
500
 
506
 
501
  for (;;) { /* fake loop, it's here just to break out easily */
507
  for (;;) { /* fake loop, it's here just to break out easily */
502
    if (selectlang(lang) < 0) break; /* welcome to svarog, select your language */
508
    if (selectlang(lang) < 0) break; /* welcome to svarog, select your language */
503
    setenv("LANG", lang, 1);
509
    setenv("LANG", lang, 1);
504
    loadcp(lang);
510
    loadcp(lang);
505
    kittenopen("INSTALL"); /* NLS support */
511
    kittenopen("INSTALL"); /* NLS support */
506
    /*selectkeyb();*/ /* what keyb layout should we use? */
512
    /*selectkeyb();*/ /* what keyb layout should we use? */
507
    if (welcomescreen() != 0) break; /* what svarog386 is, ask whether to run live dos or install */
513
    if (welcomescreen() != 0) break; /* what svarog386 is, ask whether to run live dos or install */
508
    targetdrv = preparedrive(); /* what drive should we install to? check avail. space */
514
    targetdrv = preparedrive(); /* what drive should we install to? check avail. space */
509
    if (targetdrv < 0) break;
515
    if (targetdrv < 0) break;
510
    /*askaboutsources();*/ /* IF sources are available, ask if installing with them */
516
    /*askaboutsources();*/ /* IF sources are available, ask if installing with them */
511
    installpackages();   /* install packages */
517
    installpackages(targetdrv);   /* install packages */
512
    bootfilesgen(targetdrv, lang); /* generate simple boot files */
518
    bootfilesgen(targetdrv, lang); /* generate simple boot files */
513
    /*localcfg();*/ /* show local params (currency, etc), and propose to change them (based on localcfg) */
519
    /*localcfg();*/ /* show local params (currency, etc), and propose to change them (based on localcfg) */
514
    /*netcfg();*/ /* basic networking config */
520
    /*netcfg();*/ /* basic networking config */
515
    /* TODO compute a customized FDNPKG file that looks either to local CD or net */
521
    /* TODO compute a customized FDNPKG file that looks either to local CD or net */
516
    finalreboot(); /* remove the CD and reboot */
522
    finalreboot(); /* remove the CD and reboot */
517
    break;
523
    break;
518
  }
524
  }
519
  kittenclose(); /* close NLS support */
525
  kittenclose(); /* close NLS support */
520
  video_clear(0x0700, 0);
526
  video_clear(0x0700, 0);
521
  video_movecursor(0, 0);
527
  video_movecursor(0, 0);
522
  return(0);
528
  return(0);
523
}
529
}
524
 
530