X-Git-Url: https://git.m6w6.name/?p=m6w6%2Fext-psi;a=blobdiff_plain;f=src%2Fbuiltin.c;h=3ede389b189212119de25da3ee2f2365ee1f5b88;hp=2d92432159983dba3fdbf4b1fab211f93381a9ec;hb=0682ecb84dfe1de08b609c6c0ae641b06f3fa481;hpb=d4bd55e7d9b1cf63cd6fdc96b70010a0c2aca963 diff --git a/src/builtin.c b/src/builtin.c index 2d92432..3ede389 100644 --- a/src/builtin.c +++ b/src/builtin.c @@ -23,22 +23,35 @@ OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. *******************************************************************************/ -#include "php_psi_stdinc.h" +#ifdef HAVE_CONFIG_H +# include "config.h" +#else +# include "php_config.h" +#endif + +#include +#include #include "php_psi.h" #include "builtin.h" #include "parser.h" #include "cpp.h" -#include - HashTable psi_builtins; static bool has_include(struct psi_cpp *cpp, struct psi_token *target, struct psi_plist **args, struct psi_plist **res); static bool has_include_next(struct psi_cpp *cpp, struct psi_token *target, struct psi_plist **args, struct psi_plist **res); static bool has_feature(struct psi_cpp *cpp, struct psi_token *target, struct psi_plist **args, struct psi_plist **res); static bool builtin_constant_p(struct psi_cpp *cpp, struct psi_token *target, struct psi_plist **args, struct psi_plist **res); +static bool signed__(struct psi_cpp *cpp, struct psi_token *target, struct psi_plist **args, struct psi_plist **res); +static bool BASE_FILE__(struct psi_cpp *cpp, struct psi_token *target, struct psi_plist **args, struct psi_plist **res); static bool COUNTER__(struct psi_cpp *cpp, struct psi_token *target, struct psi_plist **args, struct psi_plist **res); +static bool DATE__(struct psi_cpp *cpp, struct psi_token *target, struct psi_plist **args, struct psi_plist **res); +static bool FILE__(struct psi_cpp *cpp, struct psi_token *target, struct psi_plist **args, struct psi_plist **res); +static bool INCLUDE_LEVEL__(struct psi_cpp *cpp, struct psi_token *target, struct psi_plist **args, struct psi_plist **res); +static bool LINE__(struct psi_cpp *cpp, struct psi_token *target, struct psi_plist **args, struct psi_plist **res); +static bool TIME__(struct psi_cpp *cpp, struct psi_token *target, struct psi_plist **args, struct psi_plist **res); +static bool TIMESTAMP__(struct psi_cpp *cpp, struct psi_token *target, struct psi_plist **args, struct psi_plist **res); static inline struct psi_plist *builtin_sig(token_t typ, ...) { @@ -76,6 +89,7 @@ static void free_builtin(zval *p) } } +PHP_MINIT_FUNCTION(psi_builtin); PHP_MINIT_FUNCTION(psi_builtin) { #define PSI_BUILTIN(builtin, ...) do { \ @@ -96,11 +110,21 @@ PHP_MINIT_FUNCTION(psi_builtin) PSI_BUILTIN(has_feature, PSI_T_NAME); PSI_BUILTIN(builtin_constant_p, PSI_T_NAME); + PSI_BUILTIN(signed__, -1); + + PSI_BUILTIN(BASE_FILE__, -1); PSI_BUILTIN(COUNTER__, -1); + PSI_BUILTIN(DATE__, -1); + PSI_BUILTIN(FILE__, -1); + PSI_BUILTIN(INCLUDE_LEVEL__, -1); + PSI_BUILTIN(LINE__, -1); + PSI_BUILTIN(TIME__, -1); + PSI_BUILTIN(TIMESTAMP__, -1); return SUCCESS; } +PHP_MSHUTDOWN_FUNCTION(psi_builtin); PHP_MSHUTDOWN_FUNCTION(psi_builtin) { zend_hash_destroy(&psi_builtins); @@ -174,20 +198,130 @@ static bool builtin_constant_p(struct psi_cpp *cpp, struct psi_token *target, return false; } +#define NEW_TOKEN(typ, str, len) \ + psi_token_init((typ), (str), (len), (target)->col, (target)->line, (target)->file) + +#define ADD_TOKEN(tok) do { \ + struct psi_token *tok__ = tok; \ + if (!*res) { \ + *res = psi_plist_init((psi_plist_dtor) psi_token_free); \ + } \ + *res = psi_plist_add(*res, &tok__); \ +} while (0) + +#define ADD_QUOTED_STRING(buf, len) do { \ + ADD_TOKEN(NEW_TOKEN(PSI_T_QUOTED_STRING, buf, len)); \ +} while(0) + +#define ADD_QUOTED_ZSTRING(zs) do { \ + zend_string *zs_ = zs; \ + ADD_QUOTED_STRING(zs_->val, zs_->len); \ +} while (0) + +#define ADD_UNSIGNED_NUMBER(u) do { \ + char buf[0x20]; \ + unsigned u_ = u; \ + size_t len = snprintf(buf, sizeof(buf), "%u", u_); \ + struct psi_token *tok_ = NEW_TOKEN(PSI_T_NUMBER, buf, len); \ + tok_->flags |= PSI_NUMBER_INT | PSI_NUMBER_U; \ + ADD_TOKEN(tok_); \ +} while (0) + +static bool signed__(struct psi_cpp *cpp, struct psi_token *target, + struct psi_plist **args, struct psi_plist **res) +{ + ADD_TOKEN(NEW_TOKEN(PSI_T_SIGNED, "signed", 8)); + return true; +} + +static bool BASE_FILE__(struct psi_cpp *cpp, struct psi_token *target, + struct psi_plist **args, struct psi_plist **res) +{ + ADD_QUOTED_ZSTRING(cpp->parser->input->file); + return true; +} + static bool COUNTER__(struct psi_cpp *cpp, struct psi_token *target, struct psi_plist **args, struct psi_plist **res) { - struct psi_token *tok; - char buf[0x20]; - size_t len = sprintf(buf, "%u", cpp->counter++); + ADD_UNSIGNED_NUMBER(cpp->counter++); + return true; +} + +static bool DATE__(struct psi_cpp *cpp, struct psi_token *target, + struct psi_plist **args, struct psi_plist **res) +{ + char buf[12]; + struct tm *tp; + time_t t = time(NULL); +#if HAVE_LOCALTIME_R + struct tm tm = {0}; + tp = localtime_r(&t, &tm); +#else + tp = localtime(&t); +#endif + + strftime(buf, sizeof(buf), "%b %e %Y", tp); + ADD_QUOTED_STRING(buf, 11); + return true; +} + +static bool FILE__(struct psi_cpp *cpp, struct psi_token *target, + struct psi_plist **args, struct psi_plist **res) +{ + ADD_QUOTED_ZSTRING(target->file); + return true; +} + +static bool INCLUDE_LEVEL__(struct psi_cpp *cpp, struct psi_token *target, + struct psi_plist **args, struct psi_plist **res) +{ + ADD_UNSIGNED_NUMBER(cpp->include_level); + return true; +} + +static bool LINE__(struct psi_cpp *cpp, struct psi_token *target, + struct psi_plist **args, struct psi_plist **res) +{ + ADD_UNSIGNED_NUMBER(target->line); + return true; +} - tok = psi_token_init(PSI_T_NUMBER, buf, len, target->col, target->line, target->file); - *res = psi_plist_init((psi_plist_dtor) psi_token_free); - *res = psi_plist_add(*res, &tok); +static bool TIME__(struct psi_cpp *cpp, struct psi_token *target, + struct psi_plist **args, struct psi_plist **res) +{ + char buf[9]; + struct tm *tp; + time_t t = time(NULL); +#if HAVE_LOCALTIME_R + struct tm tm = {0}; + tp = localtime_r(&t, &tm); +#else + tp = localtime(&t); +#endif + strftime(buf, sizeof(buf), "%H:%M:%S", tp); + ADD_QUOTED_STRING(buf, 8); return true; } +static bool TIMESTAMP__(struct psi_cpp *cpp, struct psi_token *target, + struct psi_plist **args, struct psi_plist **res) +{ + char *str; +#ifdef HAVE_CTIME_R + char buf[26]; + str = ctime_r(&cpp->parser->input->lmod, buf); +#else + str = ctime(&cpp->parser->input->lmod); +#endif + + /* kill EOL */ + ADD_QUOTED_STRING(str, 24); + return true; +} + + #ifdef __APPLE__ #include # define bswap_16(u) _OSSwapInt16(u)