Version 0.3.0 from FTP
[asterisk/asterisk.git] / apps / app_setcidname.c
1 /*
2  * Asterisk -- A telephony toolkit for Linux.
3  *
4  * App to set callerid
5  * 
6  * Copyright (C) 1999, Mark Spencer
7  *
8  * Mark Spencer <markster@linux-support.net>
9  *
10  * This program is free software, distributed under the terms of
11  * the GNU General Public License
12  */
13  
14 #include <asterisk/lock.h>
15 #include <asterisk/file.h>
16 #include <asterisk/logger.h>
17 #include <asterisk/channel.h>
18 #include <asterisk/pbx.h>
19 #include <asterisk/module.h>
20 #include <asterisk/translate.h>
21 #include <asterisk/image.h>
22 #include <asterisk/callerid.h>
23 #include <string.h>
24 #include <stdlib.h>
25 #include <pthread.h>
26
27 static char *tdesc = "Set CallerID Name";
28
29 static char *app = "SetCIDName";
30
31 static char *synopsis = "Set CallerID Name";
32
33 static char *descrip = 
34 "  SetCIDName(cname[|a]): Set Caller*ID Name on a call to a new\n"
35 "value, while preserving the original Caller*ID number.  This is\n"
36 "useful for providing additional information to the called\n"
37 "party. Sets ANI as well if a flag is used.  Always returns 0\n";
38
39 STANDARD_LOCAL_USER;
40
41 LOCAL_USER_DECL;
42
43 static int setcallerid_exec(struct ast_channel *chan, void *data)
44 {
45         int res = 0;
46         char tmp[256] = "";
47         char oldcid[256] = "", *l, *n;
48         char newcid[256] = "";
49         struct localuser *u;
50         char *opt;
51         int anitoo = 0;
52         if (data)
53                 strncpy(tmp, (char *)data, sizeof(tmp) - 1);
54         opt = strchr(tmp, '|');
55         if (opt) {
56                 *opt = '\0';
57                 opt++;
58                 if (*opt == 'a')
59                         anitoo = 1;
60         }
61         LOCAL_USER_ADD(u);
62         if (chan->callerid) {
63                 strncpy(oldcid, chan->callerid, sizeof(oldcid) - 1);
64                 ast_callerid_parse(oldcid, &n, &l);
65                 n = tmp;
66                 if (strlen(n)) {
67                         if (l && strlen(l))
68                                 snprintf(newcid, sizeof(newcid), "\"%s\" <%s>", n, l);
69                         else
70                                 strncpy(newcid, tmp, sizeof(newcid) - 1);
71                 } else if (l && strlen(l)) {
72                         strncpy(newcid, l, sizeof(newcid) - 1);
73                 }
74         } else
75                 strncpy(newcid, tmp, sizeof(newcid));
76         ast_set_callerid(chan, strlen(newcid) ? newcid : NULL, anitoo);
77         LOCAL_USER_REMOVE(u);
78         return res;
79 }
80
81 int unload_module(void)
82 {
83         STANDARD_HANGUP_LOCALUSERS;
84         return ast_unregister_application(app);
85 }
86
87 int load_module(void)
88 {
89         return ast_register_application(app, setcallerid_exec, synopsis, descrip);
90 }
91
92 char *description(void)
93 {
94         return tdesc;
95 }
96
97 int usecount(void)
98 {
99         int res;
100         STANDARD_USECOUNT(res);
101         return res;
102 }
103
104 char *key()
105 {
106         return ASTERISK_GPL_KEY;
107 }