Version 0.3.0 from FTP
[asterisk/asterisk.git] / apps / app_zapateller.c
1 /*
2  * Asterisk -- A telephony toolkit for Linux.
3  *
4  * Playback the special information tone to get rid of telemarketers
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 <string.h>
22 #include <stdlib.h>
23 #include <pthread.h>
24
25 static char *tdesc = "Block Telemarketers with Special Information Tone";
26
27 static char *app = "Zapateller";
28
29 static char *synopsis = "Block telemarketers with SIT";
30
31 static char *descrip = 
32 "  Zapateller(options):  Generates special information tone to block telemarketers\n"
33 "from calling you.  Returns 0 normally or -1 on hangup.  Options is a pipe-delimited\n"
34 "list of options.  The following options are available: 'answer' causes the line to\n"
35 "be answered before playing the tone, 'nocallerid' causes Zapateller to only play\n"
36 "the tone if there is no callerid information available.  Options should be\n"
37 "seperated by | characters.\n";
38
39 STANDARD_LOCAL_USER;
40
41 LOCAL_USER_DECL;
42
43 static int zapateller_exec(struct ast_channel *chan, void *data)
44 {
45         int res = 0;
46         struct localuser *u;
47         int answer = 0, nocallerid = 0;
48         char *c;
49         char *stringp=NULL;
50         
51         LOCAL_USER_ADD(u);
52
53         stringp=data;
54         c = strsep(&stringp, "|");
55         while(c && strlen(c)) {
56                 if (!strcasecmp(c, "answer"))
57                         answer = 1;
58                 else if (!strcasecmp(c, "nocallerid"))
59                         nocallerid = 1;
60
61                 c = strsep(&stringp, "|");
62         }
63
64         ast_stopstream(chan);
65         if (chan->_state != AST_STATE_UP) {
66
67                 if (answer) 
68                         res = ast_answer(chan);
69                 if (!res) {
70                         res = ast_safe_sleep(chan, 500);
71                 }
72         }
73         if (chan->callerid && nocallerid) {
74                 LOCAL_USER_REMOVE(u);
75                 return res;
76         } 
77         if (!res) 
78                 res = ast_tonepair(chan, 950, 0, 330, 0);
79         if (!res) 
80                 res = ast_tonepair(chan, 1400, 0, 330, 0);
81         if (!res) 
82                 res = ast_tonepair(chan, 1800, 0, 330, 0);
83         if (!res) 
84                 res = ast_tonepair(chan, 0, 0, 1000, 0);
85         LOCAL_USER_REMOVE(u);
86         return res;
87 }
88
89 int unload_module(void)
90 {
91         STANDARD_HANGUP_LOCALUSERS;
92         return ast_unregister_application(app);
93 }
94
95 int load_module(void)
96 {
97         return ast_register_application(app, zapateller_exec, synopsis, descrip);
98 }
99
100 char *description(void)
101 {
102         return tdesc;
103 }
104
105 int usecount(void)
106 {
107         int res;
108         STANDARD_USECOUNT(res);
109         return res;
110 }
111
112 char *key()
113 {
114         return ASTERISK_GPL_KEY;
115 }