Merge changes from team/mvanbaak/cli-command-audit
[asterisk/asterisk.git] / channels / chan_skinny.c
1 /*
2  * Asterisk -- An open source telephony toolkit.
3  *
4  * Copyright (C) 1999 - 2005, Digium, Inc.
5  *
6  * chan_skinny was developed by Jeremy McNamara & Florian Overkamp
7  * chan_skinny was heavily modified/fixed by North Antara
8  *
9  * See http://www.asterisk.org for more information about
10  * the Asterisk project. Please do not directly contact
11  * any of the maintainers of this project for assistance;
12  * the project provides a web site, mailing lists and IRC
13  * channels for your use.
14  *
15  * This program is free software, distributed under the terms of
16  * the GNU General Public License Version 2. See the LICENSE file
17  * at the top of the source tree.
18  */
19
20 /*! \file
21  *
22  * \brief Implementation of the Skinny protocol
23  *
24  * \author Jeremy McNamara & Florian Overkamp & North Antara
25  * \ingroup channel_drivers
26  */
27
28
29 #include "asterisk.h"
30
31 ASTERISK_FILE_VERSION(__FILE__, "$Revision$")
32
33 #include <sys/socket.h>
34 #include <netinet/in.h>
35 #include <netinet/tcp.h>
36 #include <sys/ioctl.h>
37 #include <net/if.h>
38 #include <fcntl.h>
39 #include <netdb.h>
40 #include <arpa/inet.h>
41 #include <sys/signal.h>
42 #include <signal.h>
43 #include <ctype.h>
44
45 #include "asterisk/lock.h"
46 #include "asterisk/channel.h"
47 #include "asterisk/config.h"
48 #include "asterisk/module.h"
49 #include "asterisk/pbx.h"
50 #include "asterisk/sched.h"
51 #include "asterisk/io.h"
52 #include "asterisk/rtp.h"
53 #include "asterisk/netsock.h"
54 #include "asterisk/acl.h"
55 #include "asterisk/callerid.h"
56 #include "asterisk/cli.h"
57 #include "asterisk/say.h"
58 #include "asterisk/cdr.h"
59 #include "asterisk/astdb.h"
60 #include "asterisk/features.h"
61 #include "asterisk/app.h"
62 #include "asterisk/musiconhold.h"
63 #include "asterisk/utils.h"
64 #include "asterisk/dsp.h"
65 #include "asterisk/stringfields.h"
66 #include "asterisk/astobj.h"
67 #include "asterisk/abstract_jb.h"
68 #include "asterisk/threadstorage.h"
69 #include "asterisk/devicestate.h"
70
71 /*************************************
72  * Skinny/Asterisk Protocol Settings *
73  *************************************/
74 static const char tdesc[] = "Skinny Client Control Protocol (Skinny)";
75 static const char config[] = "skinny.conf";
76
77 static int default_capability = AST_FORMAT_ULAW | AST_FORMAT_ALAW;
78 static struct ast_codec_pref default_prefs;
79
80 enum skinny_codecs {
81         SKINNY_CODEC_ALAW = 2,
82         SKINNY_CODEC_ULAW = 4,
83         SKINNY_CODEC_G723_1 = 9,
84         SKINNY_CODEC_G729A = 12,
85         SKINNY_CODEC_G726_32 = 82, /* XXX Which packing order does this translate to? */
86         SKINNY_CODEC_H261 = 100,
87         SKINNY_CODEC_H263 = 101
88 };
89
90 #define DEFAULT_SKINNY_PORT     2000
91 #define DEFAULT_SKINNY_BACKLOG  2
92 #define SKINNY_MAX_PACKET       1000
93
94 static unsigned int tos = 0;
95 static unsigned int tos_audio = 0;
96 static unsigned int tos_video = 0;
97 static unsigned int cos = 0;
98 static unsigned int cos_audio = 0;
99 static unsigned int cos_video = 0;
100
101 static int keep_alive = 120;
102 static char vmexten[AST_MAX_EXTENSION];         /* Voicemail pilot number */
103 static char used_context[AST_MAX_EXTENSION];            /* Voicemail pilot number */
104 static char regcontext[AST_MAX_CONTEXT];        /* Context for auto-extension */
105 static char date_format[6] = "D-M-Y";
106 static char version_id[16] = "P002F202";
107
108 #if __BYTE_ORDER == __LITTLE_ENDIAN
109 #define letohl(x) (x)
110 #define letohs(x) (x)
111 #define htolel(x) (x)
112 #define htoles(x) (x)
113 #else
114 #if defined(HAVE_BYTESWAP_H)
115 #include <byteswap.h>
116 #define letohl(x) bswap_32(x)
117 #define letohs(x) bswap_16(x)
118 #define htolel(x) bswap_32(x)
119 #define htoles(x) bswap_16(x)
120 #elif defined(HAVE_SYS_ENDIAN_SWAP16)
121 #include <sys/endian.h>
122 #define letohl(x) __swap32(x)
123 #define letohs(x) __swap16(x)
124 #define htolel(x) __swap32(x)
125 #define htoles(x) __swap16(x)
126 #elif defined(HAVE_SYS_ENDIAN_BSWAP16)
127 #include <sys/endian.h>
128 #define letohl(x) bswap32(x)
129 #define letohs(x) bswap16(x)
130 #define htolel(x) bswap32(x)
131 #define htoles(x) bswap16(x)
132 #else
133 #define __bswap_16(x) \
134         ((((x) & 0xff00) >> 8) | \
135          (((x) & 0x00ff) << 8))
136 #define __bswap_32(x) \
137         ((((x) & 0xff000000) >> 24) | \
138          (((x) & 0x00ff0000) >>  8) | \
139          (((x) & 0x0000ff00) <<  8) | \
140          (((x) & 0x000000ff) << 24))
141 #define letohl(x) __bswap_32(x)
142 #define letohs(x) __bswap_16(x)
143 #define htolel(x) __bswap_32(x)
144 #define htoles(x) __bswap_16(x)
145 #endif
146 #endif
147
148 /*! Global jitterbuffer configuration - by default, jb is disabled */
149 static struct ast_jb_conf default_jbconf =
150 {
151         .flags = 0,
152         .max_size = -1,
153         .resync_threshold = -1,
154         .impl = ""
155 };
156 static struct ast_jb_conf global_jbconf;
157
158 AST_THREADSTORAGE(device2str_threadbuf);
159 #define DEVICE2STR_BUFSIZE   15
160
161 AST_THREADSTORAGE(control2str_threadbuf);
162 #define CONTROL2STR_BUFSIZE   100
163
164 /*********************
165  * Protocol Messages *
166  *********************/
167 /* message types */
168 #define KEEP_ALIVE_MESSAGE 0x0000
169 /* no additional struct */
170
171 #define REGISTER_MESSAGE 0x0001
172 struct register_message {
173         char name[16];
174         uint32_t userId;
175         uint32_t instance;
176         uint32_t ip;
177         uint32_t type;
178         uint32_t maxStreams;
179 };
180
181 #define IP_PORT_MESSAGE 0x0002
182
183 #define KEYPAD_BUTTON_MESSAGE 0x0003
184 struct keypad_button_message {
185         uint32_t button;
186         uint32_t lineInstance;
187         uint32_t callReference;
188 };
189
190
191 #define ENBLOC_CALL_MESSAGE 0x0004
192 struct enbloc_call_message {
193        char calledParty[24];
194 };
195
196 #define STIMULUS_MESSAGE 0x0005
197 struct stimulus_message {
198         uint32_t stimulus;
199         uint32_t stimulusInstance;
200         uint32_t callreference;
201 };
202
203 #define OFFHOOK_MESSAGE 0x0006
204 struct offhook_message {
205         uint32_t unknown1;
206         uint32_t unknown2;
207 };
208
209 #define ONHOOK_MESSAGE 0x0007
210 struct onhook_message {
211         uint32_t unknown1;
212         uint32_t unknown2;
213 };
214
215 #define CAPABILITIES_RES_MESSAGE 0x0010
216 struct station_capabilities {
217         uint32_t codec;
218         uint32_t frames;
219         union {
220                 char res[8];
221                 uint32_t rate;
222         } payloads;
223 };
224
225 #define SKINNY_MAX_CAPABILITIES 18
226
227 struct capabilities_res_message {
228         uint32_t count;
229         struct station_capabilities caps[SKINNY_MAX_CAPABILITIES];
230 };
231
232 #define SPEED_DIAL_STAT_REQ_MESSAGE 0x000A
233 struct speed_dial_stat_req_message {
234         uint32_t speedDialNumber;
235 };
236
237 #define LINE_STATE_REQ_MESSAGE 0x000B
238 struct line_state_req_message {
239         uint32_t lineNumber;
240 };
241
242 #define TIME_DATE_REQ_MESSAGE 0x000D
243 #define BUTTON_TEMPLATE_REQ_MESSAGE 0x000E
244 #define VERSION_REQ_MESSAGE 0x000F
245 #define SERVER_REQUEST_MESSAGE 0x0012
246
247 #define ALARM_MESSAGE 0x0020
248 struct alarm_message {
249         uint32_t alarmSeverity;
250         char displayMessage[80];
251         uint32_t alarmParam1;
252         uint32_t alarmParam2;
253 };
254
255 #define OPEN_RECEIVE_CHANNEL_ACK_MESSAGE 0x0022
256 struct open_receive_channel_ack_message {
257         uint32_t status;
258         uint32_t ipAddr;
259         uint32_t port;
260         uint32_t passThruId;
261 };
262
263 #define SOFT_KEY_SET_REQ_MESSAGE 0x0025
264
265 #define SOFT_KEY_EVENT_MESSAGE 0x0026
266 struct soft_key_event_message {
267         uint32_t softKeyEvent;
268         uint32_t instance;
269         uint32_t callreference;
270 };
271
272 #define UNREGISTER_MESSAGE 0x0027
273 #define SOFT_KEY_TEMPLATE_REQ_MESSAGE 0x0028
274 #define HEADSET_STATUS_MESSAGE 0x002B
275 #define REGISTER_AVAILABLE_LINES_MESSAGE 0x002D
276
277 #define REGISTER_ACK_MESSAGE 0x0081
278 struct register_ack_message {
279         uint32_t keepAlive;
280         char dateTemplate[6];
281         char res[2];
282         uint32_t secondaryKeepAlive;
283         char res2[4];
284 };
285
286 #define START_TONE_MESSAGE 0x0082
287 struct start_tone_message {
288         uint32_t tone;
289         uint32_t space;
290         uint32_t instance;
291         uint32_t reference;
292 };
293
294 #define STOP_TONE_MESSAGE 0x0083
295 struct stop_tone_message {
296         uint32_t instance;
297         uint32_t reference;
298 };
299
300 #define SET_RINGER_MESSAGE 0x0085
301 struct set_ringer_message {
302         uint32_t ringerMode;
303         uint32_t unknown1; /* See notes in transmit_ringer_mode */
304         uint32_t unknown2;
305         uint32_t space[2];
306 };
307
308 #define SET_LAMP_MESSAGE 0x0086
309 struct set_lamp_message {
310         uint32_t stimulus;
311         uint32_t stimulusInstance;
312         uint32_t deviceStimulus;
313 };
314
315 #define SET_SPEAKER_MESSAGE 0x0088
316 struct set_speaker_message {
317         uint32_t mode;
318 };
319
320 /* XXX When do we need to use this? */
321 #define SET_MICROPHONE_MESSAGE 0x0089
322 struct set_microphone_message {
323         uint32_t mode;
324 };
325
326 #define START_MEDIA_TRANSMISSION_MESSAGE 0x008A
327 struct media_qualifier {
328         uint32_t precedence;
329         uint32_t vad;
330         uint16_t packets;
331         uint32_t bitRate;
332 };
333
334 struct start_media_transmission_message {
335         uint32_t conferenceId;
336         uint32_t passThruPartyId;
337         uint32_t remoteIp;
338         uint32_t remotePort;
339         uint32_t packetSize;
340         uint32_t payloadType;
341         struct media_qualifier qualifier;
342         uint32_t space[16];
343 };
344
345 #define STOP_MEDIA_TRANSMISSION_MESSAGE 0x008B
346 struct stop_media_transmission_message {
347         uint32_t conferenceId;
348         uint32_t passThruPartyId;
349         uint32_t space[3];
350 };
351
352 #define CALL_INFO_MESSAGE 0x008F
353 struct call_info_message {
354         char callingPartyName[40];
355         char callingParty[24];
356         char calledPartyName[40];
357         char calledParty[24];
358         uint32_t instance;
359         uint32_t reference;
360         uint32_t type;
361         char originalCalledPartyName[40];
362         char originalCalledParty[24];
363         char lastRedirectingPartyName[40];
364         char lastRedirectingParty[24];
365         uint32_t originalCalledPartyRedirectReason;
366         uint32_t lastRedirectingReason;
367         char callingPartyVoiceMailbox[24];
368         char calledPartyVoiceMailbox[24];
369         char originalCalledPartyVoiceMailbox[24];
370         char lastRedirectingVoiceMailbox[24];
371         uint32_t space[3];
372 };
373
374 #define FORWARD_STAT_MESSAGE 0x0090
375 struct forward_stat_message {
376         uint32_t activeforward;
377         uint32_t lineNumber;
378         uint32_t fwdall;
379         char fwdallnum[24];
380         uint32_t fwdbusy;
381         char fwdbusynum[24];
382         uint32_t fwdnoanswer;
383         char fwdnoanswernum[24];
384 };
385
386 #define SPEED_DIAL_STAT_RES_MESSAGE 0x0091
387 struct speed_dial_stat_res_message {
388         uint32_t speedDialNumber;
389         char speedDialDirNumber[24];
390         char speedDialDisplayName[40];
391 };
392
393 #define LINE_STAT_RES_MESSAGE 0x0092
394 struct line_stat_res_message {
395         uint32_t lineNumber;
396         char lineDirNumber[24];
397         char lineDisplayName[24];
398         uint32_t space[15];
399 };
400
401 #define DEFINETIMEDATE_MESSAGE 0x0094
402 struct definetimedate_message {
403         uint32_t year;  /* since 1900 */
404         uint32_t month;
405         uint32_t dayofweek;     /* monday = 1 */
406         uint32_t day;
407         uint32_t hour;
408         uint32_t minute;
409         uint32_t seconds;
410         uint32_t milliseconds;
411         uint32_t timestamp;
412 };
413
414 #define BUTTON_TEMPLATE_RES_MESSAGE 0x0097
415 struct button_definition {
416         uint8_t instanceNumber;
417         uint8_t buttonDefinition;
418 };
419
420 struct button_definition_template {
421         uint8_t buttonDefinition;
422         /* for now, anything between 0xB0 and 0xCF is custom */
423         /*int custom;*/
424 };
425
426 #define STIMULUS_REDIAL                 0x01
427 #define STIMULUS_SPEEDDIAL              0x02
428 #define STIMULUS_HOLD                   0x03
429 #define STIMULUS_TRANSFER               0x04
430 #define STIMULUS_FORWARDALL             0x05
431 #define STIMULUS_FORWARDBUSY            0x06
432 #define STIMULUS_FORWARDNOANSWER        0x07
433 #define STIMULUS_DISPLAY                0x08
434 #define STIMULUS_LINE                   0x09
435 #define STIMULUS_VOICEMAIL              0x0F
436 #define STIMULUS_AUTOANSWER             0x11
437 #define STIMULUS_DND                    0x3F
438 #define STIMULUS_CONFERENCE             0x7D
439 #define STIMULUS_CALLPARK               0x7E
440 #define STIMULUS_CALLPICKUP             0x7F
441 #define STIMULUS_NONE                   0xFF
442
443 /* Button types */
444 #define BT_REDIAL                       STIMULUS_REDIAL
445 #define BT_SPEEDDIAL                    STIMULUS_SPEEDDIAL
446 #define BT_HOLD                         STIMULUS_HOLD
447 #define BT_TRANSFER                     STIMULUS_TRANSFER
448 #define BT_FORWARDALL                   STIMULUS_FORWARDALL
449 #define BT_FORWARDBUSY                  STIMULUS_FORWARDBUSY
450 #define BT_FORWARDNOANSWER              STIMULUS_FORWARDNOANSWER
451 #define BT_DISPLAY                      STIMULUS_DISPLAY
452 #define BT_LINE                         STIMULUS_LINE
453 #define BT_VOICEMAIL                    STIMULUS_VOICEMAIL
454 #define BT_AUTOANSWER                   STIMULUS_AUTOANSWER
455 #define BT_DND                          STIMULUS_DND
456 #define BT_CONFERENCE                   STIMULUS_CONFERENCE
457 #define BT_CALLPARK                     STIMULUS_CALLPARK
458 #define BT_CALLPICKUP                   STIMULUS_CALLPICKUP
459 #define BT_NONE                         0x00
460
461 /* Custom button types - add our own between 0xB0 and 0xCF.
462    This may need to be revised in the future,
463    if stimuluses are ever added in this range. */
464 #define BT_CUST_LINESPEEDDIAL           0xB0    /* line or speeddial with/without hint */
465 #define BT_CUST_LINE                    0xB1    /* line or speeddial with hint only */
466
467 struct button_template_res_message {
468         uint32_t buttonOffset;
469         uint32_t buttonCount;
470         uint32_t totalButtonCount;
471         struct button_definition definition[42];
472 };
473
474 #define VERSION_RES_MESSAGE 0x0098
475 struct version_res_message {
476         char version[16];
477 };
478
479 #define DISPLAYTEXT_MESSAGE 0x0099
480 struct displaytext_message {
481         char text[40];
482 };
483
484 #define CLEAR_NOTIFY_MESSAGE  0x0115
485 #define CLEAR_DISPLAY_MESSAGE 0x009A
486
487 #define CAPABILITIES_REQ_MESSAGE 0x009B
488
489 #define REGISTER_REJ_MESSAGE 0x009D
490 struct register_rej_message {
491         char errMsg[33];
492 };
493
494 #define SERVER_RES_MESSAGE 0x009E
495 struct server_identifier {
496         char serverName[48];
497 };
498
499 struct server_res_message {
500         struct server_identifier server[5];
501         uint32_t serverListenPort[5];
502         uint32_t serverIpAddr[5];
503 };
504
505 #define RESET_MESSAGE 0x009F
506 struct reset_message {
507         uint32_t resetType;
508 };
509
510 #define KEEP_ALIVE_ACK_MESSAGE 0x0100
511
512 #define OPEN_RECEIVE_CHANNEL_MESSAGE 0x0105
513 struct open_receive_channel_message {
514         uint32_t conferenceId;
515         uint32_t partyId;
516         uint32_t packets;
517         uint32_t capability;
518         uint32_t echo;
519         uint32_t bitrate;
520         uint32_t space[16];
521 };
522
523 #define CLOSE_RECEIVE_CHANNEL_MESSAGE 0x0106
524 struct close_receive_channel_message {
525         uint32_t conferenceId;
526         uint32_t partyId;
527         uint32_t space[2];
528 };
529
530 #define SOFT_KEY_TEMPLATE_RES_MESSAGE 0x0108
531
532 struct soft_key_template_definition {
533         char softKeyLabel[16];
534         uint32_t softKeyEvent;
535 };
536
537 #define KEYDEF_ONHOOK                   0
538 #define KEYDEF_CONNECTED                1
539 #define KEYDEF_ONHOLD                   2
540 #define KEYDEF_RINGIN                   3
541 #define KEYDEF_OFFHOOK                  4
542 #define KEYDEF_CONNWITHTRANS            5
543 #define KEYDEF_DADFD                    6 /* Digits After Dialing First Digit */
544 #define KEYDEF_CONNWITHCONF             7
545 #define KEYDEF_RINGOUT                  8
546 #define KEYDEF_OFFHOOKWITHFEAT          9
547 #define KEYDEF_UNKNOWN                  10
548
549 #define SOFTKEY_NONE                    0x00
550 #define SOFTKEY_REDIAL                  0x01
551 #define SOFTKEY_NEWCALL                 0x02
552 #define SOFTKEY_HOLD                    0x03
553 #define SOFTKEY_TRNSFER                 0x04
554 #define SOFTKEY_CFWDALL                 0x05
555 #define SOFTKEY_CFWDBUSY                0x06
556 #define SOFTKEY_CFWDNOANSWER            0x07
557 #define SOFTKEY_BKSPC                   0x08
558 #define SOFTKEY_ENDCALL                 0x09
559 #define SOFTKEY_RESUME                  0x0A
560 #define SOFTKEY_ANSWER                  0x0B
561 #define SOFTKEY_INFO                    0x0C
562 #define SOFTKEY_CONFRN                  0x0D
563 #define SOFTKEY_PARK                    0x0E
564 #define SOFTKEY_JOIN                    0x0F
565 #define SOFTKEY_MEETME                  0x10
566 #define SOFTKEY_PICKUP                  0x11
567 #define SOFTKEY_GPICKUP                 0x12
568 #define SOFTKEY_DND                     0x13
569 #define SOFTKEY_IDIVERT                 0x14
570
571 struct soft_key_template_definition soft_key_template_default[] = {
572         { "\200\001",           SOFTKEY_REDIAL },
573         { "\200\002",           SOFTKEY_NEWCALL },
574         { "\200\003",           SOFTKEY_HOLD },
575         { "\200\004",           SOFTKEY_TRNSFER },
576         { "\200\005",           SOFTKEY_CFWDALL },
577         { "\200\006",           SOFTKEY_CFWDBUSY },
578         { "\200\007",           SOFTKEY_CFWDNOANSWER },
579         { "\200\010",           SOFTKEY_BKSPC },
580         { "\200\011",           SOFTKEY_ENDCALL },
581         { "\200\012",           SOFTKEY_RESUME },
582         { "\200\013",           SOFTKEY_ANSWER },
583         { "\200\014",           SOFTKEY_INFO },
584         { "\200\015",           SOFTKEY_CONFRN },
585         { "\200\016",           SOFTKEY_PARK },
586         { "\200\017",           SOFTKEY_JOIN },
587         { "\200\020",           SOFTKEY_MEETME },
588         { "\200\021",           SOFTKEY_PICKUP },
589         { "\200\022",           SOFTKEY_GPICKUP },
590         { "\200\077",           SOFTKEY_DND },
591         { "\200\120",           SOFTKEY_IDIVERT },
592 };
593
594 /* Localized message "codes" (in octal)
595    Below is en_US (taken from a 7970)
596
597    \200\xxx
598        \000: ???
599        \001: Redial
600        \002: New Call
601        \003: Hold
602        \004: Transfer
603        \005: CFwdALL
604        \006: CFwdBusy
605        \007: CFwdNoAnswer
606        \010: <<
607        \011: EndCall
608        \012: Resume
609        \013: Answer
610        \014: Info
611        \015: Confrn
612        \016: Park
613        \017: Join
614        \020: MeetMe
615        \021: PickUp
616        \022: GPickUp
617        \023: Your current options
618        \024: Off Hook
619        \025: On Hook
620        \026: Ring out
621        \027: From
622        \030: Connected
623        \031: Busy
624        \032: Line In Use
625        \033: Call Waiting
626        \034: Call Transfer
627        \035: Call Park
628        \036: Call Proceed
629        \037: In Use Remote
630        \040: Enter number
631        \041: Call park At
632        \042: Primary Only
633        \043: Temp Fail
634        \044: You Have VoiceMail
635        \045: Forwarded to
636        \046: Can Not Complete Conference
637        \047: No Conference Bridge
638        \050: Can Not Hold Primary Control
639        \051: Invalid Conference Participant
640        \052: In Conference Already
641        \053: No Participant Info
642        \054: Exceed Maximum Parties
643        \055: Key Is Not Active
644        \056: Error No License
645        \057: Error DBConfig
646        \060: Error Database
647        \061: Error Pass Limit
648        \062: Error Unknown
649        \063: Error Mismatch
650        \064: Conference
651        \065: Park Number
652        \066: Private
653        \067: Not Enough Bandwidth
654        \070: Unknown Number
655        \071: RmLstC
656        \072: Voicemail
657        \073: ImmDiv
658        \074: Intrcpt
659        \075: SetWtch
660        \076: TrnsfVM
661        \077: DND
662        \100: DivAll
663        \101: CallBack
664        \102: Network congestion,rerouting
665        \103: Barge
666        \104: Failed to setup Barge
667        \105: Another Barge exists
668        \106: Incompatible device type
669        \107: No Park Number Available
670        \110: CallPark Reversion
671        \111: Service is not Active
672        \112: High Traffic Try Again Later
673        \113: QRT
674        \114: MCID
675        \115: DirTrfr
676        \116: Select
677        \117: ConfList
678        \120: iDivert
679        \121: cBarge
680        \122: Can Not Complete Transfer
681        \123: Can Not Join Calls
682        \124: Mcid Successful
683        \125: Number Not Configured
684        \126: Security Error
685        \127: Video Bandwidth Unavailable
686        \130: VidMode
687        \131: Max Call Duration Timeout
688        \132: Max Hold Duration Timeout
689        \133: OPickUp
690        \134: ???
691        \135: ???
692        \136: ???
693        \137: ???
694        \140: ???
695        \141: External Transfer Restricted
696        \142: ???
697        \143: ???
698        \144: ???
699        \145: Mac Address
700        \146: Host Name
701        \147: Domain Name
702        \150: IP Address
703        \151: Subnet Mask
704        \152: TFTP Server 1
705        \153: Default Router 1
706        \154: Default Router 2
707        \155: Default Router 3
708        \156: Default Router 4
709        \157: Default Router 5
710        \160: DNS Server 1
711        \161: DNS Server 2
712        \162: DNS Server 3
713        \163: DNS Server 4
714        \164: DNS Server 5
715        \165: Operational VLAN Id
716        \166: Admin. VLAN Id
717        \167: CallManager 1
718        \170: CallManager 2
719        \171: CallManager 3
720        \172: CallManager 4
721        \173: CallManager 5
722        \174: Information URL
723        \175: Directories URL
724        \176: Messages URL
725        \177: Services URL
726  */
727
728 struct soft_key_definitions {
729         const uint8_t mode;
730         const uint8_t *defaults;
731         const int count;
732 };
733
734 static const uint8_t soft_key_default_onhook[] = {
735         SOFTKEY_REDIAL,
736         SOFTKEY_NEWCALL,
737         SOFTKEY_CFWDALL,
738         SOFTKEY_CFWDBUSY,
739         SOFTKEY_DND,
740         SOFTKEY_GPICKUP,
741         SOFTKEY_CONFRN,
742 };
743
744 static const uint8_t soft_key_default_connected[] = {
745         SOFTKEY_HOLD,
746         SOFTKEY_ENDCALL,
747         SOFTKEY_TRNSFER,
748         SOFTKEY_PARK,
749         SOFTKEY_CFWDALL,
750         SOFTKEY_CFWDBUSY,
751 };
752
753 static const uint8_t soft_key_default_onhold[] = {
754         SOFTKEY_RESUME,
755         SOFTKEY_NEWCALL,
756         SOFTKEY_ENDCALL,
757         SOFTKEY_TRNSFER,
758 };
759
760 static const uint8_t soft_key_default_ringin[] = {
761         SOFTKEY_ANSWER,
762         SOFTKEY_ENDCALL,
763         SOFTKEY_TRNSFER,
764 };
765
766 static const uint8_t soft_key_default_offhook[] = {
767         SOFTKEY_REDIAL,
768         SOFTKEY_ENDCALL,
769         SOFTKEY_CFWDALL,
770         SOFTKEY_CFWDBUSY,
771         SOFTKEY_GPICKUP,
772 };
773
774 static const uint8_t soft_key_default_connwithtrans[] = {
775         SOFTKEY_HOLD,
776         SOFTKEY_ENDCALL,
777         SOFTKEY_TRNSFER,
778         SOFTKEY_PARK,
779         SOFTKEY_CFWDALL,
780         SOFTKEY_CFWDBUSY,
781 };
782
783 static const uint8_t soft_key_default_dadfd[] = {
784         SOFTKEY_BKSPC,
785         SOFTKEY_ENDCALL,
786 };
787
788 static const uint8_t soft_key_default_connwithconf[] = {
789         SOFTKEY_NONE,
790 };
791
792 static const uint8_t soft_key_default_ringout[] = {
793         SOFTKEY_NONE,
794         SOFTKEY_ENDCALL,
795 };
796
797 static const uint8_t soft_key_default_offhookwithfeat[] = {
798         SOFTKEY_REDIAL,
799         SOFTKEY_ENDCALL,
800 };
801
802 static const uint8_t soft_key_default_unknown[] = {
803         SOFTKEY_NONE,
804 };
805
806 static const struct soft_key_definitions soft_key_default_definitions[] = {
807         {KEYDEF_ONHOOK, soft_key_default_onhook, sizeof(soft_key_default_onhook) / sizeof(uint8_t)},
808         {KEYDEF_CONNECTED, soft_key_default_connected, sizeof(soft_key_default_connected) / sizeof(uint8_t)},
809         {KEYDEF_ONHOLD, soft_key_default_onhold, sizeof(soft_key_default_onhold) / sizeof(uint8_t)},
810         {KEYDEF_RINGIN, soft_key_default_ringin, sizeof(soft_key_default_ringin) / sizeof(uint8_t)},
811         {KEYDEF_OFFHOOK, soft_key_default_offhook, sizeof(soft_key_default_offhook) / sizeof(uint8_t)},
812         {KEYDEF_CONNWITHTRANS, soft_key_default_connwithtrans, sizeof(soft_key_default_connwithtrans) / sizeof(uint8_t)},
813         {KEYDEF_DADFD, soft_key_default_dadfd, sizeof(soft_key_default_dadfd) / sizeof(uint8_t)},
814         {KEYDEF_CONNWITHCONF, soft_key_default_connwithconf, sizeof(soft_key_default_connwithconf) / sizeof(uint8_t)},
815         {KEYDEF_RINGOUT, soft_key_default_ringout, sizeof(soft_key_default_ringout) / sizeof(uint8_t)},
816         {KEYDEF_OFFHOOKWITHFEAT, soft_key_default_offhookwithfeat, sizeof(soft_key_default_offhookwithfeat) / sizeof(uint8_t)},
817         {KEYDEF_UNKNOWN, soft_key_default_unknown, sizeof(soft_key_default_unknown) / sizeof(uint8_t)}
818 };
819
820 struct soft_key_template_res_message {
821         uint32_t softKeyOffset;
822         uint32_t softKeyCount;
823         uint32_t totalSoftKeyCount;
824         struct soft_key_template_definition softKeyTemplateDefinition[32];
825 };
826
827 #define SOFT_KEY_SET_RES_MESSAGE 0x0109
828
829 struct soft_key_set_definition {
830         uint8_t softKeyTemplateIndex[16];
831         uint16_t softKeyInfoIndex[16];
832 };
833
834 struct soft_key_set_res_message {
835         uint32_t softKeySetOffset;
836         uint32_t softKeySetCount;
837         uint32_t totalSoftKeySetCount;
838         struct soft_key_set_definition softKeySetDefinition[16];
839         uint32_t res;
840 };
841
842 #define SELECT_SOFT_KEYS_MESSAGE 0x0110
843 struct select_soft_keys_message {
844         uint32_t instance;
845         uint32_t reference;
846         uint32_t softKeySetIndex;
847         uint32_t validKeyMask;
848 };
849
850 #define CALL_STATE_MESSAGE 0x0111
851 struct call_state_message {
852         uint32_t callState;
853         uint32_t lineInstance;
854         uint32_t callReference;
855         uint32_t space[3];
856 };
857
858 #define DISPLAY_PROMPT_STATUS_MESSAGE 0x0112
859 struct display_prompt_status_message {
860         uint32_t messageTimeout;
861         char promptMessage[32];
862         uint32_t lineInstance;
863         uint32_t callReference;
864 };
865
866 #define CLEAR_PROMPT_MESSAGE  0x0113
867 struct clear_prompt_message {
868        uint32_t lineInstance;
869        uint32_t callReference;
870 };
871
872 #define DISPLAY_NOTIFY_MESSAGE 0x0114
873 struct display_notify_message {
874         uint32_t displayTimeout;
875         char displayMessage[100];
876 };
877
878 #define ACTIVATE_CALL_PLANE_MESSAGE 0x0116
879 struct activate_call_plane_message {
880         uint32_t lineInstance;
881 };
882
883 #define DIALED_NUMBER_MESSAGE 0x011D
884 struct dialed_number_message {
885         char dialedNumber[24];
886         uint32_t lineInstance;
887         uint32_t callReference;
888 };
889
890 union skinny_data {
891         struct alarm_message alarm;
892         struct speed_dial_stat_req_message speeddialreq;
893         struct register_message reg;
894         struct register_ack_message regack;
895         struct register_rej_message regrej;
896         struct capabilities_res_message caps;
897         struct version_res_message version;
898         struct button_template_res_message buttontemplate;
899         struct displaytext_message displaytext;
900         struct display_prompt_status_message displaypromptstatus;
901         struct clear_prompt_message clearpromptstatus;
902         struct definetimedate_message definetimedate;
903         struct start_tone_message starttone;
904         struct stop_tone_message stoptone;
905         struct speed_dial_stat_res_message speeddial;
906         struct line_state_req_message line;
907         struct line_stat_res_message linestat;
908         struct soft_key_set_res_message softkeysets;
909         struct soft_key_template_res_message softkeytemplate;
910         struct server_res_message serverres;
911         struct reset_message reset;
912         struct set_lamp_message setlamp;
913         struct set_ringer_message setringer;
914         struct call_state_message callstate;
915         struct keypad_button_message keypad;
916         struct select_soft_keys_message selectsoftkey;
917         struct activate_call_plane_message activatecallplane;
918         struct stimulus_message stimulus;
919         struct offhook_message offhook;
920         struct onhook_message onhook;
921         struct set_speaker_message setspeaker;
922         struct set_microphone_message setmicrophone;
923         struct call_info_message callinfo;
924         struct start_media_transmission_message startmedia;
925         struct stop_media_transmission_message stopmedia;
926         struct open_receive_channel_message openreceivechannel;
927         struct open_receive_channel_ack_message openreceivechannelack;
928         struct close_receive_channel_message closereceivechannel;
929         struct display_notify_message displaynotify;
930         struct dialed_number_message dialednumber;
931         struct soft_key_event_message softkeyeventmessage;
932         struct enbloc_call_message enbloccallmessage;
933         struct forward_stat_message forwardstat;
934 };
935
936 /* packet composition */
937 struct skinny_req {
938         int len;
939         int res;
940         int e;
941         union skinny_data data;
942 };
943
944 /* XXX This is the combined size of the variables above.  (len, res, e)
945    If more are added, this MUST change.
946    (sizeof(skinny_req) - sizeof(skinny_data)) DOES NOT WORK on all systems (amd64?). */
947 int skinny_header_size = 12;
948
949 /*****************************
950  * Asterisk specific globals *
951  *****************************/
952
953 static int skinnydebug = 0;
954
955 /* a hostname, portnumber, socket and such is usefull for VoIP protocols */
956 static struct sockaddr_in bindaddr;
957 static char ourhost[256];
958 static int ourport;
959 static struct in_addr __ourip;
960 struct ast_hostent ahp;
961 struct hostent *hp;
962 static int skinnysock = -1;
963 static pthread_t accept_t;
964 static char context[AST_MAX_CONTEXT] = "default";
965 static char language[MAX_LANGUAGE] = "";
966 static char mohinterpret[MAX_MUSICCLASS] = "default";
967 static char mohsuggest[MAX_MUSICCLASS] = "";
968 static char cid_num[AST_MAX_EXTENSION] = "";
969 static char cid_name[AST_MAX_EXTENSION] = "";
970 static char linelabel[AST_MAX_EXTENSION] ="";
971 static int nat = 0;
972 static ast_group_t cur_callergroup = 0;
973 static ast_group_t cur_pickupgroup = 0;
974 static int immediate = 0;
975 static int callwaiting = 0;
976 static int callreturn = 0;
977 static int threewaycalling = 0;
978 static int mwiblink = 0;
979 /* This is for flashhook transfers */
980 static int transfer = 0;
981 static int cancallforward = 0;
982 /* static int busycount = 3;*/
983 static char accountcode[AST_MAX_ACCOUNT_CODE] = "";
984 static char mailbox[AST_MAX_EXTENSION];
985 static char regexten[AST_MAX_EXTENSION];
986 static int amaflags = 0;
987 static int callnums = 1;
988 static int canreinvite = 0;
989
990 #define SKINNY_DEVICE_UNKNOWN           -1
991 #define SKINNY_DEVICE_NONE              0
992 #define SKINNY_DEVICE_30SPPLUS          1
993 #define SKINNY_DEVICE_12SPPLUS          2
994 #define SKINNY_DEVICE_12SP              3
995 #define SKINNY_DEVICE_12                4
996 #define SKINNY_DEVICE_30VIP             5
997 #define SKINNY_DEVICE_7910              6
998 #define SKINNY_DEVICE_7960              7
999 #define SKINNY_DEVICE_7940              8
1000 #define SKINNY_DEVICE_7935              9
1001 #define SKINNY_DEVICE_ATA186            12      /* Cisco ATA-186 */
1002 #define SKINNY_DEVICE_7941              115
1003 #define SKINNY_DEVICE_7971              119
1004 #define SKINNY_DEVICE_7985              302
1005 #define SKINNY_DEVICE_7911              307
1006 #define SKINNY_DEVICE_7961GE            308
1007 #define SKINNY_DEVICE_7941GE            309
1008 #define SKINNY_DEVICE_7921              365
1009 #define SKINNY_DEVICE_7905              20000
1010 #define SKINNY_DEVICE_7920              30002
1011 #define SKINNY_DEVICE_7970              30006
1012 #define SKINNY_DEVICE_7912              30007
1013 #define SKINNY_DEVICE_7902              30008
1014 #define SKINNY_DEVICE_CIPC              30016   /* Cisco IP Communicator */
1015 #define SKINNY_DEVICE_7961              30018
1016 #define SKINNY_DEVICE_7936              30019
1017 #define SKINNY_DEVICE_SCCPGATEWAY_AN    30027   /* ??? */
1018 #define SKINNY_DEVICE_SCCPGATEWAY_BRI   30028   /* ??? */
1019
1020 #define SKINNY_SPEAKERON 1
1021 #define SKINNY_SPEAKEROFF 2
1022
1023 #define SKINNY_MICON 1
1024 #define SKINNY_MICOFF 2
1025
1026 #define SKINNY_OFFHOOK 1
1027 #define SKINNY_ONHOOK 2
1028 #define SKINNY_RINGOUT 3
1029 #define SKINNY_RINGIN 4
1030 #define SKINNY_CONNECTED 5
1031 #define SKINNY_BUSY 6
1032 #define SKINNY_CONGESTION 7
1033 #define SKINNY_HOLD 8
1034 #define SKINNY_CALLWAIT 9
1035 #define SKINNY_TRANSFER 10
1036 #define SKINNY_PARK 11
1037 #define SKINNY_PROGRESS 12
1038 #define SKINNY_CALLREMOTEMULTILINE 13
1039 #define SKINNY_INVALID 14
1040
1041 #define SKINNY_SILENCE          0x00
1042 #define SKINNY_DIALTONE         0x21
1043 #define SKINNY_BUSYTONE         0x23
1044 #define SKINNY_ALERT            0x24
1045 #define SKINNY_REORDER          0x25
1046 #define SKINNY_CALLWAITTONE     0x2D
1047 #define SKINNY_NOTONE           0x7F
1048
1049 #define SKINNY_LAMP_OFF 1
1050 #define SKINNY_LAMP_ON 2
1051 #define SKINNY_LAMP_WINK 3
1052 #define SKINNY_LAMP_FLASH 4
1053 #define SKINNY_LAMP_BLINK 5
1054
1055 #define SKINNY_RING_OFF 1
1056 #define SKINNY_RING_INSIDE 2
1057 #define SKINNY_RING_OUTSIDE 3
1058 #define SKINNY_RING_FEATURE 4
1059
1060 #define SKINNY_CFWD_ALL       (1 << 0)
1061 #define SKINNY_CFWD_BUSY      (1 << 1)
1062 #define SKINNY_CFWD_NOANSWER  (1 << 2)
1063
1064 #define TYPE_TRUNK 1
1065 #define TYPE_LINE 2
1066
1067 /* Skinny rtp stream modes. Do we really need this? */
1068 #define SKINNY_CX_SENDONLY      0
1069 #define SKINNY_CX_RECVONLY      1
1070 #define SKINNY_CX_SENDRECV      2
1071 #define SKINNY_CX_CONF          3
1072 #define SKINNY_CX_CONFERENCE    3
1073 #define SKINNY_CX_MUTE          4
1074 #define SKINNY_CX_INACTIVE      4
1075
1076 #if 0
1077 static char *skinny_cxmodes[] = {
1078         "sendonly",
1079         "recvonly",
1080         "sendrecv",
1081         "confrnce",
1082         "inactive"
1083 };
1084 #endif
1085
1086 /* driver scheduler */
1087 static struct sched_context *sched = NULL;
1088 static struct io_context *io;
1089
1090 /* Protect the monitoring thread, so only one process can kill or start it, and not
1091    when it's doing something critical. */
1092 AST_MUTEX_DEFINE_STATIC(monlock);
1093 /* Protect the network socket */
1094 AST_MUTEX_DEFINE_STATIC(netlock);
1095 /* Protect the session list */
1096 AST_MUTEX_DEFINE_STATIC(sessionlock);
1097 /* Protect the device list */
1098 AST_MUTEX_DEFINE_STATIC(devicelock);
1099 #if 0
1100 /* Protect the paging device list */
1101 AST_MUTEX_DEFINE_STATIC(pagingdevicelock);
1102 #endif
1103
1104 /* This is the thread for the monitor which checks for input on the channels
1105    which are not currently in use. */
1106 static pthread_t monitor_thread = AST_PTHREADT_NULL;
1107
1108 /* Wait up to 16 seconds for first digit */
1109 static int firstdigittimeout = 16000;
1110
1111 /* How long to wait for following digits */
1112 static int gendigittimeout = 8000;
1113
1114 /* How long to wait for an extra digit, if there is an ambiguous match */
1115 static int matchdigittimeout = 3000;
1116
1117 struct skinny_subchannel {
1118         ast_mutex_t lock;
1119         struct ast_channel *owner;
1120         struct ast_rtp *rtp;
1121         struct ast_rtp *vrtp;
1122         unsigned int callid;
1123         /* time_t lastouttime; */                       /* Unused */
1124         int progress;
1125         int ringing;
1126         int onhold;
1127         /* int lastout; */                              /* Unused */
1128         int cxmode;
1129         int nat;
1130         int outgoing;
1131         int alreadygone;
1132
1133         struct skinny_subchannel *next;
1134         struct skinny_line *parent;
1135 };
1136
1137 struct skinny_line {
1138         ast_mutex_t lock;
1139         char name[80];
1140         char label[24];                                 /* Label that shows next to the line buttons */
1141         char accountcode[AST_MAX_ACCOUNT_CODE];
1142         char exten[AST_MAX_EXTENSION];                  /* Extension where to start */
1143         char context[AST_MAX_CONTEXT];
1144         char language[MAX_LANGUAGE];
1145         char cid_num[AST_MAX_EXTENSION];                /* Caller*ID */
1146         char cid_name[AST_MAX_EXTENSION];               /* Caller*ID */
1147         char lastcallerid[AST_MAX_EXTENSION];           /* Last Caller*ID */
1148         int cfwdtype;
1149         char call_forward_all[AST_MAX_EXTENSION];
1150         char call_forward_busy[AST_MAX_EXTENSION];
1151         char call_forward_noanswer[AST_MAX_EXTENSION];
1152         char mailbox[AST_MAX_EXTENSION];
1153         char vmexten[AST_MAX_EXTENSION];
1154         char regexten[AST_MAX_EXTENSION];               /* Extension for auto-extensions */
1155         char regcontext[AST_MAX_CONTEXT];               /* Context for auto-extensions */
1156         char mohinterpret[MAX_MUSICCLASS];
1157         char mohsuggest[MAX_MUSICCLASS];
1158         char lastnumberdialed[AST_MAX_EXTENSION];       /* Last number that was dialed - used for redial */
1159         int curtone;                                    /* Current tone being played */
1160         ast_group_t callgroup;
1161         ast_group_t pickupgroup;
1162         int callwaiting;
1163         int transfer;
1164         int threewaycalling;
1165         int mwiblink;
1166         int cancallforward;
1167         int getforward;
1168         int callreturn;
1169         int dnd; /* How does this affect callwait?  Do we just deny a skinny_request if we're dnd? */
1170         int hascallerid;
1171         int hidecallerid;
1172         int amaflags;
1173         int type;
1174         int instance;
1175         int group;
1176         int needdestroy;
1177         int capability;
1178         int nonCodecCapability;
1179         int onhooktime;
1180         int msgstate;                                   /* voicemail message state */
1181         int immediate;
1182         int hookstate;
1183         int nat;
1184         int canreinvite;
1185
1186         struct ast_codec_pref prefs;
1187         struct skinny_subchannel *sub;
1188         struct skinny_line *next;
1189         struct skinny_device *parent;
1190         struct ast_variable *chanvars;          /*!< Channel variables to set for inbound call */
1191 };
1192
1193 struct skinny_speeddial {
1194         ast_mutex_t lock;
1195         char label[42];
1196         char context[AST_MAX_CONTEXT];
1197         char exten[AST_MAX_EXTENSION];
1198         int instance;
1199         int stateid;
1200         int laststate;
1201         int isHint;
1202
1203         struct skinny_speeddial *next;
1204         struct skinny_device *parent;
1205 };
1206
1207 struct skinny_addon {
1208         ast_mutex_t lock;
1209         char type[10];
1210
1211         struct skinny_addon *next;
1212         struct skinny_device *parent;
1213 };
1214
1215 static struct skinny_device {
1216         /* A device containing one or more lines */
1217         char name[80];
1218         char id[16];
1219         char version_id[16];
1220         char exten[AST_MAX_EXTENSION];          /* Cruddy variable name, pick a better one */
1221         int type;
1222         int registered;
1223         int lastlineinstance;
1224         int lastcallreference;
1225         int capability;
1226         struct sockaddr_in addr;
1227         struct in_addr ourip;
1228         struct skinny_line *lines;
1229         struct skinny_speeddial *speeddials;
1230         struct skinny_addon *addons;
1231         struct ast_codec_pref prefs;
1232         struct ast_ha *ha;
1233         struct skinnysession *session;
1234         struct skinny_device *next;
1235 } *devices = NULL;
1236
1237 struct skinny_paging_device {
1238         char name[80];
1239         char id[16];
1240         struct skinny_device ** devices;
1241         struct skinny_paging_device *next;
1242 };
1243
1244 static struct skinnysession {
1245         pthread_t t;
1246         ast_mutex_t lock;
1247         struct sockaddr_in sin;
1248         int fd;
1249         char inbuf[SKINNY_MAX_PACKET];
1250         char outbuf[SKINNY_MAX_PACKET];
1251         struct skinny_device *device;
1252         struct skinnysession *next;
1253 } *sessions = NULL;
1254
1255 static struct ast_channel *skinny_request(const char *type, int format, void *data, int *cause);
1256 static int skinny_devicestate(void *data);
1257 static int skinny_call(struct ast_channel *ast, char *dest, int timeout);
1258 static int skinny_hangup(struct ast_channel *ast);
1259 static int skinny_answer(struct ast_channel *ast);
1260 static struct ast_frame *skinny_read(struct ast_channel *ast);
1261 static int skinny_write(struct ast_channel *ast, struct ast_frame *frame);
1262 static int skinny_indicate(struct ast_channel *ast, int ind, const void *data, size_t datalen);
1263 static int skinny_fixup(struct ast_channel *oldchan, struct ast_channel *newchan);
1264 static int skinny_senddigit_begin(struct ast_channel *ast, char digit);
1265 static int skinny_senddigit_end(struct ast_channel *ast, char digit, unsigned int duration);
1266 static int handle_time_date_req_message(struct skinny_req *req, struct skinnysession *s);
1267
1268 static const struct ast_channel_tech skinny_tech = {
1269         .type = "Skinny",
1270         .description = tdesc,
1271         .capabilities = AST_FORMAT_AUDIO_MASK,
1272         .properties = AST_CHAN_TP_WANTSJITTER | AST_CHAN_TP_CREATESJITTER,
1273         .requester = skinny_request,
1274         .devicestate = skinny_devicestate,
1275         .call = skinny_call,
1276         .hangup = skinny_hangup,
1277         .answer = skinny_answer,
1278         .read = skinny_read,
1279         .write = skinny_write,
1280         .indicate = skinny_indicate,
1281         .fixup = skinny_fixup,
1282         .send_digit_begin = skinny_senddigit_begin,
1283         .send_digit_end = skinny_senddigit_end,
1284         .bridge = ast_rtp_bridge,  
1285 };
1286
1287 static int skinny_extensionstate_cb(char *context, char* exten, int state, void *data);
1288
1289 static void *get_button_template(struct skinnysession *s, struct button_definition_template *btn)
1290 {
1291         struct skinny_device *d = s->device;
1292         struct skinny_addon *a = d->addons;
1293         int i;
1294
1295         switch (d->type) {
1296                 case SKINNY_DEVICE_30SPPLUS:
1297                 case SKINNY_DEVICE_30VIP:
1298                         /* 13 rows, 2 columns */
1299                         for (i = 0; i < 4; i++)
1300                                 (btn++)->buttonDefinition = BT_CUST_LINE;
1301                         (btn++)->buttonDefinition = BT_REDIAL;
1302                         (btn++)->buttonDefinition = BT_VOICEMAIL;
1303                         (btn++)->buttonDefinition = BT_CALLPARK;
1304                         (btn++)->buttonDefinition = BT_FORWARDALL;
1305                         (btn++)->buttonDefinition = BT_CONFERENCE;
1306                         for (i = 0; i < 4; i++)
1307                                 (btn++)->buttonDefinition = BT_NONE;
1308                         for (i = 0; i < 13; i++)
1309                                 (btn++)->buttonDefinition = BT_SPEEDDIAL;
1310                         
1311                         break;
1312                 case SKINNY_DEVICE_12SPPLUS:
1313                 case SKINNY_DEVICE_12SP:
1314                 case SKINNY_DEVICE_12:
1315                         /* 6 rows, 2 columns */
1316                         for (i = 0; i < 2; i++)
1317                                 (btn++)->buttonDefinition = BT_CUST_LINE;
1318                         for (i = 0; i < 4; i++)
1319                                 (btn++)->buttonDefinition = BT_SPEEDDIAL;
1320                         (btn++)->buttonDefinition = BT_HOLD;
1321                         (btn++)->buttonDefinition = BT_REDIAL;
1322                         (btn++)->buttonDefinition = BT_TRANSFER;
1323                         (btn++)->buttonDefinition = BT_FORWARDALL;
1324                         (btn++)->buttonDefinition = BT_CALLPARK;
1325                         (btn++)->buttonDefinition = BT_VOICEMAIL;
1326                         break;
1327                 case SKINNY_DEVICE_7910:
1328                         (btn++)->buttonDefinition = BT_LINE;
1329                         (btn++)->buttonDefinition = BT_HOLD;
1330                         (btn++)->buttonDefinition = BT_TRANSFER;
1331                         (btn++)->buttonDefinition = BT_DISPLAY;
1332                         (btn++)->buttonDefinition = BT_VOICEMAIL;
1333                         (btn++)->buttonDefinition = BT_CONFERENCE;
1334                         (btn++)->buttonDefinition = BT_FORWARDALL;
1335                         for (i = 0; i < 2; i++)
1336                                 (btn++)->buttonDefinition = BT_SPEEDDIAL;
1337                         (btn++)->buttonDefinition = BT_REDIAL;
1338                         break;
1339                 case SKINNY_DEVICE_7960:
1340                 case SKINNY_DEVICE_7961:
1341                 case SKINNY_DEVICE_7961GE:
1342                         for (i = 0; i < 6; i++)
1343                                 (btn++)->buttonDefinition = BT_CUST_LINESPEEDDIAL;
1344                         break;
1345                 case SKINNY_DEVICE_7940:
1346                 case SKINNY_DEVICE_7941:
1347                 case SKINNY_DEVICE_7941GE:
1348                         for (i = 0; i < 2; i++)
1349                                 (btn++)->buttonDefinition = BT_CUST_LINESPEEDDIAL;
1350                         break;
1351                 case SKINNY_DEVICE_7935:
1352                 case SKINNY_DEVICE_7936:
1353                         for (i = 0; i < 2; i++)
1354                                 (btn++)->buttonDefinition = BT_LINE;
1355                         break;
1356                 case SKINNY_DEVICE_ATA186:
1357                         (btn++)->buttonDefinition = BT_LINE;
1358                         break;
1359                 case SKINNY_DEVICE_7970:
1360                 case SKINNY_DEVICE_7971:
1361                 case SKINNY_DEVICE_CIPC:
1362                         for (i = 0; i < 8; i++)
1363                                 (btn++)->buttonDefinition = BT_CUST_LINESPEEDDIAL;
1364                         break;
1365                 case SKINNY_DEVICE_7985:
1366                         /* XXX I have no idea what the buttons look like on these. */
1367                         ast_log(LOG_WARNING, "Unsupported device type '%d (7985)' found.\n", d->type);
1368                         break;
1369                 case SKINNY_DEVICE_7912:
1370                 case SKINNY_DEVICE_7911:
1371                 case SKINNY_DEVICE_7905:
1372                         (btn++)->buttonDefinition = BT_LINE;
1373                         (btn++)->buttonDefinition = BT_HOLD;
1374                         break;
1375                 case SKINNY_DEVICE_7920:
1376                 case SKINNY_DEVICE_7921:
1377                         /* XXX I don't know if this is right. */
1378                         for (i = 0; i < 4; i++)
1379                                 (btn++)->buttonDefinition = BT_CUST_LINESPEEDDIAL;
1380                         break;
1381                 case SKINNY_DEVICE_7902:
1382                         ast_log(LOG_WARNING, "Unsupported device type '%d (7902)' found.\n", d->type);
1383                         break;
1384                 case SKINNY_DEVICE_SCCPGATEWAY_AN:
1385                 case SKINNY_DEVICE_SCCPGATEWAY_BRI:
1386                         ast_log(LOG_WARNING, "Unsupported device type '%d (SCCP gateway)' found.\n", d->type);
1387                         break;
1388                 default:
1389                         ast_log(LOG_WARNING, "Unknown device type '%d' found.\n", d->type);
1390                         break;
1391         }
1392
1393         for (a = d->addons; a; a = a->next) {
1394                 if (!strcasecmp(a->type, "7914")) {
1395                         for (i = 0; i < 14; i++)
1396                                 (btn++)->buttonDefinition = BT_CUST_LINESPEEDDIAL;
1397                 } else {
1398                         ast_log(LOG_WARNING, "Unknown addon type '%s' found.  Skipping.\n", a->type);
1399                 }
1400         }
1401
1402         return btn;
1403 }
1404
1405 static struct skinny_req *req_alloc(size_t size, int response_message)
1406 {
1407         struct skinny_req *req;
1408
1409         if (!(req = ast_calloc(1, skinny_header_size + size + 4)))
1410                 return NULL;
1411
1412         req->len = htolel(size+4);
1413         req->e = htolel(response_message);
1414
1415         return req;
1416 }
1417
1418 static struct skinny_line *find_line_by_instance(struct skinny_device *d, int instance)
1419 {
1420         struct skinny_line *l;
1421
1422         /*Dialing from on hook or on a 7920 uses instance 0 in requests
1423           but we need to start looking at instance 1 */
1424
1425         if (!instance)
1426                 instance = 1;
1427
1428         for (l = d->lines; l; l = l->next) {
1429                 if (l->instance == instance)
1430                         break;
1431         }
1432
1433         if (!l) {
1434                 ast_log(LOG_WARNING, "Could not find line with instance '%d' on device '%s'\n", instance, d->name);
1435         }
1436         return l;
1437 }
1438
1439 static struct skinny_line *find_line_by_name(const char *dest)
1440 {
1441         struct skinny_line *l;
1442         struct skinny_line *tmpl = NULL;
1443         struct skinny_device *d;
1444         char line[256];
1445         char *at;
1446         char *device;
1447         int checkdevice = 0;
1448
1449         ast_copy_string(line, dest, sizeof(line));
1450         at = strchr(line, '@');
1451         if (at)
1452                 *at++ = '\0';
1453         device = at;
1454
1455         if (!ast_strlen_zero(device))
1456                 checkdevice = 1;
1457
1458         ast_mutex_lock(&devicelock);
1459         for (d = devices; d; d = d->next) {
1460                 if (checkdevice && tmpl)
1461                         break;
1462                 else if (!checkdevice) {
1463                         /* This is a match, since we're checking for line on every device. */
1464                 } else if (!strcasecmp(d->name, device)) {
1465                         if (skinnydebug)
1466                                 ast_verb(2, "Found device: %s\n", d->name);
1467                 } else
1468                         continue;
1469
1470                 /* Found the device (or we don't care which device) */
1471                 for (l = d->lines; l; l = l->next) {
1472                         /* Search for the right line */
1473                         if (!strcasecmp(l->name, line)) {
1474                                 if (tmpl) {
1475                                         ast_verb(2, "Ambiguous line name: %s\n", line);
1476                                         ast_mutex_unlock(&devicelock);
1477                                         return NULL;
1478                                 } else
1479                                         tmpl = l;
1480                         }
1481                 }
1482         }
1483         ast_mutex_unlock(&devicelock);
1484         return tmpl;
1485 }
1486
1487 /*!
1488  * implement the setvar config line
1489  */
1490 static struct ast_variable *add_var(const char *buf, struct ast_variable *list)
1491 {
1492         struct ast_variable *tmpvar = NULL;
1493         char *varname = ast_strdupa(buf), *varval = NULL;
1494
1495         if ((varval = strchr(varname,'='))) {
1496                 *varval++ = '\0';
1497                 if ((tmpvar = ast_variable_new(varname, varval, ""))) {
1498                         tmpvar->next = list;
1499                         list = tmpvar;
1500                 }
1501         }
1502         return list;
1503 }
1504
1505 /* It's quicker/easier to find the subchannel when we know the instance number too */
1506 static struct skinny_subchannel *find_subchannel_by_instance_reference(struct skinny_device *d, int instance, int reference)
1507 {
1508         struct skinny_line *l = find_line_by_instance(d, instance);
1509         struct skinny_subchannel *sub;
1510
1511         if (!l) {
1512                 return NULL;
1513         }
1514
1515         /* 7920 phones set call reference to 0, so use the first
1516            sub-channel on the list.
1517            This MIGHT need more love to be right */
1518         if (!reference)
1519                 sub = l->sub;
1520         else {
1521                 for (sub = l->sub; sub; sub = sub->next) {
1522                         if (sub->callid == reference)
1523                                 break;
1524                 }
1525         }
1526         if (!sub) {
1527                 ast_log(LOG_WARNING, "Could not find subchannel with reference '%d' on '%s'\n", reference, d->name);
1528         }
1529         return sub;
1530 }
1531
1532 /* Find the subchannel when we only have the callid - this shouldn't happen often */
1533 static struct skinny_subchannel *find_subchannel_by_reference(struct skinny_device *d, int reference)
1534 {
1535         struct skinny_line *l;
1536         struct skinny_subchannel *sub = NULL;
1537
1538         for (l = d->lines; l; l = l->next) {
1539                 for (sub = l->sub; sub; sub = sub->next) {
1540                         if (sub->callid == reference)
1541                                 break;
1542                 }
1543                 if (sub)
1544                         break;
1545         }
1546
1547         if (!l) {
1548                 ast_log(LOG_WARNING, "Could not find any lines that contained a subchannel with reference '%d' on device '%s'\n", reference, d->name);
1549         } else {
1550                 if (!sub) {
1551                         ast_log(LOG_WARNING, "Could not find subchannel with reference '%d' on '%s@%s'\n", reference, l->name, d->name);
1552                 }
1553         }
1554         return sub;
1555 }
1556
1557 static struct skinny_speeddial *find_speeddial_by_instance(struct skinny_device *d, int instance, int isHint)
1558 {
1559         struct skinny_speeddial *sd;
1560
1561         for (sd = d->speeddials; sd; sd = sd->next) {
1562                 if (sd->isHint == isHint && sd->instance == instance)
1563                         break;
1564         }
1565
1566         if (!sd) {
1567                 ast_log(LOG_WARNING, "Could not find speeddial with instance '%d' on device '%s'\n", instance, d->name);
1568         }
1569         return sd;
1570 }
1571
1572 static int codec_skinny2ast(enum skinny_codecs skinnycodec)
1573 {
1574         switch (skinnycodec) {
1575         case SKINNY_CODEC_ALAW:
1576                 return AST_FORMAT_ALAW;
1577         case SKINNY_CODEC_ULAW:
1578                 return AST_FORMAT_ULAW;
1579         case SKINNY_CODEC_G723_1:
1580                 return AST_FORMAT_G723_1;
1581         case SKINNY_CODEC_G729A:
1582                 return AST_FORMAT_G729A;
1583         case SKINNY_CODEC_G726_32:
1584                 return AST_FORMAT_G726_AAL2; /* XXX Is this right? */
1585         case SKINNY_CODEC_H261:
1586                 return AST_FORMAT_H261;
1587         case SKINNY_CODEC_H263:
1588                 return AST_FORMAT_H263;
1589         default:
1590                 return 0;
1591         }
1592 }
1593
1594 static int codec_ast2skinny(int astcodec)
1595 {
1596         switch (astcodec) {
1597         case AST_FORMAT_ALAW:
1598                 return SKINNY_CODEC_ALAW;
1599         case AST_FORMAT_ULAW:
1600                 return SKINNY_CODEC_ULAW;
1601         case AST_FORMAT_G723_1:
1602                 return SKINNY_CODEC_G723_1;
1603         case AST_FORMAT_G729A:
1604                 return SKINNY_CODEC_G729A;
1605         case AST_FORMAT_G726_AAL2: /* XXX Is this right? */
1606                 return SKINNY_CODEC_G726_32;
1607         case AST_FORMAT_H261:
1608                 return SKINNY_CODEC_H261;
1609         case AST_FORMAT_H263:
1610                 return SKINNY_CODEC_H263;
1611         default:
1612                 return 0;
1613         }
1614 }
1615
1616 static int set_callforwards(struct skinny_line *l, const char *cfwd, int cfwdtype)
1617 {
1618         if (!l)
1619                 return 0;
1620
1621         if (!ast_strlen_zero(cfwd)) {
1622                 if (cfwdtype & SKINNY_CFWD_ALL) {
1623                         l->cfwdtype |= SKINNY_CFWD_ALL;
1624                         ast_copy_string(l->call_forward_all, cfwd, sizeof(l->call_forward_all));
1625                 }
1626                 if (cfwdtype & SKINNY_CFWD_BUSY) {
1627                         l->cfwdtype |= SKINNY_CFWD_BUSY;
1628                         ast_copy_string(l->call_forward_busy, cfwd, sizeof(l->call_forward_busy));
1629                 }
1630                 if (cfwdtype & SKINNY_CFWD_NOANSWER) {
1631                         l->cfwdtype |= SKINNY_CFWD_NOANSWER;
1632                         ast_copy_string(l->call_forward_noanswer, cfwd, sizeof(l->call_forward_noanswer));
1633                 }
1634         } else {
1635                 if (cfwdtype & SKINNY_CFWD_ALL) {
1636                         l->cfwdtype &= ~SKINNY_CFWD_ALL;
1637                         memset(l->call_forward_all, 0, sizeof(l->call_forward_all));
1638                 }
1639                 if (cfwdtype & SKINNY_CFWD_BUSY) {
1640                         l->cfwdtype &= ~SKINNY_CFWD_BUSY;
1641                         memset(l->call_forward_busy, 0, sizeof(l->call_forward_busy));
1642                 }
1643                 if (cfwdtype & SKINNY_CFWD_NOANSWER) {
1644                         l->cfwdtype &= ~SKINNY_CFWD_NOANSWER;
1645                         memset(l->call_forward_noanswer, 0, sizeof(l->call_forward_noanswer));
1646                 }
1647         }
1648         return l->cfwdtype;
1649 }
1650
1651 static void cleanup_stale_contexts(char *new, char *old)
1652 {
1653         char *oldcontext, *newcontext, *stalecontext, *stringp, newlist[AST_MAX_CONTEXT];
1654
1655         while ((oldcontext = strsep(&old, "&"))) {
1656                 stalecontext = '\0';
1657                 ast_copy_string(newlist, new, sizeof(newlist));
1658                 stringp = newlist;
1659                 while ((newcontext = strsep(&stringp, "&"))) {
1660                         if (strcmp(newcontext, oldcontext) == 0) {
1661                                 /* This is not the context you're looking for */
1662                                 stalecontext = '\0';
1663                                 break;
1664                         } else if (strcmp(newcontext, oldcontext)) {
1665                                 stalecontext = oldcontext;
1666                         }
1667                         
1668                 }
1669                 if (stalecontext)
1670                         ast_context_destroy(ast_context_find(stalecontext), "Skinny");
1671         }
1672 }
1673
1674 static void register_exten(struct skinny_line *l)
1675 {
1676         char multi[256];
1677         char *stringp, *ext, *context;
1678
1679         if (ast_strlen_zero(regcontext))
1680                 return;
1681
1682         ast_copy_string(multi, S_OR(l->regexten, l->name), sizeof(multi));
1683         stringp = multi;
1684         while ((ext = strsep(&stringp, "&"))) {
1685                 if ((context = strchr(ext, '@'))) {
1686                         *context++ = '\0';      /* split ext@context */
1687                         if (!ast_context_find(context)) {
1688                                 ast_log(LOG_WARNING, "Context %s must exist in regcontext= in skinny.conf!\n", context);
1689                                 continue;
1690                         }
1691                 } else {
1692                         context = regcontext;
1693                 }
1694                 ast_add_extension(context, 1, ext, 1, NULL, NULL, "Noop",
1695                          ast_strdup(l->name), ast_free_ptr, "Skinny");
1696         }
1697 }
1698
1699 static void unregister_exten(struct skinny_line *l)
1700 {
1701         char multi[256];
1702         char *stringp, *ext, *context;
1703
1704         if (ast_strlen_zero(regcontext))
1705                 return;
1706
1707         ast_copy_string(multi, S_OR(l->regexten, l->name), sizeof(multi));
1708         stringp = multi;
1709         while ((ext = strsep(&stringp, "&"))) {
1710                 if ((context = strchr(ext, '@'))) {
1711                         *context++ = '\0';      /* split ext@context */
1712                         if (!ast_context_find(context)) {
1713                                 ast_log(LOG_WARNING, "Context %s must exist in regcontext= in skinny.conf!\n", context);
1714                                 continue;
1715                         }
1716                 } else {
1717                         context = regcontext;
1718                 }
1719                 ast_context_remove_extension(context, ext, 1, NULL);
1720         }
1721 }
1722
1723 static int skinny_register(struct skinny_req *req, struct skinnysession *s)
1724 {
1725         struct skinny_device *d;
1726         struct skinny_line *l;
1727         struct skinny_speeddial *sd;
1728         struct sockaddr_in sin;
1729         socklen_t slen;
1730
1731         ast_mutex_lock(&devicelock);
1732         for (d = devices; d; d = d->next) {
1733                 if (!strcasecmp(req->data.reg.name, d->id)
1734                                 && ast_apply_ha(d->ha, &(s->sin))) {
1735                         s->device = d;
1736                         d->type = letohl(req->data.reg.type);
1737                         if (ast_strlen_zero(d->version_id)) {
1738                                 ast_copy_string(d->version_id, version_id, sizeof(d->version_id));
1739                         }
1740                         d->registered = 1;
1741                         d->session = s;
1742
1743                         slen = sizeof(sin);
1744                         if (getsockname(s->fd, (struct sockaddr *)&sin, &slen)) {
1745                                 ast_log(LOG_WARNING, "Cannot get socket name\n");
1746                                 sin.sin_addr = __ourip;
1747                         }
1748                         d->ourip = sin.sin_addr;
1749
1750                         for (sd = d->speeddials; sd; sd = sd->next) {
1751                                 sd->stateid = ast_extension_state_add(sd->context, sd->exten, skinny_extensionstate_cb, sd);
1752                         }
1753                         for (l = d->lines; l; l = l->next) {
1754                                 register_exten(l);
1755                                 ast_device_state_changed("Skinny/%s@%s", l->name, d->name);
1756                         }
1757                         break;
1758                 }
1759         }
1760         ast_mutex_unlock(&devicelock);
1761         if (!d) {
1762                 return 0;
1763         }
1764         return 1;
1765 }
1766
1767 static int skinny_unregister(struct skinny_req *req, struct skinnysession *s)
1768 {
1769         struct skinny_device *d;
1770         struct skinny_line *l;
1771         struct skinny_speeddial *sd;
1772
1773         d = s->device;
1774
1775         if (d) {
1776                 d->session = NULL;
1777                 d->registered = 0;
1778
1779                 for (sd = d->speeddials; sd; sd = sd->next) {
1780                         if (sd->stateid > -1)
1781                                 ast_extension_state_del(sd->stateid, NULL);
1782                 }
1783                 for (l = d->lines; l; l = l->next) {
1784                         unregister_exten(l);
1785                         ast_device_state_changed("Skinny/%s@%s", l->name, d->name);
1786                 }
1787         }
1788
1789         return -1; /* main loop will destroy the session */
1790 }
1791
1792 static int transmit_response(struct skinnysession *s, struct skinny_req *req)
1793 {
1794         int res = 0;
1795
1796         if (!s) {
1797                 ast_log(LOG_WARNING, "Asked to transmit to a non-existant session!\n");
1798                 return -1;
1799         }
1800
1801         ast_mutex_lock(&s->lock);
1802
1803         if (skinnydebug)
1804                 ast_log(LOG_VERBOSE, "writing packet type %04X (%d bytes) to socket %d\n", letohl(req->e), letohl(req->len)+8, s->fd);
1805
1806         if (letohl(req->len > SKINNY_MAX_PACKET) || letohl(req->len < 0)) {
1807                 ast_log(LOG_WARNING, "transmit_response: the length of the request is out of bounds\n");
1808                 return -1;
1809         }
1810
1811         memset(s->outbuf,0,sizeof(s->outbuf));
1812         memcpy(s->outbuf, req, skinny_header_size);
1813         memcpy(s->outbuf+skinny_header_size, &req->data, letohl(req->len));
1814
1815         res = write(s->fd, s->outbuf, letohl(req->len)+8);
1816
1817         if (res != letohl(req->len)+8) {
1818                 ast_log(LOG_WARNING, "Transmit: write only sent %d out of %d bytes: %s\n", res, letohl(req->len)+8, strerror(errno));
1819                 if (res == -1) {
1820                         if (skinnydebug)
1821                                 ast_log(LOG_WARNING, "Transmit: Skinny Client was lost, unregistering\n");
1822                         skinny_unregister(NULL, s);
1823                 }
1824                 
1825         }
1826         
1827         ast_mutex_unlock(&s->lock);
1828         return 1;
1829 }
1830
1831 static void transmit_speaker_mode(struct skinnysession *s, int mode)
1832 {
1833         struct skinny_req *req;
1834
1835         if (!(req = req_alloc(sizeof(struct set_speaker_message), SET_SPEAKER_MESSAGE)))
1836                 return;
1837
1838         req->data.setspeaker.mode = htolel(mode);
1839         transmit_response(s, req);
1840 }
1841 /*
1842 static void transmit_microphone_mode(struct skinnysession *s, int mode)
1843 {
1844         struct skinny_req *req;
1845
1846         if (!(req = req_alloc(sizeof(struct set_microphone_message), SET_MICROPHONE_MESSAGE)))
1847                 return;
1848
1849         req->data.setmicrophone.mode = htolel(mode);
1850         transmit_response(s, req);
1851 }
1852 */
1853
1854 static void transmit_callinfo(struct skinnysession *s, const char *fromname, const char *fromnum, const char *toname, const char *tonum, int instance, int callid, int calltype)
1855 {
1856         struct skinny_req *req;
1857
1858         if (!(req = req_alloc(sizeof(struct call_info_message), CALL_INFO_MESSAGE)))
1859                 return;
1860
1861         if (skinnydebug)
1862                         ast_verbose("Setting Callinfo to %s(%s) from %s(%s) on %s(%d)\n", fromname, fromnum, toname, tonum, s->device->name, instance);
1863
1864         if (fromname) {
1865                 ast_copy_string(req->data.callinfo.callingPartyName, fromname, sizeof(req->data.callinfo.callingPartyName));
1866         }
1867         if (fromnum) {
1868                 ast_copy_string(req->data.callinfo.callingParty, fromnum, sizeof(req->data.callinfo.callingParty));
1869         }
1870         if (toname) {
1871                 ast_copy_string(req->data.callinfo.calledPartyName, toname, sizeof(req->data.callinfo.calledPartyName));
1872         }
1873         if (tonum) {
1874                 ast_copy_string(req->data.callinfo.calledParty, tonum, sizeof(req->data.callinfo.calledParty));
1875         }
1876         req->data.callinfo.instance = htolel(instance);
1877         req->data.callinfo.reference = htolel(callid);
1878         req->data.callinfo.type = htolel(calltype);
1879         transmit_response(s, req);
1880 }
1881
1882 static void transmit_connect(struct skinnysession *s, struct skinny_subchannel *sub)
1883 {
1884         struct skinny_req *req;
1885         struct skinny_line *l = sub->parent;
1886         struct ast_format_list fmt;
1887
1888         if (!(req = req_alloc(sizeof(struct open_receive_channel_message), OPEN_RECEIVE_CHANNEL_MESSAGE)))
1889                 return;
1890
1891         fmt = ast_codec_pref_getsize(&l->prefs, ast_best_codec(l->capability));
1892
1893         req->data.openreceivechannel.conferenceId = htolel(sub->callid);
1894         req->data.openreceivechannel.partyId = htolel(sub->callid);
1895         req->data.openreceivechannel.packets = htolel(fmt.cur_ms);
1896         req->data.openreceivechannel.capability = htolel(codec_ast2skinny(fmt.bits));
1897         req->data.openreceivechannel.echo = htolel(0);
1898         req->data.openreceivechannel.bitrate = htolel(0);
1899         transmit_response(s, req);
1900 }
1901
1902 static void transmit_tone(struct skinnysession *s, int tone, int instance, int reference)
1903 {
1904         struct skinny_req *req;
1905
1906         if (tone == SKINNY_NOTONE) {
1907                 /* This is bad, mmm'kay? */
1908                 return;
1909         }
1910
1911         if (tone > 0) {
1912                 if (!(req = req_alloc(sizeof(struct start_tone_message), START_TONE_MESSAGE)))
1913                         return;
1914                 req->data.starttone.tone = htolel(tone);
1915                 req->data.starttone.instance = htolel(instance);
1916                 req->data.starttone.reference = htolel(reference);
1917         } else {
1918                 if (!(req = req_alloc(sizeof(struct stop_tone_message), STOP_TONE_MESSAGE)))
1919                         return;
1920                 req->data.stoptone.instance = htolel(instance);
1921                 req->data.stoptone.reference = htolel(reference);
1922         }
1923
1924         if (tone > 0) {
1925                 req->data.starttone.tone = htolel(tone);
1926         }
1927         transmit_response(s, req);
1928 }
1929
1930 static void transmit_selectsoftkeys(struct skinnysession *s, int instance, int callid, int softkey)
1931 {
1932         struct skinny_req *req;
1933
1934         if (!(req = req_alloc(sizeof(struct select_soft_keys_message), SELECT_SOFT_KEYS_MESSAGE)))
1935                 return;
1936
1937         req->data.selectsoftkey.instance = htolel(instance);
1938         req->data.selectsoftkey.reference = htolel(callid);
1939         req->data.selectsoftkey.softKeySetIndex = htolel(softkey);
1940         req->data.selectsoftkey.validKeyMask = htolel(0xFFFFFFFF);
1941         transmit_response(s, req);
1942 }
1943
1944 static void transmit_lamp_indication(struct skinnysession *s, int stimulus, int instance, int indication)
1945 {
1946         struct skinny_req *req;
1947
1948         if (!(req = req_alloc(sizeof(struct set_lamp_message), SET_LAMP_MESSAGE)))
1949                 return;
1950
1951         req->data.setlamp.stimulus = htolel(stimulus);
1952         req->data.setlamp.stimulusInstance = htolel(instance);
1953         req->data.setlamp.deviceStimulus = htolel(indication);
1954         transmit_response(s, req);
1955 }
1956
1957 static void transmit_ringer_mode(struct skinnysession *s, int mode)
1958 {
1959         struct skinny_req *req;
1960
1961         if (skinnydebug)
1962                 ast_verbose("Setting ringer mode to '%d'.\n", mode);
1963
1964         if (!(req = req_alloc(sizeof(struct set_ringer_message), SET_RINGER_MESSAGE)))
1965                 return;
1966
1967         req->data.setringer.ringerMode = htolel(mode);
1968         /* XXX okay, I don't quite know what this is, but here's what happens (on a 7960).
1969            Note: The phone will always show as ringing on the display.
1970
1971            1: phone will audibly ring over and over
1972            2: phone will audibly ring only once
1973            any other value, will NOT cause the phone to audibly ring
1974         */
1975         req->data.setringer.unknown1 = htolel(1);
1976         /* XXX the value here doesn't seem to change anything.  Must be higher than 0.
1977            Perhaps a packet capture can shed some light on this. */
1978         req->data.setringer.unknown2 = htolel(1);
1979         transmit_response(s, req);
1980 }
1981
1982 static void transmit_displaymessage(struct skinnysession *s, const char *text, int instance, int reference)
1983 {
1984         struct skinny_req *req;
1985
1986         if (text == 0) {
1987                 if (!(req = req_alloc(0, CLEAR_DISPLAY_MESSAGE)))
1988                         return;
1989
1990                 req->data.clearpromptstatus.lineInstance = instance;
1991                 req->data.clearpromptstatus.callReference = reference;
1992
1993                 if (skinnydebug)
1994                         ast_verbose("Clearing Display\n");
1995         } else {
1996                 if (!(req = req_alloc(sizeof(struct displaytext_message), DISPLAYTEXT_MESSAGE)))
1997                         return;
1998
1999                 ast_copy_string(req->data.displaytext.text, text, sizeof(req->data.displaytext.text));
2000                 if (skinnydebug)
2001                         ast_verbose("Displaying message '%s'\n", req->data.displaytext.text);
2002         }
2003
2004         transmit_response(s, req);
2005 }
2006
2007 static void transmit_displaynotify(struct skinnysession *s, const char *text, int t)
2008 {
2009         struct skinny_req *req;
2010
2011         if (!(req = req_alloc(sizeof(struct display_notify_message), DISPLAY_NOTIFY_MESSAGE)))
2012                 return;
2013
2014         ast_copy_string(req->data.displaynotify.displayMessage, text, sizeof(req->data.displaynotify.displayMessage));
2015         req->data.displaynotify.displayTimeout = htolel(t);
2016
2017         if (skinnydebug)
2018                 ast_verbose("Displaying notify '%s'\n", text);
2019
2020         transmit_response(s, req);
2021 }
2022
2023 static void transmit_displaypromptstatus(struct skinnysession *s, const char *text, int t, int instance, int callid)
2024 {
2025         struct skinny_req *req;
2026
2027         if (text == 0) {
2028                 if (!(req = req_alloc(sizeof(struct clear_prompt_message), CLEAR_PROMPT_MESSAGE)))
2029                         return;
2030
2031                 req->data.clearpromptstatus.lineInstance = htolel(instance);
2032                 req->data.clearpromptstatus.callReference = htolel(callid);
2033
2034                 if (skinnydebug)
2035                         ast_verbose("Clearing Prompt\n");
2036         } else {
2037                 if (!(req = req_alloc(sizeof(struct display_prompt_status_message), DISPLAY_PROMPT_STATUS_MESSAGE)))
2038                         return;
2039
2040                 ast_copy_string(req->data.displaypromptstatus.promptMessage, text, sizeof(req->data.displaypromptstatus.promptMessage));
2041                 req->data.displaypromptstatus.messageTimeout = htolel(t);
2042                 req->data.displaypromptstatus.lineInstance = htolel(instance);
2043                 req->data.displaypromptstatus.callReference = htolel(callid);
2044
2045                 if (skinnydebug)
2046                         ast_verbose("Displaying Prompt Status '%s'\n", text);
2047         }
2048
2049         transmit_response(s, req);
2050 }
2051
2052 static void transmit_dialednumber(struct skinnysession *s, const char *text, int instance, int callid)
2053 {
2054         struct skinny_req *req;
2055
2056         if (!(req = req_alloc(sizeof(struct dialed_number_message), DIALED_NUMBER_MESSAGE)))
2057                 return;
2058
2059         ast_copy_string(req->data.dialednumber.dialedNumber, text, sizeof(req->data.dialednumber.dialedNumber));
2060         req->data.dialednumber.lineInstance = htolel(instance);
2061         req->data.dialednumber.callReference = htolel(callid);
2062
2063         transmit_response(s, req);
2064 }
2065
2066 static void transmit_callstate(struct skinnysession *s, int instance, int state, unsigned callid)
2067 {
2068         struct skinny_req *req;
2069
2070         if (state == SKINNY_ONHOOK) {
2071                 if (!(req = req_alloc(sizeof(struct close_receive_channel_message), CLOSE_RECEIVE_CHANNEL_MESSAGE)))
2072                         return;
2073
2074                 req->data.closereceivechannel.conferenceId = htolel(callid);
2075                 req->data.closereceivechannel.partyId = htolel(callid);
2076                 transmit_response(s, req);
2077
2078                 if (!(req = req_alloc(sizeof(struct stop_media_transmission_message), STOP_MEDIA_TRANSMISSION_MESSAGE)))
2079                         return;
2080
2081                 req->data.stopmedia.conferenceId = htolel(callid);
2082                 req->data.stopmedia.passThruPartyId = htolel(callid);
2083                 transmit_response(s, req);
2084
2085                 transmit_speaker_mode(s, SKINNY_SPEAKEROFF);
2086
2087                 transmit_displaypromptstatus(s, NULL, 0, instance, callid);
2088         }
2089
2090         if (!(req = req_alloc(sizeof(struct call_state_message), CALL_STATE_MESSAGE)))
2091                 return;
2092
2093         req->data.callstate.callState = htolel(state);
2094         req->data.callstate.lineInstance = htolel(instance);
2095         req->data.callstate.callReference = htolel(callid);
2096         transmit_response(s, req);
2097
2098         if (state == SKINNY_ONHOOK) {
2099                 transmit_selectsoftkeys(s, 0, 0, KEYDEF_ONHOOK);
2100         }
2101
2102         if (state == SKINNY_OFFHOOK || state == SKINNY_ONHOOK) {
2103                 if (!(req = req_alloc(sizeof(struct activate_call_plane_message), ACTIVATE_CALL_PLANE_MESSAGE)))
2104                         return;
2105
2106                 req->data.activatecallplane.lineInstance = htolel(instance);
2107                 transmit_response(s, req);
2108         }
2109 }
2110
2111
2112 static void transmit_cfwdstate(struct skinnysession *s, struct skinny_line *l)
2113 {
2114         struct skinny_req *req;
2115         int anyon = 0;
2116
2117         if (!(req = req_alloc(sizeof(struct forward_stat_message), FORWARD_STAT_MESSAGE)))
2118                 return;
2119
2120         if (l->cfwdtype & SKINNY_CFWD_ALL) {
2121                 if (!ast_strlen_zero(l->call_forward_all)) {
2122                         ast_copy_string(req->data.forwardstat.fwdallnum, l->call_forward_all, sizeof(req->data.forwardstat.fwdallnum));
2123                         req->data.forwardstat.fwdall = htolel(1);
2124                         anyon++;
2125                 } else {
2126                         req->data.forwardstat.fwdall = htolel(0);
2127                 }
2128         }
2129         if (l->cfwdtype & SKINNY_CFWD_BUSY) {
2130                 if (!ast_strlen_zero(l->call_forward_busy)) {
2131                         ast_copy_string(req->data.forwardstat.fwdbusynum, l->call_forward_busy, sizeof(req->data.forwardstat.fwdbusynum));
2132                         req->data.forwardstat.fwdbusy = htolel(1);
2133                         anyon++;
2134                 } else {
2135                         req->data.forwardstat.fwdbusy = htolel(0);
2136                 }
2137         }
2138         if (l->cfwdtype & SKINNY_CFWD_NOANSWER) {
2139                 if (!ast_strlen_zero(l->call_forward_noanswer)) {
2140                         ast_copy_string(req->data.forwardstat.fwdnoanswernum, l->call_forward_noanswer, sizeof(req->data.forwardstat.fwdnoanswernum));
2141                         req->data.forwardstat.fwdnoanswer = htolel(1);
2142                         anyon++;
2143                 } else {
2144                         req->data.forwardstat.fwdnoanswer = htolel(0);
2145                 }
2146         }
2147         req->data.forwardstat.lineNumber = htolel(l->instance);
2148         if (anyon)
2149                 req->data.forwardstat.activeforward = htolel(7);
2150         else
2151                 req->data.forwardstat.activeforward = htolel(0);
2152
2153         transmit_response(s, req);
2154 }
2155
2156 static int skinny_extensionstate_cb(char *context, char *exten, int state, void *data)
2157 {
2158         struct skinny_speeddial *sd = data;
2159         struct skinny_device *d = sd->parent;
2160         struct skinnysession *s = d->session;
2161         char hint[AST_MAX_EXTENSION];
2162         int callstate = SKINNY_CALLREMOTEMULTILINE;
2163         int lamp = SKINNY_LAMP_OFF;
2164
2165         switch (state) {
2166         case AST_EXTENSION_DEACTIVATED: /* Retry after a while */
2167         case AST_EXTENSION_REMOVED:     /* Extension is gone */
2168                 ast_verb(2, "Extension state: Watcher for hint %s %s. Notify Device %s\n", exten, state == AST_EXTENSION_DEACTIVATED ? "deactivated" : "removed", d->name);
2169                 sd->stateid = -1;
2170                 callstate = SKINNY_ONHOOK;
2171                 lamp = SKINNY_LAMP_OFF;
2172                 break;
2173         case AST_EXTENSION_RINGING:
2174         case AST_EXTENSION_UNAVAILABLE:
2175                 callstate = SKINNY_RINGIN;
2176                 lamp = SKINNY_LAMP_BLINK;
2177                 break;
2178         case AST_EXTENSION_BUSY: /* callstate = SKINNY_BUSY wasn't wanting to work - I'll settle for this */
2179         case AST_EXTENSION_INUSE:
2180                 callstate = SKINNY_CALLREMOTEMULTILINE;
2181                 lamp = SKINNY_LAMP_ON;
2182                 break;
2183         case AST_EXTENSION_ONHOLD:
2184                 callstate = SKINNY_HOLD;
2185                 lamp = SKINNY_LAMP_WINK;
2186                 break;
2187         case AST_EXTENSION_NOT_INUSE:
2188         default:
2189                 callstate = SKINNY_ONHOOK;
2190                 lamp = SKINNY_LAMP_OFF;
2191                 break;
2192         }
2193
2194         if (ast_get_hint(hint, sizeof(hint), NULL, 0, NULL, sd->context, sd->exten)) {
2195                 /* If they are not registered, we will override notification and show no availability */
2196                 if (ast_device_state(hint) == AST_DEVICE_UNAVAILABLE) {
2197                         callstate = SKINNY_ONHOOK;
2198                         lamp = SKINNY_LAMP_FLASH;
2199                 }
2200         }
2201
2202         transmit_lamp_indication(s, STIMULUS_LINE, sd->instance, lamp);
2203         transmit_callstate(s, sd->instance, callstate, 0);
2204         sd->laststate = state;
2205
2206         return 0;
2207 }
2208
2209 static int has_voicemail(struct skinny_line *l)
2210 {
2211         return ast_app_has_voicemail(l->mailbox, NULL);
2212 }
2213
2214 static void do_housekeeping(struct skinnysession *s)
2215 {
2216         int new;
2217         int old;
2218         int device_lamp = 0;
2219         struct skinny_device *d = s->device;
2220         struct skinny_line *l;
2221
2222         /* Update time on device */
2223         handle_time_date_req_message(NULL, s);
2224
2225         /* Set MWI on individual lines */
2226         for (l = d->lines; l; l = l->next) {
2227                 if (has_voicemail(l)) {
2228                         if (skinnydebug)
2229                                 ast_verbose("Checking for voicemail Skinny %s@%s\n", l->name, d->name);
2230                         ast_app_inboxcount(l->mailbox, &new, &old);
2231                         if (skinnydebug)
2232                                 ast_verbose("Skinny %s@%s has voicemail!\n", l->name, d->name);
2233                         transmit_lamp_indication(s, STIMULUS_VOICEMAIL, l->instance, l->mwiblink?SKINNY_LAMP_BLINK:SKINNY_LAMP_ON);
2234                         device_lamp++;
2235                 } else {
2236                         transmit_lamp_indication(s, STIMULUS_VOICEMAIL, l->instance, SKINNY_LAMP_OFF);
2237                 }
2238         }
2239         /* If at least one line has VM, turn the device level lamp on */
2240         if (device_lamp)
2241                 transmit_lamp_indication(s, STIMULUS_VOICEMAIL, 0, SKINNY_LAMP_ON);
2242         else
2243                 transmit_lamp_indication(s, STIMULUS_VOICEMAIL, 0, SKINNY_LAMP_OFF);
2244 }
2245
2246 /* I do not believe skinny can deal with video.
2247    Anyone know differently? */
2248 /* Yes, it can.  Currently 7985 and Cisco VT Advantage do video. */
2249 static enum ast_rtp_get_result skinny_get_vrtp_peer(struct ast_channel *c, struct ast_rtp **rtp)
2250 {
2251         struct skinny_subchannel *sub = NULL;
2252
2253         if (!(sub = c->tech_pvt) || !(sub->vrtp))
2254                 return AST_RTP_GET_FAILED;
2255
2256         *rtp = sub->vrtp;
2257
2258         return AST_RTP_TRY_NATIVE;
2259 }
2260
2261 static enum ast_rtp_get_result skinny_get_rtp_peer(struct ast_channel *c, struct ast_rtp **rtp)
2262 {
2263         struct skinny_subchannel *sub = NULL;
2264         struct skinny_line *l;
2265         enum ast_rtp_get_result res = AST_RTP_TRY_NATIVE;
2266
2267         if (skinnydebug)
2268                 ast_verbose("skinny_get_rtp_peer() Channel = %s\n", c->name);
2269
2270
2271         if (!(sub = c->tech_pvt))
2272                 return AST_RTP_GET_FAILED;
2273
2274         ast_mutex_lock(&sub->lock);
2275
2276         if (!(sub->rtp)){
2277                 ast_mutex_unlock(&sub->lock);
2278                 return AST_RTP_GET_FAILED;
2279         }
2280         
2281         *rtp = sub->rtp;
2282
2283         l = sub->parent;
2284
2285         if (!l->canreinvite || l->nat){
2286                 res = AST_RTP_TRY_PARTIAL;
2287                 if (skinnydebug)
2288                         ast_verbose("skinny_get_rtp_peer() Using AST_RTP_TRY_PARTIAL \n");
2289         }
2290
2291         ast_mutex_unlock(&sub->lock);
2292
2293         return res;
2294
2295 }
2296
2297 static int skinny_set_rtp_peer(struct ast_channel *c, struct ast_rtp *rtp, struct ast_rtp *vrtp, struct ast_rtp *trtp, int codecs, int nat_active)
2298 {
2299         struct skinny_subchannel *sub;
2300         struct skinny_line *l;
2301         struct skinny_device *d;
2302         struct skinnysession *s;
2303         struct ast_format_list fmt;
2304         struct sockaddr_in us;
2305         struct sockaddr_in them;
2306         struct skinny_req *req;
2307         
2308         sub = c->tech_pvt;
2309
2310         if (c->_state != AST_STATE_UP)
2311                 return 0;
2312
2313         if (!sub) {
2314                 return -1;
2315         }
2316
2317         l = sub->parent;
2318         d = l->parent;
2319         s = d->session;
2320
2321         if (rtp){
2322                 ast_rtp_get_peer(rtp, &them);
2323
2324                 /* Shutdown any early-media or previous media on re-invite */
2325                 if (!(req = req_alloc(sizeof(struct stop_media_transmission_message), STOP_MEDIA_TRANSMISSION_MESSAGE)))
2326                         return -1;
2327
2328                 req->data.stopmedia.conferenceId = htolel(sub->callid);
2329                 req->data.stopmedia.passThruPartyId = htolel(sub->callid);
2330                 transmit_response(s, req);
2331
2332                 if (skinnydebug)
2333                         ast_verbose("Peerip = %s:%d\n", ast_inet_ntoa(them.sin_addr), ntohs(them.sin_port));
2334
2335                 if (!(req = req_alloc(sizeof(struct start_media_transmission_message), START_MEDIA_TRANSMISSION_MESSAGE)))
2336                         return -1;
2337
2338                 fmt = ast_codec_pref_getsize(&l->prefs, ast_best_codec(l->capability));
2339
2340                 if (skinnydebug)
2341                         ast_verbose("Setting payloadType to '%d' (%d ms)\n", fmt.bits, fmt.cur_ms);
2342
2343                 req->data.startmedia.conferenceId = htolel(sub->callid);
2344                 req->data.startmedia.passThruPartyId = htolel(sub->callid);
2345                 if (!(l->canreinvite) || (l->nat)){
2346                         ast_rtp_get_us(rtp, &us);
2347                         req->data.startmedia.remoteIp = htolel(d->ourip.s_addr);
2348                         req->data.startmedia.remotePort = htolel(ntohs(us.sin_port));
2349                 } else {
2350                         req->data.startmedia.remoteIp = htolel(them.sin_addr.s_addr);
2351                         req->data.startmedia.remotePort = htolel(ntohs(them.sin_port));
2352                 }
2353                 req->data.startmedia.packetSize = htolel(fmt.cur_ms);
2354                 req->data.startmedia.payloadType = htolel(codec_ast2skinny(fmt.bits));
2355                 req->data.startmedia.qualifier.precedence = htolel(127);
2356                 req->data.startmedia.qualifier.vad = htolel(0);
2357                 req->data.startmedia.qualifier.packets = htolel(0);
2358                 req->data.startmedia.qualifier.bitRate = htolel(0);
2359                 transmit_response(s, req);
2360
2361                 return 0;
2362         }
2363         /* Need a return here to break the bridge */
2364         return 0;
2365 }
2366
2367 static struct ast_rtp_protocol skinny_rtp = {
2368         .type = "Skinny",
2369         .get_rtp_info = skinny_get_rtp_peer,
2370         .get_vrtp_info = skinny_get_vrtp_peer,
2371         .set_rtp_peer = skinny_set_rtp_peer,
2372 };
2373
2374 static char *handle_skinny_set_debug_deprecated(struct ast_cli_entry *e, int cmd, struct ast_cli_args *a)
2375 {
2376         switch (cmd) {
2377         case CLI_INIT:
2378                 e->command = "skinny set debug [off]";
2379                 e->usage =
2380                         "Usage: skinny set debug [off]\n"
2381                         "       Enables/Disables dumping of Skinny packets for debugging purposes\n";
2382                 return NULL;
2383         case CLI_GENERATE:
2384                 return NULL;
2385         }
2386         
2387         if (a->argc < 3 || a->argc > 4)
2388                 return CLI_SHOWUSAGE;
2389
2390         if (a->argc == 3) {
2391                 skinnydebug = 1;
2392                 ast_cli(a->fd, "Skinny Debugging Enabled\n");
2393                 return CLI_SUCCESS;
2394         } else if (!strncasecmp(a->argv[3], "off", 3)) {
2395                 skinnydebug = 0;
2396                 ast_cli(a->fd, "Skinny Debugging Disabled\n");
2397                 return CLI_SUCCESS;
2398         } else {
2399                 return CLI_SHOWUSAGE;
2400         }
2401 }
2402
2403 static char *handle_skinny_set_debug(struct ast_cli_entry *e, int cmd, struct ast_cli_args *a)
2404 {
2405         switch (cmd) {
2406         case CLI_INIT:
2407                 e->command = "skinny set debug {on|off}";
2408                 e->usage =
2409                         "Usage: skinny set debug {on|off}\n"
2410                         "       Enables/Disables dumping of Skinny packets for debugging purposes\n";
2411                 return NULL;
2412         case CLI_GENERATE:
2413                 return NULL;
2414         }
2415         
2416         if (a->argc != e->args)
2417                 return CLI_SHOWUSAGE;
2418
2419         if (!strncasecmp(a->argv[e->args - 1], "on", 2)) {
2420                 skinnydebug = 1;
2421                 ast_cli(a->fd, "Skinny Debugging Enabled\n");
2422                 return CLI_SUCCESS;
2423         } else if (!strncasecmp(a->argv[e->args - 1], "off", 3)) {
2424                 skinnydebug = 0;
2425                 ast_cli(a->fd, "Skinny Debugging Disabled\n");
2426                 return CLI_SUCCESS;
2427         } else {
2428                 return CLI_SHOWUSAGE;
2429         }
2430 }
2431
2432 static char *complete_skinny_devices(const char *word, int state)
2433 {
2434         struct skinny_device *d;
2435         char *result = NULL;
2436         int wordlen = strlen(word), which = 0;
2437
2438         for (d = devices; d && !result; d = d->next) {
2439                 if (!strncasecmp(word, d->id, wordlen) && ++which > state)
2440                         result = ast_strdup(d->id);
2441         }
2442
2443         return result;
2444 }
2445
2446 static char *complete_skinny_show_device(const char *line, const char *word, int pos, int state)
2447 {
2448         return (pos == 3 ? ast_strdup(complete_skinny_devices(word, state)) : NULL);
2449 }
2450
2451 static char *complete_skinny_reset(const char *line, const char *word, int pos, int state)
2452 {
2453         return (pos == 2 ? ast_strdup(complete_skinny_devices(word, state)) : NULL);
2454 }
2455
2456 static char *complete_skinny_show_line(const char *line, const char *word, int pos, int state)
2457 {
2458         struct skinny_device *d;
2459         struct skinny_line *l;
2460         char *result = NULL;
2461         int wordlen = strlen(word), which = 0;
2462
2463         if (pos != 3)
2464                 return NULL;
2465         
2466         for (d = devices; d && !result; d = d->next) {
2467                 for (l = d->lines; l && !result; l = l->next) {
2468                         if (!strncasecmp(word, l->name, wordlen) && ++which > state)
2469                                 result = ast_strdup(l->name);
2470                 }
2471         }
2472
2473         return result;
2474 }
2475
2476 static char *handle_skinny_reset(struct ast_cli_entry *e, int cmd, struct ast_cli_args *a)
2477 {
2478         struct skinny_device *d;
2479         struct skinny_req *req;
2480
2481         switch (cmd) {
2482         case CLI_INIT:
2483                 e->command = "skinny reset";
2484                 e->usage =
2485                         "Usage: skinny reset <DeviceId|DeviceName|all> [restart]\n"
2486                         "       Causes a Skinny device to reset itself, optionally with a full restart\n";
2487                 return NULL;
2488         case CLI_GENERATE:
2489                 return complete_skinny_reset(a->line, a->word, a->pos, a->n);
2490         }
2491
2492         if (a->argc < 3 || a->argc > 4)
2493                 return CLI_SHOWUSAGE;
2494
2495         ast_mutex_lock(&devicelock);
2496
2497         for (d = devices; d; d = d->next) {
2498                 int fullrestart = 0;
2499                 if (!strcasecmp(a->argv[2], d->id) || !strcasecmp(a->argv[2], d->name) || !strcasecmp(a->argv[2], "all")) {
2500                         if (!(d->session))
2501                                 continue;
2502
2503                         if (!(req = req_alloc(sizeof(struct reset_message), RESET_MESSAGE)))
2504                                 continue;
2505
2506                         if (a->argc == 4 && !strcasecmp(a->argv[3], "restart"))
2507                                 fullrestart = 1;
2508
2509                         if (fullrestart)
2510                                 req->data.reset.resetType = 2;
2511                         else
2512                                 req->data.reset.resetType = 1;
2513
2514                         ast_verb(3, "%s device %s.\n", (fullrestart) ? "Restarting" : "Resetting", d->id);
2515                         transmit_response(d->session, req);
2516                 }
2517         }
2518         ast_mutex_unlock(&devicelock);
2519         return CLI_SUCCESS;
2520 }
2521
2522 static char *device2str(int type)
2523 {
2524         char *tmp;
2525
2526         switch (type) {
2527         case SKINNY_DEVICE_NONE:
2528                 return "No Device";
2529         case SKINNY_DEVICE_30SPPLUS:
2530                 return "30SP Plus";
2531         case SKINNY_DEVICE_12SPPLUS:
2532                 return "12SP Plus";
2533         case SKINNY_DEVICE_12SP:
2534                 return "12SP";
2535         case SKINNY_DEVICE_12:
2536                 return "12";
2537         case SKINNY_DEVICE_30VIP:
2538                 return "30VIP";
2539         case SKINNY_DEVICE_7910:
2540                 return "7910";
2541         case SKINNY_DEVICE_7960:
2542                 return "7960";
2543         case SKINNY_DEVICE_7940:
2544                 return "7940";
2545         case SKINNY_DEVICE_7935:
2546                 return "7935";
2547         case SKINNY_DEVICE_ATA186:
2548                 return "ATA186";
2549         case SKINNY_DEVICE_7941:
2550                 return "7941";
2551         case SKINNY_DEVICE_7971:
2552                 return "7971";
2553         case SKINNY_DEVICE_7985:
2554                 return "7985";
2555         case SKINNY_DEVICE_7911:
2556                 return "7911";
2557         case SKINNY_DEVICE_7961GE:
2558                 return "7961GE";
2559         case SKINNY_DEVICE_7941GE:
2560                 return "7941GE";
2561         case SKINNY_DEVICE_7921:
2562                 return "7921";
2563         case SKINNY_DEVICE_7905:
2564                 return "7905";
2565         case SKINNY_DEVICE_7920:
2566                 return "7920";
2567         case SKINNY_DEVICE_7970:
2568                 return "7970";
2569         case SKINNY_DEVICE_7912:
2570                 return "7912";
2571         case SKINNY_DEVICE_7902:
2572                 return "7902";
2573         case SKINNY_DEVICE_CIPC:
2574                 return "IP Communicator";
2575         case SKINNY_DEVICE_7961:
2576                 return "7961";
2577         case SKINNY_DEVICE_7936:
2578                 return "7936";
2579         case SKINNY_DEVICE_SCCPGATEWAY_AN:
2580                 return "SCCPGATEWAY_AN";
2581         case SKINNY_DEVICE_SCCPGATEWAY_BRI:
2582                 return "SCCPGATEWAY_BRI";
2583         case SKINNY_DEVICE_UNKNOWN:
2584                 return "Unknown";
2585         default:
2586                 if (!(tmp = ast_threadstorage_get(&device2str_threadbuf, DEVICE2STR_BUFSIZE)))
2587                         return "Unknown";
2588                 snprintf(tmp, DEVICE2STR_BUFSIZE, "UNKNOWN-%d", type);
2589                 return tmp;
2590         }
2591 }
2592
2593 /*! \brief Print codec list from preference to CLI/manager */
2594 static void print_codec_to_cli(int fd, struct ast_codec_pref *pref)
2595 {
2596         int x, codec;
2597
2598         for(x = 0; x < 32 ; x++) {
2599                 codec = ast_codec_pref_index(pref, x);
2600                 if (!codec)
2601                         break;
2602                 ast_cli(fd, "%s", ast_getformatname(codec));
2603                 ast_cli(fd, ":%d", pref->framing[x]);
2604                 if (x < 31 && ast_codec_pref_index(pref, x + 1))
2605                         ast_cli(fd, ",");
2606         }
2607         if (!x)
2608                 ast_cli(fd, "none");
2609 }
2610
2611 static char *handle_skinny_show_devices(struct ast_cli_entry *e, int cmd, struct ast_cli_args *a)
2612 {
2613         struct skinny_device *d;
2614         struct skinny_line *l;
2615
2616         switch (cmd) {
2617         case CLI_INIT:
2618                 e->command = "skinny show devices";
2619                 e->usage =
2620                         "Usage: skinny show devices\n"
2621                         "       Lists all devices known to the Skinny subsystem.\n";
2622                 return NULL;
2623         case CLI_GENERATE:
2624                 return NULL;
2625         }
2626
2627         if (a->argc != 3)
2628                 return CLI_SHOWUSAGE;
2629
2630         ast_mutex_lock(&devicelock);
2631
2632         ast_cli(a->fd, "Name                 DeviceId         IP              Type            R NL\n");
2633         ast_cli(a->fd, "-------------------- ---------------- --------------- --------------- - --\n");
2634
2635         for (d = devices; d; d = d->next) {
2636                 int numlines = 0;
2637
2638                 for (l = d->lines; l; l = l->next)
2639                         numlines++;
2640                 
2641                 ast_cli(a->fd, "%-20s %-16s %-15s %-15s %c %2d\n",
2642                         d->name,
2643                         d->id,
2644                         d->session?ast_inet_ntoa(d->session->sin.sin_addr):"",
2645                         device2str(d->type),
2646                         d->registered?'Y':'N',
2647                         numlines);
2648         }
2649
2650         ast_mutex_unlock(&devicelock);
2651
2652         return CLI_SUCCESS;
2653 }
2654
2655 /*! \brief Show device information */
2656 static char *handle_skinny_show_device(struct ast_cli_entry *e, int cmd, struct ast_cli_args *a)
2657 {
2658         struct skinny_device *d;
2659         struct skinny_line *l;
2660         struct skinny_speeddial *sd;
2661         struct skinny_addon *sa;
2662
2663         switch (cmd) {
2664         case CLI_INIT:
2665                 e->command = "skinny show device";
2666                 e->usage =
2667                         "Usage: skinny show device <DeviceId|DeviceName>\n"
2668                         "       Lists all deviceinformation of a specific device known to the Skinny subsystem.\n";
2669                 return NULL;
2670         case CLI_GENERATE:
2671                 return complete_skinny_show_device(a->line, a->word, a->pos, a->n);
2672         }
2673
2674         if (a->argc < 4)
2675                 return CLI_SHOWUSAGE;
2676
2677         ast_mutex_lock(&devicelock);
2678         for (d = devices; d; d = d->next) {
2679                 if (!strcasecmp(a->argv[3], d->id) || !strcasecmp(a->argv[3], d->name)) {
2680                         int numlines = 0, numaddons = 0, numspeeddials = 0;
2681
2682                         for (l = d->lines; l; l = l->next)
2683                                 numlines++;
2684
2685                         ast_cli(a->fd, "Name:        %s\n", d->name);
2686                         ast_cli(a->fd, "Id:          %s\n", d->id);
2687                         ast_cli(a->fd, "version:     %s\n", S_OR(d->version_id, "Unknown"));
2688                         ast_cli(a->fd, "Ip address:  %s\n", (d->session ? ast_inet_ntoa(d->session->sin.sin_addr) : "Unknown"));
2689                         ast_cli(a->fd, "Port:        %d\n", (d->session ? ntohs(d->session->sin.sin_port) : 0));
2690                         ast_cli(a->fd, "Device Type: %s\n", device2str(d->type));
2691                         ast_cli(a->fd, "Registered:  %s\n", (d->registered ? "Yes" : "No"));
2692                         ast_cli(a->fd, "Lines:       %d\n", numlines);
2693                         for (l = d->lines; l; l = l->next)
2694                                 ast_cli(a->fd, "  %s (%s)\n", l->name, l->label);
2695                         for (sa = d->addons; sa; sa = sa->next)
2696                                 numaddons++;
2697                         ast_cli(a->fd, "Addons:      %d\n", numaddons);
2698                         for (sa = d->addons; sa; sa = sa->next)
2699                                 ast_cli(a->fd, "  %s\n", sa->type);
2700                         for (sd = d->speeddials; sd; sd = sd->next)
2701                                 numspeeddials++;
2702                         ast_cli(a->fd, "Speeddials:  %d\n", numspeeddials);
2703                         for (sd = d->speeddials; sd; sd = sd->next)
2704                                 ast_cli(a->fd, "  %s (%s) ishint: %d\n", sd->exten, sd->label, sd->isHint);
2705                 }
2706         }
2707         ast_mutex_unlock(&devicelock);
2708         return CLI_SUCCESS;
2709 }
2710
2711 static char *handle_skinny_show_lines(struct ast_cli_entry *e, int cmd, struct ast_cli_args *a)
2712 {
2713         struct skinny_device *d;
2714         struct skinny_line *l;
2715
2716         switch (cmd) {
2717         case CLI_INIT:
2718                 e->command = "skinny show lines";
2719                 e->usage =
2720                         "Usage: skinny show lines\n"
2721                         "       Lists all lines known to the Skinny subsystem.\n";
2722                 return NULL;
2723         case CLI_GENERATE:
2724                 return NULL;
2725         }
2726
2727         if (a->argc != 3)
2728                 return CLI_SHOWUSAGE;
2729         
2730         ast_mutex_lock(&devicelock);
2731         
2732         ast_cli(a->fd, "Device Name          Instance Name                 Label               \n");
2733         ast_cli(a->fd, "-------------------- -------- -------------------- --------------------\n");
2734         for (d = devices; d; d = d->next) {
2735                 for (l = d->lines; l; l = l->next) {
2736                         ast_cli(a->fd, "%-20s %8d %-20s %-20s\n",
2737                                 d->name,
2738                                 l->instance,
2739                                 l->name,
2740                                 l->label);
2741                 }
2742         }
2743         
2744         ast_mutex_unlock(&devicelock);
2745         return CLI_SUCCESS;
2746 }
2747
2748 /*! \brief List line information. */
2749 static char *handle_skinny_show_line(struct ast_cli_entry *e, int cmd, struct ast_cli_args *a)
2750 {
2751         struct skinny_device *d;
2752         struct skinny_line *l;
2753         char codec_buf[512];
2754         char group_buf[256];
2755
2756         switch (cmd) {
2757         case CLI_INIT:
2758                 e->command = "skinny show line";
2759                 e->usage =
2760                         "Usage: skinny show line <Line> [ on <DeviceID|DeviceName> ]\n"
2761                         "       List all lineinformation of a specific line known to the Skinny subsystem.\n";
2762                 return NULL;
2763         case CLI_GENERATE:
2764                 return complete_skinny_show_line(a->line, a->word, a->pos, a->n);
2765         }
2766
2767         if (a->argc < 4)
2768                 return CLI_SHOWUSAGE;
2769         
2770         ast_mutex_lock(&devicelock);
2771
2772         /* Show all lines matching the one supplied */
2773         for (d = devices; d; d = d->next) {
2774                 if (a->argc == 6 && (strcasecmp(a->argv[5], d->id) && strcasecmp(a->argv[5], d->name)))
2775                         continue;
2776                 for (l = d->lines; l; l = l->next) {
2777                         if (strcasecmp(a->argv[3], l->name))
2778                                 continue;
2779                         ast_cli(a->fd, "Line:             %s\n", l->name);
2780                         ast_cli(a->fd, "On Device:        %s\n", d->name);
2781                         ast_cli(a->fd, "Line Label:       %s\n", l->label);
2782                         ast_cli(a->fd, "Extension:        %s\n", S_OR(l->exten, "<not set>"));
2783                         ast_cli(a->fd, "Context:          %s\n", l->context);
2784                         ast_cli(a->fd, "CallGroup:        %s\n", ast_print_group(group_buf, sizeof(group_buf), l->callgroup));
2785                         ast_cli(a->fd, "PickupGroup:      %s\n", ast_print_group(group_buf, sizeof(group_buf), l->pickupgroup));
2786                         ast_cli(a->fd, "Language:         %s\n", S_OR(l->language, "<not set>"));
2787                         ast_cli(a->fd, "Accountcode:      %s\n", S_OR(l->accountcode, "<not set>"));
2788                         ast_cli(a->fd, "AmaFlag:          %s\n", ast_cdr_flags2str(l->amaflags));
2789                         ast_cli(a->fd, "CallerId Number:  %s\n", S_OR(l->cid_num, "<not set>"));
2790                         ast_cli(a->fd, "CallerId Name:    %s\n", S_OR(l->cid_name, "<not set>"));
2791                         ast_cli(a->fd, "Hide CallerId:    %s\n", (l->hidecallerid ? "Yes" : "No"));
2792                         ast_cli(a->fd, "CFwdAll:          %s\n", S_COR((l->cfwdtype & SKINNY_CFWD_ALL), l->call_forward_all, "<not set>"));
2793                         ast_cli(a->fd, "CFwdBusy:         %s\n", S_COR((l->cfwdtype & SKINNY_CFWD_BUSY), l->call_forward_busy, "<not set>"));
2794                         ast_cli(a->fd, "CFwdNoAnswer:     %s\n", S_COR((l->cfwdtype & SKINNY_CFWD_NOANSWER), l->call_forward_noanswer, "<not set>"));
2795                         ast_cli(a->fd, "VoicemailBox:     %s\n", S_OR(l->mailbox, "<not set>"));
2796                         ast_cli(a->fd, "VoicemailNumber:  %s\n", S_OR(l->vmexten, "<not set>"));
2797                         ast_cli(a->fd, "MWIblink:         %d\n", l->mwiblink);
2798                         ast_cli(a->fd, "Regextension:     %s\n", S_OR(l->regexten, "<not set>"));
2799                         ast_cli(a->fd, "Regcontext:       %s\n", S_OR(l->regcontext, "<not set>"));
2800                         ast_cli(a->fd, "MoHInterpret:     %s\n", S_OR(l->mohinterpret, "<not set>"));
2801                         ast_cli(a->fd, "MoHSuggest:       %s\n", S_OR(l->mohsuggest, "<not set>"));
2802                         ast_cli(a->fd, "Last dialed nr:   %s\n", S_OR(l->lastnumberdialed, "<no calls made yet>"));
2803                         ast_cli(a->fd, "Last CallerID:    %s\n", S_OR(l->lastcallerid, "<not set>"));
2804                         ast_cli(a->fd, "Transfer enabled: %s\n", (l->transfer ? "Yes" : "No"));
2805                         ast_cli(a->fd, "Callwaiting:      %s\n", (l->callwaiting ? "Yes" : "No"));
2806                         ast_cli(a->fd, "3Way Calling:     %s\n", (l->threewaycalling ? "Yes" : "No"));
2807                         ast_cli(a->fd, "Can forward:      %s\n", (l->cancallforward ? "Yes" : "No"));
2808                         ast_cli(a->fd, "Do Not Disturb:   %s\n", (l->dnd ? "Yes" : "No"));
2809                         ast_cli(a->fd, "NAT:              %s\n", (l->nat ? "Yes" : "No"));
2810                         ast_cli(a->fd, "immediate:        %s\n", (l->immediate ? "Yes" : "No"));
2811                         ast_cli(a->fd, "Group:            %d\n", l->group);
2812                         ast_cli(a->fd, "Codecs:           ");
2813                         ast_getformatname_multiple(codec_buf, sizeof(codec_buf) - 1, l->capability);
2814                         ast_cli(a->fd, "%s\n", codec_buf);
2815                         ast_cli(a->fd, "Codec Order:      (");
2816                         print_codec_to_cli(a->fd, &l->prefs);
2817                         ast_cli(a->fd, ")\n");
2818                         ast_cli(a->fd, "\n");
2819                 }
2820         }
2821         
2822         ast_mutex_unlock(&devicelock);
2823         return CLI_SUCCESS;
2824 }
2825
2826 /*! \brief List global settings for the Skinny subsystem. */
2827 static char *handle_skinny_show_settings(struct ast_cli_entry *e, int cmd, struct ast_cli_args *a)
2828 {
2829         switch (cmd) {
2830         case CLI_INIT:
2831                 e->command = "skinny show settings";
2832                 e->usage =
2833                         "Usage: skinny show settings\n"
2834                         "       Lists all global configuration settings of the Skinny subsystem.\n";
2835                 return NULL;
2836         case CLI_GENERATE:
2837                 return NULL;
2838         }       
2839
2840         if (a->argc != 3)
2841                 return CLI_SHOWUSAGE;
2842
2843         ast_cli(a->fd, "\nGlobal Settings:\n");
2844         ast_cli(a->fd, "  Skinny Port:            %d\n", ntohs(bindaddr.sin_port));
2845         ast_cli(a->fd, "  Bindaddress:            %s\n", ast_inet_ntoa(bindaddr.sin_addr));
2846         ast_cli(a->fd, "  KeepAlive:              %d\n", keep_alive);
2847         ast_cli(a->fd, "  Date Format:            %s\n", date_format);
2848         ast_cli(a->fd, "  Voice Mail Extension:   %s\n", S_OR(vmexten, "(not set)"));
2849         ast_cli(a->fd, "  Reg. context:           %s\n", S_OR(regcontext, "(not set)"));
2850         ast_cli(a->fd, "  Jitterbuffer enabled:   %s\n", (ast_test_flag(&global_jbconf, AST_JB_ENABLED) ? "Yes" : "No"));
2851         ast_cli(a->fd, "  Jitterbuffer forced:    %s\n", (ast_test_flag(&global_jbconf, AST_JB_FORCED) ? "Yes" : "No"));
2852         ast_cli(a->fd, "  Jitterbuffer max size:  %ld\n", global_jbconf.max_size);
2853         ast_cli(a->fd, "  Jitterbuffer resync:    %ld\n", global_jbconf.resync_threshold);
2854         ast_cli(a->fd, "  Jitterbuffer impl:      %s\n", global_jbconf.impl);
2855         ast_cli(a->fd, "  Jitterbuffer log:       %s\n", (ast_test_flag(&global_jbconf, AST_JB_LOG) ? "Yes" : "No"));
2856
2857         return CLI_SUCCESS;
2858 }
2859
2860 static struct ast_cli_entry cli_skinny_set_debug_deprecated = AST_CLI_DEFINE(handle_skinny_set_debug_deprecated, "Enable/Disable Skinny debugging");
2861 static struct ast_cli_entry cli_skinny[] = {
2862         AST_CLI_DEFINE(handle_skinny_show_devices, "List defined Skinny devices"),
2863         AST_CLI_DEFINE(handle_skinny_show_device, "List Skinny device information"),
2864         AST_CLI_DEFINE(handle_skinny_show_lines, "List defined Skinny lines per device"),       
2865         AST_CLI_DEFINE(handle_skinny_show_line, "List Skinny line information"),
2866         AST_CLI_DEFINE(handle_skinny_show_settings, "List global Skinny settings"),
2867         AST_CLI_DEFINE(handle_skinny_set_debug, "Enable/Disable Skinny debugging", .deprecate_cmd = &cli_skinny_set_debug_deprecated),
2868         AST_CLI_DEFINE(handle_skinny_reset, "Reset Skinny device(s)"),
2869 };
2870
2871 #if 0
2872 static struct skinny_paging_device *build_paging_device(const char *cat, struct ast_variable *v)
2873 {
2874         return NULL;
2875 }
2876 #endif
2877
2878 static struct skinny_device *build_device(const char *cat, struct ast_variable *v)
2879 {
2880         struct skinny_device *d;
2881         struct skinny_line *l;
2882         struct skinny_speeddial *sd;
2883         struct skinny_addon *a;
2884         char device_vmexten[AST_MAX_EXTENSION];
2885         struct ast_variable *chanvars = NULL;
2886         int lineInstance = 1;
2887         int speeddialInstance = 1;
2888         int y = 0;
2889
2890         if (!(d = ast_calloc(1, sizeof(*d)))) {
2891                 return NULL;
2892         } else {
2893                 ast_copy_string(d->name, cat, sizeof(d->name));
2894                 d->lastlineinstance = 1;
2895                 d->capability = default_capability;
2896                 d->prefs = default_prefs;
2897                 if (!ast_strlen_zero(vmexten))
2898                         ast_copy_string(device_vmexten, vmexten, sizeof(device_vmexten));
2899                 else
2900                         memset(device_vmexten, 0, sizeof(device_vmexten));
2901
2902                 while(v) {
2903                         if (!strcasecmp(v->name, "host")) {
2904                                 if (ast_get_ip(&d->addr, v->value)) {
2905                                         ast_free(d);
2906                                         return NULL;
2907                                 }
2908                         } else if (!strcasecmp(v->name, "port")) {
2909                                 d->addr.sin_port = htons(atoi(v->value));
2910                         } else if (!strcasecmp(v->name, "device")) {
2911                                 ast_copy_string(d->id, v->value, sizeof(d->id));
2912                         } else if (!strcasecmp(v->name, "permit") || !strcasecmp(v->name, "deny")) {
2913                                 d->ha = ast_append_ha(v->name, v->value, d->ha, NULL);
2914                         } else if (!strcasecmp(v->name, "vmexten")) {
2915                                 ast_copy_string(device_vmexten, v->value, sizeof(device_vmexten));
2916                         } else if (!strcasecmp(v->name, "context")) {
2917                                 ast_copy_string(context, v->value, sizeof(context));
2918                         } else if (!strcasecmp(v->name, "regexten")) {
2919                                 ast_copy_string(regexten, v->value, sizeof(regexten));
2920                         } else if (!strcasecmp(v->name, "allow")) {
2921                                 ast_parse_allow_disallow(&d->prefs, &d->capability, v->value, 1);
2922                         } else if (!strcasecmp(v->name, "disallow")) {
2923                                 ast_parse_allow_disallow(&d->prefs, &d->capability, v->value, 0);
2924                         } else if (!strcasecmp(v->name, "version")) {
2925                                 ast_copy_string(d->version_id, v->value, sizeof(d->version_id));
2926                         } else if (!strcasecmp(v->name, "canreinvite")) {
2927                                 canreinvite = ast_true(v->value);
2928                         } else if (!strcasecmp(v->name, "nat")) {
2929                                 nat = ast_true(v->value);
2930                         } else if (!strcasecmp(v->name, "callerid")) {
2931                                 if (!strcasecmp(v->value, "asreceived")) {
2932                                         cid_num[0] = '\0';
2933                                         cid_name[0] = '\0';
2934                                 } else {
2935                                         ast_callerid_split(v->value, cid_name, sizeof(cid_name), cid_num, sizeof(cid_num));
2936                                 }
2937                         } else if (!strcasecmp(v->name, "language")) {
2938                                 ast_copy_string(language, v->value, sizeof(language));
2939                         } else if (!strcasecmp(v->name, "accountcode")) {
2940                                 ast_copy_string(accountcode, v->value, sizeof(accountcode));
2941                         } else if (!strcasecmp(v->name, "amaflags")) {
2942                                 y = ast_cdr_amaflags2int(v->value);
2943                                 if (y < 0) {
2944                                         ast_log(LOG_WARNING, "Invalid AMA flags: %s at line %d\n", v->value, v->lineno);
2945                                 } else {
2946                                         amaflags = y;
2947                                 }
2948                         } else if (!strcasecmp(v->name, "mohinterpret") || !strcasecmp(v->name, "musiconhold")) {
2949                                 ast_copy_string(mohinterpret, v->value, sizeof(mohinterpret));
2950                         } else if (!strcasecmp(v->name, "mohsuggest")) {
2951                                 ast_copy_string(mohsuggest, v->value, sizeof(mohsuggest));
2952                         } else if (!strcasecmp(v->name, "callgroup")) {
2953                                 cur_callergroup = ast_get_group(v->value);
2954                         } else if (!strcasecmp(v->name, "pickupgroup")) {
2955                                 cur_pickupgroup = ast_get_group(v->value);
2956                         } else if (!strcasecmp(v->name, "immediate")) {
2957                                 immediate = ast_true(v->value);
2958                         } else if (!strcasecmp(v->name, "cancallforward")) {
2959                                 cancallforward = ast_true(v->value);
2960                         } else if (!strcasecmp(v->name, "mailbox")) {
2961                                 ast_copy_string(mailbox, v->value, sizeof(mailbox));
2962                         } else if (!strcasecmp(v->name, "callreturn")) {
2963                                 callreturn = ast_true(v->value);
2964                         } else if (!strcasecmp(v->name, "callwaiting")) {
2965                                 callwaiting = ast_true(v->value);
2966                         } else if (!strcasecmp(v->name, "transfer")) {
2967                                 transfer = ast_true(v->value);
2968                         } else if (!strcasecmp(v->name, "threewaycalling")) {
2969                                 threewaycalling = ast_true(v->value);
2970                         } else if (!strcasecmp(v->name, "mwiblink")) {
2971                                 mwiblink = ast_true(v->value);
2972                         } else if (!strcasecmp(v->name, "linelabel")) {
2973                                 ast_copy_string(linelabel, v->value, sizeof(linelabel));
2974                         } else if (!strcasecmp(v->name, "setvar")) {
2975                                 chanvars = add_var(v->value, chanvars);
2976                         } else if (!strcasecmp(v->name, "speeddial")) {
2977                                 if (!(sd = ast_calloc(1, sizeof(*sd)))) {
2978                                         return NULL;
2979                                 } else {
2980                                         char buf[256];
2981                                         char *stringp = buf, *exten, *context, *label;
2982
2983                                         ast_copy_string(buf, v->value, sizeof(buf));
2984                                         exten = strsep(&stringp, ",");
2985                                         if ((context = strchr(exten, '@'))) {
2986                                                 *context++ = '\0';
2987                                         }
2988                                         label = stringp;
2989                                         ast_mutex_init(&sd->lock);
2990                                         ast_copy_string(sd->exten, exten, sizeof(sd->exten));
2991                                         if (!ast_strlen_zero(context)) {
2992                                                 sd->isHint = 1;
2993                                                 sd->instance = lineInstance++;
2994                                                 ast_copy_string(sd->context, context, sizeof(sd->context));
2995                                         } else {
2996                                                 sd->isHint = 0;
2997                                                 sd->instance = speeddialInstance++;
2998                                                 sd->context[0] = '\0';
2999                                         }
3000                                         ast_copy_string(sd->label, S_OR(label, exten), sizeof(sd->label));
3001
3002                                         sd->parent = d;
3003
3004                                         sd->next = d->speeddials;
3005                                         d->speeddials = sd;
3006                                 }
3007                         } else if (!strcasecmp(v->name, "addon")) {
3008                                 if (!(a = ast_calloc(1, sizeof(*a)))) {
3009                                         return NULL;
3010                                 } else {
3011                                         ast_mutex_init(&a->lock);
3012                                         ast_copy_string(a->type, v->value, sizeof(a->type));
3013
3014                                         a->next = d->addons;
3015                                         d->addons = a;
3016                                 }
3017                         } else if (!strcasecmp(v->name, "trunk") || !strcasecmp(v->name, "line")) {
3018                                 if (!(l = ast_calloc(1, sizeof(*l)))) {
3019                                         return NULL;
3020                                 } else {
3021                                         ast_mutex_init(&l->lock);
3022                                         ast_copy_string(l->name, v->value, sizeof(l->name));
3023
3024                                         /* XXX Should we check for uniqueness?? XXX */
3025                                         ast_copy_string(l->context, context, sizeof(l->context));
3026                                         ast_copy_string(l->cid_num, cid_num, sizeof(l->cid_num));
3027                                         ast_copy_string(l->cid_name, cid_name, sizeof(l->cid_name));
3028                                         ast_copy_string(l->label, linelabel, sizeof(l->label));
3029                                         ast_copy_string(l->language, language, sizeof(l->language));
3030                                         ast_copy_string(l->mohinterpret, mohinterpret, sizeof(l->mohinterpret));
3031                                         ast_copy_string(l->mohsuggest, mohsuggest, sizeof(l->mohsuggest));
3032                                         ast_copy_string(l->regexten, regexten, sizeof(l->regexten));
3033                                         ast_copy_string(l->mailbox, mailbox, sizeof(l->mailbox));
3034                                         if (!ast_strlen_zero(mailbox))
3035                                                 ast_verb(3, "Setting mailbox '%s' on %s@%s\n", mailbox, d->name, l->name);
3036                                         ast_copy_string(l->vmexten, device_vmexten, sizeof(vmexten));
3037                                         l->chanvars = chanvars;
3038                                         l->msgstate = -1;
3039                                         l->capability = d->capability;
3040                                         l->prefs = d->prefs;
3041                                         l->parent = d;
3042                                         if (!strcasecmp(v->name, "trunk")) {
3043                                                 l->type = TYPE_TRUNK;
3044                                         } else {
3045                                                 l->type = TYPE_LINE;
3046                                         }
3047                                         l->immediate = immediate;
3048                                         l->callgroup = cur_callergroup;
3049                                         l->pickupgroup = cur_pickupgroup;
3050                                         l->callreturn = callreturn;
3051                                         l->cancallforward = cancallforward;
3052                                         l->getforward = 0;
3053                                         set_callforwards(l, NULL, 0);
3054                                         l->callwaiting = callwaiting;
3055                                         l->transfer = transfer;
3056                                         l->threewaycalling = threewaycalling;
3057                                         l->mwiblink = mwiblink;
3058                                         l->onhooktime = time(NULL);
3059                                         l->instance = lineInstance++;
3060                                         /* ASSUME we're onhook at this point */
3061                                         l->hookstate = SKINNY_ONHOOK;
3062                                         l->nat = nat;
3063                                         l->canreinvite = canreinvite;
3064
3065                                         l->next = d->lines;
3066                                         d->lines = l;
3067                                 }
3068                         } else {
3069                                 ast_log(LOG_WARNING, "Don't know keyword '%s' at line %d\n", v->name, v->lineno);
3070                         }
3071                         v = v->next;
3072                 }
3073
3074                 if (!d->lines) {
3075                         ast_log(LOG_ERROR, "A Skinny device must have at least one line!\n");
3076                         return NULL;
3077                 }
3078                 if (/*d->addr.sin_addr.s_addr && */!ntohs(d->addr.sin_port)) {
3079                         d->addr.sin_port = htons(DEFAULT_SKINNY_PORT);
3080                 }
3081 #if 0
3082                 /* I don't think we need this anymore at all, since d->ourip is set in skinny_register now */
3083                 if (d->addr.sin_addr.s_addr) {
3084                         /* XXX See note above, in 'host' option. */
3085                         if (ast_ouraddrfor(&d->addr.sin_addr, &d->ourip)) {
3086                                 d->ourip = __ourip;
3087                         }
3088                 } else {
3089                         d->ourip = __ourip;
3090                 }
3091 #endif
3092         }
3093         return d;
3094 }
3095
3096 static void start_rtp(struct skinny_subchannel *sub)
3097 {
3098         struct skinny_line *l = sub->parent;
3099         struct skinny_device *d = l->parent;
3100         int hasvideo = 0;
3101
3102         ast_mutex_lock(&sub->lock);
3103         /* Allocate the RTP */
3104         sub->rtp = ast_rtp_new_with_bindaddr(sched, io, 1, 0, bindaddr.sin_addr);
3105         if (hasvideo)
3106                 sub->vrtp = ast_rtp_new_with_bindaddr(sched, io, 1, 0, bindaddr.sin_addr);
3107         
3108         if (sub->rtp && sub->owner) {
3109                 ast_channel_set_fd(sub->owner, 0, ast_rtp_fd(sub->rtp));
3110                 ast_channel_set_fd(sub->owner, 1, ast_rtcp_fd(sub->rtp));
3111         }
3112         if (hasvideo && sub->vrtp && sub->owner) {
3113                 ast_channel_set_fd(sub->owner, 2, ast_rtp_fd(sub->vrtp));
3114                 ast_channel_set_fd(sub->owner, 3, ast_rtcp_fd(sub->vrtp));
3115         }
3116         if (sub->rtp) {
3117                 ast_rtp_setqos(sub->rtp, tos_audio, cos_audio, "Skinny RTP");
3118                 ast_rtp_setnat(sub->rtp, l->nat);
3119         }
3120         if (sub->vrtp) {
3121                 ast_rtp_setqos(sub->vrtp, tos_video, cos_video, "Skinny VRTP");
3122                 ast_rtp_setnat(sub->vrtp, l->nat);
3123         }
3124         /* Set Frame packetization */
3125         if (sub->rtp)
3126                 ast_rtp_codec_setpref(sub->rtp, &l->prefs);
3127
3128         /* Create the RTP connection */
3129         transmit_connect(d->session, sub);
3130         ast_mutex_unlock(&sub->lock);
3131 }
3132
3133 static void *skinny_newcall(void *data)
3134 {
3135         struct ast_channel *c = data;
3136         struct skinny_subchannel *sub = c->tech_pvt;
3137         struct skinny_line *l = sub->parent;
3138         struct skinny_device *d = l->parent;
3139         struct skinnysession *s = d->session;
3140         int res = 0;
3141
3142         ast_copy_string(l->lastnumberdialed, c->exten, sizeof(l->lastnumberdialed));
3143         ast_set_callerid(c,
3144                 l->hidecallerid ? "" : l->cid_num,
3145                 l->hidecallerid ? "" : l->cid_name,
3146                 c->cid.cid_ani ? NULL : l->cid_num);
3147         ast_setstate(c, AST_STATE_RING);
3148         res = ast_pbx_run(c);
3149         if (res) {
3150                 ast_log(LOG_WARNING, "PBX exited non-zero\n");
3151                 transmit_tone(s, SKINNY_REORDER, l->instance, sub->callid);
3152         }
3153         return NULL;
3154 }
3155
3156 static void *skinny_ss(void *data)
3157 {
3158         struct ast_channel *c = data;
3159         struct skinny_subchannel *sub = c->tech_pvt;
3160         struct skinny_line *l = sub->parent;
3161         struct skinny_device *d = l->parent;
3162         struct skinnysession *s = d->session;
3163         int len = 0;
3164         int timeout = firstdigittimeout;
3165         int res = 0;
3166         int loop_pause = 100;
3167
3168         ast_verb(3, "Starting simple switch on '%s@%s'\n", l->name, d->name);
3169
3170         len = strlen(d->exten);
3171
3172         while (len < AST_MAX_EXTENSION-1) {
3173                 res = 1;  /* Assume that we will get a digit */
3174                 while (strlen(d->exten) == len){
3175                         ast_safe_sleep(c, loop_pause);
3176                         timeout -= loop_pause;
3177                         if ( (timeout -= loop_pause) <= 0){
3178                                  res = 0;
3179                                  break;
3180                         }
3181                 res = 1;
3182                 }
3183
3184                 timeout = 0;
3185                 len = strlen(d->exten);
3186
3187                 if (!ast_ignore_pattern(c->context, d->exten)) {
3188                         transmit_tone(s, SKINNY_SILENCE, l->instance, sub->callid);
3189                 }
3190                 if (ast_exists_extension(c, c->context, d->exten, 1, l->cid_num)) {
3191                         if (!res || !ast_matchmore_extension(c, c->context, d->exten, 1, l->cid_num)) {
3192                                 if (l->getforward) {
3193                                         /* Record this as the forwarding extension */
3194                                         set_callforwards(l, d->exten, l->getforward);
3195                                         ast_verb(3, "Setting call forward (%d) to '%s' on channel %s\n",
3196                                                         l->cfwdtype, d->exten, c->name);
3197                                         transmit_tone(s, SKINNY_DIALTONE, l->instance, sub->callid);
3198                                         transmit_lamp_indication(s, STIMULUS_FORWARDALL, 1, SKINNY_LAMP_ON);
3199                                         transmit_displaynotify(s, "CFwd enabled", 10);
3200                                         transmit_cfwdstate(s, l);
3201                                         ast_safe_sleep(c, 500);
3202                                         ast_indicate(c, -1);
3203                                         ast_safe_sleep(c, 1000);
3204                                         memset(d->exten, 0, sizeof(d->exten));
3205                                         len = 0;
3206                                         l->getforward = 0;
3207                                         if (sub->owner && sub->owner->_state != AST_STATE_UP) {
3208                                                 ast_indicate(c, -1);
3209                                                 ast_hangup(c);
3210                                         }
3211                                         return NULL;
3212                                 } else {
3213                                         ast_copy_string(c->exten, d->exten, sizeof(c->exten));
3214                                         ast_copy_string(l->lastnumberdialed, d->exten, sizeof(l->lastnumberdialed));
3215                                         memset(d->exten, 0, sizeof(d->exten));
3216                                         skinny_newcall(c);
3217                                         return NULL;
3218                                 }
3219                         } else {
3220                                 /* It's a match, but they just typed a digit, and there is an ambiguous match,
3221                                    so just set the timeout to matchdigittimeout and wait some more */
3222                                 timeout = matchdigittimeout;
3223                         }
3224                 } else if (res == 0) {
3225                         ast_debug(1, "Not enough digits (%s) (and no ambiguous match)...\n", d->exten);
3226                         memset(d->exten, 0, sizeof(d->exten));
3227                         transmit_tone(s, SKINNY_REORDER, l->instance, sub->callid);
3228                         if (sub->owner && sub->owner->_state != AST_STATE_UP) {
3229                                 ast_indicate(c, -1);
3230                                 ast_hangup(c);
3231                         }
3232                         return NULL;
3233                 } else if (!ast_canmatch_extension(c, c->context, d->exten, 1, c->cid.cid_num) &&
3234                            ((d->exten[0] != '*') || (!ast_strlen_zero(d->exten) > 2))) {
3235                         ast_log(LOG_WARNING, "Can't match [%s] from '%s' in context %s\n", d->exten, c->cid.cid_num ? c->cid.cid_num : "<Unknown Caller>", c->context);
3236                         memset(d->exten, 0, sizeof(d->exten));
3237                         transmit_tone(s, SKINNY_REORDER, l->instance, sub->callid);
3238                         /* hang out for 3 seconds to let congestion play */
3239                         ast_safe_sleep(c, 3000);
3240                         break;
3241                 }
3242                 if (!timeout) {
3243                         timeout = gendigittimeout;
3244                 }
3245                 if (len && !ast_ignore_pattern(c->context, d->exten)) {
3246                         ast_indicate(c, -1);
3247                 }
3248         }
3249         if (c)
3250                 ast_hangup(c);
3251         memset(d->exten, 0, sizeof(d->exten));
3252         return NULL;
3253 }
3254
3255
3256
3257 static int skinny_call(struct ast_channel *ast, char *dest, int timeout)
3258 {
3259         int res = 0;
3260         int tone = 0;
3261         struct skinny_subchannel *sub = ast->tech_pvt;
3262         struct skinny_line *l = sub->parent;
3263         struct skinny_device *d = l->parent;
3264         struct skinnysession *s = d->session;
3265
3266         if (!d->registered) {
3267                 ast_log(LOG_ERROR, "Device not registered, cannot call %s\n", dest);
3268                 return -1;
3269         }
3270
3271         if ((ast->_state != AST_STATE_DOWN) && (ast->_state != AST_STATE_RESERVED)) {
3272                 ast_log(LOG_WARNING, "skinny_call called on %s, neither down nor reserved\n", ast->name);
3273                 return -1;
3274         }
3275
3276         if (skinnydebug)
3277                 ast_verb(3, "skinny_call(%s)\n", ast->name);
3278
3279         if (l->dnd) {
3280                 ast_queue_control(ast, AST_CONTROL_BUSY);
3281                 return -1;
3282         }
3283
3284         switch (l->hookstate) {
3285         case SKINNY_OFFHOOK:
3286                 tone = SKINNY_CALLWAITTONE;
3287                 break;
3288         case SKINNY_ONHOOK:
3289                 tone = SKINNY_ALERT;
3290                 break;
3291         default:
3292                 ast_log(LOG_ERROR, "Don't know how to deal with hookstate %d\n", l->hookstate);
3293                 break;
3294         }
3295
3296         transmit_callstate(s, l->instance, SKINNY_RINGIN, sub->callid);
3297         transmit_selectsoftkeys(s, l->instance, sub->callid, KEYDEF_RINGIN);
3298         transmit_displaypromptstatus(s, "Ring-In", 0, l->instance, sub->callid);
3299         transmit_callinfo(s, ast->cid.cid_name, ast->cid.cid_num, l->cid_name, l->cid_num, l->instance, sub->callid, 1);
3300         transmit_lamp_indication(s, STIMULUS_LINE, l->instance, SKINNY_LAMP_BLINK);
3301         transmit_ringer_mode(s, SKINNY_RING_INSIDE);
3302
3303         ast_setstate(ast, AST_STATE_RINGING);
3304         ast_queue_control(ast, AST_CONTROL_RINGING);
3305         sub->outgoing = 1;
3306         return res;
3307 }
3308
3309 static int skinny_hangup(struct ast_channel *ast)
3310 {
3311         struct skinny_subchannel *sub = ast->tech_pvt;
3312         struct skinny_line *l;
3313         struct skinny_device *d;
3314         struct skinnysession *s;
3315
3316         if (!sub) {
3317                 ast_debug(1, "Asked to hangup channel not connected\n");
3318                 return 0;
3319         }
3320         l = sub->parent;
3321         d = l->parent;
3322         s = d->session;
3323         if (skinnydebug)
3324                 ast_verbose("skinny_hangup(%s) on %s@%s\n", ast->name, l->name, d->name);
3325
3326         if (d->registered) {
3327                 if ((l->type = TYPE_LINE) && (l->hookstate == SKINNY_OFFHOOK)) {
3328                         l->hookstate = SKINNY_ONHOOK;
3329                         transmit_callstate(s, l->instance, SKINNY_ONHOOK, sub->callid);
3330                         transmit_lamp_indication(s, STIMULUS_LINE, l->instance, SKINNY_LAMP_OFF);
3331                         transmit_speaker_mode(s, SKINNY_SPEAKEROFF);
3332                 } else if ((l->type = TYPE_LINE) && (l->hookstate == SKINNY_ONHOOK)) {
3333                         transmit_tone(s, SKINNY_SILENCE, l->instance, sub->callid);
3334                         transmit_callstate(s, l->instance, SKINNY_ONHOOK, sub->callid);
3335                         transmit_ringer_mode(s, SKINNY_RING_OFF);
3336                         transmit_lamp_indication(s, STIMULUS_LINE, l->instance, SKINNY_LAMP_OFF);
3337                         do_housekeeping(s);
3338                 }
3339         }
3340         ast_mutex_lock(&sub->lock);
3341         sub->owner = NULL;
3342         ast->tech_pvt = NULL;
3343         sub->alreadygone = 0;
3344         sub->outgoing = 0;
3345         if (sub->rtp) {
3346                 ast_rtp_destroy(sub->rtp);
3347                 sub->rtp = NULL;
3348         }
3349         ast_mutex_unlock(&sub->lock);
3350         return 0;
3351 }
3352
3353 static int skinny_answer(struct ast_channel *ast)
3354 {
3355         int res = 0;
3356         struct skinny_subchannel *sub = ast->tech_pvt;
3357         struct skinny_line *l = sub->parent;
3358         struct skinny_device *d = l->parent;
3359         struct skinnysession *s = d->session;
3360         char exten[AST_MAX_EXTENSION] = "";
3361
3362         ast_copy_string(exten, S_OR(ast->macroexten, ast->exten), sizeof(exten));
3363
3364         sub->cxmode = SKINNY_CX_SENDRECV;
3365         if (!sub->rtp) {
3366                 start_rtp(sub);
3367         }
3368         if (skinnydebug)
3369                 ast_verbose("skinny_answer(%s) on %s@%s-%d\n", ast->name, l->name, d->name, sub->callid);
3370         if (ast->_state != AST_STATE_UP) {
3371                 ast_setstate(ast, AST_STATE_UP);
3372         }
3373
3374         transmit_tone(s, SKINNY_SILENCE, l->instance, sub->callid);
3375         /* order matters here...
3376            for some reason, transmit_callinfo must be before transmit_callstate,
3377            or you won't get keypad messages in some situations. */
3378         transmit_callinfo(s, ast->cid.cid_name, ast->cid.cid_num, exten, exten, l->instance, sub->callid, 2);
3379         transmit_callstate(s, l->instance, SKINNY_CONNECTED, sub->callid);
3380         transmit_selectsoftkeys(s, l->instance, sub->callid, KEYDEF_CONNECTED);
3381         transmit_displaypromptstatus(s, "Connected", 0, l->instance, sub->callid);
3382         return res;
3383 }
3384
3385 /* Retrieve audio/etc from channel.  Assumes sub->lock is already held. */
3386 static struct ast_frame *skinny_rtp_read(struct skinny_subchannel *sub)
3387 {
3388         struct ast_channel *ast = sub->owner;
3389         struct ast_frame *f;
3390
3391         if (!sub->rtp) {
3392                 /* We have no RTP allocated for this channel */
3393                 return &ast_null_frame;
3394         }
3395
3396         switch(ast->fdno) {
3397         case 0:
3398                 f = ast_rtp_read(sub->rtp);     /* RTP Audio */
3399                 break;
3400         case 1:
3401                 f = ast_rtcp_read(sub->rtp);    /* RTCP Control Channel */
3402                 break;
3403         case 2:
3404                 f = ast_rtp_read(sub->vrtp);    /* RTP Video */
3405                 break;
3406         case 3:
3407                 f = ast_rtcp_read(sub->vrtp);   /* RTCP Control Channel for video */
3408                 break;
3409 #if 0
3410         case 5:
3411                 /* Not yet supported */
3412                 f = ast_udptl_read(sub->udptl); /* UDPTL for T.38 */
3413                 break;
3414 #endif
3415         default:
3416                 f = &ast_null_frame;
3417         }
3418
3419         if (ast) {
3420                 /* We already hold the channel lock */
3421                 if (f->frametype == AST_FRAME_VOICE) {
3422                         if (f->subclass != ast->nativeformats) {
3423                                 ast_debug(1, "Oooh, format changed to %d\n", f->subclass);
3424                                 ast->nativeformats = f->subclass;
3425                                 ast_set_read_format(ast, ast->readformat);
3426                                 ast_set_write_format(ast, ast->writeformat);
3427                         }
3428                 }
3429         }
3430         return f;
3431 }
3432
3433 static struct ast_frame *skinny_read(struct ast_channel *ast)
3434 {
3435         struct ast_frame *fr;
3436         struct skinny_subchannel *sub = ast->tech_pvt;
3437         ast_mutex_lock(&sub->lock);
3438         fr = skinny_rtp_read(sub);
3439         ast_mutex_unlock(&sub->lock);
3440         return fr;
3441 }
3442
3443 static int skinny_write(struct ast_channel *ast, struct ast_frame *frame)
3444 {
3445         struct skinny_subchannel *sub = ast->tech_pvt;
3446         int res = 0;
3447         if (frame->frametype != AST_FRAME_VOICE) {
3448                 if (frame->frametype == AST_FRAME_IMAGE) {
3449                         return 0;
3450                 } else {
3451                         ast_log(LOG_WARNING, "Can't send %d type frames with skinny_write\n", frame->frametype);
3452                         return 0;
3453                 }
3454         } else {
3455                 if (!(frame->subclass & ast->nativeformats)) {
3456                         ast_log(LOG_WARNING, "Asked to transmit frame type %d, while native formats is %d (read/write = %d/%d)\n",
3457                                 frame->subclass, ast->nativeformats, ast->readformat, ast->writeformat);
3458                         return -1;
3459                 }
3460         }
3461         if (sub) {
3462                 ast_mutex_lock(&sub->lock);
3463                 if (sub->rtp) {
3464                         res = ast_rtp_write(sub->rtp, frame);
3465                 }
3466                 ast_mutex_unlock(&sub->lock);
3467         }
3468         return res;
3469 }
3470
3471 static int skinny_fixup(struct ast_channel *oldchan, struct ast_channel *newchan)
3472 {
3473         struct skinny_subchannel *sub = newchan->tech_pvt;
3474         ast_log(LOG_NOTICE, "skinny_fixup(%s, %s)\n", oldchan->name, newchan->name);
3475         if (sub->owner != oldchan) {
3476                 ast_log(LOG_WARNING, "old channel wasn't %p but was %p\n", oldchan, sub->owner);
3477                 return -1;
3478         }
3479         sub->owner = newchan;
3480         return 0;
3481 }
3482
3483 static int skinny_senddigit_begin(struct ast_channel *ast, char digit)
3484 {
3485         return -1; /* Start inband indications */
3486 }
3487
3488 static int skinny_senddigit_end(struct ast_channel *ast, char digit, unsigned int duration)
3489 {
3490 #if 0
3491         struct skinny_subchannel *sub = ast->tech_pvt;
3492         struct skinny_line *l = sub->parent;
3493         struct skinny_device *d = l->parent;
3494         int tmp;
3495         /* not right */
3496         sprintf(tmp, "%d", digit);
3497         transmit_tone(d->session, digit, l->instance, sub->callid);
3498 #endif
3499         return -1; /* Stop inband indications */
3500 }
3501
3502 static int get_devicestate(struct skinny_line *l)
3503 {
3504         struct skinny_subchannel *sub;
3505         int res = AST_DEVICE_UNKNOWN;
3506
3507         if (!l)
3508                 res = AST_DEVICE_INVALID;
3509         else if (!l->parent)
3510                 res = AST_DEVICE_UNAVAILABLE;
3511         else if (l->dnd)
3512                 res = AST_DEVICE_BUSY;
3513         else {
3514                 if (l->hookstate == SKINNY_ONHOOK) {
3515                         res = AST_DEVICE_NOT_INUSE;
3516                 } else {
3517                         res = AST_DEVICE_INUSE;
3518                 }
3519
3520                 for (sub = l->sub; sub; sub = sub->next) {
3521                         if (sub->onhold) {
3522                                 res = AST_DEVICE_ONHOLD;
3523                                 break;
3524                         }
3525                 }
3526         }
3527
3528         return res;
3529 }
3530
3531 static char *control2str(int ind) {
3532         char *tmp;
3533
3534         switch (ind) {
3535         case AST_CONTROL_HANGUP:
3536                 return "Other end has hungup";
3537         case AST_CONTROL_RING:
3538                 return "Local ring";
3539         case AST_CONTROL_RINGING:
3540                 return "Remote end is ringing";
3541         case AST_CONTROL_ANSWER:
3542                 return "Remote end has answered";
3543         case AST_CONTROL_BUSY:
3544                 return "Remote end is busy";
3545         case AST_CONTROL_TAKEOFFHOOK:
3546                 return "Make it go off hook";
3547         case AST_CONTROL_OFFHOOK:
3548                 return "Line is off hook";
3549         case AST_CONTROL_CONGESTION:
3550                 return "Congestion (circuits busy)";
3551         case AST_CONTROL_FLASH:
3552                 return "Flash hook";
3553         case AST_CONTROL_WINK:
3554                 return "Wink";
3555         case AST_CONTROL_OPTION:
3556                 return "Set a low-level option";
3557         case AST_CONTROL_RADIO_KEY:
3558                 return "Key Radio";
3559         case AST_CONTROL_RADIO_UNKEY:
3560                 return "Un-Key Radio";
3561         case AST_CONTROL_PROGRESS:
3562                 return "Remote end is making Progress";
3563         case AST_CONTROL_PROCEEDING:
3564                 return "Remote end is proceeding";
3565         case AST_CONTROL_HOLD:
3566                 return "Hold";
3567         case AST_CONTROL_UNHOLD:
3568                 return "Unhold";
3569         case -1:
3570                 return "Stop tone";
3571         default:
3572                 if (!(tmp = ast_threadstorage_get(&control2str_threadbuf, CONTROL2STR_BUFSIZE)))
3573                         return "Unknown";
3574                 snprintf(tmp, CONTROL2STR_BUFSIZE, "UNKNOWN-%d", ind);
3575                 return tmp;
3576         }
3577 }
3578
3579
3580 static int skinny_indicate(struct ast_channel *ast, int ind, const void *data, size_t datalen)
3581 {
3582         struct skinny_subchannel *sub = ast->tech_pvt;
3583         struct skinny_line *l = sub->parent;
3584         struct skinny_device *d = l->parent;
3585         struct skinnysession *s = d->session;
3586         char exten[AST_MAX_EXTENSION] = "";
3587
3588         if (!s) {
3589                 ast_log(LOG_NOTICE, "Asked to indicate '%s' condition on channel %s, but session does not exist.\n", control2str(ind), ast->name);
3590                 return -1;
3591         }
3592
3593         ast_copy_string(exten, S_OR(ast->macroexten, ast->exten), sizeof(exten));
3594
3595         if (skinnydebug)
3596                 ast_verb(3, "Asked to indicate '%s' condition on channel %s\n", control2str(ind), ast->name);
3597         switch(ind) {
3598         case AST_CONTROL_RINGING:
3599                 if (ast->_state != AST_STATE_UP) {
3600                         if (!sub->progress) {
3601                                 transmit_tone(s, SKINNY_ALERT, l->instance, sub->callid);
3602                                 transmit_callstate(s, l->instance, SKINNY_RINGOUT, sub->callid);
3603                                 transmit_dialednumber(s, exten, l->instance, sub->callid);
3604                                 transmit_displaypromptstatus(s, "Ring Out", 0, l->instance, sub->callid);
3605                                 transmit_callinfo(s, ast->cid.cid_name, ast->cid.cid_num, exten, exten, l->instance, sub->callid, 2); /* 2 = outgoing from phone */
3606                                 sub->ringing = 1;
3607                                 break;
3608                         }
3609                 }
3610                 return -1;
3611         case AST_CONTROL_BUSY:
3612                 if (ast->_state != AST_STATE_UP) {
3613                         transmit_tone(s, SKINNY_BUSYTONE, l->instance, sub->callid);
3614                         transmit_callstate(s, l->instance, SKINNY_BUSY, sub->callid);
3615                         sub->alreadygone = 1;
3616                         ast_softhangup_nolock(ast, AST_SOFTHANGUP_DEV);
3617                         break;
3618                 }
3619                 return -1;
3620         case AST_CONTROL_CONGESTION:
3621                 if (ast->_state != AST_STATE_UP) {
3622                         transmit_tone(s, SKINNY_REORDER, l->instance, sub->callid);
3623                         transmit_callstate(s, l->instance, SKINNY_CONGESTION, sub->callid);
3624                         sub->alreadygone = 1;
3625                         ast_softhangup_nolock(ast, AST_SOFTHANGUP_DEV);
3626                         break;
3627                 }
3628                 return -1;
3629         case AST_CONTROL_PROGRESS:
3630                 if ((ast->_state != AST_STATE_UP) && !sub->progress && !sub->outgoing) {
3631                         transmit_tone(s, SKINNY_ALERT, l->instance, sub->callid);
3632                         transmit_callstate(s, l->instance, SKINNY_PROGRESS, sub->callid);
3633                         transmit_displaypromptstatus(s, "Call Progress", 0, l->instance, sub->callid);
3634                         transmit_callinfo(s, ast->cid.cid_name, ast->cid.cid_num, exten, exten, l->instance, sub->callid, 2); /* 2 = outgoing from phone */
3635                         sub->progress = 1;
3636                         break;
3637                 }
3638                 return -1;
3639         case -1:
3640                 transmit_tone(s, SKINNY_SILENCE, l->instance, sub->callid);
3641                 break;
3642         case AST_CONTROL_HOLD:
3643                 ast_moh_start(ast, data, l->mohinterpret);
3644                 break;
3645         case AST_CONTROL_UNHOLD:
3646                 ast_moh_stop(ast);
3647                 break;
3648         case AST_CONTROL_PROCEEDING: