Patch from Scott McKellar:
[OpenSRF.git] / src / libopensrf / osrf_app_session.c
1 #include <opensrf/osrf_app_session.h>
2 #include <time.h>
3
4 /** Send the given message */
5 static int _osrf_app_session_send( osrfAppSession*, osrfMessage* msg );
6
7 static int osrfAppSessionMakeLocaleRequest(
8                 osrfAppSession* session, const jsonObject* params, const char* method_name,
9                 int protocol, osrfStringArray* param_strings, char* locale );
10
11 /* the global app_session cache */
12 osrfHash* osrfAppSessionCache = NULL;
13
14 // --------------------------------------------------------------------------
15 // --------------------------------------------------------------------------
16 // Request API
17 // --------------------------------------------------------------------------
18
19 /** Allocates and initializes a new app_request object */
20 static osrfAppRequest* _osrf_app_request_init(
21                 osrfAppSession* session, osrfMessage* msg ) {
22
23         osrfAppRequest* req =
24                 (osrfAppRequest*) safe_malloc(sizeof(osrfAppRequest));
25
26         req->session            = session;
27         req->request_id = msg->thread_trace;
28         req->complete           = 0;
29         req->payload            = msg;
30         req->result                     = NULL;
31         req->reset_timeout  = 0;
32
33         return req;
34
35 }
36
37
38 void osrfAppSessionCleanup() {
39         osrfHashFree(osrfAppSessionCache);      
40 }
41
42 /** Frees memory used by an app_request object */
43 static void _osrf_app_request_free( void * req ){
44         if( req == NULL ) return;
45         osrfAppRequest* r = (osrfAppRequest*) req;
46         if( r->payload ) osrfMessageFree( r->payload );
47         free( r );
48 }
49
50 /** Pushes the given message onto the list of 'responses' to this request */
51 static void _osrf_app_request_push_queue( osrfAppRequest* req, osrfMessage* result ){
52         if(req == NULL || result == NULL) return;
53         osrfLogDebug( OSRF_LOG_MARK,  "App Session pushing request [%d] onto request queue", result->thread_trace );
54         if(req->result == NULL) {
55                 req->result = result;
56
57         } else {
58                 
59                 osrfMessage* ptr = req->result;
60                 osrfMessage* ptr2 = req->result->next;
61                 while( ptr2 ) {
62                         ptr = ptr2;
63                         ptr2 = ptr2->next;
64                 }
65                 ptr->next = result;
66         }
67 }
68
69 /** Removes this app_request from our session request set */
70 void osrf_app_session_request_finish( 
71                 osrfAppSession* session, int req_id ){
72
73         if(session == NULL) return;
74         osrfAppRequest* req = OSRF_LIST_GET_INDEX( session->request_queue, req_id );
75         if(req == NULL) return;
76         osrfListRemove( req->session->request_queue, req->request_id );
77 }
78
79
80 void osrf_app_session_request_reset_timeout( osrfAppSession* session, int req_id ) {
81         if(session == NULL) return;
82         osrfLogDebug( OSRF_LOG_MARK, "Resetting request timeout %d", req_id );
83         osrfAppRequest* req = OSRF_LIST_GET_INDEX( session->request_queue, req_id );
84         if(req == NULL) return;
85         req->reset_timeout = 1;
86 }
87
88 /** Checks the receive queue for messages.  If any are found, the first
89   * is popped off and returned.  Otherwise, this method will wait at most timeout 
90   * seconds for a message to appear in the receive queue.  Once it arrives it is returned.
91   * If no messages arrive in the timeout provided, null is returned.
92   */
93 static osrfMessage* _osrf_app_request_recv( osrfAppRequest* req, int timeout ) {
94
95         if(req == NULL) return NULL;
96
97         if( req->result != NULL ) {
98                 /* pop off the first message in the list */
99                 osrfMessage* tmp_msg = req->result;
100                 req->result = req->result->next;
101                 return tmp_msg;
102         }
103
104         time_t start = time(NULL);      
105         time_t remaining = (time_t) timeout;
106
107         while( remaining >= 0 ) {
108                 /* tell the session to wait for stuff */
109                 osrfLogDebug( OSRF_LOG_MARK,  "In app_request receive with remaining time [%d]", (int) remaining );
110
111                 osrf_app_session_queue_wait( req->session, 0, NULL );
112
113                 if( req->result != NULL ) { /* if we received anything */
114                         /* pop off the first message in the list */
115                         osrfLogDebug( OSRF_LOG_MARK,  "app_request_recv received a message, returning it");
116                         osrfMessage* ret_msg = req->result;
117                         osrfMessage* tmp_msg = ret_msg->next;
118                         req->result = tmp_msg;
119                         if (ret_msg->sender_locale) {
120                                 if (req->session->session_locale)
121                                         free(req->session->session_locale);
122                                 req->session->session_locale = strdup(ret_msg->sender_locale);
123                         }
124                         return ret_msg;
125                 }
126
127                 if( req->complete )
128                         return NULL;
129
130                 osrf_app_session_queue_wait( req->session, (int) remaining, NULL );
131
132                 if( req->result != NULL ) { /* if we received anything */
133                         /* pop off the first message in the list */
134                         osrfLogDebug( OSRF_LOG_MARK,  "app_request_recv received a message, returning it");
135                         osrfMessage* ret_msg = req->result;
136                         osrfMessage* tmp_msg = ret_msg->next;
137                         req->result = tmp_msg;
138                         if (ret_msg->sender_locale) {
139                                 if (req->session->session_locale)
140                                         free(req->session->session_locale);
141                                 req->session->session_locale = strdup(ret_msg->sender_locale);
142                         }
143                         return ret_msg;
144                 }
145                 if( req->complete )
146                         return NULL;
147
148                 if(req->reset_timeout) {
149                         remaining = (time_t) timeout;
150                         req->reset_timeout = 0;
151                         osrfLogDebug( OSRF_LOG_MARK, "Received a timeout reset");
152                 } else {
153                         remaining -= (int) (time(NULL) - start);
154                 }
155         }
156
157         osrfLogInfo( OSRF_LOG_MARK, "Returning NULL from app_request_recv after timeout");
158         return NULL;
159 }
160
161 /** Resend this requests original request message */
162 static int _osrf_app_request_resend( osrfAppRequest* req ) {
163         if(req == NULL) return 0;
164         if(!req->complete) {
165                 osrfLogDebug( OSRF_LOG_MARK,  "Resending request [%d]", req->request_id );
166                 return _osrf_app_session_send( req->session, req->payload );
167         }
168         return 1;
169 }
170
171
172
173 // --------------------------------------------------------------------------
174 // --------------------------------------------------------------------------
175 // Session API
176 // --------------------------------------------------------------------------
177
178 /** returns a session from the global session hash */
179 char* osrf_app_session_set_locale( osrfAppSession* session, const char* locale ) {
180         if (!session || !locale)
181                 return NULL;
182
183         if(session->session_locale)
184                 free(session->session_locale);
185
186         session->session_locale = strdup( locale );
187         return session->session_locale;
188 }
189
190 /** returns a session from the global session hash */
191 osrfAppSession* osrf_app_session_find_session( const char* session_id ) {
192         if(session_id) return osrfHashGet(osrfAppSessionCache, session_id);
193         return NULL;
194 }
195
196
197 /** adds a session to the global session cache */
198 static void _osrf_app_session_push_session( osrfAppSession* session ) {
199         if(!session) return;
200         if( osrfAppSessionCache == NULL ) osrfAppSessionCache = osrfNewHash();
201         if( osrfHashGet( osrfAppSessionCache, session->session_id ) ) return;
202         osrfHashSet( osrfAppSessionCache, session, session->session_id );
203 }
204
205 /** Allocates and initializes a new app_session */
206
207 osrfAppSession* osrfAppSessionClientInit( const char* remote_service ) {
208         return osrf_app_client_session_init( remote_service );
209 }
210
211 osrfAppSession* osrf_app_client_session_init( const char* remote_service ) {
212
213         if (!remote_service) {
214                 osrfLogWarning( OSRF_LOG_MARK, "No remote service specified in osrf_app_client_session_init");
215                 return NULL;
216         }
217
218         osrfAppSession* session = safe_malloc(sizeof(osrfAppSession));
219
220         session->transport_handle = osrfSystemGetTransportClient();
221         if( session->transport_handle == NULL ) {
222                 osrfLogWarning( OSRF_LOG_MARK, "No transport client for service 'client'");
223                 free( session );
224                 return NULL;
225         }
226
227         osrfStringArray* arr = osrfNewStringArray(8);
228         osrfConfigGetValueList(NULL, arr, "/domains/domain");
229         char* domain = osrfStringArrayGetString(arr, 0);
230
231         if (!domain) {
232                 osrfLogWarning( OSRF_LOG_MARK, "No domains specified in the OpenSRF config file");
233                 free( session );
234                 osrfStringArrayFree(arr);
235                 return NULL;
236         }
237
238         char* router_name = osrfConfigGetValue(NULL, "/router_name");
239         if (!router_name) {
240                 osrfLogWarning( OSRF_LOG_MARK, "No router name specified in the OpenSRF config file");
241                 free( session );
242                 osrfStringArrayFree(arr);
243                 return NULL;
244         }
245
246         char target_buf[512];
247         target_buf[ 0 ] = '\0';
248
249         int len = snprintf( target_buf, sizeof(target_buf), "%s@%s/%s",
250                         router_name ? router_name : "(null)",
251                         domain ? domain : "(null)",
252                         remote_service ? remote_service : "(null)" );
253         osrfStringArrayFree(arr);
254         //free(domain);
255         free(router_name);
256
257         if( len >= sizeof( target_buf ) ) {
258                 osrfLogWarning( OSRF_LOG_MARK, "Buffer overflow for remote_id");
259                 free( session );
260                 return NULL;
261         }
262
263         session->request_queue = osrfNewList();
264         session->request_queue->freeItem = &_osrf_app_request_free;
265         session->remote_id = strdup(target_buf);
266         session->orig_remote_id = strdup(session->remote_id);
267         session->remote_service = strdup(remote_service);
268         session->session_locale = NULL;
269
270         #ifdef ASSUME_STATELESS
271         session->stateless = 1;
272         osrfLogDebug( OSRF_LOG_MARK, "%s session is stateless", remote_service );
273         #else
274         session->stateless = 0;
275         osrfLogDebug( OSRF_LOG_MARK, "%s session is NOT stateless", remote_service );
276         #endif
277
278         /* build a chunky, random session id */
279         char id[256];
280
281         snprintf(id, sizeof(id), "%f.%d%ld", get_timestamp_millis(), (int)time(NULL), (long) getpid());
282         session->session_id = strdup(id);
283         osrfLogDebug( OSRF_LOG_MARK,  "Building a new client session with id [%s] [%s]", 
284                         session->remote_service, session->session_id );
285
286         session->thread_trace = 0;
287         session->state = OSRF_SESSION_DISCONNECTED;
288         session->type = OSRF_SESSION_CLIENT;
289         //session->next = NULL;
290
291         session->userData = NULL;
292         session->userDataFree = NULL;
293         
294         _osrf_app_session_push_session( session );
295         return session;
296 }
297
298 osrfAppSession* osrf_app_server_session_init(
299                 const char* session_id, const char* our_app, const char* remote_id ) {
300
301         osrfLogDebug( OSRF_LOG_MARK, "Initing server session with session id %s, service %s,"
302                         " and remote_id %s", session_id, our_app, remote_id );
303
304         osrfAppSession* session = osrf_app_session_find_session( session_id );
305         if(session) return session;
306
307         session = safe_malloc(sizeof(osrfAppSession));
308
309         session->transport_handle = osrfSystemGetTransportClient();
310         if( session->transport_handle == NULL ) {
311                 osrfLogWarning( OSRF_LOG_MARK, "No transport client for service '%s'", our_app );
312                 free(session);
313                 return NULL;
314         }
315
316         int stateless = 0;
317         char* statel = osrf_settings_host_value("/apps/%s/stateless", our_app );
318         if(statel) stateless = atoi(statel);
319         free(statel);
320
321
322         session->request_queue = osrfNewList();
323         session->request_queue->freeItem = &_osrf_app_request_free;
324         session->remote_id = strdup(remote_id);
325         session->orig_remote_id = strdup(remote_id);
326         session->session_id = strdup(session_id);
327         session->remote_service = strdup(our_app);
328         session->stateless = stateless;
329
330         #ifdef ASSUME_STATELESS
331         session->stateless = 1;
332         #else
333         session->stateless = 0;
334         #endif
335
336         session->thread_trace = 0;
337         session->state = OSRF_SESSION_DISCONNECTED;
338         session->type = OSRF_SESSION_SERVER;
339         session->session_locale = NULL;
340
341         session->userData = NULL;
342         session->userDataFree = NULL;
343         
344         _osrf_app_session_push_session( session );
345         return session;
346
347 }
348
349
350
351 /** frees memory held by a session */
352 static void _osrf_app_session_free( osrfAppSession* session ){
353         if(session==NULL)
354                 return;
355
356         if( session->userDataFree && session->userData ) 
357                 session->userDataFree(session->userData);
358         
359         if(session->session_locale)
360                 free(session->session_locale);
361
362         free(session->remote_id);
363         free(session->orig_remote_id);
364         free(session->session_id);
365         free(session->remote_service);
366         osrfListFree(session->request_queue);
367         free(session);
368 }
369
370 int osrfAppSessionMakeRequest(
371                 osrfAppSession* session, const jsonObject* params,
372                 const char* method_name, int protocol, osrfStringArray* param_strings ) {
373
374         return osrfAppSessionMakeLocaleRequest( session, params,
375                         method_name, protocol, param_strings, NULL );
376 }
377
378 static int osrfAppSessionMakeLocaleRequest(
379                 osrfAppSession* session, const jsonObject* params, const char* method_name,
380                 int protocol, osrfStringArray* param_strings, char* locale ) {
381
382         if(session == NULL) return -1;
383
384         osrfLogMkXid();
385
386         osrfMessage* req_msg = osrf_message_init( REQUEST, ++(session->thread_trace), protocol );
387         osrf_message_set_method(req_msg, method_name);
388
389         if (locale) {
390                 osrf_message_set_locale(req_msg, locale);
391         } else if (session->session_locale) {
392                 osrf_message_set_locale(req_msg, session->session_locale);
393         }
394
395         if(params) {
396                 osrf_message_set_params(req_msg, params);
397
398         } else {
399
400                 if(param_strings) {
401                         int i;
402                         for(i = 0; i!= param_strings->size ; i++ ) {
403                                 osrf_message_add_param(req_msg,
404                                         osrfStringArrayGetString(param_strings,i));
405                         }
406                 }
407         }
408
409         osrfAppRequest* req = _osrf_app_request_init( session, req_msg );
410         if(_osrf_app_session_send( session, req_msg ) ) {
411                 osrfLogWarning( OSRF_LOG_MARK,  "Error sending request message [%d]", session->thread_trace );
412                 _osrf_app_request_free(req);
413                 return -1;
414         }
415
416         osrfLogDebug( OSRF_LOG_MARK,  "Pushing [%d] onto request queue for session [%s] [%s]",
417                         req->request_id, session->remote_service, session->session_id );
418         osrfListSet( session->request_queue, req, req->request_id ); 
419         return req->request_id;
420 }
421
422 void osrf_app_session_set_complete( osrfAppSession* session, int request_id ) {
423         if(session == NULL)
424                 return;
425
426         osrfAppRequest* req = OSRF_LIST_GET_INDEX( session->request_queue, request_id );
427         if(req) req->complete = 1;
428 }
429
430 int osrf_app_session_request_complete( const osrfAppSession* session, int request_id ) {
431         if(session == NULL)
432                 return 0;
433         osrfAppRequest* req = OSRF_LIST_GET_INDEX( session->request_queue, request_id );
434         if(req)
435                 return req->complete;
436         return 0;
437 }
438
439
440 /** Resets the remote connection id to that of the original*/
441 void osrf_app_session_reset_remote( osrfAppSession* session ){
442         if( session==NULL )
443                 return;
444
445         free(session->remote_id);
446         osrfLogDebug( OSRF_LOG_MARK,  "App Session [%s] [%s] resetting remote id to %s",
447                         session->remote_service, session->session_id, session->orig_remote_id );
448
449         session->remote_id = strdup(session->orig_remote_id);
450 }
451
452 void osrf_app_session_set_remote( osrfAppSession* session, const char* remote_id ) {
453         if(session == NULL)
454                 return;
455         if( session->remote_id )
456                 free(session->remote_id );
457         session->remote_id = strdup( remote_id );
458 }
459
460 /** pushes the given message into the result list of the app_request
461   with the given request_id */
462 int osrf_app_session_push_queue( 
463                 osrfAppSession* session, osrfMessage* msg ){
464         if(session == NULL || msg == NULL) return 0;
465
466         osrfAppRequest* req = OSRF_LIST_GET_INDEX( session->request_queue, msg->thread_trace );
467         if(req == NULL) return 0;
468         _osrf_app_request_push_queue( req, msg );
469
470         return 0;
471 }
472
473 int osrfAppSessionConnect( osrfAppSession* session ) { 
474         return osrf_app_session_connect(session);
475 }
476
477
478 /** Attempts to connect to the remote service */
479 int osrf_app_session_connect(osrfAppSession* session){
480         
481         if(session == NULL)
482                 return 0;
483
484         if(session->state == OSRF_SESSION_CONNECTED) {
485                 return 1;
486         }
487
488         int timeout = 5; /* XXX CONFIG VALUE */
489
490         osrfLogDebug( OSRF_LOG_MARK,  "AppSession connecting to %s", session->remote_id );
491
492         /* defaulting to protocol 1 for now */
493         osrfMessage* con_msg = osrf_message_init( CONNECT, session->thread_trace, 1 );
494         osrf_app_session_reset_remote( session );
495         session->state = OSRF_SESSION_CONNECTING;
496         int ret = _osrf_app_session_send( session, con_msg );
497         osrfMessageFree(con_msg);
498         if(ret) return 0;
499
500         time_t start = time(NULL);      
501         time_t remaining = (time_t) timeout;
502
503         while( session->state != OSRF_SESSION_CONNECTED && remaining >= 0 ) {
504                 osrf_app_session_queue_wait( session, remaining, NULL );
505                 remaining -= (int) (time(NULL) - start);
506         }
507
508         if(session->state == OSRF_SESSION_CONNECTED)
509                 osrfLogDebug( OSRF_LOG_MARK, " * Connected Successfully to %s", session->remote_service );
510
511         if(session->state != OSRF_SESSION_CONNECTED)
512                 return 0;
513
514         return 1;
515 }
516
517
518
519 /** Disconnects from the remote service */
520 int osrf_app_session_disconnect( osrfAppSession* session){
521         if(session == NULL)
522                 return 1;
523
524         if(session->state == OSRF_SESSION_DISCONNECTED)
525                 return 1;
526
527         if(session->stateless && session->state != OSRF_SESSION_CONNECTED) {
528                 osrfLogDebug( OSRF_LOG_MARK,  
529                                 "Exiting disconnect on stateless session %s", 
530                                 session->session_id);
531                 return 1;
532         }
533
534         osrfLogDebug(OSRF_LOG_MARK,  "AppSession disconnecting from %s", session->remote_id );
535
536         osrfMessage* dis_msg = osrf_message_init( DISCONNECT, session->thread_trace, 1 );
537         _osrf_app_session_send( session, dis_msg );
538         session->state = OSRF_SESSION_DISCONNECTED;
539
540         osrfMessageFree( dis_msg );
541         osrf_app_session_reset_remote( session );
542         return 1;
543 }
544
545 int osrf_app_session_request_resend( osrfAppSession* session, int req_id ) {
546         osrfAppRequest* req = OSRF_LIST_GET_INDEX( session->request_queue, req_id );
547         return _osrf_app_request_resend( req );
548 }
549
550
551 static int osrfAppSessionSendBatch( osrfAppSession* session, osrfMessage* msgs[], int size ) {
552
553         if( !(session && msgs && size > 0) ) return 0;
554         int retval = 0;
555
556         osrfMessage* msg = msgs[0];
557
558         if(msg) {
559
560                 osrf_app_session_queue_wait( session, 0, NULL );
561
562                 if(session->state != OSRF_SESSION_CONNECTED)  {
563
564                         if(session->stateless) { /* stateless session always send to the root listener */
565                                 osrf_app_session_reset_remote(session);
566
567                         } else { 
568
569                                 /* do an auto-connect if necessary */
570                                 if( ! session->stateless &&
571                                         (msg->m_type != CONNECT) && 
572                                         (msg->m_type != DISCONNECT) &&
573                                         (session->state != OSRF_SESSION_CONNECTED) ) {
574
575                                         if(!osrf_app_session_connect( session )) 
576                                                 return 0;
577                                 }
578                         }
579                 }
580         }
581
582         char* string = osrfMessageSerializeBatch(msgs, size);
583
584         if( string ) {
585
586                 transport_message* t_msg = message_init( 
587                                 string, "", session->session_id, session->remote_id, NULL );
588       message_set_osrf_xid( t_msg, osrfLogGetXid() );
589
590                 retval = client_send_message( session->transport_handle, t_msg );
591
592                 if( retval ) osrfLogError(OSRF_LOG_MARK, "client_send_message failed");
593
594                 osrfLogInfo(OSRF_LOG_MARK, "[%s] sent %d bytes of data to %s",
595                         session->remote_service, strlen(string), t_msg->recipient );
596
597                 osrfLogDebug(OSRF_LOG_MARK, "Sent: %s", string );
598
599                 free(string);
600                 message_free( t_msg );
601         }
602
603         return retval; 
604 }
605
606
607
608 static int _osrf_app_session_send( osrfAppSession* session, osrfMessage* msg ){
609         if( !(session && msg) ) return 0;
610         osrfMessage* a[1];
611         a[0] = msg;
612         return osrfAppSessionSendBatch( session, a, 1 );
613 }
614
615
616
617
618 /**  Waits up to 'timeout' seconds for some data to arrive.
619   * Any data that arrives will be processed according to its
620   * payload and message type.  This method will return after
621   * any data has arrived.
622   */
623 int osrf_app_session_queue_wait( osrfAppSession* session, int timeout, int* recvd ){
624         if(session == NULL) return 0;
625         osrfLogDebug(OSRF_LOG_MARK,  "AppSession in queue_wait with timeout %d", timeout );
626         return osrf_stack_entry_point(session->transport_handle, timeout, recvd);
627 }
628
629 /** Disconnects (if client) and removes the given session from the global session cache 
630   * ! This free's all attached app_requests ! 
631   */
632 void osrfAppSessionFree( osrfAppSession* session ){
633         if(session == NULL) return;
634
635         osrfLogDebug(OSRF_LOG_MARK,  "AppSession [%s] [%s] destroying self and deleting requests", 
636                         session->remote_service, session->session_id );
637         if(session->type == OSRF_SESSION_CLIENT 
638                         && session->state != OSRF_SESSION_DISCONNECTED ) { /* disconnect if we're a client */
639                 osrfMessage* dis_msg = osrf_message_init( DISCONNECT, session->thread_trace, 1 );
640                 _osrf_app_session_send( session, dis_msg ); 
641                 osrfMessageFree(dis_msg);
642         }
643
644         osrfHashRemove( osrfAppSessionCache, session->session_id );
645         _osrf_app_session_free( session );
646 }
647
648 osrfMessage* osrfAppSessionRequestRecv(
649                 osrfAppSession* session, int req_id, int timeout ) {
650         if(req_id < 0 || session == NULL)
651                 return NULL;
652         osrfAppRequest* req = OSRF_LIST_GET_INDEX( session->request_queue, req_id );
653         return _osrf_app_request_recv( req, timeout );
654 }
655
656
657
658 int osrfAppRequestRespond( osrfAppSession* ses, int requestId, const jsonObject* data ) {
659         if(!ses || ! data ) return -1;
660
661         osrfMessage* msg = osrf_message_init( RESULT, requestId, 1 );
662         osrf_message_set_status_info( msg, NULL, "OK", OSRF_STATUS_OK );
663         char* json = jsonObjectToJSON( data );
664
665         osrf_message_set_result_content( msg, json );
666         _osrf_app_session_send( ses, msg ); 
667
668         free(json);
669         osrfMessageFree( msg );
670
671         return 0;
672 }
673
674
675 int osrfAppRequestRespondComplete( 
676                 osrfAppSession* ses, int requestId, const jsonObject* data ) {
677
678         osrfMessage* payload = osrf_message_init( RESULT, requestId, 1 );
679         osrf_message_set_status_info( payload, NULL, "OK", OSRF_STATUS_OK );
680
681         osrfMessage* status = osrf_message_init( STATUS, requestId, 1);
682         osrf_message_set_status_info( status, "osrfConnectStatus", "Request Complete", OSRF_STATUS_COMPLETE );
683         
684         if (data) {
685                 char* json = jsonObjectToJSON( data );
686                 osrf_message_set_result_content( payload, json );
687                 free(json);
688
689                 osrfMessage* ms[2];
690                 ms[0] = payload;
691                 ms[1] = status;
692
693                 osrfAppSessionSendBatch( ses, ms, 2 );
694         } else {
695                 osrfAppSessionSendBatch( ses, &status, 1 );
696         }
697
698         osrfMessageFree( payload );
699         osrfMessageFree( status );
700
701         return 0;
702 }
703
704 int osrfAppSessionStatus( osrfAppSession* ses, int type,
705                 const char* name, int reqId, const char* message ) {
706
707         if(ses) {
708                 osrfMessage* msg = osrf_message_init( STATUS, reqId, 1);
709                 osrf_message_set_status_info( msg, name, message, type );
710                 _osrf_app_session_send( ses, msg ); 
711                 osrfMessageFree( msg );
712                 return 0;
713         }
714         return -1;
715 }
716
717
718
719
720
721