rendered paste body/*
* FreeSWITCH Modular Media Switching Software Library / Soft-Switch Application
* Copyright (C) 2005/2006, Anthony Minessale II <anthmct@yahoo.com>
*
* Version: MPL 1.1
*
* The contents of this file are subject to the Mozilla Public License Version
* 1.1 (the "License"); you may not use this file except in compliance with
* the License. You may obtain a copy of the License at
* http://www.mozilla.org/MPL/
*
* Software distributed under the License is distributed on an "AS IS" basis,
* WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
* for the specific language governing rights and limitations under the
* License.
*
* The Original Code is FreeSWITCH Modular Media Switching Software Library / Soft-Switch Application
*
* The Initial Developer of the Original Code is
* Anthony Minessale II <anthmct@yahoo.com>
* Portions created by the Initial Developer are Copyright (C)
* the Initial Developer. All Rights Reserved.
*
* Contributor(s):
*
* Anthony Minessale II <anthmct@yahoo.com>
* Brian Fertig <brian.fertig@convergencetek.com>
* Steph Fox <steph@zend.com>
* And the guys in #php.perc @ efnet
*
*
* mod_php.c -- PHP Module
*
*/
#ifndef _REENTRANT
#define _REENTRANT
#endif
#ifndef _GNU_SOURCE
#define _GNU_SOURCE
#endif
#ifdef _MSC_VER
//disable warnings for malformed header files
#pragma warning(push)
#pragma warning(disable:4127 4311 4133 4244 4201)
#define _USE_32BIT_TIME_T 1
#endif
#include <sapi/embed/php_embed.h>
#ifdef _MSC_VER
#pragma warning(pop)
#endif
#ifdef ZTS
zend_compiler_globals *compiler_globals;
zend_executor_globals *executor_globals;
php_core_globals *core_globals;
sapi_globals_struct *sapi_globals;
#endif
#include <switch.h>
const char modname[] = "mod_php";
static int sapi_mod_php_ub_write(const char *str, unsigned int str_length TSRMLS_DC)
{
char buffer[4096];
unsigned int i;
int j = 0;
FILE *fp = fopen("mod_php.log", "a");
fwrite(str, str_length, sizeof(char), fp);
fclose(fp);
for(i = 0; i < str_length; i++) {
buffer[j++] = str[i];
if(str[i] == 10) { /* new line */
buffer[j] = 0;
switch_log_printf(SWITCH_CHANNEL_LOG, SWITCH_LOG_NOTICE, "%s", buffer);
j = 0;
}
else if(str[i] == 0) { /* null character */
switch_log_printf(SWITCH_CHANNEL_LOG, SWITCH_LOG_NOTICE, "%s", buffer);
j = 0;
}
if(j == 4095) { /* don't overfill buffer */
buffer[j] = 0;
switch_log_printf(SWITCH_CHANNEL_LOG, SWITCH_LOG_NOTICE, "%s", buffer);
j = 0;
}
}
if(j) { /* stuff left over */
buffer[j] = 0;
switch_log_printf(SWITCH_CHANNEL_LOG, SWITCH_LOG_NOTICE, "%s", buffer);
}
return str_length;
}
void mod_php_error_handler(int type, const char *error_filename, const uint error_lineno, const char *format, va_list args)
{
char *buffer;
int buffer_len;
TSRMLS_FETCH();
buffer_len = vspprintf(&buffer, PG(log_errors_max_len), format, args);
if((EG(error_reporting) & type || (type & E_CORE)) && (PG(log_errors) || PG(display_errors))) {
char *error_type_str;
switch (type) {
case E_ERROR:
case E_CORE_ERROR:
case E_COMPILE_ERROR:
case E_USER_ERROR:
error_type_str = "Fatal error";
break;
case E_WARNING:
case E_CORE_WARNING:
case E_COMPILE_WARNING:
case E_USER_WARNING:
error_type_str = "Warning";
break;
case E_PARSE:
error_type_str = "Parse error";
break;
case E_NOTICE:
case E_USER_NOTICE:
error_type_str = "Notice";
break;
default:
error_type_str = "Unknown error";
break;
}
if(PG(log_errors)) {
char *log_buffer;
spprintf(&log_buffer, 0, "PHP %s: %s in %s on line %d", error_type_str, buffer, error_filename, error_lineno);
php_log_err(log_buffer TSRMLS_CC);
efree(log_buffer);
}
if(PG(display_errors)) {
char *prepend_string = INI_STR("error_prepend_string");
char *append_string = INI_STR("error_append_string");
char *error_format = "%s\n%s: %s in %s on line %d\n%s";
switch_log_printf(SWITCH_CHANNEL_LOG, SWITCH_LOG_NOTICE, error_format, STR_PRINT(prepend_string), error_type_str, buffer, error_filename, error_lineno, STR_PRINT(append_string));
}
}
// Bail out if we can't recover
switch(type) {
case E_CORE_ERROR:
case E_ERROR:
//case E_PARSE: the parser would return 1 (failure), we can bail out nicely
case E_COMPILE_ERROR:
case E_USER_ERROR:
switch_log_printf(SWITCH_CHANNEL_LOG, SWITCH_LOG_NOTICE, "\nPHP: %s exiting\n", error_filename);
EG(exit_status) = 255;
#if MEMORY_LIMIT
// restore memory limit
AG(memory_limit) = PG(memory_limit);
#endif
efree(buffer);
zend_bailout();
return;
}
// Log if necessary
if(PG(track_errors) && EG(active_symbol_table)) {
pval *tmp;
ALLOC_ZVAL(tmp);
INIT_PZVAL(tmp);
Z_STRVAL_P(tmp) = (char *) estrndup(buffer, buffer_len);
Z_STRLEN_P(tmp) = buffer_len;
Z_TYPE_P(tmp) = IS_STRING;
zend_hash_update(EG(active_symbol_table), "php_errormsg", sizeof("php_errormsg"), (void **) & tmp, sizeof(pval *), NULL);
}
efree(buffer);
}
static void mod_php_log_message(char *message)
{
switch_log_printf(SWITCH_CHANNEL_LOG, SWITCH_LOG_NOTICE, "%s\n", message);
}
typedef void (*sapi_error_function_t)(int type, const char *error_msg, ...);
static void php_function(switch_core_session_t *session, char *data)
{
char *uuid = switch_core_session_get_uuid(session);
size_t ulen = strlen(uuid);
size_t len = strlen((char *) data) + ulen + 2;
char *mydata = switch_core_session_alloc(session, len);
int argc, retval;
char *argv[5];
char php_code[1024];
void*** tsrm_ls = NULL;
zend_file_handle script;
zval *php_uuid;
snprintf(mydata, len, "%s %s", uuid, data);
argc = switch_separate_string(mydata, ' ',argv,(sizeof(argv) / sizeof(argv[0])));
sprintf(php_code, "uuid=\"%s\"; include(\"%s\");\n", argv[0], argv[1]);
sprintf(php_code, "%s %s", data, uuid);
script.type = ZEND_HANDLE_FP;
script.filename = data;
script.opened_path = NULL;
script.free_filename = 0;
script.handle.fp = fopen(script.filename, "rb");
// Initialize PHPs CORE
if (php_embed_init(argc, argv, &tsrm_ls) != SUCCESS){
//Houston we have a problem
switch_log_printf(SWITCH_CHANNEL_LOG, SWITCH_LOG_NOTICE, "Cant intialize SAPI\n");
return;
}
// Return All of the DEBUG crap to the console and/or a log file
php_embed_module.ub_write = sapi_mod_php_ub_write;
php_embed_module.log_message = mod_php_log_message;
php_embed_module.sapi_error = (sapi_error_function_t)mod_php_error_handler;
// Let the nice people know we are about to start their script
switch_log_printf(SWITCH_CHANNEL_LOG, SWITCH_LOG_NOTICE, "Starting Script %s\n",data);
// Force $uuid and $session to exist in PHPs memory space
MAKE_STD_ZVAL(php_uuid);
#ifdef _MSC_VER
//disable warnings for malformed macros from header files
#pragma warning(push)
#pragma warning(disable:4127 4267)
#endif
ZVAL_STRING(php_uuid, uuid , 1);
ZEND_SET_SYMBOL(&EG(symbol_table), "uuid", php_uuid);
#ifdef _MSC_VER
#pragma warning(pop)
#endif
// Execute the bloody script
retval = php_execute_script(&script TSRMLS_CC);
// Clean up after PHP and such
php_embed_shutdown(tsrm_ls);
// Return back to the Dialplan
// Buh bye now!
}
static const switch_application_interface_t php_application_interface = {
/*.interface_name */ "php",
/*.application_function */ php_function
};
static switch_loadable_module_interface_t php_module_interface = {
/*.module_name */ modname,
/*.endpoint_interface */ NULL,
/*.timer_interface */ NULL,
/*.dialplan_interface */ NULL,
/*.codec_interface */ NULL,
/*.application_interface */ &php_application_interface,
/*.api_interface */ NULL,
/*.file_interface */ NULL,
/*.speech_interface */ NULL,
/*.directory_interface */ NULL
};
SWITCH_MOD_DECLARE(switch_status_t) switch_module_load(const switch_loadable_module_interface_t **module_interface, char *filename)
{
void*** tsrm_ls = NULL;
/* connect my internal structure to the blank pointer passed to me */
*module_interface = &php_module_interface;
#ifdef ZTS
tsrm_startup(1, 1, 0, NULL);
compiler_globals = ts_resource(compiler_globals_id);
executor_globals = ts_resource(executor_globals_id);
core_globals = ts_resource(core_globals_id);
sapi_globals = ts_resource(sapi_globals_id);
tsrm_ls = ts_resource(0);
#endif
/* indicate that the module should continue to be loaded */
return SWITCH_STATUS_SUCCESS;
}
/*
//Called when the system shuts down
SWITCH_MOD_DECLARE(switch_status) switch_module_shutdown(void)
{
return SWITCH_STATUS_SUCCESS;
}
//If it exists, this is called in it's own thread when the module-load completes
SWITCH_MOD_DECLARE(switch_status) switch_module_shutdown(void)
{
return SWITCH_STATUS_SUCCESS;
}
*/
#0 0x00a8d144 in ?? ()
No symbol table info available.
#1 0x00f3f578 in tsrm_shutdown () at /usr/src/docelmo/trunk/libs/php-5.1.6/TSRM/TSRM.c:180
j = 27
p = (tsrm_tls_entry *) 0x9501b60
next_p = (tsrm_tls_entry *) 0x0
i = 0
#2 0x01011759 in php_embed_shutdown (tsrm_ls=0x9501b60) at /usr/src/docelmo/trunk/libs/php-5.1.6/sapi/embed/php_embed.c:216
No locals.
#3 0x0060f8ca in php_function (session=0x951a4a8, data=0x9512ee8 "/usr/local/freeswitch/scripts/apptest.php") at mod_php.c:255
uuid = 0x951c820 "15afbacf-d21b-4dbf-b4d0-b973adb9246b"
ulen = 36
len = 79
mydata = 0x9512f28 "15afbacf-d21b-4dbf-b4d0-b973adb9246b"
argc = 2
retval = 1
argv = {0x9512f28 "15afbacf-d21b-4dbf-b4d0-b973adb9246b", 0x9512f4d "/usr/local/freeswitch/scripts/apptest.php", 0x0, 0x0, 0x0}
php_code = "/usr/local/freeswitch/scripts/apptest.php 15afbacf-d21b-4dbf-b4d0-b973adb9246b\000ipts/apptest.php\");\n\000\001", '\0' <repeats 23 times>, "ó\004\000\000\000\000\000\000\000\020\000\000\020\000\000\000\000\000\000\000^0\006E\002\000\000\000\002\000\000\000\000\000\000\000º\026õD\000\000\000\0000\200n\000\000\000\000\000,`\204¶± õM X\001N\017\000\000\000ô?\001N\017\000\000\000\237\223\000NL`\204¶ælõM¨"...
tsrm_ls = (void ***) 0x9501b60
script = {type = 2 '\002', filename = 0x9512ee8 "/usr/local/freeswitch/scripts/apptest.php",
opened_path = 0x9631698 'Z' <repeats 42 times>, "\204Ì\217*", handle = {fd = 156244400, fp = 0x95019b0, stream = {handle = 0x95019b0,
reader = 0xfb566c <zend_stream_stdio_reader>, closer = 0xfb5697 <zend_stream_stdio_closer>, fteller = 0xfb56ca <zend_stream_stdio_fteller>,
interactive = 0}}, free_filename = 0 '\0'}
php_uuid = (zval *) 0x96313e8
__FUNCTION__ = "php_function"
#4 0x0062ecdf in switch_core_session_run (session=0x951a4a8) at src/switch_core.c:2192
index = Variable "index" is not available.