int main( int argc, char **argv )
/*******************************/
{
int rc;
#ifndef __WATCOMC__
_argc = argc;
_argv = argv;
#endif
if( argc <= 1 ) {
/* no arguments: just tell the user who I am */
puts( "Usage: owcc [-?] [options] file ..." );
exit( EXIT_SUCCESS );
}
errno = 0; /* Standard C does not require fopen failure to set errno */
if( (Fp = fopen( TEMPFILE, "w" )) == NULL ) {
/* Message before banner decision as '@' option uses Fp in Parse() */
PrintMsg( WclMsgs[UNABLE_TO_OPEN_TEMPORARY_FILE], TEMPFILE,
strerror( errno ) );
exit( EXIT_FAILURE );
}
MemInit();
ProcMemInit();
/* destruct the temp. linker script in case of -? or parse errors */
atexit( ExitHandler );
rc = Parse( argc, argv );
if( rc == 0 ) {
if( !Flags.be_quiet ) {
print_banner();
}
rc = CompLink();
}
if( rc == 1 ) {
fclose( Fp );
Fp = NULL;
}
if( Link_Name != NULL ) {
if( strfcmp( Link_Name, TEMPFILE ) != 0 ) {
remove( Link_Name );
rename( TEMPFILE, Link_Name );
}
} else {
remove( TEMPFILE );
}
ProcMemFini();
MemFini();
return( rc == 0 ? 0 : 1 );
}
int main( int argc, char *argv[] ) {
//======================================
int rc;
char *wfl_env;
char *p;
char *q;
char *cmd;
/* unused parameters */ (void)argc;
__InitResource();
__ErrorInit( argv[0] );
CmpOpts[0] = NULL;
SwitchChars[0] = '-';
SwitchChars[1] = _dos_switch_char();
SwitchChars[2] = '\0';
Word = MemAlloc( MAX_CMD );
cmd = MemAlloc( 2*MAX_CMD ); // for "WFL" environment variable and command line
// add "WFL" environment variable to "cmd" unless "/y" is specified
// in "cmd" or the "WFL" environment string
wfl_env = getenv( WFLENV );
if( wfl_env != NULL ) {
strcpy( cmd, wfl_env );
strcat( cmd, " " );
p = cmd + strlen( cmd );
getcmd( p );
for( q = cmd; (q = strpbrk( q, SwitchChars )) != NULL; ) {
if( tolower( *(++q) ) == 'y' ) {
getcmd( cmd );
p = cmd;
break;
}
}
} else {
getcmd( cmd );
p = cmd;
}
p = SkipSpaces( p );
if( ( *p == '\0' ) || ( strncmp( p, "? ", 2 ) == 0 ) ) {
Usage();
rc = 1;
} else {
Fp = fopen( TEMPFILE, "w" );
if( Fp == NULL ) {
PrintMsg( CL_ERROR_OPENING_TMP_FILE );
rc = 1;
} else {
ObjName = NULL;
rc = Parse( argc, argv );
if( rc == 0 ) {
if( !Flags.quiet ) {
PrtBanner();
}
rc = CompLink();
}
if( rc == 1 )
fclose( Fp );
if( LinkName != NULL ) {
if( stricmp( LinkName, TEMPFILE ) != 0 ) {
remove( LinkName );
rename( TEMPFILE, LinkName );
}
} else {
remove( TEMPFILE );
}
}
}
free( Word );
free( cmd );
wfl_exit( rc == 0 ? 0 : 1 );
return( 0 );
}
int main( int argc, char **argv )
/********************************/
{
int rc;
char *wcl_env;
char *p;
char *q;
char *Cmd; /* command line parameters */
#ifndef __WATCOMC__
_argc = argc;
_argv = argv;
#endif
CC_Opts[0] = '\0';
Switch_Chars[0] = '-';
Switch_Chars[1] = _dos_switch_char();
Switch_Chars[2] = '\0';
MemInit();
ProcMemInit();
Word = MemAlloc( MAX_CMD );
Cmd = MemAlloc( MAX_CMD * 2 ); /* enough for cmd line & wcl variable */
/* add wcl environment variable to Cmd */
/* unless /y is specified in either Cmd or wcl */
wcl_env = getenv( WCLENV );
if( wcl_env != NULL ) {
strcpy( Cmd, wcl_env );
strcat( Cmd, " " );
p = Cmd + strlen( Cmd );
getcmd( p );
q = Cmd;
while( (q = strpbrk( q, Switch_Chars )) != NULL ) {
if( tolower( *(++q) ) == 'y' ) {
getcmd( Cmd );
p = Cmd;
break;
}
}
} else {
getcmd( Cmd );
p = Cmd;
}
p = SkipSpaces( p );
if( *p == '\0' || p[0] == '?' && ( p[1] == '\0' || p[1] == ' ' )
|| p[0] == '-' && p[1] == '?' ) {
Usage();
rc = 1;
} else {
errno = 0; /* Standard C does not require fopen failure to set errno */
if( (Fp = fopen( TEMPFILE, "w" )) == NULL ) {
/* Message before banner decision as '@' option uses Fp in Parse() */
PrintMsg( WclMsgs[UNABLE_TO_OPEN_TEMPORARY_FILE], TEMPFILE,
strerror( errno ) );
rc = 1;
} else {
initialize_Flags();
rc = Parse( Cmd );
if( rc == 0 ) {
if( !Flags.be_quiet ) {
print_banner();
}
rc = CompLink();
}
if( rc == 1 ) {
fclose( Fp );
}
if( Link_Name != NULL ) {
if( fname_cmp( Link_Name, TEMPFILE ) != 0 ) {
remove( Link_Name );
rename( TEMPFILE, Link_Name );
}
} else {
remove( TEMPFILE );
}
}
}
ProcMemFini();
MemFree( Cmd );
MemFree( Word );
MemFini();
return( rc == 0 ? 0 : 1 );
}
