fix char_width decl

[m6w6/ext-psi] / src / parser.c

diff --git a/src/parser.c b/src/parser.c
index 91a47d8fe9390738030a71976b998ecffe60d3af..d133cfb475cd394bba4a3bf5953daa02ba4a57d7 100644 (file)
--- a/src/parser.c
+++ b/src/parser.c
@@ -32,6 +32,7 @@
 #include <assert.h>
 #include <errno.h>
 #include <stdarg.h>
+#include <time.h>
 
 #include <Zend/zend_smart_str.h>
 
@@ -101,6 +102,7 @@ struct psi_parser_input *psi_parser_open_file(struct psi_parser *P,
 
        memset(fb->buffer + sb.st_size, 0, psi_parser_maxfill());
 
+       fb->lmod = sb.st_mtime;
        fb->length = sb.st_size;
        fb->file = psi_string_init_interned(filename, strlen(filename), 1);
 
@@ -122,6 +124,7 @@ struct psi_parser_input *psi_parser_open_string(struct psi_parser *P,
        memcpy(sb->buffer, string, length);
        memset(sb->buffer + length, 0, psi_parser_maxfill());
 
+       sb->lmod = time(NULL);
        sb->length = length;
        sb->file = psi_string_init_interned("<stdin>", strlen("<stdin>"), 1);
 
@@ -131,7 +134,7 @@ struct psi_parser_input *psi_parser_open_string(struct psi_parser *P,
 struct psi_plist *psi_parser_preprocess(struct psi_parser *P,
                struct psi_plist **tokens)
 {
-       if (psi_cpp_process(P->preproc, tokens)) {
+       if (psi_cpp_process(P->preproc, tokens, NULL)) {
                return *tokens;
        }
        return NULL;
@@ -146,41 +149,45 @@ bool psi_parser_process(struct psi_parser *P, struct psi_plist *tokens,
        return true;
 }
 
+#if PSI_THREADED_PARSER
+static void psi_smart_str_printf(smart_str *ss, const char *fmt, ...)
+{
+       va_list argv;
+       char *buf;
+       int len;
+
+       va_start(argv, fmt);
+       len = vasprintf(&buf, fmt, argv);
+       va_end(argv);
+
+       if (len != -1) {
+               smart_str_appendl_ex(ss, buf, len, 1);
+               free(buf);
+       }
+}
+#else
+# define psi_smart_str_printf smart_str_append_printf
+#endif
+
 static inline zend_string *macro_to_constant(struct psi_parser *parser,
                zend_string *name, struct psi_validate_scope *scope)
 {
        smart_str str = {0};
-
        size_t i = 0;
        struct psi_token *tok;
-
-#if HAVE_ASPRINTF
+#if PSI_THREADED_PARSER
        int persistent = 1;
-
-       smart_str_appendl_ex(&str, ZEND_STRL("const psi\\"), 1);
-       smart_str_append_ex(&str, name, 1);
-       smart_str_appendl_ex(&str, ZEND_STRL(" = "), 1);
 #else
        int persistent = 0;
-
-       smart_str_append_printf(&str, "const psi\\%s = ", name->val);
 #endif
+
+       psi_smart_str_printf(&str, "const psi\\%s = ", name->val);
        if (scope->macro->exp) {
-#if HAVE_ASPRINTF
-               char *astr = NULL;
-               struct psi_dump dump = {{.hn = &astr},
-                               .fun = (psi_dump_cb) asprintf};
-#else
                struct psi_dump dump = {{.hn = &str},
-                               .fun = (psi_dump_cb) smart_str_append_printf};
-#endif
+                               .fun = (psi_dump_cb) psi_smart_str_printf};
 
                psi_num_exp_dump(&dump, scope->macro->exp);
 
-#if HAVE_ASPRINTF
-               smart_str_appends_ex(&str, astr, 1);
-               free(astr);
-#endif
        } else while (psi_plist_get(scope->macro->tokens, i++, &tok)) {
                if (tok->type == PSI_T_QUOTED_STRING) {
                        smart_str_appendc_ex(&str, '"', persistent);
@@ -234,7 +241,7 @@ void psi_parser_postprocess(struct psi_parser *P)
                if (!cnst) {
                        continue;
                }
-//fprintf(stderr, "PARSE: %s", ZSTR_VAL(cnst));
+
                I = psi_parser_open_string(P, ZSTR_VAL(cnst), ZSTR_LEN(cnst));
                zend_string_release(cnst);
 
@@ -266,16 +273,21 @@ bool psi_parser_parse(struct psi_parser *P, struct psi_parser_input *I)
        struct psi_plist *scanned, *preproc;
        size_t processed = 0;
 
+       P->input = I;
+
        if (!(scanned = psi_parser_scan(P, I))) {
+               P->input = NULL;
                return false;
        }
 
        if (!(preproc = psi_parser_preprocess(P, &scanned))) {
+               P->input = NULL;
                psi_plist_free(scanned);
                return false;
        }
 
        if (!psi_parser_process(P, preproc, &processed)) {
+               P->input = NULL;
                psi_plist_free(preproc);
                return false;
        }
@@ -283,6 +295,7 @@ bool psi_parser_parse(struct psi_parser *P, struct psi_parser_input *I)
        psi_parser_postprocess(P);
 
        psi_plist_free(preproc);
+       P->input = NULL;
        return true;
 }