msdos/dosconf.c

   1 /*
   2  * DOS CONFIG.SYS parser
   3  *
   4  * Copyright 1998 Andreas Mohr
   5  *
   6  */
   7
   8 #include <stdio.h>
   9 #include <unistd.h>
  10 #include <string.h>
  11 #include <stdlib.h>
  12 #include <ctype.h>
  13 #include "winbase.h"
  14 #include "msdos.h"
  15 #include "debug.h"
  16 #include "options.h"
  17 #include "file.h"
  18
  19
  20 static int DOSCONF_Device(char **confline);
  21 static int DOSCONF_Dos(char **confline);
  22 static int DOSCONF_Fcbs(char **confline);
  23 static int DOSCONF_Break(char **confline);
  24 static int DOSCONF_Files(char **confline);
  25 static int DOSCONF_Install(char **confline);
  26 static int DOSCONF_Lastdrive(char **confline);
  27 static int DOSCONF_Menu(char **confline);
  28 static int DOSCONF_Include(char **confline);
  29 static int DOSCONF_Country(char **confline);
  30 static int DOSCONF_Numlock(char **confline);
  31 static int DOSCONF_Switches(char **confline);
  32 static int DOSCONF_Shell(char **confline);
  33 static int DOSCONF_Stacks(char **confline);
  34 static int DOSCONF_Buffers(char **confline);
  35 static void DOSCONF_Parse(char *menuname);
  36
  37 DOSCONF DOSCONF_config =
  38 {
  39     'E',  /* lastdrive */
  40     0,    /* brk_flag */
  41     8,    /* files */
  42     9,    /* stacks_nr */
  43     256,  /* stacks_sz */
  44     15,   /* buf */
  45     1,    /* buf2 */
  46     4,    /* fcbs */
  47     0,    /* flags */
  48     NULL, /* shell */
  49     NULL  /* country */
  50 };
  51
  52 typedef struct {
  53     const char *tag_name;
  54     int (*tag_handler)(char **p);
  55     void *data;
  56 } TAG_ENTRY;
  57
  58
  59 /*
  60  * see
  61  * http://egeria.cm.cf.ac.uk/User/P.L.Poulain/project/internal/allinter.htm
  62  * or
  63  * http://www.csulb.edu/~murdock/dosindex.html
  64  */
  65
  66 static const TAG_ENTRY tag_entries[] =
  67 {
  68     { ";", NULL },
  69     { "REM ", NULL },
  70     { "DEVICE", DOSCONF_Device },
  71     { "[", DOSCONF_Menu },
  72     { "SUBMENU", NULL },
  73     { "MENUDEFAULT", DOSCONF_Menu },
  74     { "INCLUDE", DOSCONF_Include },
  75
  76     { "INSTALL", DOSCONF_Install },
  77     { "DOS", DOSCONF_Dos },
  78     { "FCBS", DOSCONF_Fcbs },
  79     { "BREAK", DOSCONF_Break },
  80     { "FILES", DOSCONF_Files },
  81     { "SHELL", DOSCONF_Shell },
  82     { "STACKS", DOSCONF_Stacks },
  83     { "BUFFERS", DOSCONF_Buffers },
  84     { "COUNTRY", DOSCONF_Country },
  85     { "NUMLOCK", DOSCONF_Numlock },
  86     { "SWITCHES", DOSCONF_Switches },
  87     { "LASTDRIVE", DOSCONF_Lastdrive }
  88 };
  89
  90 static FILE *cfg_fd;
  91
  92 static char *menu_default = NULL;
  93 static int menu_in_listing = 0;         /* we are in the [menu] section */
  94 static int menu_skip = 0;                               /* the current menu gets skipped */
  95
  96
  97 static void DOSCONF_skip(char **pconfline)
  98 {
  99     char *p;
 100
 101     p = *pconfline;
 102     while ( (*p == ' ') || (*p == '\t') ) p++;
 103     *pconfline = p;
 104 }
 105
 106 static int DOSCONF_JumpToEntry(char **pconfline, char separator)
 107 {
 108     char *p;
 109
 110     p = *pconfline;
 111     while ( (*p != separator) && (*p != '\0') ) p++;
 112
 113     if (*p != separator)
 114         return 0;
 115     else p++;
 116
 117     while ( (*p == ' ') || (*p == '\t') ) p++;
 118     *pconfline = p;
 119     return 1;
 120 }
 121
 122 static int DOSCONF_Device(char **confline)
 123 {
 124     int loadhigh = 0;
 125
 126     *confline += 6; /* strlen("DEVICE") */
 127     if (!(strncasecmp(*confline, "HIGH", 4)))
 128     {
 129         loadhigh = 1;
 130         *confline += 4;
 131         /* FIXME: get DEVICEHIGH parameters if avail ? */
 132     }
 133     if (!(DOSCONF_JumpToEntry(confline, '='))) return 0;
 134     TRACE(profile, "Loading device '%s'\n", *confline);
 135 #if 0
 136     DOSMOD_LoadDevice(*confline, loadhigh);
 137 #endif
 138     return 1;
 139 }
 140
 141 static int DOSCONF_Dos(char **confline)
 142 {
 143     *confline += 3; /* strlen("DOS") */
 144     if (!(DOSCONF_JumpToEntry(confline, '='))) return 0;
 145     while (**confline != '\0')
 146     {
 147         if (!(strncasecmp(*confline, "HIGH", 4)))
 148         {
 149             DOSCONF_config.flags |= DOSCONF_MEM_HIGH;
 150             *confline += 4;
 151         }
 152         else
 153         if (!(strncasecmp(*confline, "UMB", 3)))
 154         {
 155             DOSCONF_config.flags |= DOSCONF_MEM_UMB;
 156             *confline += 3;
 157         }
 158         else (*confline)++;
 159         DOSCONF_JumpToEntry(confline, ',');
 160     }
 161     TRACE(profile, "DOSCONF_Dos: HIGH is %d, UMB is %d\n",
 162         (DOSCONF_config.flags & DOSCONF_MEM_HIGH) != 0, (DOSCONF_config.flags & DOSCONF_MEM_UMB) != 0);
 163     return 1;
 164 }
 165
 166 static int DOSCONF_Fcbs(char **confline)
 167 {
 168     *confline += 4; /* strlen("FCBS") */
 169     if (!(DOSCONF_JumpToEntry(confline, '='))) return 0;
 170     DOSCONF_config.fcbs = atoi(*confline);
 171     if (DOSCONF_config.fcbs > 255)
 172     {
 173                 MSG("The FCBS value in the config.sys file is too high ! Setting to 255.\n");
 174                 DOSCONF_config.fcbs = 255;
 175     }
 176     TRACE(profile, "DOSCONF_Fcbs returning %d\n", DOSCONF_config.fcbs);
 177     return 1;
 178 }
 179
 180 static int DOSCONF_Break(char **confline)
 181 {
 182     *confline += 5; /* strlen("BREAK") */
 183     if (!(DOSCONF_JumpToEntry(confline, '='))) return 0;
 184     if (!(strcasecmp(*confline, "ON")))
 185         DOSCONF_config.brk_flag = 1;
 186     TRACE(profile, "BREAK is %d\n", DOSCONF_config.brk_flag);
 187     return 1;
 188 }
 189
 190 static int DOSCONF_Files(char **confline)
 191 {
 192     *confline += 5; /* strlen("FILES") */
 193     if (!(DOSCONF_JumpToEntry(confline, '='))) return 0;
 194     DOSCONF_config.files = atoi(*confline);
 195     if (DOSCONF_config.files > 255)
 196     {
 197         MSG("The FILES value in the config.sys file is too high ! Setting to 255.\n");
 198         DOSCONF_config.files = 255;
 199     }
 200     if (DOSCONF_config.files < 8)
 201     {
 202         MSG("The FILES value in the config.sys file is too low ! Setting to 8.\n");
 203         DOSCONF_config.files = 8;
 204     }
 205     TRACE(profile, "DOSCONF_Files returning %d\n", DOSCONF_config.files);
 206     return 1;
 207 }
 208
 209 static int DOSCONF_Install(char **confline)
 210 {
 211 #if 0
 212     int loadhigh = 0;
 213 #endif
 214
 215     *confline += 7; /* strlen("INSTALL") */
 216     if (!(DOSCONF_JumpToEntry(confline, '='))) return 0;
 217     TRACE(profile, "Installing '%s'\n", *confline);
 218 #if 0
 219     DOSMOD_Install(*confline, loadhigh);
 220 #endif
 221     return 1;
 222 }
 223
 224 static int DOSCONF_Lastdrive(char **confline)
 225 {
 226     *confline += 9; /* strlen("LASTDRIVE") */
 227     if (!(DOSCONF_JumpToEntry(confline, '='))) return 0;
 228     DOSCONF_config.lastdrive = toupper(**confline);
 229     TRACE(profile, "Lastdrive %c\n", DOSCONF_config.lastdrive);
 230     return 1;
 231 }
 232
 233 static int DOSCONF_Country(char **confline)
 234 {
 235     *confline += 7; /* strlen("COUNTRY") */
 236     if (!(DOSCONF_JumpToEntry(confline, '='))) return 0;
 237     TRACE(profile, "Country '%s'\n", *confline);
 238     if (DOSCONF_config.country == NULL)
 239                 DOSCONF_config.country = malloc(strlen(*confline) + 1);
 240     strcpy(DOSCONF_config.country, *confline);
 241     return 1;
 242 }
 243
 244 static int DOSCONF_Numlock(char **confline)
 245 {
 246     *confline += 7; /* strlen("NUMLOCK") */
 247     if (!(DOSCONF_JumpToEntry(confline, '='))) return 0;
 248     if (!(strcasecmp(*confline, "ON")))
 249         DOSCONF_config.flags |= DOSCONF_NUMLOCK;
 250     TRACE(profile, "NUMLOCK is %d\n", (DOSCONF_config.flags & DOSCONF_NUMLOCK) != 0);
 251     return 1;
 252 }
 253
 254 static int DOSCONF_Switches(char **confline)
 255 {
 256     char *p;
 257
 258     *confline += 8; /* strlen("SWITCHES") */
 259     if (!(DOSCONF_JumpToEntry(confline, '='))) return 0;
 260     p = strtok(*confline, "/");
 261     do
 262     {
 263         if ( toupper(*p) == 'K')
 264             DOSCONF_config.flags |= DOSCONF_KEYB_CONV;
 265     }
 266     while ((p = strtok(NULL, "/")));
 267     TRACE(profile, "'Force conventional keyboard' is %d\n",
 268                 (DOSCONF_config.flags & DOSCONF_KEYB_CONV) != 0);
 269     return 1;
 270 }
 271
 272 static int DOSCONF_Shell(char **confline)
 273 {
 274     *confline += 5; /* strlen("SHELL") */
 275     if (!(DOSCONF_JumpToEntry(confline, '='))) return 0;
 276     TRACE(profile, "Shell '%s'\n", *confline);
 277     if (DOSCONF_config.shell == NULL)
 278                 DOSCONF_config.shell = malloc(strlen(*confline) + 1);
 279     strcpy(DOSCONF_config.shell, *confline);
 280     return 1;
 281 }
 282
 283 static int DOSCONF_Stacks(char **confline)
 284 {
 285
 286     *confline += 6; /* strlen("STACKS") */
 287     if (!(DOSCONF_JumpToEntry(confline, '='))) return 0;
 288     DOSCONF_config.stacks_nr = atoi(strtok(*confline, ","));
 289     DOSCONF_config.stacks_sz = atoi((strtok(NULL, ",")));
 290     TRACE(profile, "%d stacks of size %d\n",
 291           DOSCONF_config.stacks_nr, DOSCONF_config.stacks_sz);
 292     return 1;
 293 }
 294
 295 static int DOSCONF_Buffers(char **confline)
 296 {
 297     char *p;
 298
 299     *confline += 7; /* strlen("BUFFERS") */
 300     if (!(DOSCONF_JumpToEntry(confline, '='))) return 0;
 301     p = strtok(*confline, ",");
 302     DOSCONF_config.buf = atoi(p);
 303     if ((p = strtok(NULL, ",")))
 304         DOSCONF_config.buf2 = atoi(p);
 305     TRACE(profile, "%d primary buffers, %d secondary buffers\n",
 306           DOSCONF_config.buf, DOSCONF_config.buf2);
 307     return 1;
 308 }
 309
 310 static int DOSCONF_Menu(char **confline)
 311 {
 312     if (!(strncasecmp(*confline, "[MENU]", 6)))
 313         menu_in_listing = 1;
 314     else
 315     if ((!(strncasecmp(*confline, "[COMMON]", 8)))
 316     || (!(strncasecmp(*confline, "[WINE]", 6))))
 317         menu_skip = 0;
 318     else
 319     if (**confline == '[')
 320     {
 321         (*confline)++;
 322         if ((menu_default)
 323         && (!(strncasecmp(*confline, menu_default, strlen(menu_default)))))
 324     {
 325                 free(menu_default);
 326                 menu_default = NULL;
 327             menu_skip = 0;
 328     }
 329         else
 330             menu_skip = 1;
 331         menu_in_listing = 0;
 332     }
 333     else
 334     if (!(strncasecmp(*confline, "menudefault", 11)) && (menu_in_listing))
 335     {
 336         if (!(DOSCONF_JumpToEntry(confline, '='))) return 0;
 337     *confline = strtok(*confline, ",");
 338     menu_default = malloc(strlen(*confline) + 1);
 339         strcpy(menu_default, *confline);
 340     }
 341     return 1;
 342 }
 343
 344 static int DOSCONF_Include(char **confline)
 345 {
 346     fpos_t oldpos;
 347     char *temp;
 348
 349     *confline += 7; /* strlen("INCLUDE") */
 350     if (!(DOSCONF_JumpToEntry(confline, '='))) return 0;
 351     fgetpos(cfg_fd, &oldpos);
 352     fseek(cfg_fd, 0, SEEK_SET);
 353     TRACE(profile, "Including menu '%s'\n", *confline);
 354     temp = malloc(strlen(*confline) + 1);
 355     strcpy(temp, *confline);
 356     DOSCONF_Parse(temp);
 357         free(temp);
 358     fsetpos(cfg_fd, &oldpos);
 359     return 1;
 360 }
 361
 362 static void DOSCONF_Parse(char *menuname)
 363 {
 364    char confline[256];
 365    char *p, *trail;
 366    int i;
 367
 368     if (menuname != NULL) /* we need to jump to a certain sub menu */
 369     {
 370         while (fgets(confline, 255, cfg_fd))
 371         {
 372              p = confline;
 373              DOSCONF_skip(&p);
 374              if (*p == '[')
 375              {
 376                 p++;
 377                 if (!(trail = strrchr(p, ']')))
 378                     return;
 379                 if (!(strncasecmp(p, menuname, (int)trail - (int)p)))
 380                     break;
 381              }
 382         }
 383     }
 384
 385     while (fgets(confline, 255, cfg_fd))
 386     {
 387         p = confline;
 388         DOSCONF_skip(&p);
 389
 390         if ((menuname) && (*p == '['))
 391             /* we were handling a specific sub menu, but now next menu begins */
 392             break;
 393
 394         if ((trail = strrchr(confline, '\n')))
 395                 *trail = '\0';
 396         if ((trail = strrchr(confline, '\r')))
 397                 *trail = '\0';
 398         if (!(menu_skip))
 399         {
 400             for (i = 0; i < sizeof(tag_entries) / sizeof(TAG_ENTRY); i++)
 401                 if (!(strncasecmp(p, tag_entries[i].tag_name,
 402                    strlen(tag_entries[i].tag_name))))
 403                 {
 404                     TRACE(profile, "tag '%s'\n", tag_entries[i].tag_name);
 405                     if (tag_entries[i].tag_handler != NULL)
 406                             tag_entries[i].tag_handler(&p);
 407                         break;
 408                 }
 409         }
 410         else /* the current menu gets skipped */
 411         DOSCONF_Menu(&p);
 412     }
 413 }
 414
 415 int DOSCONF_ReadConfig(void)
 416 {
 417     char buffer[256];
 418     DOS_FULL_NAME fullname;
 419     char *filename, *menuname;
 420     int ret = 1;
 421
 422     PROFILE_GetWineIniString( "wine", "config.sys", "", buffer, sizeof(buffer) );
 423     filename = strtok(buffer, ",");
 424     menuname = strtok(NULL,   ",");
 425     if (!filename) return ret;
 426
 427     DOSFS_GetFullName(filename, FALSE, &fullname);
 428     if (menuname) menu_default = strdup(menuname);
 429     if ((cfg_fd = fopen(fullname.long_name, "r")))
 430     {
 431         DOSCONF_Parse(NULL);
 432         fclose(cfg_fd);
 433     }
 434     else
 435     {
 436         MSG("Couldn't open config.sys file given as \"%s\" in" \
 437             " wine.conf or .winerc, section [wine] !\n", filename);
 438         ret = 0;
 439     }
 440     if (menu_default) free(menu_default);
 441     return ret;
 442 }