X-Git-Url: https://git.m6w6.name/?p=m6w6%2Fext-psi;a=blobdiff_plain;f=src%2Ftypes%2Fnum_exp.h;h=df7c6f5d2ad3192915bd65416e6723c9f4e7faa6;hp=c54a5af0b1f18c3e39074deebd90070c96d89743;hb=a7ac1c0a3c855321f21682c127a4b707de33a303;hpb=5359ad5c181e5772f350fe1cba060cbed3a05b91

diff --git a/src/types/num_exp.h b/src/types/num_exp.h
index c54a5af..df7c6f5 100644
--- a/src/types/num_exp.h
+++ b/src/types/num_exp.h
@@ -1,85 +1,111 @@
-#ifndef _PSI_TYPES_NUM_EXP
-#define _PSI_TYPES_NUM_EXP
+/*******************************************************************************
+ Copyright (c) 2016, Michael Wallner <mike@php.net>.
+ All rights reserved.
 
-typedef struct num_exp {
+ 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_TYPES_NUM_EXP_H
+#define PSI_TYPES_NUM_EXP_H
+
+#include "token.h"
+#include "Zend/zend_types.h"
+
+struct psi_data;
+struct psi_token;
+struct psi_impl;
+struct psi_const;
+struct psi_decl_enum_item;
+struct psi_let_exp;
+struct psi_set_exp;
+struct psi_call_frame;
+struct psi_validate_scope;
+
+struct psi_num_exp {
 	struct psi_token *token;
-	token_t t;
+	token_t op;
 	union {
-		char *numb;
-		constant *cnst;
-		decl_var *dvar;
-		struct decl_enum_item *enm;
-	} u;
-	token_t operator;
-	int (*calculator)(int t1, impl_val *v1, int t2, impl_val *v2, impl_val *res);
-	struct num_exp *operand;
-} num_exp;
-
-static inline num_exp *init_num_exp(token_t t, void *num) {
-	num_exp *exp = calloc(1, sizeof(*exp));
-	switch (exp->t = t) {
-	case PSI_T_NUMBER:
-	case PSI_T_NSNAME:
-		exp->u.numb = strdup(num);
-		break;
-	case PSI_T_NAME:
-		exp->u.dvar = num;
-		break;
-	EMPTY_SWITCH_DEFAULT_CASE();
-	}
-	return exp;
-}
+		struct {
+			struct psi_num_exp *lhs;
+			struct psi_num_exp *rhs;
+		} b;
+		struct {
+			struct psi_decl_type *typ;
+			struct psi_num_exp *num;
+		} c;
+		struct {
+			struct psi_num_exp *cond;
+			struct psi_num_exp *truthy;
+			struct psi_num_exp *falsy;
+		} t;
+		struct psi_num_exp *u;
+		struct psi_number *n;
+	} data;
+	token_t (*calc)(token_t t1, impl_val *v1, token_t t2, impl_val *v2, impl_val *res);
+};
+
+struct psi_num_exp *psi_num_exp_init_ternary(token_t op,
+		struct psi_num_exp *cond, struct psi_num_exp *truthy,
+		struct psi_num_exp *falsy);
+struct psi_num_exp *psi_num_exp_init_binary(token_t op,
+		struct psi_num_exp *lhs, struct psi_num_exp *rhs);
+struct psi_num_exp *psi_num_exp_init_unary(token_t op,
+		struct psi_num_exp *u);
+struct psi_num_exp *psi_num_exp_init_num(struct psi_number *n);
+struct psi_num_exp *psi_num_exp_init_cast(struct psi_decl_type *typ,
+		struct psi_num_exp *num);
+void psi_num_exp_free(struct psi_num_exp **c_ptr);
 
-static inline num_exp *copy_num_exp(num_exp *exp) {
-	decl_var *dvar;
-	num_exp *num = calloc(1, sizeof(*num));
-
-	memcpy(num, exp, sizeof(*num));
-
-	if (num->token) {
-		num->token = psi_token_copy(num->token);
-	}
-	if (num->operand) {
-		num->operand = copy_num_exp(num->operand);
-	}
-	switch (num->t) {
-	case PSI_T_NUMBER:
-	case PSI_T_NSNAME:
-		num->u.numb = strdup(num->u.numb);
-		break;
-	case PSI_T_NAME:
-		dvar = init_decl_var(num->u.dvar->name, num->u.dvar->pointer_level, num->u.dvar->array_size);
-		dvar->arg = num->u.dvar->arg;
-		if (num->u.dvar->token) {
-			dvar->token = psi_token_copy(num->u.dvar->token);
-		}
-		num->u.dvar = dvar;
-		break;
-	}
-	return num;
+struct psi_num_exp *psi_num_exp_copy(struct psi_num_exp *exp);
+void psi_num_exp_copy_ctor(struct psi_num_exp **exp_ptr);
+
+void psi_num_exp_dump(int fd, struct psi_num_exp *exp);
+bool psi_num_exp_validate(struct psi_data *data, struct psi_num_exp *exp,
+		struct psi_validate_scope *scope);
+
+token_t psi_num_exp_exec(struct psi_num_exp *exp, impl_val *res,
+		struct psi_call_frame *frame, struct psi_cpp *cpp);
+
+struct psi_plist *psi_num_exp_tokens(struct psi_num_exp *exp,
+		struct psi_plist *list);
+
+
+#include "calc.h"
+static inline zend_long psi_num_exp_get_long(struct psi_num_exp *exp,
+		struct psi_call_frame *frame, struct psi_cpp *cpp) {
+	impl_val res = {0};
+
+	psi_calc_cast(psi_num_exp_exec(exp, &res, frame, cpp), &res,
+			PSI_T_INT64, &res);
+
+	return res.i64;
 }
+static inline double psi_num_exp_get_double(struct psi_num_exp *exp,
+		struct psi_call_frame *frame, struct psi_cpp *cpp) {
+	impl_val res = {0};
+
+	psi_calc_cast(psi_num_exp_exec(exp, &res, frame, cpp), &res,
+			PSI_T_DOUBLE, &res);
 
-static inline void free_num_exp(num_exp *exp) {
-	if (exp->token) {
-		free(exp->token);
-	}
-	switch (exp->t) {
-	case PSI_T_NUMBER:
-		free(exp->u.numb);
-		break;
-	case PSI_T_NSNAME:
-		break;
-	case PSI_T_NAME:
-		free_decl_var(exp->u.dvar);
-		break;
-	case PSI_T_ENUM:
-		break;
-	EMPTY_SWITCH_DEFAULT_CASE();
-	}
-	if (exp->operand) {
-		free_num_exp(exp->operand);
-	}
-	free(exp);
+	return res.dval;
 }
 
 #endif