- Spelling checked
[sip-router] / script_cb.c
1 /*
2  * $Id$
3  *
4  * Script callbacks -- they add the ability to register callback
5  * functions which are always called when script for request
6  * processing is entered or left
7  *
8  *
9  * Copyright (C) 2001-2003 FhG Fokus
10  *
11  * This file is part of ser, a free SIP server.
12  *
13  * ser is free software; you can redistribute it and/or modify
14  * it under the terms of the GNU General Public License as published by
15  * the Free Software Foundation; either version 2 of the License, or
16  * (at your option) any later version
17  *
18  * For a license to use the ser software under conditions
19  * other than those described here, or to purchase support for this
20  * software, please contact iptel.org by e-mail at the following addresses:
21  *    info@iptel.org
22  *
23  * ser is distributed in the hope that it will be useful,
24  * but WITHOUT ANY WARRANTY; without even the implied warranty of
25  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
26  * GNU General Public License for more details.
27  *
28  * You should have received a copy of the GNU General Public License 
29  * along with this program; if not, write to the Free Software 
30  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
31  */
32 /* History:
33  * --------
34  *  2003-03-29  cleaning pkg allocation introduced (jiri)
35  *  2003-03-19  replaced all mallocs/frees w/ pkg_malloc/pkg_free (andrei)
36  */
37
38
39 #include <stdlib.h>
40 #include "script_cb.h"
41 #include "dprint.h"
42 #include "error.h"
43 #include "mem/mem.h"
44
45 static struct script_cb *pre_cb=0;
46 static struct script_cb *post_cb=0;
47 static unsigned int cb_id=0;
48
49 int register_script_cb( cb_function f, callback_t t, void *param )
50 {
51         struct script_cb *new_cb;
52
53         new_cb=pkg_malloc(sizeof(struct script_cb));
54         if (new_cb==0) {
55                 LOG(L_ERR, "ERROR: register_script_cb: out of memory\n");
56                 return E_OUT_OF_MEM;
57         }
58         new_cb->cbf=f;
59         new_cb->id=cb_id++;
60         new_cb->param=param;
61         /* insert into appropriate list */
62         if (t==PRE_SCRIPT_CB) {
63                 new_cb->next=pre_cb;
64                 pre_cb=new_cb;
65         } else if (t==POST_SCRIPT_CB) {
66                 new_cb->next=post_cb;
67                 post_cb=new_cb;
68         } else {
69                 LOG(L_CRIT, "ERROR: register_script_cb: unknown CB type\n");
70                 return E_BUG;
71         }
72         /* ok, callback installed */
73         return 1;
74 }
75
76 void destroy_script_cb()
77 {
78         struct script_cb *cb, *foo;
79
80         cb=pre_cb;
81         while(cb) { foo=cb->next;pkg_free(cb);cb=foo; }
82         cb=post_cb;
83         while(cb) { foo=cb->next;pkg_free(cb);cb=foo; }
84 }
85
86 int exec_pre_cb( struct sip_msg *msg)
87 {
88         struct script_cb *i;
89         for (i=pre_cb; i; i=i->next) {
90                 /* stop on error */
91                 if (i->cbf(msg, i->param)==0)
92                         return 0;
93         }
94         return 1;
95 }
96
97 void exec_post_cb( struct sip_msg *msg)
98 {
99         struct script_cb *i;
100         for (i=post_cb; i; i=i->next) i->cbf(msg, i->param);
101 }
102