d46e34f254318957e1f5bda939ee571c5aaacc7f
[asterisk/asterisk.git] / apps / app_transfer.c
1 /*
2  * Asterisk -- A telephony toolkit for Linux.
3  *
4  * Transfer a caller
5  * 
6  * Copyright (C) 1999 - 2005, Digium, Inc.
7  *
8  * Mark Spencer <markster@digium.com>
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 <stdlib.h>
21 #include <unistd.h>
22 #include <string.h>
23 #include <stdlib.h>
24
25 static char *tdesc = "Transfer";
26
27 static char *app = "Transfer";
28
29 static char *synopsis = "Transfer caller to remote extension";
30
31 static char *descrip = 
32 "  Transfer([Tech/]dest):  Requests the remote caller be transferred\n"
33 "a given extension. Returns -1 on hangup, or 0 on completion\n"
34 "regardless of whether the transfer was successful.  If the transfer\n"
35 "was *not* supported or successful and there exists a priority n + 101,\n"
36 "then that priority will be taken next.\n" ;
37
38 STANDARD_LOCAL_USER;
39
40 LOCAL_USER_DECL;
41
42 static int transfer_exec(struct ast_channel *chan, void *data)
43 {
44         int res=0;
45         int len;
46         struct localuser *u;
47         char *slash;
48         if (!data || !strlen(data)) {
49                 ast_log(LOG_WARNING, "Transfer requires an argument ([Tech/]destination)\n");
50                 res = 1;
51         }
52         if ((slash = strchr((char *)data, '/')) && (len = (slash - (char *)data))) {
53                 /* Allow execution only if the Tech/destination agrees with the type of the channel */
54                 if (strncasecmp(chan->type, (char *)data, len))
55                         return 0;
56         }
57         LOCAL_USER_ADD(u);
58         if (!res) {
59                 res = ast_transfer(chan, data + strlen(chan->type) + 1);
60         }
61         if (!res) {
62                 /* Look for a "busy" place */
63                 if (ast_exists_extension(chan, chan->context, chan->exten, chan->priority + 101, chan->cid.cid_num))
64                         chan->priority += 100;
65         }
66         if (res > 0)
67                 res = 0;
68         LOCAL_USER_REMOVE(u);
69         return res;
70 }
71
72 int unload_module(void)
73 {
74         STANDARD_HANGUP_LOCALUSERS;
75         return ast_unregister_application(app);
76 }
77
78 int load_module(void)
79 {
80         return ast_register_application(app, transfer_exec, synopsis, descrip);
81 }
82
83 char *description(void)
84 {
85         return tdesc;
86 }
87
88 int usecount(void)
89 {
90         int res;
91         STANDARD_USECOUNT(res);
92         return res;
93 }
94
95 char *key()
96 {
97         return ASTERISK_GPL_KEY;
98 }