2 * Asterisk -- An open source telephony toolkit.
4 * Copyright (C) 1999 - 2005, Digium, Inc.
6 * Mark Spencer <markster@digium.com>
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.
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.
21 * \brief Implementation of Inter-Asterisk eXchange Protocol, v 2
23 * \author Mark Spencer <markster@digium.com>
28 ASTERISK_FILE_VERSION(__FILE__, "$Revision$")
30 #include <sys/types.h>
31 #include <sys/socket.h>
33 #include <netinet/in.h>
34 #include <arpa/inet.h>
39 #include "asterisk/frame.h"
40 #include "asterisk/utils.h"
41 #include "asterisk/unaligned.h"
42 #include "asterisk/lock.h"
43 #include "asterisk/threadstorage.h"
46 #include "iax2-parser.h"
47 #include "iax2-provision.h"
49 static int frames = 0;
50 static int iframes = 0;
51 static int oframes = 0;
53 #if !defined(LOW_MEMORY)
54 static void frame_cache_cleanup(void *data);
56 /*! \brief A per-thread cache of iax_frame structures */
57 AST_THREADSTORAGE_CUSTOM(frame_cache, NULL, frame_cache_cleanup);
59 /*! \brief This is just so iax_frames, a list head struct for holding a list of
60 * iax_frame structures, is defined. */
61 AST_LIST_HEAD_NOLOCK(iax_frames, iax_frame);
64 static void internaloutput(const char *str)
69 static void internalerror(const char *str)
71 fprintf(stderr, "WARNING: %s", str);
74 static void (*outputf)(const char *str) = internaloutput;
75 static void (*errorf)(const char *str) = internalerror;
77 static void dump_addr(char *output, int maxlen, void *value, int len)
79 struct sockaddr_in sin;
80 if (len == (int)sizeof(sin)) {
81 memcpy(&sin, value, len);
82 snprintf(output, maxlen, "IPV4 %s:%d", ast_inet_ntoa(sin.sin_addr), ntohs(sin.sin_port));
84 snprintf(output, maxlen, "Invalid Address");
88 static void dump_string(char *output, int maxlen, void *value, int len)
93 strncpy(output, value, maxlen);
94 output[maxlen] = '\0';
97 static void dump_prefs(char *output, int maxlen, void *value, int len)
99 struct ast_codec_pref pref;
108 strncpy(output, value, maxlen);
109 output[maxlen] = '\0';
111 ast_codec_pref_convert(&pref, output, total_len, 0);
112 memset(output,0,total_len);
113 ast_codec_pref_string(&pref, output, total_len);
116 static void dump_int(char *output, int maxlen, void *value, int len)
118 if (len == (int)sizeof(unsigned int))
119 snprintf(output, maxlen, "%lu", (unsigned long)ntohl(get_unaligned_uint32(value)));
121 ast_copy_string(output, "Invalid INT", maxlen);
124 static void dump_short(char *output, int maxlen, void *value, int len)
126 if (len == (int)sizeof(unsigned short))
127 snprintf(output, maxlen, "%d", ntohs(get_unaligned_uint16(value)));
129 ast_copy_string(output, "Invalid SHORT", maxlen);
132 static void dump_byte(char *output, int maxlen, void *value, int len)
134 if (len == (int)sizeof(unsigned char))
135 snprintf(output, maxlen, "%d", *((unsigned char *)value));
137 ast_copy_string(output, "Invalid BYTE", maxlen);
140 static void dump_datetime(char *output, int maxlen, void *value, int len)
143 unsigned long val = (unsigned long) ntohl(get_unaligned_uint32(value));
144 if (len == (int)sizeof(unsigned int)) {
145 tm.tm_sec = (val & 0x1f) << 1;
146 tm.tm_min = (val >> 5) & 0x3f;
147 tm.tm_hour = (val >> 11) & 0x1f;
148 tm.tm_mday = (val >> 16) & 0x1f;
149 tm.tm_mon = ((val >> 21) & 0x0f) - 1;
150 tm.tm_year = ((val >> 25) & 0x7f) + 100;
151 strftime(output, maxlen, "%Y-%m-%d %T", &tm);
153 ast_copy_string(output, "Invalid DATETIME format!", maxlen);
156 static void dump_ipaddr(char *output, int maxlen, void *value, int len)
158 struct sockaddr_in sin;
159 if (len == (int)sizeof(unsigned int)) {
160 memcpy(&sin.sin_addr, value, len);
161 snprintf(output, maxlen, "%s", ast_inet_ntoa(sin.sin_addr));
163 ast_copy_string(output, "Invalid IPADDR", maxlen);
167 static void dump_prov_flags(char *output, int maxlen, void *value, int len)
170 if (len == (int)sizeof(unsigned int))
171 snprintf(output, maxlen, "%lu (%s)", (unsigned long)ntohl(get_unaligned_uint32(value)),
172 iax_provflags2str(buf, sizeof(buf), ntohl(get_unaligned_uint32(value))));
174 ast_copy_string(output, "Invalid INT", maxlen);
177 static void dump_samprate(char *output, int maxlen, void *value, int len)
181 if (len == (int)sizeof(unsigned short)) {
182 sr = ntohs(*((unsigned short *)value));
183 if (sr & IAX_RATE_8KHZ)
184 strcat(tmp, ",8khz");
185 if (sr & IAX_RATE_11KHZ)
186 strcat(tmp, ",11.025khz");
187 if (sr & IAX_RATE_16KHZ)
188 strcat(tmp, ",16khz");
189 if (sr & IAX_RATE_22KHZ)
190 strcat(tmp, ",22.05khz");
191 if (sr & IAX_RATE_44KHZ)
192 strcat(tmp, ",44.1khz");
193 if (sr & IAX_RATE_48KHZ)
194 strcat(tmp, ",48khz");
196 ast_copy_string(output, &tmp[1], maxlen);
198 ast_copy_string(output, "None Specified!\n", maxlen);
200 ast_copy_string(output, "Invalid SHORT", maxlen);
204 static void dump_prov_ies(char *output, int maxlen, unsigned char *iedata, int len);
205 static void dump_prov(char *output, int maxlen, void *value, int len)
207 dump_prov_ies(output, maxlen, value, len);
210 static struct iax2_ie {
213 void (*dump)(char *output, int maxlen, void *value, int len);
215 { IAX_IE_CALLED_NUMBER, "CALLED NUMBER", dump_string },
216 { IAX_IE_CALLING_NUMBER, "CALLING NUMBER", dump_string },
217 { IAX_IE_CALLING_ANI, "ANI", dump_string },
218 { IAX_IE_CALLING_NAME, "CALLING NAME", dump_string },
219 { IAX_IE_CALLED_CONTEXT, "CALLED CONTEXT", dump_string },
220 { IAX_IE_USERNAME, "USERNAME", dump_string },
221 { IAX_IE_PASSWORD, "PASSWORD", dump_string },
222 { IAX_IE_CAPABILITY, "CAPABILITY", dump_int },
223 { IAX_IE_FORMAT, "FORMAT", dump_int },
224 { IAX_IE_LANGUAGE, "LANGUAGE", dump_string },
225 { IAX_IE_VERSION, "VERSION", dump_short },
226 { IAX_IE_ADSICPE, "ADSICPE", dump_short },
227 { IAX_IE_DNID, "DNID", dump_string },
228 { IAX_IE_AUTHMETHODS, "AUTHMETHODS", dump_short },
229 { IAX_IE_CHALLENGE, "CHALLENGE", dump_string },
230 { IAX_IE_MD5_RESULT, "MD5 RESULT", dump_string },
231 { IAX_IE_RSA_RESULT, "RSA RESULT", dump_string },
232 { IAX_IE_APPARENT_ADDR, "APPARENT ADDRESS", dump_addr },
233 { IAX_IE_REFRESH, "REFRESH", dump_short },
234 { IAX_IE_DPSTATUS, "DIALPLAN STATUS", dump_short },
235 { IAX_IE_CALLNO, "CALL NUMBER", dump_short },
236 { IAX_IE_CAUSE, "CAUSE", dump_string },
237 { IAX_IE_IAX_UNKNOWN, "UNKNOWN IAX CMD", dump_byte },
238 { IAX_IE_MSGCOUNT, "MESSAGE COUNT", dump_short },
239 { IAX_IE_AUTOANSWER, "AUTO ANSWER REQ" },
240 { IAX_IE_TRANSFERID, "TRANSFER ID", dump_int },
241 { IAX_IE_RDNIS, "REFERRING DNIS", dump_string },
242 { IAX_IE_PROVISIONING, "PROVISIONING", dump_prov },
243 { IAX_IE_AESPROVISIONING, "AES PROVISIONG" },
244 { IAX_IE_DATETIME, "DATE TIME", dump_datetime },
245 { IAX_IE_DEVICETYPE, "DEVICE TYPE", dump_string },
246 { IAX_IE_SERVICEIDENT, "SERVICE IDENT", dump_string },
247 { IAX_IE_FIRMWAREVER, "FIRMWARE VER", dump_short },
248 { IAX_IE_FWBLOCKDESC, "FW BLOCK DESC", dump_int },
249 { IAX_IE_FWBLOCKDATA, "FW BLOCK DATA" },
250 { IAX_IE_PROVVER, "PROVISIONG VER", dump_int },
251 { IAX_IE_CALLINGPRES, "CALLING PRESNTN", dump_byte },
252 { IAX_IE_CALLINGTON, "CALLING TYPEOFNUM", dump_byte },
253 { IAX_IE_CALLINGTNS, "CALLING TRANSITNET", dump_short },
254 { IAX_IE_SAMPLINGRATE, "SAMPLINGRATE", dump_samprate },
255 { IAX_IE_CAUSECODE, "CAUSE CODE", dump_byte },
256 { IAX_IE_ENCRYPTION, "ENCRYPTION", dump_short },
257 { IAX_IE_ENCKEY, "ENCRYPTION KEY" },
258 { IAX_IE_CODEC_PREFS, "CODEC_PREFS", dump_prefs },
259 { IAX_IE_RR_JITTER, "RR_JITTER", dump_int },
260 { IAX_IE_RR_LOSS, "RR_LOSS", dump_int },
261 { IAX_IE_RR_PKTS, "RR_PKTS", dump_int },
262 { IAX_IE_RR_DELAY, "RR_DELAY", dump_short },
263 { IAX_IE_RR_DROPPED, "RR_DROPPED", dump_int },
264 { IAX_IE_RR_OOO, "RR_OUTOFORDER", dump_int },
267 static struct iax2_ie prov_ies[] = {
268 { PROV_IE_USEDHCP, "USEDHCP" },
269 { PROV_IE_IPADDR, "IPADDR", dump_ipaddr },
270 { PROV_IE_SUBNET, "SUBNET", dump_ipaddr },
271 { PROV_IE_GATEWAY, "GATEWAY", dump_ipaddr },
272 { PROV_IE_PORTNO, "BINDPORT", dump_short },
273 { PROV_IE_USER, "USERNAME", dump_string },
274 { PROV_IE_PASS, "PASSWORD", dump_string },
275 { PROV_IE_LANG, "LANGUAGE", dump_string },
276 { PROV_IE_TOS, "TYPEOFSERVICE", dump_byte },
277 { PROV_IE_FLAGS, "FLAGS", dump_prov_flags },
278 { PROV_IE_FORMAT, "FORMAT", dump_int },
279 { PROV_IE_AESKEY, "AESKEY" },
280 { PROV_IE_SERVERIP, "SERVERIP", dump_ipaddr },
281 { PROV_IE_SERVERPORT, "SERVERPORT", dump_short },
282 { PROV_IE_NEWAESKEY, "NEWAESKEY" },
283 { PROV_IE_PROVVER, "PROV VERSION", dump_int },
284 { PROV_IE_ALTSERVER, "ALTSERVERIP", dump_ipaddr },
287 const char *iax_ie2str(int ie)
290 for (x=0;x<(int)sizeof(ies) / (int)sizeof(ies[0]); x++) {
298 static void dump_prov_ies(char *output, int maxlen, unsigned char *iedata, int len)
308 strcpy(output, "\n");
309 maxlen -= strlen(output); output += strlen(output);
313 if (ielen + 2> len) {
314 snprintf(tmp, (int)sizeof(tmp), "Total Prov IE length of %d bytes exceeds remaining prov frame length of %d bytes\n", ielen + 2, len);
315 ast_copy_string(output, tmp, maxlen);
316 maxlen -= strlen(output);
317 output += strlen(output);
321 for (x=0;x<(int)sizeof(prov_ies) / (int)sizeof(prov_ies[0]); x++) {
322 if (prov_ies[x].ie == ie) {
323 if (prov_ies[x].dump) {
324 prov_ies[x].dump(interp, (int)sizeof(interp), iedata + 2, ielen);
325 snprintf(tmp, (int)sizeof(tmp), " %-15.15s : %s\n", prov_ies[x].name, interp);
326 ast_copy_string(output, tmp, maxlen);
327 maxlen -= strlen(output); output += strlen(output);
330 snprintf(interp, (int)sizeof(interp), "%d bytes", ielen);
332 strcpy(interp, "Present");
333 snprintf(tmp, (int)sizeof(tmp), " %-15.15s : %s\n", prov_ies[x].name, interp);
334 ast_copy_string(output, tmp, maxlen);
335 maxlen -= strlen(output); output += strlen(output);
341 snprintf(tmp, (int)sizeof(tmp), " Unknown Prov IE %03d : Present\n", ie);
342 ast_copy_string(output, tmp, maxlen);
343 maxlen -= strlen(output); output += strlen(output);
345 iedata += (2 + ielen);
350 static void dump_ies(unsigned char *iedata, int len)
363 if (ielen + 2> len) {
364 snprintf(tmp, (int)sizeof(tmp), "Total IE length of %d bytes exceeds remaining frame length of %d bytes\n", ielen + 2, len);
369 for (x=0;x<(int)sizeof(ies) / (int)sizeof(ies[0]); x++) {
370 if (ies[x].ie == ie) {
372 ies[x].dump(interp, (int)sizeof(interp), iedata + 2, ielen);
373 snprintf(tmp, (int)sizeof(tmp), " %-15.15s : %s\n", ies[x].name, interp);
377 snprintf(interp, (int)sizeof(interp), "%d bytes", ielen);
379 strcpy(interp, "Present");
380 snprintf(tmp, (int)sizeof(tmp), " %-15.15s : %s\n", ies[x].name, interp);
387 snprintf(tmp, (int)sizeof(tmp), " Unknown IE %03d : Present\n", ie);
390 iedata += (2 + ielen);
396 void iax_showframe(struct iax_frame *f, struct ast_iax2_full_hdr *fhi, int rx, struct sockaddr_in *sin, int datalen)
398 const char *frames[] = {
413 const char *iaxs[] = {
453 const char *cmds[] = {
473 struct ast_iax2_full_hdr *fh;
478 const char *subclass;
498 snprintf(retries, sizeof(retries), "%03d", f->retries);
501 if (ntohs(fh->dcallno) & IAX_FLAG_RETRANS)
502 strcpy(retries, "Yes");
504 strcpy(retries, " No");
506 if (!(ntohs(fh->scallno) & IAX_FLAG_FULL)) {
507 /* Don't mess with mini-frames */
510 if (fh->type >= (int)sizeof(frames)/(int)sizeof(frames[0])) {
511 snprintf(class2, sizeof(class2), "(%d?)", fh->type);
514 class = frames[(int)fh->type];
516 if (fh->type == AST_FRAME_DTMF_BEGIN || fh->type == AST_FRAME_DTMF_END) {
517 sprintf(subclass2, "%c", fh->csub);
518 subclass = subclass2;
519 } else if (fh->type == AST_FRAME_IAX) {
520 if (fh->csub >= (int)sizeof(iaxs)/(int)sizeof(iaxs[0])) {
521 snprintf(subclass2, sizeof(subclass2), "(%d?)", fh->csub);
522 subclass = subclass2;
524 subclass = iaxs[(int)fh->csub];
526 } else if (fh->type == AST_FRAME_CONTROL) {
527 if (fh->csub >= (int)sizeof(cmds)/(int)sizeof(cmds[0])) {
528 snprintf(subclass2, sizeof(subclass2), "(%d?)", fh->csub);
529 subclass = subclass2;
531 subclass = cmds[(int)fh->csub];
534 snprintf(subclass2, sizeof(subclass2), "%d", fh->csub);
535 subclass = subclass2;
537 snprintf(tmp, sizeof(tmp),
538 "%s-Frame Retry[%s] -- OSeqno: %3.3d ISeqno: %3.3d Type: %s Subclass: %s\n",
540 retries, fh->oseqno, fh->iseqno, class, subclass);
542 snprintf(tmp, sizeof(tmp),
543 " Timestamp: %05lums SCall: %5.5d DCall: %5.5d [%s:%d]\n",
544 (unsigned long)ntohl(fh->ts),
545 ntohs(fh->scallno) & ~IAX_FLAG_FULL, ntohs(fh->dcallno) & ~IAX_FLAG_RETRANS,
546 ast_inet_ntoa(sin->sin_addr), ntohs(sin->sin_port));
548 if (fh->type == AST_FRAME_IAX)
549 dump_ies(fh->iedata, datalen);
552 int iax_ie_append_raw(struct iax_ie_data *ied, unsigned char ie, const void *data, int datalen)
555 if (datalen > ((int)sizeof(ied->buf) - ied->pos)) {
556 snprintf(tmp, (int)sizeof(tmp), "Out of space for ie '%s' (%d), need %d have %d\n", iax_ie2str(ie), ie, datalen, (int)sizeof(ied->buf) - ied->pos);
560 ied->buf[ied->pos++] = ie;
561 ied->buf[ied->pos++] = datalen;
562 memcpy(ied->buf + ied->pos, data, datalen);
567 int iax_ie_append_addr(struct iax_ie_data *ied, unsigned char ie, const struct sockaddr_in *sin)
569 return iax_ie_append_raw(ied, ie, sin, (int)sizeof(struct sockaddr_in));
572 int iax_ie_append_int(struct iax_ie_data *ied, unsigned char ie, unsigned int value)
575 newval = htonl(value);
576 return iax_ie_append_raw(ied, ie, &newval, (int)sizeof(newval));
579 int iax_ie_append_short(struct iax_ie_data *ied, unsigned char ie, unsigned short value)
581 unsigned short newval;
582 newval = htons(value);
583 return iax_ie_append_raw(ied, ie, &newval, (int)sizeof(newval));
586 int iax_ie_append_str(struct iax_ie_data *ied, unsigned char ie, const char *str)
588 return iax_ie_append_raw(ied, ie, str, strlen(str));
591 int iax_ie_append_byte(struct iax_ie_data *ied, unsigned char ie, unsigned char dat)
593 return iax_ie_append_raw(ied, ie, &dat, 1);
596 int iax_ie_append(struct iax_ie_data *ied, unsigned char ie)
598 return iax_ie_append_raw(ied, ie, NULL, 0);
601 void iax_set_output(void (*func)(const char *))
606 void iax_set_error(void (*func)(const char *))
611 int iax_parse_ies(struct iax_ies *ies, unsigned char *data, int datalen)
613 /* Parse data into information elements */
617 memset(ies, 0, (int)sizeof(struct iax_ies));
619 ies->firmwarever = -1;
620 ies->calling_ton = -1;
621 ies->calling_tns = -1;
622 ies->calling_pres = -1;
623 ies->samprate = IAX_RATE_8KHZ;
624 while(datalen >= 2) {
627 if (len > datalen - 2) {
628 errorf("Information element length exceeds message size\n");
632 case IAX_IE_CALLED_NUMBER:
633 ies->called_number = (char *)data + 2;
635 case IAX_IE_CALLING_NUMBER:
636 ies->calling_number = (char *)data + 2;
638 case IAX_IE_CALLING_ANI:
639 ies->calling_ani = (char *)data + 2;
641 case IAX_IE_CALLING_NAME:
642 ies->calling_name = (char *)data + 2;
644 case IAX_IE_CALLED_CONTEXT:
645 ies->called_context = (char *)data + 2;
647 case IAX_IE_USERNAME:
648 ies->username = (char *)data + 2;
650 case IAX_IE_PASSWORD:
651 ies->password = (char *)data + 2;
653 case IAX_IE_CODEC_PREFS:
654 ies->codec_prefs = (char *)data + 2;
656 case IAX_IE_CAPABILITY:
657 if (len != (int)sizeof(unsigned int)) {
658 snprintf(tmp, (int)sizeof(tmp), "Expecting capability to be %d bytes long but was %d\n", (int)sizeof(unsigned int), len);
661 ies->capability = ntohl(get_unaligned_uint32(data + 2));
664 if (len != (int)sizeof(unsigned int)) {
665 snprintf(tmp, (int)sizeof(tmp), "Expecting format to be %d bytes long but was %d\n", (int)sizeof(unsigned int), len);
668 ies->format = ntohl(get_unaligned_uint32(data + 2));
670 case IAX_IE_LANGUAGE:
671 ies->language = (char *)data + 2;
674 if (len != (int)sizeof(unsigned short)) {
675 snprintf(tmp, (int)sizeof(tmp), "Expecting version to be %d bytes long but was %d\n", (int)sizeof(unsigned short), len);
678 ies->version = ntohs(get_unaligned_uint16(data + 2));
681 if (len != (int)sizeof(unsigned short)) {
682 snprintf(tmp, (int)sizeof(tmp), "Expecting adsicpe to be %d bytes long but was %d\n", (int)sizeof(unsigned short), len);
685 ies->adsicpe = ntohs(get_unaligned_uint16(data + 2));
687 case IAX_IE_SAMPLINGRATE:
688 if (len != (int)sizeof(unsigned short)) {
689 snprintf(tmp, (int)sizeof(tmp), "Expecting samplingrate to be %d bytes long but was %d\n", (int)sizeof(unsigned short), len);
692 ies->samprate = ntohs(get_unaligned_uint16(data + 2));
695 ies->dnid = (char *)data + 2;
698 ies->rdnis = (char *)data + 2;
700 case IAX_IE_AUTHMETHODS:
701 if (len != (int)sizeof(unsigned short)) {
702 snprintf(tmp, (int)sizeof(tmp), "Expecting authmethods to be %d bytes long but was %d\n", (int)sizeof(unsigned short), len);
705 ies->authmethods = ntohs(get_unaligned_uint16(data + 2));
707 case IAX_IE_ENCRYPTION:
708 if (len != (int)sizeof(unsigned short)) {
709 snprintf(tmp, (int)sizeof(tmp), "Expecting encryption to be %d bytes long but was %d\n", (int)sizeof(unsigned short), len);
712 ies->encmethods = ntohs(get_unaligned_uint16(data + 2));
714 case IAX_IE_CHALLENGE:
715 ies->challenge = (char *)data + 2;
717 case IAX_IE_MD5_RESULT:
718 ies->md5_result = (char *)data + 2;
720 case IAX_IE_RSA_RESULT:
721 ies->rsa_result = (char *)data + 2;
723 case IAX_IE_APPARENT_ADDR:
724 ies->apparent_addr = ((struct sockaddr_in *)(data + 2));
727 if (len != (int)sizeof(unsigned short)) {
728 snprintf(tmp, (int)sizeof(tmp), "Expecting refresh to be %d bytes long but was %d\n", (int)sizeof(unsigned short), len);
731 ies->refresh = ntohs(get_unaligned_uint16(data + 2));
733 case IAX_IE_DPSTATUS:
734 if (len != (int)sizeof(unsigned short)) {
735 snprintf(tmp, (int)sizeof(tmp), "Expecting dpstatus to be %d bytes long but was %d\n", (int)sizeof(unsigned short), len);
738 ies->dpstatus = ntohs(get_unaligned_uint16(data + 2));
741 if (len != (int)sizeof(unsigned short)) {
742 snprintf(tmp, (int)sizeof(tmp), "Expecting callno to be %d bytes long but was %d\n", (int)sizeof(unsigned short), len);
745 ies->callno = ntohs(get_unaligned_uint16(data + 2));
748 ies->cause = (char *)data + 2;
750 case IAX_IE_CAUSECODE:
752 snprintf(tmp, (int)sizeof(tmp), "Expecting causecode to be single byte but was %d\n", len);
755 ies->causecode = data[2];
758 case IAX_IE_IAX_UNKNOWN:
760 ies->iax_unknown = data[2];
762 snprintf(tmp, (int)sizeof(tmp), "Expected single byte Unknown command, but was %d long\n", len);
766 case IAX_IE_MSGCOUNT:
767 if (len != (int)sizeof(unsigned short)) {
768 snprintf(tmp, (int)sizeof(tmp), "Expecting msgcount to be %d bytes long but was %d\n", (int)sizeof(unsigned short), len);
771 ies->msgcount = ntohs(get_unaligned_uint16(data + 2));
773 case IAX_IE_AUTOANSWER:
776 case IAX_IE_MUSICONHOLD:
777 ies->musiconhold = 1;
779 case IAX_IE_TRANSFERID:
780 if (len != (int)sizeof(unsigned int)) {
781 snprintf(tmp, (int)sizeof(tmp), "Expecting transferid to be %d bytes long but was %d\n", (int)sizeof(unsigned int), len);
784 ies->transferid = ntohl(get_unaligned_uint32(data + 2));
786 case IAX_IE_DATETIME:
787 if (len != (int)sizeof(unsigned int)) {
788 snprintf(tmp, (int)sizeof(tmp), "Expecting date/time to be %d bytes long but was %d\n", (int)sizeof(unsigned int), len);
791 ies->datetime = ntohl(get_unaligned_uint32(data + 2));
793 case IAX_IE_FIRMWAREVER:
794 if (len != (int)sizeof(unsigned short)) {
795 snprintf(tmp, (int)sizeof(tmp), "Expecting firmwarever to be %d bytes long but was %d\n", (int)sizeof(unsigned short), len);
798 ies->firmwarever = ntohs(get_unaligned_uint16(data + 2));
800 case IAX_IE_DEVICETYPE:
801 ies->devicetype = (char *)data + 2;
803 case IAX_IE_SERVICEIDENT:
804 ies->serviceident = (char *)data + 2;
806 case IAX_IE_FWBLOCKDESC:
807 if (len != (int)sizeof(unsigned int)) {
808 snprintf(tmp, (int)sizeof(tmp), "Expected block desc to be %d bytes long but was %d\n", (int)sizeof(unsigned int), len);
811 ies->fwdesc = ntohl(get_unaligned_uint32(data + 2));
813 case IAX_IE_FWBLOCKDATA:
814 ies->fwdata = data + 2;
815 ies->fwdatalen = len;
818 ies->enckey = data + 2;
819 ies->enckeylen = len;
822 if (len != (int)sizeof(unsigned int)) {
823 snprintf(tmp, (int)sizeof(tmp), "Expected provisioning version to be %d bytes long but was %d\n", (int)sizeof(unsigned int), len);
826 ies->provverpres = 1;
827 ies->provver = ntohl(get_unaligned_uint32(data + 2));
830 case IAX_IE_CALLINGPRES:
832 ies->calling_pres = data[2];
834 snprintf(tmp, (int)sizeof(tmp), "Expected single byte callingpres, but was %d long\n", len);
838 case IAX_IE_CALLINGTON:
840 ies->calling_ton = data[2];
842 snprintf(tmp, (int)sizeof(tmp), "Expected single byte callington, but was %d long\n", len);
846 case IAX_IE_CALLINGTNS:
847 if (len != (int)sizeof(unsigned short)) {
848 snprintf(tmp, (int)sizeof(tmp), "Expecting callingtns to be %d bytes long but was %d\n", (int)sizeof(unsigned short), len);
851 ies->calling_tns = ntohs(get_unaligned_uint16(data + 2));
853 case IAX_IE_RR_JITTER:
854 if (len != (int)sizeof(unsigned int)) {
855 snprintf(tmp, (int)sizeof(tmp), "Expected jitter rr to be %d bytes long but was %d\n", (int)sizeof(unsigned int), len);
858 ies->rr_jitter = ntohl(get_unaligned_uint32(data + 2));
862 if (len != (int)sizeof(unsigned int)) {
863 snprintf(tmp, (int)sizeof(tmp), "Expected loss rr to be %d bytes long but was %d\n", (int)sizeof(unsigned int), len);
866 ies->rr_loss = ntohl(get_unaligned_uint32(data + 2));
870 if (len != (int)sizeof(unsigned int)) {
871 snprintf(tmp, (int)sizeof(tmp), "Expected packets rr to be %d bytes long but was %d\n", (int)sizeof(unsigned int), len);
874 ies->rr_pkts = ntohl(get_unaligned_uint32(data + 2));
877 case IAX_IE_RR_DELAY:
878 if (len != (int)sizeof(unsigned short)) {
879 snprintf(tmp, (int)sizeof(tmp), "Expected loss rr to be %d bytes long but was %d\n", (int)sizeof(unsigned short), len);
882 ies->rr_delay = ntohs(get_unaligned_uint16(data + 2));
885 case IAX_IE_RR_DROPPED:
886 if (len != (int)sizeof(unsigned int)) {
887 snprintf(tmp, (int)sizeof(tmp), "Expected packets rr to be %d bytes long but was %d\n", (int)sizeof(unsigned int), len);
890 ies->rr_dropped = ntohl(get_unaligned_uint32(data + 2));
894 if (len != (int)sizeof(unsigned int)) {
895 snprintf(tmp, (int)sizeof(tmp), "Expected packets rr to be %d bytes long but was %d\n", (int)sizeof(unsigned int), len);
898 ies->rr_ooo = ntohl(get_unaligned_uint32(data + 2));
902 snprintf(tmp, (int)sizeof(tmp), "Ignoring unknown information element '%s' (%d) of length %d\n", iax_ie2str(ie), ie, len);
905 /* Overwrite information element with 0, to null terminate previous portion */
907 datalen -= (len + 2);
910 /* Null-terminate last field */
913 errorf("Invalid information element contents, strange boundary\n");
919 void iax_frame_wrap(struct iax_frame *fr, struct ast_frame *f)
921 fr->af.frametype = f->frametype;
922 fr->af.subclass = f->subclass;
923 fr->af.mallocd = 0; /* Our frame is static relative to the container */
924 fr->af.datalen = f->datalen;
925 fr->af.samples = f->samples;
926 fr->af.offset = AST_FRIENDLY_OFFSET;
928 fr->af.delivery.tv_sec = 0;
929 fr->af.delivery.tv_usec = 0;
930 fr->af.data = fr->afdata;
931 if (fr->af.datalen) {
932 #if __BYTE_ORDER == __LITTLE_ENDIAN
933 /* We need to byte-swap slinear samples from network byte order */
934 if ((fr->af.frametype == AST_FRAME_VOICE) && (fr->af.subclass == AST_FORMAT_SLINEAR)) {
935 ast_swapcopy_samples(fr->af.data, f->data, fr->af.samples);
938 memcpy(fr->af.data, f->data, fr->af.datalen);
942 struct iax_frame *iax_frame_new(int direction, int datalen, unsigned int cacheable)
944 struct iax_frame *fr = NULL;
946 #if !defined(LOW_MEMORY)
947 struct iax_frames *iax_frames;
949 /* Attempt to get a frame from this thread's cache */
950 if ((iax_frames = ast_threadstorage_get(&frame_cache, sizeof(*iax_frames)))) {
951 AST_LIST_TRAVERSE_SAFE_BEGIN(iax_frames, fr, list) {
952 if (fr->mallocd_datalen >= datalen) {
953 size_t mallocd_datalen = fr->mallocd_datalen;
954 AST_LIST_REMOVE_CURRENT(iax_frames, list);
955 memset(fr, 0, sizeof(*fr));
956 fr->mallocd_datalen = mallocd_datalen;
960 AST_LIST_TRAVERSE_SAFE_END
965 if (!(fr = ast_calloc_cache(1, sizeof(*fr) + datalen)))
967 fr->mallocd_datalen = datalen;
970 fr->direction = direction;
972 fr->cacheable = cacheable;
974 if (fr->direction == DIRECTION_INGRESS)
975 ast_atomic_fetchadd_int(&iframes, 1);
977 ast_atomic_fetchadd_int(&oframes, 1);
979 ast_atomic_fetchadd_int(&frames, 1);
984 void iax_frame_free(struct iax_frame *fr)
986 #if !defined(LOW_MEMORY)
987 struct iax_frames *iax_frames;
990 /* Note: does not remove from scheduler! */
991 if (fr->direction == DIRECTION_INGRESS)
992 ast_atomic_fetchadd_int(&iframes, -1);
993 else if (fr->direction == DIRECTION_OUTGRESS)
994 ast_atomic_fetchadd_int(&oframes, -1);
996 errorf("Attempt to double free frame detected\n");
999 ast_atomic_fetchadd_int(&frames, -1);
1001 #if !defined(LOW_MEMORY)
1002 if (!fr->cacheable || !(iax_frames = ast_threadstorage_get(&frame_cache, sizeof(*iax_frames)))) {
1008 AST_LIST_INSERT_HEAD(iax_frames, fr, list);
1014 #if !defined(LOW_MEMORY)
1015 static void frame_cache_cleanup(void *data)
1017 struct iax_frames *frames = data;
1018 struct iax_frame *cur;
1020 while ((cur = AST_LIST_REMOVE_HEAD(frames, list)))
1027 int iax_get_frames(void) { return frames; }
1028 int iax_get_iframes(void) { return iframes; }
1029 int iax_get_oframes(void) { return oframes; }