Ignore:
File:
1 edited

Legend:

Unmodified
Added
Removed
  • driver/cc1.cc

    r7c8246d r6dc19544  
    1010// Created On       : Fri Aug 26 14:23:51 2005
    1111// Last Modified By : Peter A. Buhr
    12 // Last Modified On : Fri Aug 30 15:36:42 2019
    13 // Update Count     : 377
     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 compiler_path( CFA_BACKEND_CC );                  // C compiler path/name
    36 static bool CFA_flag = false;                                                   // -CFA flag
    37 static bool save_temps = false;                                                 // -save-temps flag
    38 static string o_file;
    39 static string bprefix;
    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 if ( prefix( val, "-B=" ) ) {            // location of cfa-cpp
    101                                 bprefix = val.substr( 3 );
    102                         } else {                                                                        // normal flag for cfa-cpp
    103                                 args[nargs++] = ( *new string( arg.substr( __CFA_FLAGPREFIX__.size() + 4 ) ) ).c_str();
    104                         } // if
    105                 } // if
    106         } // for
    107 } // checkEnv2
    108 
    109 
    110 static char tmpname[] = P_tmpdir "/CFAXXXXXX.i";
    111 static int tmpfilefd = -1;
    112 static bool startrm = false;
    113 
    114 static void rmtmpfile() {
    115         if ( tmpfilefd == -1 ) return;                                          // RACE, file created ?
    116 
    117         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() {
    11898        if ( unlink( tmpname ) == -1 ) {                                        // remove tmpname
    119                 perror ( "CC1 Translator error: failed, unlink" );
    120                 exit( EXIT_FAILURE );
    121         } // if
    122         tmpfilefd = -1;                                                                         // mark removed
     99                perror ( "CFA Translator error: cpp failed" );
     100                exit( EXIT_FAILURE );
     101        } // if
     102        tmpfilefd = -1;                                                                         // mark closed
    123103} // rmtmpfile
    124104
    125105
    126 static void sigTermHandler( int ) {                                             // C-c C-c
    127         if ( startrm ) return;                                                          // return and let rmtmpfile finish, and then program finishes
    128 
     106void sigTermHandler( __attribute__((unused)) int signal ) {
    129107        if ( tmpfilefd != -1 ) {                                                        // RACE, file created ?
    130                 rmtmpfile();                                                                    // remove tmpname
    131         } // if
    132         exit( EXIT_FAILURE );                                                           // terminate
     108                rmtmpfile();                                                                    // remove
     109                exit( EXIT_FAILURE );                                                   // terminate
     110        } // if
    133111} // sigTermHandler
    134112
    135113
    136 static void Stage1( const int argc, const char * const argv[] ) {
     114void Stage1( const int argc, const char * const argv[] ) {
    137115        int code;
     116
    138117        string arg;
    139 
    140         const char * cpp_in = nullptr;
    141         const char * cpp_out = nullptr;
    142 
     118        string bprefix;
     119
     120        const char *cpp_in = NULL;
     121        const char *cpp_out = NULL;
     122
     123        bool CFA_flag = false;
    143124        bool cpp_flag = false;
    144         bool o_flag = false;
    145 
    146         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
    147128        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 );
    148134
    149135        #ifdef __DEBUG_H__
    150136        cerr << "Stage1" << endl;
    151137        #endif // __DEBUG_H__
    152         checkEnv1( args, nargs );                                                       // arguments passed via environment variables
     138        checkEnv( args, nargs );                                                        // arguments passed via environment variables
    153139        #ifdef __DEBUG_H__
    154140        for ( int i = 1; i < argc; i += 1 ) {
     
    182168                                i += 1;                                                                 // and the argument
    183169                                cpp_flag = true;
    184 
    185                                 // 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
    186189
    187190                        } else if ( arg == "-o" ) {
    188191                                i += 1;
    189                                 o_flag = true;
    190                                 cpp_out = argv[i];
     192                                o_name = argv[i];
    191193                        } else {
    192                                 args[nargs++] = argv[i];                                // pass the flag along
     194                                args[nargs] = argv[i];                                  // pass the flag along
     195                                nargs += 1;
    193196                                // CPP flags with an argument
    194197                                if ( arg == "-D" || arg == "-U" || arg == "-I" || arg == "-MF" || arg == "-MT" || arg == "-MQ" ||
     
    196199                                         arg == "-iwithprefix" || arg == "-iwithprefixbefore" || arg == "-isystem" || arg == "-isysroot" ) {
    197200                                        i += 1;
    198                                         args[nargs++] = argv[i];                        // pass the argument along
     201                                        args[nargs] = argv[i];                          // pass the argument along
     202                                        nargs += 1;
    199203                                        #ifdef __DEBUG_H__
    200204                                        cerr << "argv[" << i << "]:\"" << argv[i] << "\"" << endl;
    201205                                        #endif // __DEBUG_H__
    202206                                } else if ( arg == "-MD" || arg == "-MMD" ) {
    203                                         args[nargs++] = "-MF";                          // insert before file
     207                                        args[nargs] = "-MF";                            // insert before file
     208                                        nargs += 1;
    204209                                        i += 1;
    205                                         args[nargs++] = argv[i];                        // pass the argument along
     210                                        args[nargs] = argv[i];                          // pass the argument along
     211                                        nargs += 1;
    206212                                        #ifdef __DEBUG_H__
    207213                                        cerr << "argv[" << i << "]:\"" << argv[i] << "\"" << endl;
     
    210216                        } // if
    211217                } else {                                                                                // obtain input and possibly output files
    212                         if ( cpp_in == nullptr ) {
     218                        if ( cpp_in == NULL ) {
    213219                                cpp_in = argv[i];
    214220                                #ifdef __DEBUG_H__
    215221                                cerr << "cpp_in:\"" << cpp_in << "\"" << endl;
    216222                                #endif // __DEBUG_H__
    217                         } else if ( cpp_out == nullptr ) {
     223                        } else if ( cpp_out == NULL ) {
    218224                                cpp_out = argv[i];
    219225                                #ifdef __DEBUG_H__
     
    232238                cerr << " " << args[i];
    233239        } // for
    234         if ( cpp_in != nullptr ) cerr << " " << cpp_in;
    235         if ( cpp_out != nullptr ) cerr << " " << cpp_out;
     240        if ( cpp_in != NULL ) cerr << " " << cpp_in;
     241        if ( cpp_out != NULL ) cerr << " " << cpp_out;
    236242        cerr << endl;
    237243        #endif // __DEBUG_H__
    238244
    239         if ( cpp_in == nullptr ) {
     245        if ( cpp_in == NULL ) {
    240246                cerr << "Usage: " << argv[0] << " input-file [output-file] [options]" << endl;
    241247                exit( EXIT_FAILURE );
     
    246252                // output or -o. The call to cfa has a -E so it does not have to be added to the argument list.
    247253
    248                 args[0] = compiler_path.c_str();
     254                args[0] = compiler_name.c_str();
    249255                suffix( cpp_in, args, nargs );                                  // check suffix
    250                 args[nargs++] = cpp_in;
    251                 if ( o_flag ) {                                                                 // location for output
    252                         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;
    253263                } // if
    254                 args[nargs++] = cpp_out;
    255                 args[nargs] = nullptr;                                                  // terminate argument list
     264                args[nargs] = NULL;                                                             // terminate argument list
    256265
    257266                #ifdef __DEBUG_H__
    258267                cerr << "nargs: " << nargs << endl;
    259                 for ( int i = 0; args[i] != nullptr; i += 1 ) {
     268                for ( int i = 0; args[i] != NULL; i += 1 ) {
    260269                        cerr << args[i] << " ";
    261270                } // for
     
    263272                #endif // __DEBUG_H__
    264273
    265                 execvp( args[0], (char * const *)args );                // should not return
    266                 perror( "CC1 Translator error: stage 1, execvp" );
    267                 exit( EXIT_FAILURE );
    268         } // if
    269 
    270         // 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.
    271292
    272293        if ( fork() == 0 ) {                                                             // child process ?
     
    274295                // an error (e.g., cannot find include file). Whereas, output is always generated, even when there is an error,
    275296                // when cpp writes to stdout. Hence, stdout is redirected into the temporary file.
    276                 if ( freopen( cpp_out, "w", stdout ) == nullptr ) { // redirect stdout to output file
    277                         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" );
    278299                        exit( EXIT_FAILURE );
    279300                } // if
    280301
    281                 args[0] = compiler_path.c_str();
     302                args[0] = compiler_name.c_str();
    282303                suffix( cpp_in, args, nargs );                                  // check suffix
    283                 args[nargs++] = cpp_in;                                                 // input to cpp
    284                 args[nargs] = nullptr;                                                  // terminate argument list
     304                args[nargs] = cpp_in;                                                   // input to cpp
     305                nargs += 1;
     306                args[nargs] = NULL;                                                             // terminate argument list
    285307
    286308                #ifdef __DEBUG_H__
    287309                cerr << "cpp nargs: " << nargs << endl;
    288                 for ( int i = 0; args[i] != nullptr; i += 1 ) {
     310                for ( int i = 0; args[i] != NULL; i += 1 ) {
    289311                        cerr << args[i] << " ";
    290312                } // for
     
    292314                #endif // __DEBUG_H__
    293315
    294                 execvp( args[0], (char * const *)args );                // should not return
    295                 perror( "CC1 Translator error: stage 1 cpp, execvp" );
    296                 cerr << " invoked " << args[0] << endl;
     316                execvp( args[0], (char *const *)args );                 // should not return
     317                perror( "CFA Translator error: cpp level, execvp" );
    297318                exit( EXIT_FAILURE );
    298319        } // if
     
    304325        #endif // __DEBUG_H__
    305326
     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
    306383        if ( WIFSIGNALED(code) ) {                                                      // child failed ?
    307                 cerr << "CC1 Translator error: stage 1, child failed " << WTERMSIG(code) << endl;
    308                 exit( EXIT_FAILURE );
    309         } // if
    310 
    311         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) );
    312389} // Stage1
    313390
    314391
    315 static void Stage2( const int argc, const char * const * argv ) {
    316         int code;
     392void Stage2( const int argc, const char * const * argv ) {
    317393        string arg;
    318394
    319         const char * cpp_in = nullptr;
    320         const char * cpp_out = nullptr;
    321 
    322         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
    323398        int nargs = 1;                                                                          // number of arguments in args list; 0 => command name
    324         const char * cargs[20];                                                         // leave space for 20 additional cfa-cpp command line values
    325         int ncargs = 1;                                                                         // 0 => command name
    326399
    327400        #ifdef __DEBUG_H__
    328401        cerr << "Stage2" << endl;
    329402        #endif // __DEBUG_H__
    330         checkEnv2( cargs, ncargs );                                                     // arguments passed via environment variables
     403        checkEnv( args, nargs );                                                        // arguments passed via environment variables
    331404        #ifdef __DEBUG_H__
    332405        for ( int i = 1; i < argc; i += 1 ) {
     
    357430
    358431                        } else {
    359                                 args[nargs++] = argv[i];                                // pass the flag along
     432                                args[nargs] = argv[i];                                  // pass the flag along
     433                                nargs += 1;
    360434                                if ( arg == "-o" ) {
    361435                                        i += 1;
    362                                         cpp_out = argv[i];
    363                                         args[nargs++] = argv[i];                        // pass the argument along
     436                                        args[nargs] = argv[i];                          // pass the argument along
     437                                        nargs += 1;
    364438                                        #ifdef __DEBUG_H__
    365439                                        cerr << "arg:\"" << argv[i] << "\"" << endl;
     
    368442                        } // if
    369443                } else {                                                                                // obtain input and possibly output files
    370                         if ( cpp_in == nullptr ) {
     444                        if ( cpp_in == NULL ) {
    371445                                cpp_in = argv[i];
    372446                                #ifdef __DEBUG_H__
    373447                                cerr << "cpp_in:\"" << cpp_in << "\"" << endl;
    374448                                #endif // __DEBUG_H__
    375                         } else if ( cpp_out == nullptr ) {
    376                                 cpp_out = argv[i];
    377                                 #ifdef __DEBUG_H__
    378                                 cerr << "cpp_out:\"" << cpp_out << "\""<< endl;
    379                                 #endif // __DEBUG_H__
    380449                        } else {
    381                                 cerr << "Usage: " << argv[0] << " more than two files specified" << endl;
     450                                cerr << "Usage: " << argv[0] << " input-file [output-file] [options]" << endl;
    382451                                exit( EXIT_FAILURE );
    383452                        } // if
     
    385454        } // for
    386455
    387         if ( cpp_in == nullptr ) {
    388                 cerr << "Usage: " << argv[0] << " missing input file" << endl;
    389                 exit( EXIT_FAILURE );
    390         } // if
    391         if ( cpp_out == nullptr ) {
    392                 cerr << "Usage: " << argv[0] << " missing output file" << endl;
    393                 exit( EXIT_FAILURE );
    394         } // if
    395 
    396         // Create a temporary file, if needed, to store output of the cfa-cpp preprocessor. Cannot be created in forked
    397         // process because variables tmpname and tmpfilefd are cloned.
    398 
    399         string cfa_cpp_out;
    400 
    401         if ( ! CFA_flag ) {                                                                     // run compiler ?
    402                 if ( save_temps ) {
    403                         cfa_cpp_out = cpp_in;
    404                         size_t dot = cfa_cpp_out.find_last_of( "." );
    405                         if ( dot == string::npos ) {
    406                                 cerr << "CC1 Translator error: stage 2, bad file name " << endl;
    407                                 exit( EXIT_FAILURE );
    408                         } // if
    409 
    410                         cfa_cpp_out = cfa_cpp_out.substr( 0, dot ) + ".ifa";
    411                         if ( creat( cfa_cpp_out.c_str(), 0666 ) == -1 ) {
    412                                 perror( "CC1 Translator error: stage 2, creat" );
    413                                 exit( EXIT_FAILURE );
    414                         } // if
    415                 } else {
    416                         tmpfilefd = mkstemps( tmpname, 2 );
    417                         if ( tmpfilefd == -1 ) {
    418                                 perror( "CC1 Translator error: stage 2, mkstemp" );
    419                                 exit( EXIT_FAILURE );
    420                         } // if
    421                         cfa_cpp_out = tmpname;
    422                 } // if
    423                 #ifdef __DEBUG_H__
    424                 cerr << "cfa_cpp_out: " << cfa_cpp_out << endl;
    425                 #endif // __DEBUG_H__
    426         } // if
    427 
    428         // If -CFA flag specified, run the cfa-cpp preprocessor on the temporary file, and output is written to standard
    429         // output.  Otherwise, run the cfa-cpp preprocessor on the temporary file and save the result into the output file.
    430 
    431         if ( fork() == 0 ) {                                                            // child runs CFA
    432                 cargs[0] = ( *new string( bprefix + "cfa-cpp" ) ).c_str();
    433                 cargs[ncargs++] = cpp_in;
    434 
    435                 if ( CFA_flag ) {                                                               // run cfa-cpp ?
    436                         if ( o_file.size() != 0 ) {                                     // location for output
    437                                 cargs[ncargs++] = ( *new string( o_file.c_str() ) ).c_str();
    438                         } // if
    439                 } else {
    440                         cargs[ncargs++] = cfa_cpp_out.c_str();
    441                 } // if
    442                 cargs[ncargs] = nullptr;                                                // terminate argument list
    443 
    444                 #ifdef __DEBUG_H__
    445                 for ( int i = 0; cargs[i] != nullptr; i += 1 ) {
    446                         cerr << cargs[i] << " ";
    447                 } // for
    448                 cerr << endl;
    449                 #endif // __DEBUG_H__
    450 
    451                 execvp( cargs[0], (char * const *)cargs );              // should not return
    452                 perror( "CC1 Translator error: stage 2 cfa-cpp, execvp" );
    453                 cerr << " invoked " << cargs[0] << endl;
    454                 exit( EXIT_FAILURE );
    455         } // if
    456 
    457         wait( &code );                                                                          // wait for child to finish
    458 
    459         if ( WIFSIGNALED(code) ) {                                                      // child failed ?
    460                 rmtmpfile();                                                                    // remove tmpname
    461                 cerr << "CC1 Translator error: stage 2, child failed " << WTERMSIG(code) << endl;
    462                 exit( EXIT_FAILURE );
    463         } // if
    464 
    465         if ( CFA_flag ) {                                                                       // no tmpfile created
    466                 exit( WEXITSTATUS( code ) );                                    // stop regardless of success or failure
    467         } // if
    468 
    469         #ifdef __DEBUG_H__
    470         cerr << "return code from cfa-cpp:" << WEXITSTATUS(code) << endl;
    471         #endif // __DEBUG_H__
    472 
    473         if ( WEXITSTATUS(code) ) {                                                      // child error ?
    474                 rmtmpfile();                                                                    // remove tmpname
    475                 exit( WEXITSTATUS( code ) );                                    // do not continue
    476         } // if
    477 
    478456        #ifdef __DEBUG_H__
    479457        cerr << "args:";
     
    481459                cerr << " " << args[i];
    482460        } // for
    483         cerr << " " << cpp_in << endl;
    484         #endif // __DEBUG_H__
    485 
    486         if ( fork() == 0 ) {                                                            // child runs CFA
    487                 args[0] = compiler_path.c_str();
    488                 args[nargs++] = "-S";                                                   // only compile and put assembler output in specified file
    489                 if ( save_temps ) {                                                             // make gcc accept .ifa suffix
    490                         args[nargs++] = "-x";
    491                         args[nargs++] = "cpp-output";
    492                 } // if
    493                 args[nargs++] = cfa_cpp_out.c_str();
    494                 args[nargs] = nullptr;                                                  // terminate argument list
    495 
    496                 #ifdef __DEBUG_H__
    497                 cerr << "stage2 nargs: " << nargs << endl;
    498                 for ( int i = 0; args[i] != nullptr; i += 1 ) {
    499                         cerr << args[i] << " ";
    500                 } // for
    501                 cerr << endl;
    502                 #endif // __DEBUG_H__
    503 
    504                 execvp( args[0], (char * const *)args );                // should not return
    505                 perror( "CC1 Translator error: stage 2 cc1, execvp" );
    506                 cerr << " invoked " << cargs[0] << endl;
    507                 exit( EXIT_FAILURE );                                                   // tell gcc not to go any further
    508         } // if
    509 
    510         wait( &code );                                                                          // wait for child to finish
    511 
    512         if ( WIFSIGNALED(code) ) {                                                      // child failed ?
    513                 rmtmpfile();                                                                    // remove tmpname
    514                 cerr << "CC1 Translator error: stage 2, child failed " << WTERMSIG(code) << endl;
    515                 exit( EXIT_FAILURE );
    516         } // if
    517 
    518         #ifdef __DEBUG_H__
    519         cerr << "return code from gcc cc1:" << WEXITSTATUS(code) << endl;
    520         #endif // __DEBUG_H__
    521 
    522         rmtmpfile();                                                                            // remove tmpname
    523         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
    524483} // Stage2
    525484
    526485
    527 // This program is called twice because of the -no-integrated-cpp. The calls are differentiated by the first
    528 // command-line argument. The first call replaces the traditional cpp pass to preprocess the C program. The second call
    529 // is to the compiler, which is broken into two steps: preprocess again with cfa-cpp and then call gcc to compile the
    530 // doubly preprocessed program.
    531 
    532486int main( const int argc, const char * const argv[], __attribute__((unused)) const char * const env[] ) {
    533487        #ifdef __DEBUG_H__
    534         for ( int i = 0; env[i] != nullptr; i += 1 ) {
     488        for ( int i = 0; env[i] != NULL; i += 1 ) {
    535489                cerr << env[i] << endl;
    536490        } // for
    537491        #endif // __DEBUG_H__
    538492
    539         signal( SIGINT,  sigTermHandler );
    540         signal( SIGTERM, sigTermHandler );
    541 
    542         string arg( argv[1] );
     493        string arg = argv[1];
    543494
    544495        // Currently, stage 1 starts with flag -E and stage 2 with flag -fpreprocessed.
Note: See TracChangeset for help on using the changeset viewer.