msdos/dosconf.c

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