Merged revisions 82992 via svnmerge from
[asterisk/asterisk.git] / apps / app_flash.c
1 /*
2  * Asterisk -- An open source telephony toolkit.
3  *
4  * Copyright (C) 1999 - 2005, Digium, Inc.
5  *
6  * Mark Spencer <markster@digium.com>
7  *
8  * See http://www.asterisk.org for more information about
9  * the Asterisk project. Please do not directly contact
10  * any of the maintainers of this project for assistance;
11  * the project provides a web site, mailing lists and IRC
12  * channels for your use.
13  *
14  * This program is free software, distributed under the terms of
15  * the GNU General Public License Version 2. See the LICENSE file
16  * at the top of the source tree.
17  */
18
19 /*! \file
20  *
21  * \brief App to flash a zap trunk
22  *
23  * \author Mark Spencer <markster@digium.com>
24  * 
25  * \ingroup applications
26  */
27  
28 /*** MODULEINFO
29         <depend>zaptel</depend>
30  ***/
31
32 #include "asterisk.h"
33
34 ASTERISK_FILE_VERSION(__FILE__, "$Revision$")
35
36 #include <stdlib.h>
37 #include <stdio.h>
38 #include <string.h>
39 #include <errno.h>
40 #include "asterisk/zapata.h"
41
42 #include "asterisk/lock.h"
43 #include "asterisk/file.h"
44 #include "asterisk/logger.h"
45 #include "asterisk/channel.h"
46 #include "asterisk/pbx.h"
47 #include "asterisk/module.h"
48 #include "asterisk/translate.h"
49 #include "asterisk/image.h"
50 #include "asterisk/options.h"
51
52 static char *app = "Flash";
53
54 static char *synopsis = "Flashes a Zap Trunk";
55
56 static char *descrip = 
57 "Performs a flash on a zap trunk.  This can be used\n"
58 "to access features provided on an incoming analogue circuit\n"
59 "such as conference and call waiting. Use with SendDTMF() to\n"
60 "perform external transfers\n";
61
62
63 static inline int zt_wait_event(int fd)
64 {
65         /* Avoid the silly zt_waitevent which ignores a bunch of events */
66         int i,j=0;
67         i = ZT_IOMUX_SIGEVENT;
68         if (ioctl(fd, ZT_IOMUX, &i) == -1) return -1;
69         if (ioctl(fd, ZT_GETEVENT, &j) == -1) return -1;
70         return j;
71 }
72
73 static int flash_exec(struct ast_channel *chan, void *data)
74 {
75         int res = -1;
76         int x;
77         struct zt_params ztp;
78
79         if (strcasecmp(chan->tech->type, "Zap")) {
80                 ast_log(LOG_WARNING, "%s is not a Zap channel\n", chan->name);
81                 return -1;
82         }
83         
84         memset(&ztp, 0, sizeof(ztp));
85         res = ioctl(chan->fds[0], ZT_GET_PARAMS, &ztp);
86         if (!res) {
87                 if (ztp.sigtype & __ZT_SIG_FXS) {
88                         x = ZT_FLASH;
89                         res = ioctl(chan->fds[0], ZT_HOOK, &x);
90                         if (!res || (errno == EINPROGRESS)) {
91                                 if (res) {
92                                         /* Wait for the event to finish */
93                                         zt_wait_event(chan->fds[0]);
94                                 }
95                                 res = ast_safe_sleep(chan, 1000);
96                                 ast_verb(3, "Flashed channel %s\n", chan->name);
97                         } else
98                                 ast_log(LOG_WARNING, "Unable to flash channel %s: %s\n", chan->name, strerror(errno));
99                 } else
100                         ast_log(LOG_WARNING, "%s is not an FXO Channel\n", chan->name);
101         } else
102                 ast_log(LOG_WARNING, "Unable to get parameters of %s: %s\n", chan->name, strerror(errno));
103
104         return res;
105 }
106
107 static int unload_module(void)
108 {
109         return ast_unregister_application(app);
110 }
111
112 static int load_module(void)
113 {
114         return ast_register_application(app, flash_exec, synopsis, descrip);
115 }
116
117 AST_MODULE_INFO_STANDARD(ASTERISK_GPL_KEY, "Flash channel application");
118