736 lines
17 KiB
C
736 lines
17 KiB
C
/*
|
|
Copyright (C) 1997-2005 ZSNES Team ( zsKnight, _Demo_, pagefault, Nach )
|
|
|
|
http://www.zsnes.com
|
|
http://sourceforge.net/projects/zsnes
|
|
|
|
This program is free software; you can redistribute it and/or
|
|
modify it under the terms of the GNU General Public License
|
|
as published by the Free Software Foundation; either
|
|
version 2 of the License, or (at your option) any later
|
|
version.
|
|
|
|
This program is distributed in the hope that it will be useful,
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
GNU General Public License for more details.
|
|
|
|
You should have received a copy of the GNU General Public License
|
|
along with this program; if not, write to the Free Software
|
|
Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
|
|
*/
|
|
|
|
|
|
|
|
#include <windows.h>
|
|
#include <stdio.h>
|
|
#include <ctype.h>
|
|
#include <direct.h>
|
|
#include <winuser.h>
|
|
|
|
extern void ImportDirectX(void);
|
|
|
|
extern void zstart(void);
|
|
extern void DosExit(void);
|
|
extern void ConvertJoyMap1(void);
|
|
extern void ConvertJoyMap2(void);
|
|
extern void displayparams(void);
|
|
extern void makeextension(void);
|
|
extern unsigned char KitchenSync;
|
|
extern unsigned char Force60hz;
|
|
|
|
int pccmdline(void);
|
|
|
|
extern unsigned char Palette0, SPC700sh, OffBy1Line, DSPDisable,
|
|
MMXSupport, Force8b, ForcePal, GUIClick, MouseDis,
|
|
MusicRelVol, ScreenScale, SoundQuality,
|
|
StereoSound, V8Mode, antienab, cvidmode, debugdisble,
|
|
debugger, enterpress, finterleave, frameskip,
|
|
gammalevel, guioff, per2exec, pl1contrl, pl2contrl,
|
|
romtype, scanlines, showallext, smallscreenon, soundon,
|
|
spcon, vsyncon, DisplayS, fname, filefound, SnowOn,
|
|
NetChatFirst,NetServer,NetNewNick,
|
|
NetFilename,CmdLineTCPIPAddress,NetQuitAfter,UDPConfig,
|
|
CmdLineNetPlay;
|
|
|
|
// FIX STATMAT
|
|
extern unsigned char autoloadstate;
|
|
// FIX STATMAT
|
|
|
|
void ccmdline(void);
|
|
|
|
char *ers[] =
|
|
{
|
|
"Frame Skip must be a value of 0 to 9!\n",
|
|
"Gamma Correction Level must be a value of 0 to 5!\n",
|
|
"Sound Sampling Rate must be a value of 0 to 5!\n",
|
|
"Invalid Video Mode!\n",
|
|
"Percentage of instructions to execute must be a number from 50 to 150!\n",
|
|
"Player Input must be a value from 0 to 6!\n",
|
|
"Volume must be a number from 0 to 100!\n"
|
|
};
|
|
|
|
int argc;
|
|
char **argv;
|
|
|
|
char ucase(char ch){
|
|
if ((ch>='a') && (ch<='z')) ch-='a'-'A';
|
|
return(ch);
|
|
}
|
|
|
|
extern HINSTANCE hInst;
|
|
int PASCAL WinMain(HINSTANCE hInstance, HINSTANCE hPrevInstance, PSTR szCmdLine, int iCmdShow)
|
|
{
|
|
int longueur;
|
|
|
|
char path_buffer[_MAX_PATH], drive[_MAX_DRIVE] ,dir[_MAX_DIR];
|
|
char fname2[_MAX_FNAME],ext[_MAX_EXT], File[_MAX_PATH];
|
|
//MK: Unused 2003/08/31
|
|
//DWORD dwRead;
|
|
|
|
char * strp;
|
|
|
|
// START FIX - STATMAT - 22/01/02
|
|
/* REMOVED
|
|
int nofile;
|
|
REMOVED */
|
|
|
|
char *endquote_pos = NULL;
|
|
// END FIX - STATMAT - 22/01/02
|
|
|
|
char ExtA[4][512];
|
|
int charptr,strptr,strcharptr,dquotes;
|
|
int i,j;
|
|
|
|
hInst=hInstance;
|
|
|
|
ImportDirectX();
|
|
|
|
// Commandline: /ABCDE <nickname> <fname> <IP Addy>
|
|
// nickname = user nickname
|
|
// fname = filename w/ full path (if L) or path name (if C)
|
|
// <IP Addy> = IP Address (Client Only)
|
|
// A = U (UDP - Recommended if works), T (TCP/IP)
|
|
// B = S (Server), C (Client)
|
|
// C = C (Chat first), L (load game first)
|
|
// D = N (Stay in ZSNESw after disconnect), Q (Quit after disconnect)
|
|
// E = # of connections (Keep it 2 for now)
|
|
// eg: ZSNESW /UCCN2 nickname d:\snesroms 202.36.124.28
|
|
|
|
strptr=0;
|
|
charptr=0;
|
|
|
|
while (szCmdLine[charptr]!=0){
|
|
while (szCmdLine[charptr]==' ') charptr++;
|
|
dquotes=0;
|
|
if (szCmdLine[charptr]=='"'){
|
|
dquotes=1;
|
|
charptr++;
|
|
}
|
|
strcharptr=0;
|
|
while (((szCmdLine[charptr]!=' ') || (dquotes)) && (szCmdLine[charptr]!=0)) {
|
|
if (szCmdLine[charptr]=='"'){
|
|
dquotes=0;
|
|
} else {
|
|
if (strptr<4){
|
|
ExtA[strptr][strcharptr]=szCmdLine[charptr];
|
|
if (strcharptr<511)
|
|
strcharptr++;
|
|
}
|
|
}
|
|
charptr++;
|
|
}
|
|
ExtA[strptr][strcharptr]=0;
|
|
if (strcharptr) strptr++;
|
|
charptr++;
|
|
}
|
|
|
|
NetServer=0;
|
|
NetChatFirst=0;
|
|
NetQuitAfter=0;
|
|
//nofile=0;
|
|
if ((strptr>2) && (ExtA[0][0]=='/') && (strlen(ExtA[0])>=5)){
|
|
//nofile=1;
|
|
if (ucase(ExtA[0][1])=='T') UDPConfig=0;
|
|
if (ucase(ExtA[0][2])=='S') NetServer=1;
|
|
if (ucase(ExtA[0][2])=='C') NetServer=2;
|
|
if (ucase(ExtA[0][3])=='C') NetChatFirst=0;
|
|
if (ucase(ExtA[0][3])=='L') NetChatFirst=1;
|
|
if (ucase(ExtA[0][4])=='N') NetQuitAfter=0;
|
|
if (ucase(ExtA[0][4])=='Q') NetQuitAfter=1;
|
|
strp=&NetNewNick;
|
|
i=0; j=0;
|
|
while (ExtA[1][i]!=0){
|
|
switch (ExtA[1][i]){
|
|
case '_':
|
|
case '-':
|
|
case '^':
|
|
case '=':
|
|
case '+':
|
|
case '[':
|
|
case ']':
|
|
if (j<10){
|
|
strp[j]=ExtA[1][i];
|
|
j++;
|
|
}
|
|
break;
|
|
default:
|
|
if (((ucase(ExtA[1][i])>='A') && (ucase(ExtA[1][i])<='Z'))
|
|
|| ((ExtA[1][i]>='0') && (ExtA[1][i]<='9'))){
|
|
if (j<10){
|
|
strp[j]=ExtA[1][i];
|
|
j++;
|
|
}
|
|
}
|
|
break;
|
|
}
|
|
i++;
|
|
}
|
|
strp[j]=0;
|
|
strp=&NetFilename;
|
|
strncpy(strp,ExtA[2],512);
|
|
strp[511]=0;
|
|
if (NetServer==2){
|
|
if (strptr<4) {
|
|
NetServer=0;
|
|
} else {
|
|
CmdLineNetPlay = 1;
|
|
strp=&CmdLineTCPIPAddress;
|
|
strncpy(strp,ExtA[3],28);
|
|
}
|
|
}
|
|
}
|
|
|
|
GetModuleFileName(NULL,path_buffer,sizeof(path_buffer));
|
|
_splitpath( path_buffer, drive, dir, fname2, ext );
|
|
_chdrive(drive[0]-'A'+1);
|
|
chdir(dir+1);
|
|
|
|
argc=0;
|
|
|
|
longueur=strlen(szCmdLine);
|
|
|
|
// START FIX - STATMAT - 22/01/02
|
|
//if((longueur!=0) && (!nofile))
|
|
if(longueur != 0)
|
|
{
|
|
argv = (char **) calloc(1, sizeof(char *));
|
|
argv[0] = (char *) calloc(1, strlen(fname2) + strlen(ext) + 1);
|
|
sprintf(argv[0], "%s%s\0", fname2, ext);
|
|
strp = strtok(szCmdLine, " ");
|
|
argc = 1;
|
|
|
|
while(strp)
|
|
{
|
|
argv = (char **) realloc(argv, (argc + 1) * sizeof(char *));
|
|
|
|
// The parameter is in quotes ("")
|
|
if(*strp == '"')
|
|
{
|
|
// Skip the opening quote
|
|
strp++;
|
|
|
|
endquote_pos = strchr(strp, '"');
|
|
|
|
// There were no spaces in between the quotes
|
|
// so we know strptr contains the entire string
|
|
if(endquote_pos)
|
|
{
|
|
// Get rid of the closing quote
|
|
*endquote_pos = '\0';
|
|
|
|
argv[argc] = (char *) calloc(1, strlen(strp) + 1);
|
|
strcpy(argv[argc], strp);
|
|
argc++;
|
|
}
|
|
// There are spaces inbetween the quotes
|
|
else
|
|
{
|
|
// Make sure it's not just a single quote
|
|
// on the end of the param string
|
|
if(strp + (strlen(strp) + 1) <= szCmdLine + longueur)
|
|
{
|
|
endquote_pos = strchr(strp + (strlen(strp) + 1), '"');
|
|
}
|
|
|
|
if(endquote_pos)
|
|
{
|
|
argv[argc] = (char *) calloc(1, (endquote_pos - strp) + 2);
|
|
strcpy(argv[argc], strp);
|
|
|
|
i = 0;
|
|
strp = strtok(NULL, " ");
|
|
|
|
while(strp)
|
|
{
|
|
// We've got another opening quote
|
|
// before a closing one?
|
|
if(*strp == '"')
|
|
{
|
|
strp++;
|
|
|
|
argv[argc] = (char *) realloc(argv[argc],
|
|
strlen(argv[argc]) + strlen(strp) + 2);
|
|
|
|
i = 1;
|
|
}
|
|
else if(strp[strlen(strp) - 1] == '"')
|
|
{
|
|
// Get rid of the closing quote
|
|
strp[strlen(strp) - 1] = '\0';
|
|
|
|
i = 1;
|
|
}
|
|
|
|
if(*strp)
|
|
{
|
|
strcat(argv[argc], " ");
|
|
strcat(argv[argc], strp);
|
|
}
|
|
|
|
if(i) break;
|
|
|
|
strp = strtok(NULL, " ");
|
|
}
|
|
|
|
argc++;
|
|
}
|
|
else
|
|
{
|
|
// Mangled parameter - don't use?
|
|
}
|
|
}
|
|
}
|
|
// Netplay parameters
|
|
else if(*strp == '/' && strlen(strp) >= 5)
|
|
{
|
|
i = j = strptr = 0;
|
|
|
|
do
|
|
{
|
|
strp++;
|
|
strptr++;
|
|
|
|
if(*strp == '"')
|
|
{
|
|
j = !j;
|
|
}
|
|
else if(*strp == ' ' && !j)
|
|
{
|
|
i++;
|
|
}
|
|
}
|
|
while(i < 3 && strp < szCmdLine + longueur);
|
|
|
|
// Just blank the params with spaces,
|
|
// as they are no longer needed
|
|
memset(strp - strptr, 32, strptr);
|
|
}
|
|
else
|
|
{
|
|
argv[argc] = (char *) calloc(1, strlen(strp) + 1);
|
|
strcpy(argv[argc], strp);
|
|
argc++;
|
|
}
|
|
|
|
// Remove any remaining quotes from the parameter
|
|
if(argv[argc - 1] && strchr(argv[argc - 1], '"'))
|
|
{
|
|
strptr = i = 0;
|
|
memset(File, 0, sizeof(File));
|
|
|
|
do
|
|
{
|
|
if(argv[argc - 1][strptr] != '"')
|
|
{
|
|
// Just hijack File string buffer
|
|
File[i] = argv[argc - 1][strptr];
|
|
i++;
|
|
}
|
|
|
|
strptr++;
|
|
}
|
|
while(argv[argc - 1][strptr]);
|
|
|
|
sprintf(argv[argc - 1], "%s\0", File);
|
|
}
|
|
|
|
strp = strtok(NULL, " ");
|
|
}
|
|
|
|
// Put one last null pointer onto the end of the argv array
|
|
argv = (char **) realloc(argv, (argc + 1) * sizeof(char *));
|
|
argv[argc] = NULL;
|
|
}
|
|
|
|
zstart();
|
|
|
|
if(argc)
|
|
{
|
|
// Free up our created argv array
|
|
// use argc + 1 to allow for our terminating null pointer
|
|
for(strptr = 0 ; strptr < (argc + 1) ; strptr++)
|
|
{
|
|
free(argv[strptr]);
|
|
}
|
|
|
|
free(argv);
|
|
}
|
|
// END FIX - STATMAT - 22/01/02
|
|
|
|
return(0);
|
|
}
|
|
|
|
int my_atoi(char *nptr)
|
|
{
|
|
int p,c;
|
|
c=0;
|
|
for(p=0;nptr[p];p++)
|
|
{
|
|
if( !isdigit(nptr[p]) ) c+=1;
|
|
}
|
|
if(c) return -1;
|
|
else return atoi(nptr);
|
|
|
|
}
|
|
|
|
void ccmdline(void)
|
|
{
|
|
int p=0;
|
|
p=pccmdline();
|
|
if(p == 0) return;
|
|
|
|
if(p == 9)
|
|
{
|
|
displayparams();
|
|
}
|
|
if(p == 4)
|
|
{
|
|
// printf("Mangled command line, did you forget a parm?\n");
|
|
printf("Invalid Commandline!\n");
|
|
DosExit();
|
|
}
|
|
|
|
if((p > 9) && (p < 17))
|
|
{
|
|
printf(ers[p-10]);
|
|
DosExit();
|
|
}
|
|
if(p == 2)
|
|
{
|
|
DosExit();
|
|
}
|
|
|
|
|
|
printf("cmdline returned %i\n",p);
|
|
DosExit();
|
|
|
|
}
|
|
|
|
int pccmdline(void)
|
|
{
|
|
int p;
|
|
int gfnm=0;
|
|
|
|
for(p=1;p<argc;p++)
|
|
{
|
|
/*
|
|
printf("(%i/%i): %s\n",p,argc,argv[p]);
|
|
*/
|
|
|
|
if(argv[p][0] == '-')
|
|
{
|
|
int hasroom=0;
|
|
int pp=1;
|
|
int cp=p;
|
|
int nn='_';
|
|
for(pp=1;argv[cp][pp];pp++)
|
|
{
|
|
if( (p+1) < argc) hasroom=1;
|
|
nn=tolower(argv[cp][pp+1]);
|
|
switch(tolower(argv[cp][pp]))
|
|
{
|
|
case '1': /* Player 1 Input */
|
|
{
|
|
if(!hasroom) return 4;
|
|
pl1contrl=my_atoi(argv[p+1]);
|
|
if(pl1contrl > 6) return 15;
|
|
p++;
|
|
ConvertJoyMap1();
|
|
break;
|
|
}
|
|
case '2': /* Player 2 Input */
|
|
{
|
|
if(!hasroom) return 4;
|
|
pl2contrl=my_atoi(argv[p+1]);
|
|
if(pl2contrl > 6) return 15;
|
|
p++;
|
|
ConvertJoyMap2();
|
|
break;
|
|
}
|
|
case 'f':
|
|
{
|
|
if(!hasroom) return 4;
|
|
frameskip=my_atoi(argv[p+1]);
|
|
if(frameskip > 9) return 10;
|
|
frameskip++;
|
|
p++;
|
|
break;
|
|
}
|
|
case 'g':
|
|
{
|
|
if(!hasroom) return 4;
|
|
gammalevel=my_atoi(argv[p+1]);
|
|
if(gammalevel > 5) return 11;
|
|
p++;
|
|
break;
|
|
}
|
|
case 'p':
|
|
{
|
|
if(!hasroom) return 4;
|
|
per2exec=my_atoi(argv[p+1]);
|
|
if(per2exec > 150) return 14;
|
|
if(per2exec < 50) return 14;
|
|
p++;
|
|
break;
|
|
}
|
|
case 'r':
|
|
{
|
|
if(!hasroom) return 4;
|
|
SoundQuality=my_atoi(argv[p+1]);
|
|
if(SoundQuality > 6) return 12;
|
|
p++;
|
|
break;
|
|
}
|
|
case 'v':
|
|
{
|
|
if(nn == '8')
|
|
{
|
|
V8Mode=1;
|
|
pp++;
|
|
}
|
|
else
|
|
{
|
|
if(!hasroom) return 4;
|
|
cvidmode=my_atoi(argv[p+1]);
|
|
if(cvidmode > 10) return 13;
|
|
p++;
|
|
}
|
|
break;
|
|
}
|
|
case 'k':
|
|
{
|
|
if(!hasroom) return 4;
|
|
MusicRelVol=my_atoi(argv[p+1]);
|
|
if(MusicRelVol > 100) return 16;
|
|
p++;
|
|
break;
|
|
}
|
|
case '8':
|
|
{
|
|
Force8b=1;
|
|
break;
|
|
}
|
|
case '0': /* Palette 0 disable */
|
|
{
|
|
Palette0=1;
|
|
break;
|
|
}
|
|
case '7': /* SPC700 speed hack disable */
|
|
{
|
|
SPC700sh=1;
|
|
break;
|
|
}
|
|
case '9': /* Off by 1 line */
|
|
{
|
|
OffBy1Line=1;
|
|
break;
|
|
}
|
|
case 'e':
|
|
{
|
|
enterpress=1;
|
|
break;
|
|
}
|
|
case 'h':
|
|
{
|
|
romtype=2;
|
|
break;
|
|
}
|
|
case 'l':
|
|
{
|
|
romtype=1;
|
|
break;
|
|
}
|
|
case 'm':
|
|
{
|
|
guioff=1; /* disables GUI */
|
|
break;
|
|
}
|
|
case 'n':
|
|
{
|
|
scanlines=1;
|
|
break;
|
|
}
|
|
case 's':
|
|
{
|
|
if(nn == 'p')
|
|
{
|
|
DisplayS=1;
|
|
pp++;
|
|
}
|
|
else
|
|
if(nn == 'a')
|
|
{
|
|
showallext=1;
|
|
pp++;
|
|
}
|
|
else
|
|
if(nn == 'n')
|
|
{
|
|
SnowOn=1;
|
|
pp++;
|
|
}
|
|
else
|
|
{
|
|
spcon=1;
|
|
soundon=1;
|
|
}
|
|
break;
|
|
}
|
|
case 't':
|
|
{
|
|
ForcePal=1;
|
|
break;
|
|
}
|
|
case 'u':
|
|
{
|
|
ForcePal=2;
|
|
break;
|
|
}
|
|
case 'w':
|
|
{
|
|
vsyncon=1;
|
|
break;
|
|
}
|
|
case 'z':
|
|
{
|
|
// FIX STATMAT
|
|
if(nn == 's')
|
|
{
|
|
if(!hasroom) return 4;
|
|
autoloadstate=my_atoi(argv[p+1]) + 1;
|
|
p++;
|
|
}
|
|
else StereoSound=0;
|
|
// FIX STATMAT
|
|
break;
|
|
}
|
|
case 'd':
|
|
{
|
|
if(nn == 'd')
|
|
{
|
|
DSPDisable=1;
|
|
pp++;
|
|
}
|
|
else
|
|
{
|
|
debugger=1;
|
|
debugdisble=0;
|
|
}
|
|
break;
|
|
}
|
|
case 'c':
|
|
{
|
|
if(nn == 'c')
|
|
{
|
|
smallscreenon=1;
|
|
pp++;
|
|
}
|
|
else
|
|
{
|
|
ScreenScale=1;
|
|
}
|
|
break;
|
|
}
|
|
case 'y':
|
|
{
|
|
antienab=1;
|
|
break;
|
|
}
|
|
case 'o':
|
|
{
|
|
if(nn == 'm')
|
|
{
|
|
MMXSupport=1;
|
|
pp++;
|
|
}
|
|
else
|
|
{
|
|
MMXSupport=0;
|
|
}
|
|
break;
|
|
}
|
|
case 'i':
|
|
{
|
|
finterleave=1;
|
|
break;
|
|
}
|
|
case 'j':
|
|
{
|
|
GUIClick=0;
|
|
MouseDis=1;
|
|
break;
|
|
}
|
|
case 'K':
|
|
{
|
|
KitchenSync=1;
|
|
break;
|
|
}
|
|
case '6':
|
|
{
|
|
Force60hz=1;
|
|
break;
|
|
}
|
|
case '?':
|
|
{
|
|
return 9;
|
|
}
|
|
}
|
|
|
|
}
|
|
|
|
}
|
|
else
|
|
{
|
|
if(gfnm > 0) // Quick fix to allow spaces, might produce strange names
|
|
// if there are unrecognized options
|
|
{
|
|
char *fvar, *fvar2;
|
|
fvar=&fname;
|
|
fvar2=&fname+fvar[0]+1;
|
|
if(fvar[0]+3>127) return(2);
|
|
fvar2[0]=' ';
|
|
strncpy(&fvar2[1],argv[p],127-fvar[0]-1);
|
|
fvar[0] += strlen(argv[p])+1;
|
|
gfnm++;
|
|
}
|
|
else
|
|
{
|
|
char *fvar;
|
|
fvar=&fname;
|
|
fvar[0] = strlen(argv[p]);
|
|
strncpy(&fvar[1],argv[p],127);
|
|
gfnm++;
|
|
}
|
|
}
|
|
}
|
|
if(gfnm > 0)
|
|
{
|
|
filefound=0;
|
|
makeextension();
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
|