summaryrefslogtreecommitdiff
path: root/res/res_pjsip_dtmf_info.c
blob: 6c69b5318171fbf2d05c3377a7a557528e7d2041 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
/*
 * Asterisk -- An open source telephony toolkit.
 *
 * Copyright (C) 2013, Digium, Inc.
 *
 * Jason Parker <jparker@digium.com>
 *
 * See http://www.asterisk.org for more information about
 * the Asterisk project. Please do not directly contact
 * any of the maintainers of this project for assistance;
 * the project provides a web site, mailing lists and IRC
 * channels for your use.
 *
 * This program is free software, distributed under the terms of
 * the GNU General Public License Version 2. See the LICENSE file
 * at the top of the source tree.
 */

/*** MODULEINFO
	<depend>pjproject</depend>
	<depend>res_pjsip</depend>
	<depend>res_pjsip_session</depend>
	<support_level>core</support_level>
 ***/

#include "asterisk.h"

#include <pjsip.h>
#include <pjsip_ua.h>

#include "asterisk/res_pjsip.h"
#include "asterisk/res_pjsip_session.h"
#include "asterisk/module.h"

static int dtmf_info_incoming_request(struct ast_sip_session *session, struct pjsip_rx_data *rdata)
{
	int res = 0;
	pjsip_msg_body *body = rdata->msg_info.msg->body;

	pjsip_tx_data *tdata;

	char buf[body->len];
	char *cur = buf;
	char *line;

	char event = '\0';
	unsigned int duration = 0;

	if (!ast_sip_is_content_type(&body->content_type, "application", "dtmf-relay")) {
		return 0;
	}

	body->print_body(body, buf, body->len);

	while ((line = strsep(&cur, "\r\n"))) {
		char *c;

		if (!(c = strchr(line, '='))) {
			continue;
		}
		*c++ = '\0';

		c = ast_skip_blanks(c);

		if (!strcasecmp(line, "signal")) {
			if (c[0] == '!' || c[0] == '*' || c[0] == '#' ||
			    ('0' <= c[0] && c[0] <= '9') ||
			    ('A' <= c[0] && c[0] <= 'D') ||
			    ('a' <= c[0] && c[0] <= 'd')) {
				event = c[0];
			} else {
				ast_log(LOG_ERROR, "Invalid DTMF event signal in INFO message.\n");
				res = -1;
				break;
			}
		} else if (!strcasecmp(line, "duration")) {
			sscanf(c, "%30u", &duration);
		}
	}

	if (!duration) {
		duration = 100;
	}

	if (event == '!') {
		struct ast_frame f = { AST_FRAME_CONTROL, { AST_CONTROL_FLASH, } };

		ast_queue_frame(session->channel, &f);
	} else if (event != '\0') {
		struct ast_frame f = { AST_FRAME_DTMF, };
		f.len = duration;
		f.subclass.integer = event;

		ast_queue_frame(session->channel, &f);
	} else {
		res = -1;
	}

	if (pjsip_dlg_create_response(session->inv_session->dlg, rdata, !res ? 200 : 500, NULL, &tdata) == PJ_SUCCESS) {
		struct pjsip_transaction *tsx = pjsip_rdata_get_tsx(rdata);

		pjsip_dlg_send_response(session->inv_session->dlg, tsx, tdata);
	}

	return res;
}

static struct ast_sip_session_supplement dtmf_info_supplement = {
	.method = "INFO",
	.incoming_request = dtmf_info_incoming_request,
};

static int load_module(void)
{
	ast_sip_session_register_supplement(&dtmf_info_supplement);
	return AST_MODULE_LOAD_SUCCESS;
}

static int unload_module(void)
{
	ast_sip_session_unregister_supplement(&dtmf_info_supplement);
	return 0;
}

AST_MODULE_INFO(ASTERISK_GPL_KEY, AST_MODFLAG_LOAD_ORDER, "PJSIP DTMF INFO Support",
		.load = load_module,
		.unload = unload_module,
		.load_pri = AST_MODPRI_APP_DEPEND,
	       );