Ignore:
File:
1 edited

Legend:

Unmodified
Added
Removed
  • driver/cc1.cc

    rbbb1b35 r6dc19544  
    1010// Created On       : Fri Aug 26 14:23:51 2005
    1111// Last Modified By : Peter A. Buhr
    12 // Last Modified On : Fri Aug 23 15:06:27 2019
    13 // Update Count     : 371
     12// Last Modified On : Mon Sep  3 16:57:05 2018
     13// Update Count     : 125
    1414//
    1515
     
    1919#include <string>
    2020using std::string;
    21 #include <algorithm>                                                                    // find
    2221#include <cstdio>                                                                               // stderr, stdout, perror, fprintf
    2322#include <cstdlib>                                                                              // getenv, exit, mkstemp
    2423#include <unistd.h>                                                                             // execvp, fork, unlink
    2524#include <sys/wait.h>                                                                   // wait
    26 #include <fcntl.h>
    27 
    2825
    2926#include "config.h"                                                                             // configure info
     
    3330
    3431
    35 static string installlibdir( CFA_LIBDIR );                              // fixed location of cc1 and cfa-cpp commands when installed
    36 static string compiler_path( CFA_BACKEND_CC );                  // path/name of C compiler
    37 static bool CFA_flag = false;                                                   // -CFA flag
    38 static bool save_temps = false;                                                 // -save-temps flag
    39 static string o_file;
    40 
    41 
    42 static bool prefix( const string & arg, const string & pre ) {
     32string compiler_name( CFA_BACKEND_CC );                                 // path/name of C compiler
     33
     34string D__GCC_BPREFIX__( "-D__GCC_BPREFIX__=" );
     35string D__CFA_FLAGPREFIX__( "-D__CFA_FLAG__=" );
     36
     37char tmpname[] = P_tmpdir "/CFAXXXXXX";
     38int tmpfilefd = -1;
     39
     40
     41bool prefix( string arg, string pre ) {
    4342        return arg.substr( 0, pre.size() ) == pre;
    4443} // prefix
    4544
    46 static void suffix( const string & arg, const char * args[], int & nargs ) {
    47         enum { NumSuffixes = 3 };
    48         static const string suffixes[NumSuffixes] = { "cfa", "hfa", "ifa" };
    49 
     45enum { NumSuffixes = 2 };
     46const string suffixes[NumSuffixes] = { "cfa", "hfa", };
     47
     48void suffix( string arg, const char * args[], int & nargs ) {
     49        //std::cerr << arg << std::endl;
    5050        size_t dot = arg.find_last_of( "." );
     51        //std::cerr << dot << " " << (dot != string::npos ? arg.substr( dot + 1 ) : "fred" ) << std::endl;
    5152        if ( dot == string::npos ) return;
    52         const string * end = suffixes + NumSuffixes;
    53         if ( std::find( suffixes, end, arg.substr( dot + 1 ) ) != end ) {
    54                 args[nargs++] = "-x";
    55                 args[nargs++] = "c";
    56         } // if
     53        string sx = arg.substr( dot + 1 );
     54        for ( int i = 0; i < NumSuffixes; i += 1 ) {
     55                if ( sx == suffixes[i] ) {
     56                        args[nargs] = "-x";
     57                        nargs += 1;
     58                        args[nargs] = "c";
     59                        nargs += 1;
     60                        return;
     61                } // if
     62        } // for
    5763} // suffix
    5864
    5965
    60 static string __CFA_FLAGPREFIX__( "__CFA_FLAG" );
    61 
    62 static void checkEnv1( const char * args[], int & nargs ) { // stage 1
    63         extern char ** environ;
    64 
    65         for ( int i = 0; environ[i]; i += 1 ) {
    66                 string arg( environ[i] );
     66void checkEnv( const char * args[], int & nargs ) {
     67        char *value;
     68
     69        value = getenv( "__CFA_COMPILER__" );
     70        if ( value != NULL ) {
     71                compiler_name = value;
    6772                #ifdef __DEBUG_H__
    68                 cerr << "env arg:\"" << arg << "\"" << endl;
     73                cerr << "env arg:\"" << compiler_name << "\"" << endl;
    6974                #endif // __DEBUG_H__
    70 
    71                 if ( prefix( arg, __CFA_FLAGPREFIX__ ) ) {
    72                         string val( arg.substr( __CFA_FLAGPREFIX__.size() + 4 ) );
    73                         if ( prefix( val, "-compiler=" ) ) {
    74                                 compiler_path = val.substr( 10 );
    75                         } // if
    76                 } // if
    77         } // for
    78 } // checkEnv1
    79 
    80 
    81 static void checkEnv2( const char * args[], int & nargs ) { // stage 2
    82         extern char ** environ;
    83 
    84         for ( int i = 0; environ[i]; i += 1 ) {
    85                 string arg( environ[i] );
     75        } // if
     76
     77        value = getenv( "__GCC_MACHINE__" );
     78        if ( value != NULL ) {
     79                args[nargs] = ( *new string( value ) ).c_str(); // pass the argument along
    8680                #ifdef __DEBUG_H__
    87                 cerr << "env arg:\"" << arg << "\"" << endl;
     81                cerr << "env arg:\"" << args[nargs] << "\"" << endl;
    8882                #endif // __DEBUG_H__
    89 
    90                 if ( prefix( arg, __CFA_FLAGPREFIX__ ) ) {
    91                         string val( arg.substr( __CFA_FLAGPREFIX__.size() + 4 ) );
    92                         if ( prefix( val, "-compiler=" ) ) {
    93                                 compiler_path = val.substr( 10 );
    94                         } else if ( val == "-CFA" ) {
    95                                 CFA_flag = true;
    96                         } else if ( val == "-save-temps" ) {
    97                                 save_temps = true;
    98                         } else if ( prefix( val, "-o=" ) ) {            // output file for -CFA
    99                                 o_file = val.substr( 3 );
    100                         } else {
    101                                 args[nargs++] = ( *new string( arg.substr( __CFA_FLAGPREFIX__.size() + 4 ) ) ).c_str();
    102                         } // if
    103                 } // if
    104         } // for
    105 } // checkEnv2
    106 
    107 
    108 static char tmpname[] = P_tmpdir "/CFAXXXXXX.i";
    109 static int tmpfilefd = -1;
    110 static bool startrm = false;
    111 
    112 static void rmtmpfile() {
    113         if ( tmpfilefd == -1 ) return;                                          // RACE, file created ?
    114 
    115         startrm = true;                                                                         // RACE with C-c C-c
     83                nargs += 1;
     84        } // if
     85
     86        value = getenv( "__GCC_VERSION__" );
     87        if ( value != NULL ) {
     88                args[nargs] = ( *new string( value ) ).c_str(); // pass the argument along
     89                #ifdef __DEBUG_H__
     90                cerr << "env arg:\"" << args[nargs] << "\"" << endl;
     91                #endif // __DEBUG_H__
     92                nargs += 1;
     93        } // if
     94} // checkEnv
     95
     96
     97void rmtmpfile() {
    11698        if ( unlink( tmpname ) == -1 ) {                                        // remove tmpname
    117                 perror ( "CC1 Translator error: failed, unlink" );
    118                 exit( EXIT_FAILURE );
    119         } // if
    120         tmpfilefd = -1;                                                                         // mark removed
     99                perror ( "CFA Translator error: cpp failed" );
     100                exit( EXIT_FAILURE );
     101        } // if
     102        tmpfilefd = -1;                                                                         // mark closed
    121103} // rmtmpfile
    122104
    123105
    124 static void sigTermHandler( int ) {                                             // C-c C-c
    125         if ( startrm ) return;                                                          // return and let rmtmpfile finish, and then program finishes
    126 
     106void sigTermHandler( __attribute__((unused)) int signal ) {
    127107        if ( tmpfilefd != -1 ) {                                                        // RACE, file created ?
    128                 rmtmpfile();                                                                    // remove tmpname
    129         } // if
    130         exit( EXIT_FAILURE );                                                           // terminate
     108                rmtmpfile();                                                                    // remove
     109                exit( EXIT_FAILURE );                                                   // terminate
     110        } // if
    131111} // sigTermHandler
    132112
    133113
    134 static void Stage1( const int argc, const char * const argv[] ) {
     114void Stage1( const int argc, const char * const argv[] ) {
    135115        int code;
     116
    136117        string arg;
    137 
    138         const char * cpp_in = nullptr;
    139         const char * cpp_out = nullptr;
    140 
     118        string bprefix;
     119
     120        const char *cpp_in = NULL;
     121        const char *cpp_out = NULL;
     122
     123        bool CFA_flag = false;
    141124        bool cpp_flag = false;
    142         bool o_flag = false;
    143 
    144         const char * args[argc + 100];                                          // leave space for 100 additional cpp command line values
     125        const char *o_name = NULL;
     126
     127        const char *args[argc + 100];                                           // leave space for 100 additional cpp command line values
    145128        int nargs = 1;                                                                          // number of arguments in args list; 0 => command name
     129        const char *cargs[20];                                                          // leave space for 20 additional cfa-cpp command line values
     130        int ncargs = 1;                                                                         // 0 => command name
     131
     132        signal( SIGINT,  sigTermHandler );
     133        signal( SIGTERM, sigTermHandler );
    146134
    147135        #ifdef __DEBUG_H__
    148136        cerr << "Stage1" << endl;
    149137        #endif // __DEBUG_H__
    150         checkEnv1( args, nargs );                                                       // arguments passed via environment variables
     138        checkEnv( args, nargs );                                                        // arguments passed via environment variables
    151139        #ifdef __DEBUG_H__
    152140        for ( int i = 1; i < argc; i += 1 ) {
     
    180168                                i += 1;                                                                 // and the argument
    181169                                cpp_flag = true;
    182 
    183                                 // all other flags
     170                        } else if ( arg == "-D__CFA_PREPROCESS__" ) {
     171                                CFA_flag = true;
     172                        } else if ( arg == "-D" && string( argv[i + 1] ) == "__CFA_PREPROCESS__" ) {
     173                                i += 1;                                                                 // and the argument
     174                                CFA_flag = true;
     175                        } else if ( prefix( arg, D__CFA_FLAGPREFIX__ ) ) {
     176                                cargs[ncargs] = ( *new string( arg.substr( D__CFA_FLAGPREFIX__.size() ) ) ).c_str();
     177                                ncargs += 1;
     178                        } else if ( arg == "-D" && prefix( argv[i + 1], D__CFA_FLAGPREFIX__.substr(2) ) ) {
     179                                cargs[ncargs] = ( *new string( string( argv[i + 1] ).substr( D__CFA_FLAGPREFIX__.size() - 2 ) ) ).c_str();
     180                                ncargs += 1;
     181                                i += 1;                                                                 // and the argument
     182                        } else if ( prefix( arg, D__GCC_BPREFIX__ ) ) {
     183                                bprefix = arg.substr( D__GCC_BPREFIX__.size() );
     184                        } else if ( arg == "-D" && prefix( argv[i + 1], D__GCC_BPREFIX__.substr(2) ) ) {
     185                                bprefix = string( argv[i + 1] ).substr( D__GCC_BPREFIX__.size() - 2 );
     186                                i += 1;                                                                 // and the argument
     187
     188                        // all other flags
    184189
    185190                        } else if ( arg == "-o" ) {
    186191                                i += 1;
    187                                 o_flag = true;
    188                                 cpp_out = argv[i];
     192                                o_name = argv[i];
    189193                        } else {
    190                                 args[nargs++] = argv[i];                                // pass the flag along
     194                                args[nargs] = argv[i];                                  // pass the flag along
     195                                nargs += 1;
    191196                                // CPP flags with an argument
    192197                                if ( arg == "-D" || arg == "-U" || arg == "-I" || arg == "-MF" || arg == "-MT" || arg == "-MQ" ||
     
    194199                                         arg == "-iwithprefix" || arg == "-iwithprefixbefore" || arg == "-isystem" || arg == "-isysroot" ) {
    195200                                        i += 1;
    196                                         args[nargs++] = argv[i];                        // pass the argument along
     201                                        args[nargs] = argv[i];                          // pass the argument along
     202                                        nargs += 1;
    197203                                        #ifdef __DEBUG_H__
    198204                                        cerr << "argv[" << i << "]:\"" << argv[i] << "\"" << endl;
    199205                                        #endif // __DEBUG_H__
    200206                                } else if ( arg == "-MD" || arg == "-MMD" ) {
    201                                         args[nargs++] = "-MF";                          // insert before file
     207                                        args[nargs] = "-MF";                            // insert before file
     208                                        nargs += 1;
    202209                                        i += 1;
    203                                         args[nargs++] = argv[i];                        // pass the argument along
     210                                        args[nargs] = argv[i];                          // pass the argument along
     211                                        nargs += 1;
    204212                                        #ifdef __DEBUG_H__
    205213                                        cerr << "argv[" << i << "]:\"" << argv[i] << "\"" << endl;
     
    208216                        } // if
    209217                } else {                                                                                // obtain input and possibly output files
    210                         if ( cpp_in == nullptr ) {
     218                        if ( cpp_in == NULL ) {
    211219                                cpp_in = argv[i];
    212220                                #ifdef __DEBUG_H__
    213221                                cerr << "cpp_in:\"" << cpp_in << "\"" << endl;
    214222                                #endif // __DEBUG_H__
    215                         } else if ( cpp_out == nullptr ) {
     223                        } else if ( cpp_out == NULL ) {
    216224                                cpp_out = argv[i];
    217225                                #ifdef __DEBUG_H__
     
    230238                cerr << " " << args[i];
    231239        } // for
    232         if ( cpp_in != nullptr ) cerr << " " << cpp_in;
    233         if ( cpp_out != nullptr ) cerr << " " << cpp_out;
     240        if ( cpp_in != NULL ) cerr << " " << cpp_in;
     241        if ( cpp_out != NULL ) cerr << " " << cpp_out;
    234242        cerr << endl;
    235243        #endif // __DEBUG_H__
    236244
    237         if ( cpp_in == nullptr ) {
     245        if ( cpp_in == NULL ) {
    238246                cerr << "Usage: " << argv[0] << " input-file [output-file] [options]" << endl;
    239247                exit( EXIT_FAILURE );
     
    244252                // output or -o. The call to cfa has a -E so it does not have to be added to the argument list.
    245253
    246                 args[0] = compiler_path.c_str();
     254                args[0] = compiler_name.c_str();
    247255                suffix( cpp_in, args, nargs );                                  // check suffix
    248                 args[nargs++] = cpp_in;
    249                 if ( o_flag ) {                                                                 // location for output
    250                         args[nargs++] = "-o";
     256                args[nargs] = cpp_in;
     257                nargs += 1;
     258                if ( o_name != NULL ) {                                                 // location for output
     259                        args[nargs] = "-o";
     260                        nargs += 1;
     261                        args[nargs] = o_name;
     262                        nargs += 1;
    251263                } // if
    252                 args[nargs++] = cpp_out;
    253                 args[nargs] = nullptr;                                                  // terminate argument list
     264                args[nargs] = NULL;                                                             // terminate argument list
    254265
    255266                #ifdef __DEBUG_H__
    256267                cerr << "nargs: " << nargs << endl;
    257                 for ( int i = 0; args[i] != nullptr; i += 1 ) {
     268                for ( int i = 0; args[i] != NULL; i += 1 ) {
    258269                        cerr << args[i] << " ";
    259270                } // for
     
    261272                #endif // __DEBUG_H__
    262273
    263                 execvp( args[0], (char * const *)args );                // should not return
    264                 perror( "CC1 Translator error: stage 1, execvp" );
    265                 exit( EXIT_FAILURE );
    266         } // if
    267 
    268         // Run the C preprocessor and save the output in the given file.
     274                execvp( args[0], (char *const *)args );                 // should not return
     275                perror( "CFA Translator error: cpp level, execvp" );
     276                exit( EXIT_FAILURE );
     277        } // if
     278
     279        // Create a temporary file to store output of the C preprocessor.
     280
     281        tmpfilefd = mkstemp( tmpname );
     282        if ( tmpfilefd == -1 ) {
     283                perror( "CFA Translator error: cpp level, mkstemp" );
     284                exit( EXIT_FAILURE );
     285        } // if
     286
     287        #ifdef __DEBUG_H__
     288        cerr << "tmpname:" << tmpname << " tmpfilefd:" << tmpfilefd << endl;
     289        #endif // __DEBUG_H__
     290
     291        // Run the C preprocessor and save the output in tmpfile.
    269292
    270293        if ( fork() == 0 ) {                                                             // child process ?
     
    272295                // an error (e.g., cannot find include file). Whereas, output is always generated, even when there is an error,
    273296                // when cpp writes to stdout. Hence, stdout is redirected into the temporary file.
    274                 if ( freopen( cpp_out, "w", stdout ) == nullptr ) { // redirect stdout to output file
    275                         perror( "CC1 Translator error: stage 1, freopen" );
     297                if ( freopen( tmpname, "w", stdout ) == NULL ) { // redirect stdout to tmpname
     298                        perror( "CFA Translator error: cpp level, freopen" );
    276299                        exit( EXIT_FAILURE );
    277300                } // if
    278301
    279                 args[0] = compiler_path.c_str();
     302                args[0] = compiler_name.c_str();
    280303                suffix( cpp_in, args, nargs );                                  // check suffix
    281                 args[nargs++] = cpp_in;                                                 // input to cpp
    282                 args[nargs] = nullptr;                                                  // terminate argument list
     304                args[nargs] = cpp_in;                                                   // input to cpp
     305                nargs += 1;
     306                args[nargs] = NULL;                                                             // terminate argument list
    283307
    284308                #ifdef __DEBUG_H__
    285309                cerr << "cpp nargs: " << nargs << endl;
    286                 for ( int i = 0; args[i] != nullptr; i += 1 ) {
     310                for ( int i = 0; args[i] != NULL; i += 1 ) {
    287311                        cerr << args[i] << " ";
    288312                } // for
     
    290314                #endif // __DEBUG_H__
    291315
    292                 execvp( args[0], (char * const *)args );                // should not return
    293                 perror( "CC1 Translator error: stage 1, execvp" );
     316                execvp( args[0], (char *const *)args );                 // should not return
     317                perror( "CFA Translator error: cpp level, execvp" );
    294318                exit( EXIT_FAILURE );
    295319        } // if
     
    301325        #endif // __DEBUG_H__
    302326
     327        if ( WIFSIGNALED(code) != 0 ) {                                         // child failed ?
     328                rmtmpfile();                                                                    // remove tmpname
     329                cerr << "CFA Translator error: cpp failed with signal " << WTERMSIG(code) << endl;
     330                exit( EXIT_FAILURE );
     331        } // if
     332
     333        if ( WEXITSTATUS(code) != 0 ) {                                         // child error ?
     334                rmtmpfile();                                                                    // remove tmpname
     335                exit( WEXITSTATUS( code ) );                                    // do not continue
     336        } // if
     337
     338        // If -CFA flag specified, run the cfa-cpp preprocessor on the temporary file, and output is written to standard
     339        // output.  Otherwise, run the cfa-cpp preprocessor on the temporary file and save the result into the output file.
     340
     341        if ( fork() == 0 ) {                                                            // child runs CFA
     342                cargs[0] = ( *new string( bprefix + "cfa-cpp" ) ).c_str();
     343
     344                // Source file-name used to generate routine names containing global initializations for TU.
     345                cargs[ncargs] = ( *new string( "-F" ) ).c_str();
     346                ncargs += 1;
     347                cargs[ncargs] = ( *new string( string( cpp_in ) ) ).c_str();
     348                ncargs += 1;
     349
     350                cargs[ncargs] = tmpname;
     351                ncargs += 1;
     352                if ( o_name != NULL ) {
     353                        cargs[ncargs] = o_name;
     354                        ncargs += 1;
     355                } else if ( ! CFA_flag ) {                                              // run cfa-cpp ?
     356                        cargs[ncargs] = cpp_out;
     357                        ncargs += 1;
     358                } // if
     359                cargs[ncargs] = NULL;                                                   // terminate argument list
     360
     361                #ifdef __DEBUG_H__
     362                cerr << "cfa-cpp ncargs: " << (o_name ? o_name : "No -o") << " " << CFA_flag << " " << ncargs << endl;
     363                for ( int i = 0; cargs[i] != NULL; i += 1 ) {
     364                        cerr << cargs[i] << " ";
     365                } // for
     366                cerr << endl;
     367                #endif // __DEBUG_H__
     368
     369                execvp( cargs[0], (char * const *)cargs );              // should not return
     370                perror( "CFA Translator error: cpp level, execvp" );
     371                exit( EXIT_FAILURE );
     372        } // if
     373
     374        wait( &code );                                                                          // wait for child to finish
     375
     376        #ifdef __DEBUG_H__
     377        cerr << "return code from cfa-cpp:" << WEXITSTATUS(code) << endl;
     378        #endif // __DEBUG_H__
     379
     380        // Must unlink here because file must exist across execvp.
     381        rmtmpfile();                                                                            // remove tmpname
     382
    303383        if ( WIFSIGNALED(code) ) {                                                      // child failed ?
    304                 cerr << "CC1 Translator error: stage 1, child failed " << WTERMSIG(code) << endl;
    305                 exit( EXIT_FAILURE );
    306         } // if
    307 
    308         exit( WEXITSTATUS(code) );                                                      // bad cpp result stops top-level gcc
     384                cerr << "CFA Translator error: cfa-cpp failed with signal " << WTERMSIG(code) << endl;
     385                exit( EXIT_FAILURE );
     386        } // if
     387
     388        exit( WEXITSTATUS(code) );
    309389} // Stage1
    310390
    311391
    312 static void Stage2( const int argc, const char * const * argv ) {
    313         int code;
     392void Stage2( const int argc, const char * const * argv ) {
    314393        string arg;
    315394
    316         const char * cpp_in = nullptr;
    317         const char * cpp_out = nullptr;
    318 
    319         const char * args[argc + 100];                                          // leave space for 100 additional cfa command line values
     395        const char *cpp_in = NULL;
     396
     397        const char *args[argc + 100];                                           // leave space for 100 additional cfa command line values
    320398        int nargs = 1;                                                                          // number of arguments in args list; 0 => command name
    321         const char * cargs[20];                                                         // leave space for 20 additional cfa-cpp command line values
    322         int ncargs = 1;                                                                         // 0 => command name
    323399
    324400        #ifdef __DEBUG_H__
    325401        cerr << "Stage2" << endl;
    326402        #endif // __DEBUG_H__
    327         checkEnv2( cargs, ncargs );                                                     // arguments passed via environment variables
     403        checkEnv( args, nargs );                                                        // arguments passed via environment variables
    328404        #ifdef __DEBUG_H__
    329405        for ( int i = 1; i < argc; i += 1 ) {
     
    354430
    355431                        } else {
    356                                 args[nargs++] = argv[i];                                // pass the flag along
     432                                args[nargs] = argv[i];                                  // pass the flag along
     433                                nargs += 1;
    357434                                if ( arg == "-o" ) {
    358435                                        i += 1;
    359                                         cpp_out = argv[i];
    360                                         args[nargs++] = argv[i];                        // pass the argument along
     436                                        args[nargs] = argv[i];                          // pass the argument along
     437                                        nargs += 1;
    361438                                        #ifdef __DEBUG_H__
    362439                                        cerr << "arg:\"" << argv[i] << "\"" << endl;
     
    365442                        } // if
    366443                } else {                                                                                // obtain input and possibly output files
    367                         if ( cpp_in == nullptr ) {
     444                        if ( cpp_in == NULL ) {
    368445                                cpp_in = argv[i];
    369446                                #ifdef __DEBUG_H__
    370447                                cerr << "cpp_in:\"" << cpp_in << "\"" << endl;
    371448                                #endif // __DEBUG_H__
    372                         } else if ( cpp_out == nullptr ) {
    373                                 cpp_out = argv[i];
    374                                 #ifdef __DEBUG_H__
    375                                 cerr << "cpp_out:\"" << cpp_out << "\""<< endl;
    376                                 #endif // __DEBUG_H__
    377449                        } else {
    378                                 cerr << "Usage: " << argv[0] << " more than two files specified" << endl;
     450                                cerr << "Usage: " << argv[0] << " input-file [output-file] [options]" << endl;
    379451                                exit( EXIT_FAILURE );
    380452                        } // if
     
    382454        } // for
    383455
    384         if ( cpp_in == nullptr ) {
    385                 cerr << "Usage: " << argv[0] << " missing input file" << endl;
    386                 exit( EXIT_FAILURE );
    387         } // if
    388         if ( cpp_out == nullptr ) {
    389                 cerr << "Usage: " << argv[0] << " missing output file" << endl;
    390                 exit( EXIT_FAILURE );
    391         } // if
    392 
    393         // Create a temporary file, if needed, to store output of the cfa-cpp preprocessor. Cannot be created in forked
    394         // process because variables tmpname and tmpfilefd are cloned.
    395 
    396         string cfa_cpp_out;
    397 
    398         if ( ! CFA_flag ) {                                                                     // run compiler ?
    399                 if ( save_temps ) {
    400                         cfa_cpp_out = cpp_in;
    401                         size_t dot = cfa_cpp_out.find_last_of( "." );
    402                         if ( dot == string::npos ) {
    403                                 cerr << "CC1 Translator error: stage 2, bad file name " << endl;
    404                                 exit( EXIT_FAILURE );
    405                         } // if
    406 
    407                         cfa_cpp_out = cfa_cpp_out.substr( 0, dot ) + ".ifa";
    408                         if ( creat( cfa_cpp_out.c_str(), 0666 ) == -1 ) {
    409                                 perror( "CC1 Translator error: stage 2, creat" );
    410                                 exit( EXIT_FAILURE );
    411                         } // if
    412                 } else {
    413                         tmpfilefd = mkstemps( tmpname, 2 );
    414                         if ( tmpfilefd == -1 ) {
    415                                 perror( "CC1 Translator error: stage 2, mkstemp" );
    416                                 exit( EXIT_FAILURE );
    417                         } // if
    418                         cfa_cpp_out = tmpname;
    419                 } // if
    420                 #ifdef __DEBUG_H__
    421                 cerr << "cfa_cpp_out: " << cfa_cpp_out << endl;
    422                 #endif // __DEBUG_H__
    423         } // if
    424 
    425         // If -CFA flag specified, run the cfa-cpp preprocessor on the temporary file, and output is written to standard
    426         // output.  Otherwise, run the cfa-cpp preprocessor on the temporary file and save the result into the output file.
    427 
    428         if ( fork() == 0 ) {                                                            // child runs CFA
    429                 cargs[0] = ( *new string( installlibdir + "cfa-cpp" ) ).c_str();
    430 
    431                 cargs[ncargs++] = cpp_in;
    432 
    433                 if ( CFA_flag ) {                                                               // run cfa-cpp ?
    434                         if ( o_file.size() != 0 ) {                                     // location for output
    435                                 cargs[ncargs++] = ( *new string( o_file.c_str() ) ).c_str();
    436                         } // if
    437                 } else {
    438                         cargs[ncargs++] = cfa_cpp_out.c_str();
    439                 } // if
    440                 cargs[ncargs] = nullptr;                                                        // terminate argument list
    441 
    442                 #ifdef __DEBUG_H__
    443                 for ( int i = 0; cargs[i] != nullptr; i += 1 ) {
    444                         cerr << cargs[i] << " ";
    445                 } // for
    446                 cerr << endl;
    447                 #endif // __DEBUG_H__
    448 
    449                 execvp( cargs[0], (char * const *)cargs );              // should not return
    450                 perror( "CC1 Translator error: stage 2, execvp" );
    451                 exit( EXIT_FAILURE );
    452         } // if
    453 
    454         wait( &code );                                                                          // wait for child to finish
    455 
    456         if ( WIFSIGNALED(code) ) {                                                      // child failed ?
    457                 rmtmpfile();                                                                    // remove tmpname
    458                 cerr << "CC1 Translator error: stage 2, child failed " << WTERMSIG(code) << endl;
    459                 exit( EXIT_FAILURE );
    460         } // if
    461 
    462         if ( CFA_flag ) {                                                                       // no tmpfile created
    463                 exit( WEXITSTATUS( code ) );                                    // stop regardless of success or failure
    464         } // if
    465 
    466         #ifdef __DEBUG_H__
    467         cerr << "return code from cfa-cpp:" << WEXITSTATUS(code) << endl;
    468         #endif // __DEBUG_H__
    469 
    470         if ( WEXITSTATUS(code) ) {                                                      // child error ?
    471                 rmtmpfile();                                                                    // remove tmpname
    472                 exit( WEXITSTATUS( code ) );                                    // do not continue
    473         } // if
    474 
    475456        #ifdef __DEBUG_H__
    476457        cerr << "args:";
     
    478459                cerr << " " << args[i];
    479460        } // for
    480         cerr << " " << cpp_in << endl;
    481         #endif // __DEBUG_H__
    482 
    483         if ( fork() == 0 ) {                                                            // child runs CFA
    484                 args[0] = compiler_path.c_str();
    485                 args[nargs++] = "-S";                                                   // only compile and put assembler output in specified file
    486                 if ( save_temps ) {                                                             // make gcc accept .ifa suffix
    487                         args[nargs++] = "-x";
    488                         args[nargs++] = "cpp-output";
    489                 } // if
    490                 args[nargs++] = cfa_cpp_out.c_str();
    491                 args[nargs] = nullptr;                                                  // terminate argument list
    492 
    493                 #ifdef __DEBUG_H__
    494                 cerr << "stage2 nargs: " << nargs << endl;
    495                 for ( int i = 0; args[i] != nullptr; i += 1 ) {
    496                         cerr << args[i] << " ";
    497                 } // for
    498                 cerr << endl;
    499                 #endif // __DEBUG_H__
    500 
    501                 execvp( args[0], (char * const *)args );                // should not return
    502                 perror( "CC1 Translator error: stage 2, execvp" );
    503                 exit( EXIT_FAILURE );                                                   // tell gcc not to go any further
    504         } // if
    505 
    506         wait( &code );                                                                          // wait for child to finish
    507 
    508         if ( WIFSIGNALED(code) ) {                                                      // child failed ?
    509                 rmtmpfile();                                                                    // remove tmpname
    510                 cerr << "CC1 Translator error: stage 2, child failed " << WTERMSIG(code) << endl;
    511                 exit( EXIT_FAILURE );
    512         } // if
    513 
    514         #ifdef __DEBUG_H__
    515         cerr << "return code from gcc cc1:" << WEXITSTATUS(code) << endl;
    516         #endif // __DEBUG_H__
    517 
    518         rmtmpfile();                                                                            // remove tmpname
    519         exit( WEXITSTATUS( code ) );                                            // stop regardless of success or failure
     461        cerr << endl;
     462        if ( cpp_in != NULL ) cerr << " " << cpp_in;
     463        #endif // __DEBUG_H__
     464
     465        args[0] = compiler_name.c_str();
     466        args[nargs] = "-S";                                                                     // only compile and put assembler output in specified file
     467        nargs += 1;
     468        args[nargs] = cpp_in;
     469        nargs += 1;
     470        args[nargs] = NULL;                                                                     // terminate argument list
     471
     472        #ifdef __DEBUG_H__
     473        cerr << "stage2 nargs: " << nargs << endl;
     474        for ( int i = 0; args[i] != NULL; i += 1 ) {
     475                cerr << args[i] << " ";
     476        } // for
     477        cerr << endl;
     478        #endif // __DEBUG_H__
     479
     480        execvp( args[0], (char * const *)args );                        // should not return
     481        perror( "CFA Translator error: cpp level, execvp" );
     482        exit( EXIT_FAILURE );                                                           // tell gcc not to go any further
    520483} // Stage2
    521484
    522485
    523 // This program is called twice because of the -no-integrated-cpp. The calls are differentiated by the first
    524 // command-line argument. The first call replaces the traditional cpp pass to preprocess the C program. The second call
    525 // is to the compiler, which is broken into two steps: preprocess again with cfa-cpp and then call gcc to compile the
    526 // doubly preprocessed program.
    527 
    528486int main( const int argc, const char * const argv[], __attribute__((unused)) const char * const env[] ) {
    529487        #ifdef __DEBUG_H__
    530         for ( int i = 0; env[i] != nullptr; i += 1 ) {
     488        for ( int i = 0; env[i] != NULL; i += 1 ) {
    531489                cerr << env[i] << endl;
    532490        } // for
    533491        #endif // __DEBUG_H__
    534492
    535         signal( SIGINT,  sigTermHandler );
    536         signal( SIGTERM, sigTermHandler );
    537 
    538         string arg( argv[1] );
     493        string arg = argv[1];
    539494
    540495        // Currently, stage 1 starts with flag -E and stage 2 with flag -fpreprocessed.
Note: See TracChangeset for help on using the changeset viewer.