Ignore:
Timestamp:
Apr 19, 2000, 4:46:07 PM (25 years ago)
Author:
sandervl
Message:

update with latest wine code

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/tools/wrc/preproc.c

    r904 r3426  
    1616
    1717
    18 extern void set_pp_ignore(int); /* From parser.l */
     18extern void set_pp_ignore(int); /* From parser.l */
    1919
    2020static char *current_define;
    2121
    22 #define HASHKEY     2039
     22#define HASHKEY         2039
    2323static struct pp_entry *pp_defines[HASHKEY];
    2424
    25 #define MAXIFSTACK  64
     25#define MAXIFSTACK      64
    2626static struct if_state ifstack[MAXIFSTACK];
    2727static int ifstackidx = 0;
    … …  
    3030void pp_status(void)
    3131{
    32     int i;
    33     int sum;
    34     int total = 0;
    35     struct pp_entry *ppp;
    36 
    37     printf("Defines statistics:\n");
    38     for(i = 0; i < HASHKEY; i++)
    39     {
    40         sum = 0;
    41         for(ppp = pp_defines[i]; ppp; ppp = ppp->next)
    42             sum++;
    43         total += sum;
    44         printf("%4d, %3d\n", i, sum);
    45     }
    46     printf("Total defines: %d\n", total);
     32        int i;
     33        int sum;
     34        int total = 0;
     35        struct pp_entry *ppp;
     36
     37        printf("Defines statistics:\n");
     38        for(i = 0; i < HASHKEY; i++)
     39        {
     40                sum = 0;
     41                for(ppp = pp_defines[i]; ppp; ppp = ppp->next)
     42                        sum++;
     43                total += sum;
     44                printf("%4d, %3d\n", i, sum);
     45        }
     46        printf("Total defines: %d\n", total);
    4747}
    4848#pragma exit pp_status
    … …  
    5252int pp_hash(char *str)
    5353{
    54     int sum = 0;
    55     while(*str)
    56         sum += *str++;
    57     return sum % HASHKEY;
     54        int sum = 0;
     55        while(*str)
     56                sum += *str++;
     57        return sum % HASHKEY;
    5858}
    5959
    6060struct pp_entry *pp_lookup(char *ident)
    6161{
    62     int index = pp_hash(ident);
    63     struct pp_entry *ppp;
    64     for(ppp = pp_defines[index]; ppp; ppp = ppp->next)
    65     {
    66         if(!strcmp(ident, ppp->ident))
    67             return ppp;
    68     }
    69     return NULL;
     62        int index = pp_hash(ident);
     63        struct pp_entry *ppp;
     64        for(ppp = pp_defines[index]; ppp; ppp = ppp->next)
     65        {
     66                if(!strcmp(ident, ppp->ident))
     67                        return ppp;
     68        }
     69        return NULL;
    7070}
    7171
    7272void set_define(char *name)
    7373{
    74     current_define = xstrdup(name);
     74        current_define = xstrdup(name);
    7575}
    7676
    7777void del_define(char *name)
    7878{
    79     int index;
    80     struct pp_entry *ppp;
    81 
    82     if((ppp = pp_lookup(name)) == NULL)
    83     {
    84         if(pedantic)
    85             yywarning("%s was not defined", name);
    86         return;
    87     }
    88 
    89     index = pp_hash(name);
    90     if(pp_defines[index] == ppp)
    91     {
    92         pp_defines[index] = ppp->next;
    93         if(pp_defines[index])
    94             pp_defines[index]->prev = NULL;
    95     }
    96     else
    97     {
    98         ppp->prev->next = ppp->next;
    99         if(ppp->next)
    100             ppp->next->prev = ppp->prev;
    101     }
    102     free(ppp);
     79        int index;
     80        struct pp_entry *ppp;
     81
     82        if((ppp = pp_lookup(name)) == NULL)
     83        {
     84                if(pedantic)
     85                        yywarning("%s was not defined", name);
     86                return;
     87        }
     88
     89        index = pp_hash(name);
     90        if(pp_defines[index] == ppp)
     91        {
     92                pp_defines[index] = ppp->next;
     93                if(pp_defines[index])
     94                        pp_defines[index]->prev = NULL;
     95        }
     96        else
     97        {
     98                ppp->prev->next = ppp->next;
     99                if(ppp->next)
     100                        ppp->next->prev = ppp->prev;
     101        }
     102        free(ppp);
    103103}
    104104
    105105void add_define(char *text)
    106106{
    107     int len;
    108     char *cptr;
    109     int index = pp_hash(current_define);
    110     struct pp_entry *ppp;
    111     if(pp_lookup(current_define) != NULL)
    112     {
    113         if(pedantic)
    114             yywarning("Redefinition of %s", current_define);
    115         del_define(current_define);
    116     }
    117     ppp = (struct pp_entry *)xmalloc(sizeof(struct pp_entry));
    118     ppp->ident = current_define;
    119     ppp->subst = xstrdup(text);
    120     ppp->next = pp_defines[index];
    121     pp_defines[index] = ppp;
    122     if(ppp->next)
    123         ppp->next->prev = ppp;
    124     /* Strip trailing white space from subst text */
    125     len = strlen(ppp->subst);
    126     while(len && strchr(" \t\r\n", ppp->subst[len-1]))
    127     {
    128         ppp->subst[--len] = '\0';
    129     }
    130     /* Strip leading white space from subst text */
    131     for(cptr = ppp->subst; *cptr && strchr(" \t\r", *cptr); cptr++)
    132         ;
    133     if(ppp->subst != cptr)
    134         memmove(ppp->subst, cptr, strlen(cptr)+1);
    135     if(yydebug)
    136         printf("Added (%s, %d) <%s> to <%s>\n", input_name, line_number, ppp->ident, ppp->subst);
     107        int len;
     108        char *cptr;
     109        int index = pp_hash(current_define);
     110        struct pp_entry *ppp;
     111        if(pp_lookup(current_define) != NULL)
     112        {
     113                if(pedantic)
     114                        yywarning("Redefinition of %s", current_define);
     115                del_define(current_define);
     116        }
     117        ppp = (struct pp_entry *)xmalloc(sizeof(struct pp_entry));
     118        ppp->ident = current_define;
     119        ppp->subst = xstrdup(text);
     120        ppp->next = pp_defines[index];
     121        pp_defines[index] = ppp;
     122        if(ppp->next)
     123                ppp->next->prev = ppp;
     124        /* Strip trailing white space from subst text */
     125        len = strlen(ppp->subst);
     126        while(len && strchr(" \t\r\n", ppp->subst[len-1]))
     127        {
     128                ppp->subst[--len] = '\0';
     129        }
     130        /* Strip leading white space from subst text */
     131        for(cptr = ppp->subst; *cptr && strchr(" \t\r", *cptr); cptr++)
     132                ;
     133        if(ppp->subst != cptr)
     134                memmove(ppp->subst, cptr, strlen(cptr)+1);
     135        if(yydebug)
     136                printf("Added (%s, %d) <%s> to <%s>\n", input_name, line_number, ppp->ident, ppp->subst);
    137137}
    138138
    139139void add_cmdline_define(char *set)
    140140{
    141     char *cpy = xstrdup(set);   /* Because gcc passes a R/O string */
    142     char *cptr = strchr(cpy, '=');
    143     if(cptr)
    144         *cptr = '\0';
    145     set_define(cpy);
    146     add_define(cptr ? cptr+1 : "");
    147     free(cpy);
    148 }
    149 
    150 #if defined(_Windows) || defined(__MSDOS__) || defined(__WIN32OS2__)
    151 #define INCLUDESEPARATOR    ";"
     141        char *cpy = xstrdup(set);       /* Because gcc passes a R/O string */
     142        char *cptr = strchr(cpy, '=');
     143        if(cptr)
     144                *cptr = '\0';
     145        set_define(cpy);
     146        add_define(cptr ? cptr+1 : "");
     147        free(cpy);
     148}
     149
     150#if defined(_Windows) || defined(__MSDOS__)
     151#define INCLUDESEPARATOR        ";"
    152152#else
    153 #define INCLUDESEPARATOR    ":"
     153#define INCLUDESEPARATOR        ":"
    154154#endif
    155155
    … …  
    159159void add_include_path(char *path)
    160160{
    161     char *tok;
    162     char *cpy = xstrdup(path);
    163 
    164     tok = strtok(cpy, INCLUDESEPARATOR);
    165     while(tok)
    166     {
    167         char *dir;
    168         char *cptr;
    169         if(strlen(tok) == 0)
    170             continue;
    171         dir = xstrdup(tok);
    172         for(cptr = dir; *cptr; cptr++)
    173         {
    174             /* Convert to forward slash */
    175             if(*cptr == '\\')
    176                 *cptr = '/';
    177         }
    178         /* Kill eventual trailing '/' */
    179         if(*(cptr = dir + strlen(dir)-1) == '/')
    180             *cptr = '\0';
    181 
    182         /* Add to list */
    183         nincludepath++;
    184         includepath = (char **)xrealloc(includepath, nincludepath * sizeof(*includepath));
    185         includepath[nincludepath-1] = dir;
    186         tok = strtok(NULL, INCLUDESEPARATOR);
    187     }
    188     free(cpy);
     161        char *tok;
     162        char *cpy = xstrdup(path);
     163
     164        tok = strtok(cpy, INCLUDESEPARATOR);
     165        while(tok)
     166        {
     167                char *dir;
     168                char *cptr;
     169                if(strlen(tok) == 0)
     170                        continue;
     171                dir = xstrdup(tok);
     172                for(cptr = dir; *cptr; cptr++)
     173                {
     174                        /* Convert to forward slash */
     175                        if(*cptr == '\\')
     176                                *cptr = '/';
     177                }
     178                /* Kill eventual trailing '/' */
     179                if(*(cptr = dir + strlen(dir)-1) == '/')
     180                        *cptr = '\0';
     181
     182                /* Add to list */
     183                nincludepath++;
     184                includepath = (char **)xrealloc(includepath, nincludepath * sizeof(*includepath));
     185                includepath[nincludepath-1] = dir;
     186                tok = strtok(NULL, INCLUDESEPARATOR);
     187        }
     188        free(cpy);
    189189}
    190190
    191191FILE *open_include(const char *name, int search)
    192192{
    193     char *cpy = xstrdup(name);
    194     char *cptr;
    195     FILE *fp;
    196     int i;
    197 
    198     for(cptr = cpy; *cptr; cptr++)
    199     {
    200         /* kill double backslash */
    201         if(*cptr == '\\' && *(cptr+1) == '\\')
    202             memmove(cptr, cptr+1, strlen(cptr));
    203         /* Convert to forward slash */
    204         if(*cptr == '\\')
    205             *cptr = '/';
    206     }
    207 
    208     if(search)
    209     {
    210         /* Search current dir and then -I path */
    211         fp = fopen(name, "rt");
    212         if(fp)
    213         {
    214             if(yydebug)
    215                 printf("Going to include <%s>\n", name);
    216             free(cpy);
    217             return fp;
    218         }
    219     }
    220     /* Search -I path */
    221     for(i = 0; i < nincludepath; i++)
    222     {
    223         char *path;
    224         path = (char *)xmalloc(strlen(includepath[i]) + strlen(cpy) + 2);
    225         strcpy(path, includepath[i]);
    226         strcat(path, "/");
    227         strcat(path, cpy);
    228         fp = fopen(path, "rt");
    229         if(fp && yydebug)
    230             printf("Going to include <%s>\n", path);
    231         free(path);
    232         if(fp)
    233         {
    234             free(cpy);
    235             return fp;
    236         }
    237 
    238     }
    239     free(cpy);
    240     return NULL;
     193        char *cpy = xstrdup(name);
     194        char *cptr;
     195        FILE *fp;
     196        int i;
     197
     198        for(cptr = cpy; *cptr; cptr++)
     199        {
     200                /* kill double backslash */
     201                if(*cptr == '\\' && *(cptr+1) == '\\')
     202                        memmove(cptr, cptr+1, strlen(cptr));
     203                /* Convert to forward slash */
     204                if(*cptr == '\\')
     205                        *cptr = '/';
     206        }
     207
     208        if(search)
     209        {
     210                /* Search current dir and then -I path */
     211                fp = fopen(name, "rt");
     212                if(fp)
     213                {
     214                        if(yydebug)
     215                                printf("Going to include <%s>\n", name);
     216                        free(cpy);
     217                        return fp;
     218                }
     219        }
     220        /* Search -I path */
     221        for(i = 0; i < nincludepath; i++)
     222        {
     223                char *path;
     224                path = (char *)xmalloc(strlen(includepath[i]) + strlen(cpy) + 2);
     225                strcpy(path, includepath[i]);
     226                strcat(path, "/");
     227                strcat(path, cpy);
     228                fp = fopen(path, "rt");
     229                if(fp && yydebug)
     230                        printf("Going to include <%s>\n", path);
     231                free(path);
     232                if(fp)
     233                {
     234                        free(cpy);
     235                        return fp;
     236                }
     237
     238        }
     239        free(cpy);
     240        return NULL;
    241241}
    242242
    243243void push_if(int truecase, int wastrue, int nevertrue)
    244244{
    245     if(ifstackidx >= MAXIFSTACK-1)
    246         internal_error(__FILE__, __LINE__, "#if stack overflow");
    247     ifstack[ifstackidx].current = truecase && !wastrue;
    248     ifstack[ifstackidx].hasbeentrue = wastrue;
    249     ifstack[ifstackidx].nevertrue = nevertrue;
    250     if(nevertrue || !(truecase && !wastrue))
    251         set_pp_ignore(1);
    252     if(yydebug)
    253         printf("push_if: %d %d %d (%d %d %d)\n",
    254             truecase,
    255             wastrue,
    256             nevertrue,
    257             ifstack[ifstackidx].current,
    258             ifstack[ifstackidx].hasbeentrue,
    259             ifstack[ifstackidx].nevertrue);
    260     ifstackidx++;
     245        if(ifstackidx >= MAXIFSTACK-1)
     246                internal_error(__FILE__, __LINE__, "#if stack overflow");
     247        ifstack[ifstackidx].current = truecase && !wastrue;
     248        ifstack[ifstackidx].hasbeentrue = wastrue;
     249        ifstack[ifstackidx].nevertrue = nevertrue;
     250        if(nevertrue || !(truecase && !wastrue))
     251                set_pp_ignore(1);
     252        if(yydebug)
     253                printf("push_if: %d %d %d (%d %d %d)\n",
     254                        truecase,
     255                        wastrue,
     256                        nevertrue,
     257                        ifstack[ifstackidx].current,
     258                        ifstack[ifstackidx].hasbeentrue,
     259                        ifstack[ifstackidx].nevertrue);
     260        ifstackidx++;
    261261}
    262262
    263263int pop_if(void)
    264264{
    265     if(ifstackidx <= 0)
    266         yyerror("#endif without #if|#ifdef|#ifndef (#if stack underflow)");
    267     ifstackidx--;
    268     if(yydebug)
    269         printf("pop_if: %d %d %d\n",
    270             ifstack[ifstackidx].current,
    271             ifstack[ifstackidx].hasbeentrue,
    272             ifstack[ifstackidx].nevertrue);
    273     if(ifstack[ifstackidx].nevertrue || !ifstack[ifstackidx].current)
    274         set_pp_ignore(0);
    275     return ifstack[ifstackidx].hasbeentrue || ifstack[ifstackidx].current;
     265        if(ifstackidx <= 0)
     266                yyerror("#endif without #if|#ifdef|#ifndef (#if stack underflow)");
     267        ifstackidx--;
     268        if(yydebug)
     269                printf("pop_if: %d %d %d\n",
     270                        ifstack[ifstackidx].current,
     271                        ifstack[ifstackidx].hasbeentrue,
     272                        ifstack[ifstackidx].nevertrue);
     273        if(ifstack[ifstackidx].nevertrue || !ifstack[ifstackidx].current)
     274                set_pp_ignore(0);
     275        return ifstack[ifstackidx].hasbeentrue || ifstack[ifstackidx].current;
    276276}
    277277
    278278int isnevertrue_if(void)
    279279{
    280     return ifstackidx > 0 && ifstack[ifstackidx-1].nevertrue;
    281 }
    282 
     280        return ifstackidx > 0 && ifstack[ifstackidx-1].nevertrue;
     281}
     282
Note: See TracChangeset for help on using the changeset viewer.