/* * Exported functions of the Wine preprocessor * * Copyright 1998 Bertho A. Stultiens * Copyright 2002 Alexandre Julliard * * This library is free software; you can redistribute it and/or * modify it under the terms of the GNU Lesser General Public * License as published by the Free Software Foundation; either * version 2.1 of the License, or (at your option) any later version. * * This library is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU * Lesser General Public License for more details. * * You should have received a copy of the GNU Lesser General Public * License along with this library; if not, write to the Free Software * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA */ #include "config.h" #include "wine/port.h" #include <time.h> #include <stdlib.h> #include "wpp_private.h" #include "wine/wpp.h" int ppy_debug, pp_flex_debug; struct define { struct define *next; char *name; char *value; }; static struct define *cmdline_defines; static void add_cmdline_defines(void) { struct define *def; for (def = cmdline_defines; def; def = def->next) { if (def->value) pp_add_define( def->name, def->value ); } } static void add_special_defines(void) { time_t now = time(NULL); pp_entry_t *ppp; char buf[32]; strftime(buf, sizeof(buf), "\"%b %d %Y\"", localtime(&now)); pp_add_define( "__DATE__", buf ); strftime(buf, sizeof(buf), "\"%H:%M:%S\"", localtime(&now)); pp_add_define( "__TIME__", buf ); ppp = pp_add_define( "__FILE__", "" ); if(ppp) ppp->type = def_special; ppp = pp_add_define( "__LINE__", "" ); if(ppp) ppp->type = def_special; } /* add a define to the preprocessor list */ int wpp_add_define( const char *name, const char *value ) { struct define *def; if (!value) value = ""; for (def = cmdline_defines; def; def = def->next) { if (!strcmp( def->name, name )) { char *new_value = pp_xstrdup(value); if(!new_value) return 1; free( def->value ); def->value = new_value; return 0; } } def = pp_xmalloc( sizeof(*def) ); if(!def) return 1; def->next = cmdline_defines; def->name = pp_xstrdup(name); if(!def->name) { free(def); return 1; } def->value = pp_xstrdup(value); if(!def->value) { free(def->name); free(def); return 1; } cmdline_defines = def; return 0; } /* undefine a previously added definition */ void wpp_del_define( const char *name ) { struct define *def; for (def = cmdline_defines; def; def = def->next) { if (!strcmp( def->name, name )) { free( def->value ); def->value = NULL; return; } } } /* add a command-line define of the form NAME=VALUE */ int wpp_add_cmdline_define( const char *value ) { char *p; char *str = pp_xstrdup(value); if(!str) return 1; p = strchr( str, '=' ); if (p) *p++ = 0; wpp_add_define( str, p ); free( str ); return 0; } /* set the various debug flags */ void wpp_set_debug( int lex_debug, int parser_debug, int msg_debug ) { pp_flex_debug = lex_debug; ppy_debug = parser_debug; pp_status.debug = msg_debug; } /* set the pedantic mode */ void wpp_set_pedantic( int on ) { pp_status.pedantic = on; } /* the main preprocessor parsing loop */ int wpp_parse( const char *input, FILE *output ) { int ret; pp_status.input = NULL; pp_status.line_number = 1; pp_status.char_number = 1; pp_status.state = 0; ret = pp_push_define_state(); if(ret) return ret; add_cmdline_defines(); add_special_defines(); if (!input) pp_status.file = stdin; else if (!(pp_status.file = wpp_callbacks->open(input, 1))) { ppy_error("Could not open %s\n", input); pp_pop_define_state(); return 2; } pp_status.input = input; ppy_out = output; pp_writestring("# 1 \"%s\" 1\n", input ? input : ""); ret = ppy_parse(); /* If there were errors during processing, return an error code */ if (!ret && pp_status.state) ret = pp_status.state; if (input) wpp_callbacks->close(pp_status.file); /* Clean if_stack, it could remain dirty on errors */ while (pp_get_if_depth()) pp_pop_if(); pp_pop_define_state(); return ret; } void wpp_set_callbacks( const struct wpp_callbacks *callbacks ) { wpp_callbacks = callbacks; }