X-Git-Url: https://git.m6w6.name/?p=m6w6%2Fext-psi;a=blobdiff_plain;f=src%2Fcontext.h;h=e2ee35d174a78b5fec35312bda5ff59a0a2123e2;hp=98516acfa5f76884b1bda1791346cbc90e1f9bfd;hb=refs%2Fheads%2Fmaster;hpb=898c6dac30d12d7fe56662d66a8e73c340926d64 diff --git a/src/context.h b/src/context.h index 98516ac..e2ee35d 100644 --- a/src/context.h +++ b/src/context.h @@ -1,23 +1,75 @@ -#ifndef _PSI_CONTEXT_H -#define _PSI_CONTEXT_H +/******************************************************************************* + Copyright (c) 2016, Michael Wallner . + All rights reserved. + + Redistribution and use in source and binary forms, with or without + modification, are permitted provided that the following conditions are met: + + * Redistributions of source code must retain the above copyright notice, + this list of conditions and the following disclaimer. + * Redistributions in binary form must reproduce the above copyright + notice, this list of conditions and the following disclaimer in the + documentation and/or other materials provided with the distribution. + + THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" + AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE + IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE + DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE + FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL + DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR + SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER + CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, + OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE + OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. +*******************************************************************************/ + +#ifndef PSI_CONTEXT_H +#define PSI_CONTEXT_H + +#include +#include "token.h" + +/* zend_function_entry */ +#include "Zend/zend_API.h" struct psi_context; struct psi_token; struct psi_parser; -struct decl_callinfo; -struct impl_vararg; - -#define PSI_PRINT_POINTER_LEVEL(l) l,"************************" -#define PSI_ERROR 16 -#define PSI_WARNING 32 -typedef void (*psi_context_error_func)(void *context, struct psi_token *token, int type, const char *msg, ...); - +struct psi_call_frame; +struct psi_decl; +struct psi_impl; +struct psi_decl_arg; +struct psi_decl_extvar; +struct psi_let_exp; struct psi_context_ops { - void (*init)(struct psi_context *C); + /* library */ + const char *name; + /* called once */ + bool (*load)(void); + void (*free)(void); + /* called for each new context */ + bool (*init)(struct psi_context *C); void (*dtor)(struct psi_context *C); - zend_function_entry *(*compile)(struct psi_context *C); - void (*call)(struct psi_context *C, struct decl_callinfo *decl_call, struct impl_vararg *va); + /* compiler */ + bool (*composite_init)(struct psi_context *C, struct psi_decl_arg *darg); + void (*composite_dtor)(struct psi_context *C, struct psi_decl_arg *darg); + bool (*extvar_init)(struct psi_context *C, struct psi_decl_extvar *evar); + void (*extvar_dtor)(struct psi_context *C, struct psi_decl_extvar *evar); + bool (*decl_init)(struct psi_context *C, struct psi_decl *decl); + void (*decl_dtor)(struct psi_context *C, struct psi_decl *decl); + bool (*impl_init)(struct psi_context *C, struct psi_impl *impl, zif_handler *zh); + void (*impl_dtor)(struct psi_context *C, struct psi_impl *impl); + bool (*cb_init)(struct psi_context *C, struct psi_let_exp *cb, struct psi_impl *impl); + void (*cb_dtor)(struct psi_context *C, struct psi_let_exp *cb, struct psi_impl *impl); + /* calls */ + void (*call)(struct psi_call_frame *frame); + void (*call_va)(struct psi_call_frame *frame); + /* types */ + void *(*typeof_impl)(struct psi_context *C, token_t impl_type); + void *(*typeof_decl)(struct psi_context *C, token_t decl_type); + void *(*copyof_type)(struct psi_context *C, void *orig_type); + void (*layoutof_type)(struct psi_context *C, void *orig_type, struct psi_layout *l); }; #include "data.h" @@ -31,13 +83,25 @@ struct psi_context { size_t count; }; -struct psi_context *psi_context_init(struct psi_context *C, struct psi_context_ops *ops, psi_context_error_func error, unsigned flags); +struct psi_context_call_data { + struct psi_context *context; + union { + struct psi_impl *fn; + struct psi_let_callback *cb; + } impl; +}; + +struct psi_context *psi_context_init(struct psi_context *C, struct psi_context_ops *ops, psi_error_cb error, unsigned flags); void psi_context_build(struct psi_context *C, const char *path); -int psi_context_validate(struct psi_context *C, struct psi_parser *P); -int psi_context_validate_data(struct psi_data *C, struct psi_data *D); -zend_function_entry *psi_context_compile(struct psi_context *C); -void psi_context_call(struct psi_context *C, struct decl_callinfo *decl_call, struct impl_vararg *va); -void psi_context_dump(struct psi_context *C, int fd); +void psi_context_compile(struct psi_context *C); + +void **psi_context_composite_type_elements(struct psi_context *C, + struct psi_decl_arg *darg, struct psi_plist **eles); +void *psi_context_decl_arg_call_type(struct psi_context *C, struct psi_decl_arg *arg); +void *psi_context_decl_arg_full_type(struct psi_context *C, struct psi_decl_arg *arg); + +bool psi_context_call(struct psi_context *C, zend_execute_data *execute_data, zval *return_value, struct psi_impl *impl); +void psi_context_dump(struct psi_dump *dump, struct psi_context *C); void psi_context_dtor(struct psi_context *C); void psi_context_free(struct psi_context **C);