76655cedebf2db656e470125dd5be774e5bba77c
[asterisk/asterisk.git] / apps / app_transfer.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 Transfer a caller
22  *
23  * \author Mark Spencer <markster@digium.com>
24  * 
25  * Requires transfer support from channel driver
26  *
27  * \ingroup applications
28  */
29
30 #include "asterisk.h"
31
32 ASTERISK_FILE_VERSION(__FILE__, "$Revision$")
33
34 #include <stdlib.h>
35 #include <stdio.h>
36 #include <string.h>
37 #include <unistd.h>
38
39 #include "asterisk/lock.h"
40 #include "asterisk/file.h"
41 #include "asterisk/logger.h"
42 #include "asterisk/channel.h"
43 #include "asterisk/pbx.h"
44 #include "asterisk/module.h"
45 #include "asterisk/options.h"
46 #include "asterisk/app.h"
47
48
49 static const char *app = "Transfer";
50
51 static const char *synopsis = "Transfer caller to remote extension";
52
53 static const char *descrip = 
54 "  Transfer([Tech/]dest[|options]):  Requests the remote caller be transferred\n"
55 "to a given destination. If TECH (SIP, IAX2, LOCAL etc) is used, only\n"
56 "an incoming call with the same channel technology will be transfered.\n"
57 "Note that for SIP, if you transfer before call is setup, a 302 redirect\n"
58 "SIP message will be returned to the caller.\n"
59 "\nThe result of the application will be reported in the TRANSFERSTATUS\n"
60 "channel variable:\n"
61 "       SUCCESS      Transfer succeeded\n"
62 "       FAILURE      Transfer failed\n"
63 "       UNSUPPORTED  Transfer unsupported by channel driver\n";
64
65 static int transfer_exec(struct ast_channel *chan, void *data)
66 {
67         int res;
68         int len;
69         struct ast_module_user *u;
70         char *slash;
71         char *tech = NULL;
72         char *dest = NULL;
73         char *status;
74         char *parse;
75         AST_DECLARE_APP_ARGS(args,
76                 AST_APP_ARG(dest);
77                 AST_APP_ARG(options);
78         );
79
80         u = ast_module_user_add(chan);
81
82         if (ast_strlen_zero((char *)data)) {
83                 ast_log(LOG_WARNING, "Transfer requires an argument ([Tech/]destination[|options])\n");
84                 ast_module_user_remove(u);
85                 pbx_builtin_setvar_helper(chan, "TRANSFERSTATUS", "FAILURE");
86                 return 0;
87         } else
88                 parse = ast_strdupa(data);
89
90         AST_STANDARD_APP_ARGS(args, parse);
91
92         if (args.options) {
93         }
94
95         dest = args.dest;
96
97         if ((slash = strchr(dest, '/')) && (len = (slash - dest))) {
98                 tech = dest;
99                 dest = slash + 1;
100                 /* Allow execution only if the Tech/destination agrees with the type of the channel */
101                 if (strncasecmp(chan->tech->type, tech, len)) {
102                         pbx_builtin_setvar_helper(chan, "TRANSFERSTATUS", "FAILURE");
103                         ast_module_user_remove(u);
104                         return 0;
105                 }
106         }
107
108         /* Check if the channel supports transfer before we try it */
109         if (!chan->tech->transfer) {
110                 pbx_builtin_setvar_helper(chan, "TRANSFERSTATUS", "UNSUPPORTED");
111                 ast_module_user_remove(u);
112                 return 0;
113         }
114
115         res = ast_transfer(chan, dest);
116
117         if (res < 0) {
118                 status = "FAILURE";
119                 res = 0;
120         } else {
121                 status = "SUCCESS";
122                 res = 0;
123         }
124
125         pbx_builtin_setvar_helper(chan, "TRANSFERSTATUS", status);
126
127         ast_module_user_remove(u);
128
129         return res;
130 }
131
132 static int unload_module(void)
133 {
134         return ast_unregister_application(app);
135 }
136
137 static int load_module(void)
138 {
139         return ast_register_application(app, transfer_exec, synopsis, descrip);
140 }
141
142 AST_MODULE_INFO_STANDARD(ASTERISK_GPL_KEY, "Transfers a caller to another extension");