src/config.c

   1 /*
   2    Copyright (C) Prikol Software 1996-1997
   3    Copyright (C) Aleksey Volynskov 1996-1997
   4    Copyright (C) <ARembo@gmail.com> 2011
   5
   6    This file is part of the Doom2D:Rembo project.
   7
   8    Doom2D:Rembo is free software; you can redistribute it and/or modify
   9    it under the terms of the GNU General Public License version 2 as
  10    published by the Free Software Foundation.
  11
  12    Doom2D:Rembo is distributed in the hope that it will be useful,
  13    but WITHOUT ANY WARRANTY; without even the implied warranty of
  14    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15    GNU General Public License for more details.
  16
  17    You should have received a copy of the GNU General Public License
  18    along with this program; if not, see <http://www.gnu.org/licenses/> or
  19    write to the Free Software Foundation, Inc.,
  20    51 Franklin St, Fifth Floor, Boston, MA  02110-1301 USA
  21 */
  22
  23 #include "glob.h"
  24 #include <stdio.h>
  25 #include <stdlib.h>
  26 #include <string.h>
  27 #include "config.h"
  28 //#include "vga.h"
  29 #include "error.h"
  30 #include "sound.h"
  31 #include "files.h"
  32 #include "view.h"
  33 #include "player.h"
  34 #include "my.h"
  35
  36 #include <SDL_keyboard.h>
  37
  38 extern byte _warp,fastdraw,nomon;
  39 extern int mem_chk_sz;
  40
  41 enum{NONE,BYTE,WORD,DWORD,STRING,SW_ON,SW_OFF,FILES,KEY};
  42
  43 typedef struct{
  44   char *par,*cfg;
  45   void *p;
  46   byte t,o;
  47 }cfg_t;
  48
  49
  50 byte cheat=0;
  51
  52 byte shot_vga=0;
  53
  54
  55 char cd_path[128]="";
  56
  57 static cfg_t cfg[]={
  58   {"file",NULL,NULL,FILES,0},
  59   {"cheat",NULL,&cheat,SW_ON,0},
  60   {"vga","screenshot",&shot_vga,SW_ON,0},
  61   {"sndvol","sound_volume",&snd_vol,WORD,0},
  62   {"musvol","music_volume",&mus_vol,WORD,0},
  63 //  {"fullscr","fullscreen",&fullscreen,SW_ON,0},
  64 //  {"window",NULL,&fullscreen,SW_OFF,0},
  65   {NULL,"sky",&w_horiz,SW_ON,0},
  66   {"mon",NULL,&nomon,SW_OFF,0},
  67 //  {"gamma","gamma",&gammaa,DWORD,0},
  68   {"warp",NULL,&_warp,BYTE,0},
  69   {"width","screen_width",&SCRW,DWORD,0},
  70   {"height","screen_height",&SCRH,DWORD,0},
  71   {NULL,"music_random",&music_random,SW_ON,0},
  72   {NULL,"music_time",&music_time,DWORD,0},
  73   {NULL,"music_fade",&music_fade,DWORD,0},
  74   {NULL,"pl1_left", &pl1.kl,KEY,0},
  75   {NULL,"pl1_right",&pl1.kr,KEY,0},
  76   {NULL,"pl1_up",   &pl1.ku,KEY,0},
  77   {NULL,"pl1_down", &pl1.kd,KEY,0},
  78   {NULL,"pl1_jump", &pl1.kj,KEY,0},
  79   {NULL,"pl1_fire", &pl1.kf,KEY,0},
  80   {NULL,"pl1_next", &pl1.kwr,KEY,0},
  81   {NULL,"pl1_prev", &pl1.kwl,KEY,0},
  82   {NULL,"pl1_use",  &pl1.kp,KEY,0},
  83   {NULL,"pl2_left", &pl2.kl,KEY,0},
  84   {NULL,"pl2_right",&pl2.kr,KEY,0},
  85   {NULL,"pl2_up",   &pl2.ku,KEY,0},
  86   {NULL,"pl2_down", &pl2.kd,KEY,0},
  87   {NULL,"pl2_jump", &pl2.kj,KEY,0},
  88   {NULL,"pl2_fire", &pl2.kf,KEY,0},
  89   {NULL,"pl2_next", &pl2.kwr,KEY,0},
  90   {NULL,"pl2_prev", &pl2.kwl,KEY,0},
  91   {NULL,"pl2_use",  &pl2.kp,KEY,0},
  92   {"config",NULL,cfg_file,STRING,0},
  93   {NULL,NULL,NULL,NONE,0}
  94 };
  95
  96
  97 char cfg_file[128]="default.cfg";
  98
  99 static char buf[256];
 100
 101 void CFG_args(int argc, char *argv[]) {
 102   int j;
 103   dword n;
 104   char *s;
 105
 106   logo("CFG_args: проверка командной строки\n");
 107
 108   int i;
 109   char *pbuf = buf;
 110   for (i=1;i<argc;i++){
 111      strcpy(pbuf,argv[i]);
 112      pbuf+=strlen(argv[i]);
 113      strcpy(pbuf," ");
 114      pbuf++;
 115   }
 116
 117   for(s=strtok(buf," \r\n\t");s;s=strtok(NULL," \r\n\t")) {//for(s=strtok(getcmd(buf)," \r\n\t");s;s=strtok(NULL," \r\n\t")) {
 118 next:
 119     if(*s=='/' || *s=='-') ++s;
 120     for(j=0;cfg[j].t;++j) if(cfg[j].par) if(strcasecmp(s,cfg[j].par)==0) {
 121           switch(cfg[j].t) {
 122         case BYTE:
 123           n=strtol(s=strtok(NULL," \r\n\t"),NULL,0);
 124           *((byte *)cfg[j].p)=(byte)n;
 125           break;
 126         case WORD:
 127           n=strtol(s=strtok(NULL," \r\n\t"),NULL,0);
 128           *((word *)cfg[j].p)=(word)n;
 129           break;
 130         case DWORD:
 131           n=strtol(s=strtok(NULL," \r\n\t"),NULL,0);
 132           *((dword *)cfg[j].p)=n;
 133           break;
 134         case STRING:
 135           strcpy((char *)cfg[j].p,s=strtok(NULL," \r\n\t"));
 136           break;
 137         case SW_ON:
 138           *((byte *)cfg[j].p)=ON;
 139           if(cfg[j+1].t==SW_OFF && cfg[j+1].p==cfg[j].p) cfg[j+1].o=1;
 140           if(j>0) if(cfg[j-1].t==SW_OFF && cfg[j-1].p==cfg[j].p) cfg[j-1].o=1;
 141           break;
 142         case SW_OFF:
 143           *((byte *)cfg[j].p)=OFF;
 144           if(cfg[j+1].t==SW_ON && cfg[j+1].p==cfg[j].p) cfg[j+1].o=1;
 145           if(j>0) if(cfg[j-1].t==SW_ON && cfg[j-1].p==cfg[j].p) cfg[j-1].o=1;
 146           break;
 147         case FILES:
 148           for(s=strtok(NULL," \r\n\t");s;s=strtok(NULL," \r\n\t")) {
 149                 if(*s=='/' || *s=='-') goto next;
 150 #ifdef DEMO
 151                 logo("  %s НЕ подключен!\n",s);
 152 #else
 153                 F_addwad(s);
 154 #endif
 155           }break;
 156         default:
 157           ERR_failinit("!!! Неизвестный тип в cfg !!!");
 158           }
 159           cfg[j].o=1;break;
 160     }
 161   }
 162 }
 163
 164 int get_key(char *name)
 165 {
 166     int i;
 167     for(i=1; i<SDLK_LAST; i++) {
 168         char* s = SDL_GetKeyName(i);
 169         if (s && strcasecmp(name,s) == 0) {
 170
 171             return i;
 172         }
 173     }
 174     return 0;
 175 }
 176
 177 void CFG_load(void) {
 178   int j;
 179   FILE *h;
 180   dword n;
 181   char s[128];
 182   char *p1,*p2;
 183
 184   char pc[50];
 185   char *e = getenv("HOME");
 186   strncpy(pc, e, 30);
 187   strcpy(&pc[strlen(pc)], "/default.cfg");
 188   if (!fexists(pc)) {
 189       strcpy(pc, "default.cfg");
 190       if (!fexists(pc)) {
 191           strcpy(pc, "/usr/share/doom2d-rembo/default.cfg");
 192           if (!fexists(pc)) {
 193               logo("default.cfg not found\n");
 194               return;
 195           }
 196       }
 197   }
 198
 199   logo("CFG_load: загрузка конфигурации из %s\n",pc);
 200   if((h=fopen(pc,"rb"))==NULL) {
 201     perror("Cannot open file");return;
 202   }
 203   while(!feof(h)) {
 204     F_readstr(h,s,127);
 205     if(*s==';' || s[1]==';')
 206       continue; // comment
 207     if(!(p1=strtok(s,"\r\n\t=;")))
 208       continue; //if(!(p1=strtok(s,"\r\n\t =;"))) continue;
 209     if(!(p2=strtok(NULL,"\r\n\t=;")))
 210       continue;//if(!(p2=strtok(NULL,"\r\n\t =;"))) continue;
 211     for(j=0;cfg[j].t;++j) {
 212       if(cfg[j].cfg && !cfg[j].o) {
 213         if(strcasecmp(p1,cfg[j].cfg)==0) {
 214           switch(cfg[j].t) {
 215           case BYTE:
 216             n=strtol(p2,NULL,0);
 217             *((byte *)cfg[j].p)=(byte)n;
 218             break;
 219           case WORD:
 220             n=strtol(p2,NULL,0);
 221             *((word *)cfg[j].p)=(word)n;
 222             break;
 223           case DWORD:
 224             n=strtol(p2,NULL,0);
 225             *((dword *)cfg[j].p)=n;
 226             break;
 227           case STRING:
 228             strcpy((char *)cfg[j].p,p2);
 229             break;
 230           case SW_ON:
 231           case SW_OFF:
 232             if(strcasecmp(p2,"ON")==0) {
 233             *((byte *)cfg[j].p)=ON;
 234             break;
 235           }
 236           if(strcasecmp(p2,"OFF")==0) {
 237             *((byte *)cfg[j].p)=OFF;
 238             break;
 239           }
 240           *((byte *)cfg[j].p)=strtol(p2,NULL,0);
 241           break;
 242           case FILES:
 243             break;
 244           case KEY:
 245           {
 246               int k = get_key(p2);
 247               if (k) {
 248                   *((int *)cfg[j].p)=k;
 249               } else {
 250                 logo("Unknown key in cfg: %s=%s\n",p1,p2);
 251                 logo("List available key names:\n");
 252                 int i;
 253                 for(i=1; i<SDLK_LAST; i++) {
 254                     char* s = SDL_GetKeyName(i);
 255
 256                     if (!strcasecmp(s,"unknown key") == 0) {
 257                         logo("%s\n", s);
 258                     }
 259                 }
 260               }
 261           }
 262           break;
 263           default:
 264             ERR_failinit("!!! Неизвестный тип в cfg !!!");
 265           } // switch
 266           break;
 267         } // if
 268       } // if
 269     } // for
 270   } // while
 271   fclose(h);
 272 }
 273
 274 void CFG_save(void) {
 275 /*
 276   char s[140],str[140];
 277   char *p;
 278   FILE *h,*oh;
 279
 280   remove("CONFIG.ZZZ");
 281   if(rename(cfg_file,"CONFIG.ZZZ")) return;
 282   if(!(h=fopen("CONFIG.ZZZ","rt")))
 283     {rename("CONFIG.ZZZ",cfg_file);return;}
 284   if(!(oh=fopen(cfg_file,"wt")))
 285     {fclose(h);rename("CONFIG.ZZZ",cfg_file);return;}
 286   for(;;) {
 287     if(!fgets(s,128,h)) break;
 288     strcpy(str,s);
 289     if(!(p=strtok(str,"\r\n\t =;"))) {fprintf(oh,"%s",s);continue;}
 290     if(strcasecmp(p,"sound_volume")==0)
 291       sprintf(s,"sound_volume=%d\n",snd_vol);
 292     else if(strcasecmp(p,"music_volume")==0)
 293       sprintf(s,"music_volume=%d\n",mus_vol);
 294     else if(strcasecmp(p,"gamma")==0)
 295       sprintf(s,"gamma=%d\n",gammaa);
 296     else if(strcasecmp(p,"sound_interp")==0)
 297       sprintf(s,"sound_interp=%s\n",s_interp?"on":"off");
 298     fprintf(oh,"%s",s);
 299   }
 300   fclose(oh);fclose(h);
 301   remove("CONFIG.ZZZ");
 302 */
 303 }