add mod_perl

git-svn-id: http://svn.freeswitch.org/svn/freeswitch/trunk@740 d0543943-73ff-0310-b7d9-9358b9ac24b2

src/include/switch_channel.h

@@ -219,6 +219,13 @@ SWITCH_DECLARE(switch_status) switch_channel_clear_flag(switch_channel *channel,
 */
 SWITCH_DECLARE(switch_status) switch_channel_answer(switch_channel *channel);
 
+/*!
+  \brief Indicate progress on a channel to attempt early media
+  \param channel channel to pre-answer
+  \return SWITCH_STATUS_SUCCESS
+*/
+SWITCH_DECLARE(switch_status) switch_channel_pre_answer(switch_channel *channel);
+
 /*!
   \brief add a state handler table to a given channel
   \param channel channel on which to add the state handler table

src/include/switch_core.h

@@ -271,6 +271,13 @@ SWITCH_DECLARE(void) switch_core_session_signal_state_change(switch_core_session
 */
 SWITCH_DECLARE(char *) switch_core_session_get_uuid(switch_core_session *session);
 
+/*! 
+  \brief Locate a session based on it's uuiid
+  \param uuid_str the unique id of the session you want to find
+  \return the session or NULL
+*/
+SWITCH_DECLARE(switch_core_session *) switch_core_session_locate(char *uuid_str);
+
 /*! 
   \brief Send a message to another session using it's uuid
   \param uuid_str the unique id of the session you want to send a message to
@@ -921,14 +928,6 @@ SWITCH_DECLARE(void) switch_core_launch_thread(void *(*func)(switch_thread *, vo
 SWITCH_DECLARE(void) switch_core_set_globals(void);
 ///\}
 
-#ifdef USE_PERL
-/*! 
-  \brief Execute some perl when compiled with perl support
-  \return SWITCH_STATUS_SUCCESS on success
-*/
-SWITCH_DECLARE(switch_status) switch_core_do_perl(char *txt);
-#endif 
-
 /*!
   \}
 */