Example #1
0
			/* feed it to the parser */
			zend_first_try {
				result = zend_eval_stringl(code, b->blob_total_length, NULL, "Firebird Embedded PHP engine" TSRMLS_CC);
			} zend_end_try();
	}
	
	UNLOCK();

	free(code);

	res->dsc_dtype = dtype_long;
	*(ISC_LONG*)res->dsc_address = (result == SUCCESS);
}

static ISC_INT64 const scales[] = { 1, 10, 100, 1000, 10000, 100000, 1000000, 100000000, 1000000000,
	1000000000, LL_LIT(10000000000),LL_LIT(100000000000),LL_LIT(10000000000000),LL_LIT(100000000000000),
	LL_LIT(1000000000000000),LL_LIT(1000000000000000),LL_LIT(1000000000000000000) };


static void call_php(char *name, PARAMDSC *r, int argc, PARAMDSC **argv)
{
	do {
		zval callback, args[4], *argp[4], return_value;
		PARAMVARY *res = (PARAMVARY*)r->dsc_address;
		int i;

		INIT_ZVAL(callback);
		ZVAL_STRING(&callback,name,0);

		LOCK();
		
Example #2
0
        /* feed it to the parser */
        zend_first_try {
            result = zend_eval_stringl(code, b->blob_total_length, NULL, "Firebird Embedded PHP engine");
        } zend_end_try();
    }

    UNLOCK();

    free(code);

    res->dsc_dtype = dtype_long;
    *(ISC_LONG*)res->dsc_address = (result == SUCCESS);
}

static ISC_INT64 const scales[] = { 1, 10, 100, 1000, 10000, 100000, 1000000, 100000000, 1000000000,
                                    1000000000, LL_LIT(10000000000),LL_LIT(100000000000),LL_LIT(10000000000000),LL_LIT(100000000000000),
                                    LL_LIT(1000000000000000),LL_LIT(1000000000000000),LL_LIT(1000000000000000000)
                                  };


static void call_php(char *name, PARAMDSC *r, int argc, PARAMDSC **argv)
{
    do {
        zval callback, args[4], return_value;
        PARAMVARY *res = (PARAMVARY*)r->dsc_address;
        int i;

        ZVAL_STRING(&callback, name);

        LOCK();