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