basic support for builtins

[m6w6/ext-psi] / src / types / decl_extvar.c

diff --git a/src/types/decl_extvar.c b/src/types/decl_extvar.c
index d85258b1726c9344d565be112217f7c3c770cbf7..24304544ec3d6c4aa47ebe56be9246ea002c9f11 100644 (file)
--- a/src/types/decl_extvar.c
+++ b/src/types/decl_extvar.c
@@ -27,14 +27,14 @@
 
 #include "php_psi.h"
 
-#include <dlfcn.h>
 #include <fnmatch.h>
+#include <Zend/zend_smart_str.h>
 
 #include "data.h"
 
 struct psi_decl_extvar *psi_decl_extvar_init(struct psi_decl_arg *arg)
 {
-       struct psi_decl_extvar *evar = calloc(1, sizeof(*evar));
+       struct psi_decl_extvar *evar = pecalloc(1, sizeof(*evar), 1);
 
        evar->arg = arg;
        return evar;
@@ -46,9 +46,7 @@ void psi_decl_extvar_free(struct psi_decl_extvar **evar_ptr)
                struct psi_decl_extvar *evar = *evar_ptr;
 
                *evar_ptr = NULL;
-               if (evar->token) {
-                       free(evar->token);
-               }
+               psi_token_free(&evar->token);
                psi_decl_arg_free(&evar->arg);
                psi_decl_free(&evar->getter);
                psi_decl_free(&evar->setter);
@@ -66,24 +64,19 @@ bool psi_decl_extvar_validate(struct psi_data *data,
        evar->size = psi_decl_arg_get_size(evar->arg);
        if (!evar->size) {
                data->error(data, evar->arg->var->token, PSI_WARNING,
-                               "Failed to calculate size of symbol '%s'", evar->arg->var->name);
+                               "Failed to calculate size of symbol '%s'", evar->arg->var->name->val);
                return false;
        }
 
        if (!evar->sym) {
-#ifndef RTLD_NEXT
-# define RTLD_NEXT ((void *) -1l)
-#endif
-#ifndef RTLD_DEFAULT
-# define RTLD_DEFAULT ((void *) 0)
-#endif
-               evar->sym = dlsym(scope->dlopened ?: RTLD_DEFAULT, evar->arg->var->name);
-               if (!evar->sym) {
-                       data->error(data, evar->arg->var->token, PSI_WARNING,
-                                       "Failed to locate symbol '%s': %s", evar->arg->var->name,
-                                       dlerror() ?: "not found");
-                       return false;
-               }
+               evar->sym = psi_dlsym(data->file.dlopened, evar->arg->var->name->val,
+                       evar->redir ? evar->redir->val : NULL);
+       }
+       if (!evar->sym) {
+               data->error(data, evar->arg->var->token, PSI_WARNING,
+                               "Failed to locate symbol '%s': %s", evar->arg->var->name->val,
+                               dlerror() ?: "not found");
+               return false;
        }
 
        evar->getter = psi_decl_extvar_getter(evar);
@@ -107,7 +100,8 @@ void psi_decl_extvar_dump(int fd, struct psi_decl_extvar *evar)
 
 struct psi_decl *psi_decl_extvar_setter(struct psi_decl_extvar *evar)
 {
-       struct psi_decl_type *func_type = psi_decl_type_init(PSI_T_VOID, "void");
+       zend_string *type_str = zend_string_init_interned(ZEND_STRS("void"), 1);
+       struct psi_decl_type *func_type = psi_decl_type_init(PSI_T_VOID, type_str);
        struct psi_decl_var *func_var = psi_decl_var_copy(evar->arg->var);
        struct psi_decl_arg *func = psi_decl_arg_init(func_type, func_var);
        struct psi_decl_type *arg_type = psi_decl_type_copy(evar->arg->type);
@@ -115,11 +109,19 @@ struct psi_decl *psi_decl_extvar_setter(struct psi_decl_extvar *evar)
        struct psi_decl_arg *arg = psi_decl_arg_init(arg_type, arg_var);
        struct psi_plist *args = psi_plist_init((psi_plist_dtor) psi_decl_arg_free);
        struct psi_decl *decl = psi_decl_init(func, psi_plist_add(args, &arg));
+       smart_str name = {0};
+
+       zend_string_release(type_str);
 
        func_var->pointer_level = 0;
        func_var->array_size = 0;
-       func_var->name = realloc(func_var->name, strlen(evar->arg->var->name) + sizeof("_set"));
-       strcat(func_var->name, "_set");
+
+       smart_str_append_ex(&name, func_var->name, 1);
+       smart_str_appendl_ex(&name, ZEND_STRL("_set"), 1);
+       zend_string_release(func_var->name);
+       func_var->name = zend_new_interned_string(smart_str_extract(&name));
+
+       decl->extvar = 1;
 
        return decl;
 }
@@ -135,9 +137,14 @@ struct psi_decl *psi_decl_extvar_getter(struct psi_decl_extvar *evar)
        struct psi_decl_var *func_var = psi_decl_var_copy(evar->arg->var);
        struct psi_decl_arg *func = psi_decl_arg_init(func_type, func_var);
        struct psi_decl *decl = psi_decl_init(func, NULL);
+       smart_str name = {0};
 
-       func_var->name = realloc(func_var->name, strlen(evar->arg->var->name) + sizeof("_get"));
-       strcat(func_var->name, "_get");
+       smart_str_append_ex(&name, func_var->name, 1);
+       smart_str_appendl_ex(&name, ZEND_STRL("_get"), 1);
+       zend_string_release(func_var->name);
+       func_var->name = zend_new_interned_string(smart_str_extract(&name));
+
+       decl->extvar = 1;
 
        return decl;
 }
@@ -160,4 +167,3 @@ bool psi_decl_extvar_is_blacklisted(const char *name)
        }
        return false;
 }
-