diff options
Diffstat (limited to 'trunk/channels/chan_skinny.c')
| -rw-r--r-- | trunk/channels/chan_skinny.c | 6066 |
1 files changed, 6066 insertions, 0 deletions
diff --git a/trunk/channels/chan_skinny.c b/trunk/channels/chan_skinny.c new file mode 100644 index 000000000..719258178 --- /dev/null +++ b/trunk/channels/chan_skinny.c @@ -0,0 +1,6066 @@ +/* + * Asterisk -- An open source telephony toolkit. + * + * Copyright (C) 1999 - 2005, Digium, Inc. + * + * chan_skinny was developed by Jeremy McNamara & Florian Overkamp + * chan_skinny was heavily modified/fixed by North Antara + * + * See http://www.asterisk.org for more information about + * the Asterisk project. Please do not directly contact + * any of the maintainers of this project for assistance; + * the project provides a web site, mailing lists and IRC + * channels for your use. + * + * This program is free software, distributed under the terms of + * the GNU General Public License Version 2. See the LICENSE file + * at the top of the source tree. + */ + +/*! \file + * + * \brief Implementation of the Skinny protocol + * + * \author Jeremy McNamara & Florian Overkamp & North Antara + * \ingroup channel_drivers + */ + + +#include "asterisk.h" + +ASTERISK_FILE_VERSION(__FILE__, "$Revision$") + +#include <sys/socket.h> +#include <netinet/in.h> +#include <netinet/tcp.h> +#include <sys/ioctl.h> +#include <net/if.h> +#include <fcntl.h> +#include <netdb.h> +#include <arpa/inet.h> +#include <sys/signal.h> +#include <signal.h> +#include <ctype.h> + +#include "asterisk/lock.h" +#include "asterisk/channel.h" +#include "asterisk/config.h" +#include "asterisk/module.h" +#include "asterisk/pbx.h" +#include "asterisk/sched.h" +#include "asterisk/io.h" +#include "asterisk/rtp.h" +#include "asterisk/netsock.h" +#include "asterisk/acl.h" +#include "asterisk/callerid.h" +#include "asterisk/cli.h" +#include "asterisk/say.h" +#include "asterisk/cdr.h" +#include "asterisk/astdb.h" +#include "asterisk/features.h" +#include "asterisk/app.h" +#include "asterisk/musiconhold.h" +#include "asterisk/utils.h" +#include "asterisk/dsp.h" +#include "asterisk/stringfields.h" +#include "asterisk/astobj.h" +#include "asterisk/abstract_jb.h" +#include "asterisk/threadstorage.h" +#include "asterisk/devicestate.h" + +/************************************* + * Skinny/Asterisk Protocol Settings * + *************************************/ +static const char tdesc[] = "Skinny Client Control Protocol (Skinny)"; +static const char config[] = "skinny.conf"; + +static int default_capability = AST_FORMAT_ULAW | AST_FORMAT_ALAW; +static struct ast_codec_pref default_prefs; + +enum skinny_codecs { + SKINNY_CODEC_ALAW = 2, + SKINNY_CODEC_ULAW = 4, + SKINNY_CODEC_G723_1 = 9, + SKINNY_CODEC_G729A = 12, + SKINNY_CODEC_G726_32 = 82, /* XXX Which packing order does this translate to? */ + SKINNY_CODEC_H261 = 100, + SKINNY_CODEC_H263 = 101 +}; + +#define DEFAULT_SKINNY_PORT 2000 +#define DEFAULT_SKINNY_BACKLOG 2 +#define SKINNY_MAX_PACKET 1000 + +static unsigned int tos = 0; +static unsigned int tos_audio = 0; +static unsigned int tos_video = 0; +static unsigned int cos = 0; +static unsigned int cos_audio = 0; +static unsigned int cos_video = 0; + +static int keep_alive = 120; +static char vmexten[AST_MAX_EXTENSION]; /* Voicemail pilot number */ +static char used_context[AST_MAX_EXTENSION]; /* Voicemail pilot number */ +static char regcontext[AST_MAX_CONTEXT]; /* Context for auto-extension */ +static char date_format[6] = "D-M-Y"; +static char version_id[16] = "P002F202"; + +#if __BYTE_ORDER == __LITTLE_ENDIAN +#define letohl(x) (x) +#define letohs(x) (x) +#define htolel(x) (x) +#define htoles(x) (x) +#else +#if defined(HAVE_BYTESWAP_H) +#include <byteswap.h> +#define letohl(x) bswap_32(x) +#define letohs(x) bswap_16(x) +#define htolel(x) bswap_32(x) +#define htoles(x) bswap_16(x) +#elif defined(HAVE_SYS_ENDIAN_SWAP16) +#include <sys/endian.h> +#define letohl(x) __swap32(x) +#define letohs(x) __swap16(x) +#define htolel(x) __swap32(x) +#define htoles(x) __swap16(x) +#elif defined(HAVE_SYS_ENDIAN_BSWAP16) +#include <sys/endian.h> +#define letohl(x) bswap32(x) +#define letohs(x) bswap16(x) +#define htolel(x) bswap32(x) +#define htoles(x) bswap16(x) +#else +#define __bswap_16(x) \ + ((((x) & 0xff00) >> 8) | \ + (((x) & 0x00ff) << 8)) +#define __bswap_32(x) \ + ((((x) & 0xff000000) >> 24) | \ + (((x) & 0x00ff0000) >> 8) | \ + (((x) & 0x0000ff00) << 8) | \ + (((x) & 0x000000ff) << 24)) +#define letohl(x) __bswap_32(x) +#define letohs(x) __bswap_16(x) +#define htolel(x) __bswap_32(x) +#define htoles(x) __bswap_16(x) +#endif +#endif + +/*! Global jitterbuffer configuration - by default, jb is disabled */ +static struct ast_jb_conf default_jbconf = +{ + .flags = 0, + .max_size = -1, + .resync_threshold = -1, + .impl = "" +}; +static struct ast_jb_conf global_jbconf; + +AST_THREADSTORAGE(device2str_threadbuf); +#define DEVICE2STR_BUFSIZE 15 + +AST_THREADSTORAGE(control2str_threadbuf); +#define CONTROL2STR_BUFSIZE 100 + +/********************* + * Protocol Messages * + *********************/ +/* message types */ +#define KEEP_ALIVE_MESSAGE 0x0000 +/* no additional struct */ + +#define REGISTER_MESSAGE 0x0001 +struct register_message { + char name[16]; + uint32_t userId; + uint32_t instance; + uint32_t ip; + uint32_t type; + uint32_t maxStreams; +}; + +#define IP_PORT_MESSAGE 0x0002 + +#define KEYPAD_BUTTON_MESSAGE 0x0003 +struct keypad_button_message { + uint32_t button; + uint32_t lineInstance; + uint32_t callReference; +}; + + +#define ENBLOC_CALL_MESSAGE 0x0004 +struct enbloc_call_message { + char calledParty[24]; +}; + +#define STIMULUS_MESSAGE 0x0005 +struct stimulus_message { + uint32_t stimulus; + uint32_t stimulusInstance; + uint32_t callreference; +}; + +#define OFFHOOK_MESSAGE 0x0006 +struct offhook_message { + uint32_t unknown1; + uint32_t unknown2; +}; + +#define ONHOOK_MESSAGE 0x0007 +struct onhook_message { + uint32_t unknown1; + uint32_t unknown2; +}; + +#define CAPABILITIES_RES_MESSAGE 0x0010 +struct station_capabilities { + uint32_t codec; + uint32_t frames; + union { + char res[8]; + uint32_t rate; + } payloads; +}; + +#define SKINNY_MAX_CAPABILITIES 18 + +struct capabilities_res_message { + uint32_t count; + struct station_capabilities caps[SKINNY_MAX_CAPABILITIES]; +}; + +#define SPEED_DIAL_STAT_REQ_MESSAGE 0x000A +struct speed_dial_stat_req_message { + uint32_t speedDialNumber; +}; + +#define LINE_STATE_REQ_MESSAGE 0x000B +struct line_state_req_message { + uint32_t lineNumber; +}; + +#define TIME_DATE_REQ_MESSAGE 0x000D +#define BUTTON_TEMPLATE_REQ_MESSAGE 0x000E +#define VERSION_REQ_MESSAGE 0x000F +#define SERVER_REQUEST_MESSAGE 0x0012 + +#define ALARM_MESSAGE 0x0020 +struct alarm_message { + uint32_t alarmSeverity; + char displayMessage[80]; + uint32_t alarmParam1; + uint32_t alarmParam2; +}; + +#define OPEN_RECEIVE_CHANNEL_ACK_MESSAGE 0x0022 +struct open_receive_channel_ack_message { + uint32_t status; + uint32_t ipAddr; + uint32_t port; + uint32_t passThruId; +}; + +#define SOFT_KEY_SET_REQ_MESSAGE 0x0025 + +#define SOFT_KEY_EVENT_MESSAGE 0x0026 +struct soft_key_event_message { + uint32_t softKeyEvent; + uint32_t instance; + uint32_t callreference; +}; + +#define UNREGISTER_MESSAGE 0x0027 +#define SOFT_KEY_TEMPLATE_REQ_MESSAGE 0x0028 +#define HEADSET_STATUS_MESSAGE 0x002B +#define REGISTER_AVAILABLE_LINES_MESSAGE 0x002D + +#define REGISTER_ACK_MESSAGE 0x0081 +struct register_ack_message { + uint32_t keepAlive; + char dateTemplate[6]; + char res[2]; + uint32_t secondaryKeepAlive; + char res2[4]; +}; + +#define START_TONE_MESSAGE 0x0082 +struct start_tone_message { + uint32_t tone; + uint32_t space; + uint32_t instance; + uint32_t reference; +}; + +#define STOP_TONE_MESSAGE 0x0083 +struct stop_tone_message { + uint32_t instance; + uint32_t reference; +}; + +#define SET_RINGER_MESSAGE 0x0085 +struct set_ringer_message { + uint32_t ringerMode; + uint32_t unknown1; /* See notes in transmit_ringer_mode */ + uint32_t unknown2; + uint32_t space[2]; +}; + +#define SET_LAMP_MESSAGE 0x0086 +struct set_lamp_message { + uint32_t stimulus; + uint32_t stimulusInstance; + uint32_t deviceStimulus; +}; + +#define SET_SPEAKER_MESSAGE 0x0088 +struct set_speaker_message { + uint32_t mode; +}; + +/* XXX When do we need to use this? */ +#define SET_MICROPHONE_MESSAGE 0x0089 +struct set_microphone_message { + uint32_t mode; +}; + +#define START_MEDIA_TRANSMISSION_MESSAGE 0x008A +struct media_qualifier { + uint32_t precedence; + uint32_t vad; + uint16_t packets; + uint32_t bitRate; +}; + +struct start_media_transmission_message { + uint32_t conferenceId; + uint32_t passThruPartyId; + uint32_t remoteIp; + uint32_t remotePort; + uint32_t packetSize; + uint32_t payloadType; + struct media_qualifier qualifier; + uint32_t space[16]; +}; + +#define STOP_MEDIA_TRANSMISSION_MESSAGE 0x008B +struct stop_media_transmission_message { + uint32_t conferenceId; + uint32_t passThruPartyId; + uint32_t space[3]; +}; + +#define CALL_INFO_MESSAGE 0x008F +struct call_info_message { + char callingPartyName[40]; + char callingParty[24]; + char calledPartyName[40]; + char calledParty[24]; + uint32_t instance; + uint32_t reference; + uint32_t type; + char originalCalledPartyName[40]; + char originalCalledParty[24]; + char lastRedirectingPartyName[40]; + char lastRedirectingParty[24]; + uint32_t originalCalledPartyRedirectReason; + uint32_t lastRedirectingReason; + char callingPartyVoiceMailbox[24]; + char calledPartyVoiceMailbox[24]; + char originalCalledPartyVoiceMailbox[24]; + char lastRedirectingVoiceMailbox[24]; + uint32_t space[3]; +}; + +#define FORWARD_STAT_MESSAGE 0x0090 +struct forward_stat_message { + uint32_t activeforward; + uint32_t lineNumber; + uint32_t fwdall; + char fwdallnum[24]; + uint32_t fwdbusy; + char fwdbusynum[24]; + uint32_t fwdnoanswer; + char fwdnoanswernum[24]; +}; + +#define SPEED_DIAL_STAT_RES_MESSAGE 0x0091 +struct speed_dial_stat_res_message { + uint32_t speedDialNumber; + char speedDialDirNumber[24]; + char speedDialDisplayName[40]; +}; + +#define LINE_STAT_RES_MESSAGE 0x0092 +struct line_stat_res_message { + uint32_t lineNumber; + char lineDirNumber[24]; + char lineDisplayName[24]; + uint32_t space[15]; +}; + +#define DEFINETIMEDATE_MESSAGE 0x0094 +struct definetimedate_message { + uint32_t year; /* since 1900 */ + uint32_t month; + uint32_t dayofweek; /* monday = 1 */ + uint32_t day; + uint32_t hour; + uint32_t minute; + uint32_t seconds; + uint32_t milliseconds; + uint32_t timestamp; +}; + +#define BUTTON_TEMPLATE_RES_MESSAGE 0x0097 +struct button_definition { + uint8_t instanceNumber; + uint8_t buttonDefinition; +}; + +struct button_definition_template { + uint8_t buttonDefinition; + /* for now, anything between 0xB0 and 0xCF is custom */ + /*int custom;*/ +}; + +#define STIMULUS_REDIAL 0x01 +#define STIMULUS_SPEEDDIAL 0x02 +#define STIMULUS_HOLD 0x03 +#define STIMULUS_TRANSFER 0x04 +#define STIMULUS_FORWARDALL 0x05 +#define STIMULUS_FORWARDBUSY 0x06 +#define STIMULUS_FORWARDNOANSWER 0x07 +#define STIMULUS_DISPLAY 0x08 +#define STIMULUS_LINE 0x09 +#define STIMULUS_VOICEMAIL 0x0F +#define STIMULUS_AUTOANSWER 0x11 +#define STIMULUS_DND 0x3F +#define STIMULUS_CONFERENCE 0x7D +#define STIMULUS_CALLPARK 0x7E +#define STIMULUS_CALLPICKUP 0x7F +#define STIMULUS_NONE 0xFF + +/* Button types */ +#define BT_REDIAL STIMULUS_REDIAL +#define BT_SPEEDDIAL STIMULUS_SPEEDDIAL +#define BT_HOLD STIMULUS_HOLD +#define BT_TRANSFER STIMULUS_TRANSFER +#define BT_FORWARDALL STIMULUS_FORWARDALL +#define BT_FORWARDBUSY STIMULUS_FORWARDBUSY +#define BT_FORWARDNOANSWER STIMULUS_FORWARDNOANSWER +#define BT_DISPLAY STIMULUS_DISPLAY +#define BT_LINE STIMULUS_LINE +#define BT_VOICEMAIL STIMULUS_VOICEMAIL +#define BT_AUTOANSWER STIMULUS_AUTOANSWER +#define BT_DND STIMULUS_DND +#define BT_CONFERENCE STIMULUS_CONFERENCE +#define BT_CALLPARK STIMULUS_CALLPARK +#define BT_CALLPICKUP STIMULUS_CALLPICKUP +#define BT_NONE 0x00 + +/* Custom button types - add our own between 0xB0 and 0xCF. + This may need to be revised in the future, + if stimuluses are ever added in this range. */ +#define BT_CUST_LINESPEEDDIAL 0xB0 /* line or speeddial with/without hint */ +#define BT_CUST_LINE 0xB1 /* line or speeddial with hint only */ + +struct button_template_res_message { + uint32_t buttonOffset; + uint32_t buttonCount; + uint32_t totalButtonCount; + struct button_definition definition[42]; +}; + +#define VERSION_RES_MESSAGE 0x0098 +struct version_res_message { + char version[16]; +}; + +#define DISPLAYTEXT_MESSAGE 0x0099 +struct displaytext_message { + char text[40]; +}; + +#define CLEAR_NOTIFY_MESSAGE 0x0115 +#define CLEAR_DISPLAY_MESSAGE 0x009A + +#define CAPABILITIES_REQ_MESSAGE 0x009B + +#define REGISTER_REJ_MESSAGE 0x009D +struct register_rej_message { + char errMsg[33]; +}; + +#define SERVER_RES_MESSAGE 0x009E +struct server_identifier { + char serverName[48]; +}; + +struct server_res_message { + struct server_identifier server[5]; + uint32_t serverListenPort[5]; + uint32_t serverIpAddr[5]; +}; + +#define RESET_MESSAGE 0x009F +struct reset_message { + uint32_t resetType; +}; + +#define KEEP_ALIVE_ACK_MESSAGE 0x0100 + +#define OPEN_RECEIVE_CHANNEL_MESSAGE 0x0105 +struct open_receive_channel_message { + uint32_t conferenceId; + uint32_t partyId; + uint32_t packets; + uint32_t capability; + uint32_t echo; + uint32_t bitrate; + uint32_t space[16]; +}; + +#define CLOSE_RECEIVE_CHANNEL_MESSAGE 0x0106 +struct close_receive_channel_message { + uint32_t conferenceId; + uint32_t partyId; + uint32_t space[2]; +}; + +#define SOFT_KEY_TEMPLATE_RES_MESSAGE 0x0108 + +struct soft_key_template_definition { + char softKeyLabel[16]; + uint32_t softKeyEvent; +}; + +#define KEYDEF_ONHOOK 0 +#define KEYDEF_CONNECTED 1 +#define KEYDEF_ONHOLD 2 +#define KEYDEF_RINGIN 3 +#define KEYDEF_OFFHOOK 4 +#define KEYDEF_CONNWITHTRANS 5 +#define KEYDEF_DADFD 6 /* Digits After Dialing First Digit */ +#define KEYDEF_CONNWITHCONF 7 +#define KEYDEF_RINGOUT 8 +#define KEYDEF_OFFHOOKWITHFEAT 9 +#define KEYDEF_UNKNOWN 10 + +#define SOFTKEY_NONE 0x00 +#define SOFTKEY_REDIAL 0x01 +#define SOFTKEY_NEWCALL 0x02 +#define SOFTKEY_HOLD 0x03 +#define SOFTKEY_TRNSFER 0x04 +#define SOFTKEY_CFWDALL 0x05 +#define SOFTKEY_CFWDBUSY 0x06 +#define SOFTKEY_CFWDNOANSWER 0x07 +#define SOFTKEY_BKSPC 0x08 +#define SOFTKEY_ENDCALL 0x09 +#define SOFTKEY_RESUME 0x0A +#define SOFTKEY_ANSWER 0x0B +#define SOFTKEY_INFO 0x0C +#define SOFTKEY_CONFRN 0x0D +#define SOFTKEY_PARK 0x0E +#define SOFTKEY_JOIN 0x0F +#define SOFTKEY_MEETME 0x10 +#define SOFTKEY_PICKUP 0x11 +#define SOFTKEY_GPICKUP 0x12 +#define SOFTKEY_DND 0x13 +#define SOFTKEY_IDIVERT 0x14 + +struct soft_key_template_definition soft_key_template_default[] = { + { "\200\001", SOFTKEY_REDIAL }, + { "\200\002", SOFTKEY_NEWCALL }, + { "\200\003", SOFTKEY_HOLD }, + { "\200\004", SOFTKEY_TRNSFER }, + { "\200\005", SOFTKEY_CFWDALL }, + { "\200\006", SOFTKEY_CFWDBUSY }, + { "\200\007", SOFTKEY_CFWDNOANSWER }, + { "\200\010", SOFTKEY_BKSPC }, + { "\200\011", SOFTKEY_ENDCALL }, + { "\200\012", SOFTKEY_RESUME }, + { "\200\013", SOFTKEY_ANSWER }, + { "\200\014", SOFTKEY_INFO }, + { "\200\015", SOFTKEY_CONFRN }, + { "\200\016", SOFTKEY_PARK }, + { "\200\017", SOFTKEY_JOIN }, + { "\200\020", SOFTKEY_MEETME }, + { "\200\021", SOFTKEY_PICKUP }, + { "\200\022", SOFTKEY_GPICKUP }, + { "\200\077", SOFTKEY_DND }, + { "\200\120", SOFTKEY_IDIVERT }, +}; + +/* Localized message "codes" (in octal) + Below is en_US (taken from a 7970) + + \200\xxx + \000: ??? + \001: Redial + \002: New Call + \003: Hold + \004: Transfer + \005: CFwdALL + \006: CFwdBusy + \007: CFwdNoAnswer + \010: << + \011: EndCall + \012: Resume + \013: Answer + \014: Info + \015: Confrn + \016: Park + \017: Join + \020: MeetMe + \021: PickUp + \022: GPickUp + \023: Your current options + \024: Off Hook + \025: On Hook + \026: Ring out + \027: From + \030: Connected + \031: Busy + \032: Line In Use + \033: Call Waiting + \034: Call Transfer + \035: Call Park + \036: Call Proceed + \037: In Use Remote + \040: Enter number + \041: Call park At + \042: Primary Only + \043: Temp Fail + \044: You Have VoiceMail + \045: Forwarded to + \046: Can Not Complete Conference + \047: No Conference Bridge + \050: Can Not Hold Primary Control + \051: Invalid Conference Participant + \052: In Conference Already + \053: No Participant Info + \054: Exceed Maximum Parties + \055: Key Is Not Active + \056: Error No License + \057: Error DBConfig + \060: Error Database + \061: Error Pass Limit + \062: Error Unknown + \063: Error Mismatch + \064: Conference + \065: Park Number + \066: Private + \067: Not Enough Bandwidth + \070: Unknown Number + \071: RmLstC + \072: Voicemail + \073: ImmDiv + \074: Intrcpt + \075: SetWtch + \076: TrnsfVM + \077: DND + \100: DivAll + \101: CallBack + \102: Network congestion,rerouting + \103: Barge + \104: Failed to setup Barge + \105: Another Barge exists + \106: Incompatible device type + \107: No Park Number Available + \110: CallPark Reversion + \111: Service is not Active + \112: High Traffic Try Again Later + \113: QRT + \114: MCID + \115: DirTrfr + \116: Select + \117: ConfList + \120: iDivert + \121: cBarge + \122: Can Not Complete Transfer + \123: Can Not Join Calls + \124: Mcid Successful + \125: Number Not Configured + \126: Security Error + \127: Video Bandwidth Unavailable + \130: VidMode + \131: Max Call Duration Timeout + \132: Max Hold Duration Timeout + \133: OPickUp + \134: ??? + \135: ??? + \136: ??? + \137: ??? + \140: ??? + \141: External Transfer Restricted + \142: ??? + \143: ??? + \144: ??? + \145: Mac Address + \146: Host Name + \147: Domain Name + \150: IP Address + \151: Subnet Mask + \152: TFTP Server 1 + \153: Default Router 1 + \154: Default Router 2 + \155: Default Router 3 + \156: Default Router 4 + \157: Default Router 5 + \160: DNS Server 1 + \161: DNS Server 2 + \162: DNS Server 3 + \163: DNS Server 4 + \164: DNS Server 5 + \165: Operational VLAN Id + \166: Admin. VLAN Id + \167: CallManager 1 + \170: CallManager 2 + \171: CallManager 3 + \172: CallManager 4 + \173: CallManager 5 + \174: Information URL + \175: Directories URL + \176: Messages URL + \177: Services URL + */ + +struct soft_key_definitions { + const uint8_t mode; + const uint8_t *defaults; + const int count; +}; + +static const uint8_t soft_key_default_onhook[] = { + SOFTKEY_REDIAL, + SOFTKEY_NEWCALL, + SOFTKEY_CFWDALL, + SOFTKEY_CFWDBUSY, + SOFTKEY_DND, + SOFTKEY_GPICKUP, + SOFTKEY_CONFRN, +}; + +static const uint8_t soft_key_default_connected[] = { + SOFTKEY_HOLD, + SOFTKEY_ENDCALL, + SOFTKEY_TRNSFER, + SOFTKEY_PARK, + SOFTKEY_CFWDALL, + SOFTKEY_CFWDBUSY, +}; + +static const uint8_t soft_key_default_onhold[] = { + SOFTKEY_RESUME, + SOFTKEY_NEWCALL, + SOFTKEY_ENDCALL, + SOFTKEY_TRNSFER, +}; + +static const uint8_t soft_key_default_ringin[] = { + SOFTKEY_ANSWER, + SOFTKEY_ENDCALL, + SOFTKEY_TRNSFER, +}; + +static const uint8_t soft_key_default_offhook[] = { + SOFTKEY_REDIAL, + SOFTKEY_ENDCALL, + SOFTKEY_CFWDALL, + SOFTKEY_CFWDBUSY, + SOFTKEY_GPICKUP, +}; + +static const uint8_t soft_key_default_connwithtrans[] = { + SOFTKEY_HOLD, + SOFTKEY_ENDCALL, + SOFTKEY_TRNSFER, + SOFTKEY_PARK, + SOFTKEY_CFWDALL, + SOFTKEY_CFWDBUSY, +}; + +static const uint8_t soft_key_default_dadfd[] = { + SOFTKEY_BKSPC, + SOFTKEY_ENDCALL, +}; + +static const uint8_t soft_key_default_connwithconf[] = { + SOFTKEY_NONE, +}; + +static const uint8_t soft_key_default_ringout[] = { + SOFTKEY_NONE, + SOFTKEY_ENDCALL, +}; + +static const uint8_t soft_key_default_offhookwithfeat[] = { + SOFTKEY_REDIAL, + SOFTKEY_ENDCALL, +}; + +static const uint8_t soft_key_default_unknown[] = { + SOFTKEY_NONE, +}; + +static const struct soft_key_definitions soft_key_default_definitions[] = { + {KEYDEF_ONHOOK, soft_key_default_onhook, sizeof(soft_key_default_onhook) / sizeof(uint8_t)}, + {KEYDEF_CONNECTED, soft_key_default_connected, sizeof(soft_key_default_connected) / sizeof(uint8_t)}, + {KEYDEF_ONHOLD, soft_key_default_onhold, sizeof(soft_key_default_onhold) / sizeof(uint8_t)}, + {KEYDEF_RINGIN, soft_key_default_ringin, sizeof(soft_key_default_ringin) / sizeof(uint8_t)}, + {KEYDEF_OFFHOOK, soft_key_default_offhook, sizeof(soft_key_default_offhook) / sizeof(uint8_t)}, + {KEYDEF_CONNWITHTRANS, soft_key_default_connwithtrans, sizeof(soft_key_default_connwithtrans) / sizeof(uint8_t)}, + {KEYDEF_DADFD, soft_key_default_dadfd, sizeof(soft_key_default_dadfd) / sizeof(uint8_t)}, + {KEYDEF_CONNWITHCONF, soft_key_default_connwithconf, sizeof(soft_key_default_connwithconf) / sizeof(uint8_t)}, + {KEYDEF_RINGOUT, soft_key_default_ringout, sizeof(soft_key_default_ringout) / sizeof(uint8_t)}, + {KEYDEF_OFFHOOKWITHFEAT, soft_key_default_offhookwithfeat, sizeof(soft_key_default_offhookwithfeat) / sizeof(uint8_t)}, + {KEYDEF_UNKNOWN, soft_key_default_unknown, sizeof(soft_key_default_unknown) / sizeof(uint8_t)} +}; + +struct soft_key_template_res_message { + uint32_t softKeyOffset; + uint32_t softKeyCount; + uint32_t totalSoftKeyCount; + struct soft_key_template_definition softKeyTemplateDefinition[32]; +}; + +#define SOFT_KEY_SET_RES_MESSAGE 0x0109 + +struct soft_key_set_definition { + uint8_t softKeyTemplateIndex[16]; + uint16_t softKeyInfoIndex[16]; +}; + +struct soft_key_set_res_message { + uint32_t softKeySetOffset; + uint32_t softKeySetCount; + uint32_t totalSoftKeySetCount; + struct soft_key_set_definition softKeySetDefinition[16]; + uint32_t res; +}; + +#define SELECT_SOFT_KEYS_MESSAGE 0x0110 +struct select_soft_keys_message { + uint32_t instance; + uint32_t reference; + uint32_t softKeySetIndex; + uint32_t validKeyMask; +}; + +#define CALL_STATE_MESSAGE 0x0111 +struct call_state_message { + uint32_t callState; + uint32_t lineInstance; + uint32_t callReference; + uint32_t space[3]; +}; + +#define DISPLAY_PROMPT_STATUS_MESSAGE 0x0112 +struct display_prompt_status_message { + uint32_t messageTimeout; + char promptMessage[32]; + uint32_t lineInstance; + uint32_t callReference; +}; + +#define CLEAR_PROMPT_MESSAGE 0x0113 +struct clear_prompt_message { + uint32_t lineInstance; + uint32_t callReference; +}; + +#define DISPLAY_NOTIFY_MESSAGE 0x0114 +struct display_notify_message { + uint32_t displayTimeout; + char displayMessage[100]; +}; + +#define ACTIVATE_CALL_PLANE_MESSAGE 0x0116 +struct activate_call_plane_message { + uint32_t lineInstance; +}; + +#define DIALED_NUMBER_MESSAGE 0x011D +struct dialed_number_message { + char dialedNumber[24]; + uint32_t lineInstance; + uint32_t callReference; +}; + +union skinny_data { + struct alarm_message alarm; + struct speed_dial_stat_req_message speeddialreq; + struct register_message reg; + struct register_ack_message regack; + struct register_rej_message regrej; + struct capabilities_res_message caps; + struct version_res_message version; + struct button_template_res_message buttontemplate; + struct displaytext_message displaytext; + struct display_prompt_status_message displaypromptstatus; + struct clear_prompt_message clearpromptstatus; + struct definetimedate_message definetimedate; + struct start_tone_message starttone; + struct stop_tone_message stoptone; + struct speed_dial_stat_res_message speeddial; + struct line_state_req_message line; + struct line_stat_res_message linestat; + struct soft_key_set_res_message softkeysets; + struct soft_key_template_res_message softkeytemplate; + struct server_res_message serverres; + struct reset_message reset; + struct set_lamp_message setlamp; + struct set_ringer_message setringer; + struct call_state_message callstate; + struct keypad_button_message keypad; + struct select_soft_keys_message selectsoftkey; + struct activate_call_plane_message activatecallplane; + struct stimulus_message stimulus; + struct offhook_message offhook; + struct onhook_message onhook; + struct set_speaker_message setspeaker; + struct set_microphone_message setmicrophone; + struct call_info_message callinfo; + struct start_media_transmission_message startmedia; + struct stop_media_transmission_message stopmedia; + struct open_receive_channel_message openreceivechannel; + struct open_receive_channel_ack_message openreceivechannelack; + struct close_receive_channel_message closereceivechannel; + struct display_notify_message displaynotify; + struct dialed_number_message dialednumber; + struct soft_key_event_message softkeyeventmessage; + struct enbloc_call_message enbloccallmessage; + struct forward_stat_message forwardstat; +}; + +/* packet composition */ +struct skinny_req { + int len; + int res; + int e; + union skinny_data data; +}; + +/* XXX This is the combined size of the variables above. (len, res, e) + If more are added, this MUST change. + (sizeof(skinny_req) - sizeof(skinny_data)) DOES NOT WORK on all systems (amd64?). */ +int skinny_header_size = 12; + +/***************************** + * Asterisk specific globals * + *****************************/ + +static int skinnydebug = 0; + +/* a hostname, portnumber, socket and such is usefull for VoIP protocols */ +static struct sockaddr_in bindaddr; +static char ourhost[256]; +static int ourport; +static struct in_addr __ourip; +struct ast_hostent ahp; +struct hostent *hp; +static int skinnysock = -1; +static pthread_t accept_t; +static char context[AST_MAX_CONTEXT] = "default"; +static char language[MAX_LANGUAGE] = ""; +static char mohinterpret[MAX_MUSICCLASS] = "default"; +static char mohsuggest[MAX_MUSICCLASS] = ""; +static char cid_num[AST_MAX_EXTENSION] = ""; +static char cid_name[AST_MAX_EXTENSION] = ""; +static char linelabel[AST_MAX_EXTENSION] =""; +static int nat = 0; +static ast_group_t cur_callergroup = 0; +static ast_group_t cur_pickupgroup = 0; +static int immediate = 0; +static int callwaiting = 0; +static int callreturn = 0; +static int threewaycalling = 0; +static int mwiblink = 0; +/* This is for flashhook transfers */ +static int transfer = 0; +static int cancallforward = 0; +/* static int busycount = 3;*/ +static char accountcode[AST_MAX_ACCOUNT_CODE] = ""; +static char mailbox[AST_MAX_EXTENSION]; +static char regexten[AST_MAX_EXTENSION]; +static int amaflags = 0; +static int callnums = 1; +static int canreinvite = 0; + +#define SKINNY_DEVICE_UNKNOWN -1 +#define SKINNY_DEVICE_NONE 0 +#define SKINNY_DEVICE_30SPPLUS 1 +#define SKINNY_DEVICE_12SPPLUS 2 +#define SKINNY_DEVICE_12SP 3 +#define SKINNY_DEVICE_12 4 +#define SKINNY_DEVICE_30VIP 5 +#define SKINNY_DEVICE_7910 6 +#define SKINNY_DEVICE_7960 7 +#define SKINNY_DEVICE_7940 8 +#define SKINNY_DEVICE_7935 9 +#define SKINNY_DEVICE_ATA186 12 /* Cisco ATA-186 */ +#define SKINNY_DEVICE_7941 115 +#define SKINNY_DEVICE_7971 119 +#define SKINNY_DEVICE_7985 302 +#define SKINNY_DEVICE_7911 307 +#define SKINNY_DEVICE_7961GE 308 +#define SKINNY_DEVICE_7941GE 309 +#define SKINNY_DEVICE_7921 365 +#define SKINNY_DEVICE_7905 20000 +#define SKINNY_DEVICE_7920 30002 +#define SKINNY_DEVICE_7970 30006 +#define SKINNY_DEVICE_7912 30007 +#define SKINNY_DEVICE_7902 30008 +#define SKINNY_DEVICE_CIPC 30016 /* Cisco IP Communicator */ +#define SKINNY_DEVICE_7961 30018 +#define SKINNY_DEVICE_7936 30019 +#define SKINNY_DEVICE_SCCPGATEWAY_AN 30027 /* ??? */ +#define SKINNY_DEVICE_SCCPGATEWAY_BRI 30028 /* ??? */ + +#define SKINNY_SPEAKERON 1 +#define SKINNY_SPEAKEROFF 2 + +#define SKINNY_MICON 1 +#define SKINNY_MICOFF 2 + +#define SKINNY_OFFHOOK 1 +#define SKINNY_ONHOOK 2 +#define SKINNY_RINGOUT 3 +#define SKINNY_RINGIN 4 +#define SKINNY_CONNECTED 5 +#define SKINNY_BUSY 6 +#define SKINNY_CONGESTION 7 +#define SKINNY_HOLD 8 +#define SKINNY_CALLWAIT 9 +#define SKINNY_TRANSFER 10 +#define SKINNY_PARK 11 +#define SKINNY_PROGRESS 12 +#define SKINNY_CALLREMOTEMULTILINE 13 +#define SKINNY_INVALID 14 + +#define SKINNY_SILENCE 0x00 +#define SKINNY_DIALTONE 0x21 +#define SKINNY_BUSYTONE 0x23 +#define SKINNY_ALERT 0x24 +#define SKINNY_REORDER 0x25 +#define SKINNY_CALLWAITTONE 0x2D +#define SKINNY_NOTONE 0x7F + +#define SKINNY_LAMP_OFF 1 +#define SKINNY_LAMP_ON 2 +#define SKINNY_LAMP_WINK 3 +#define SKINNY_LAMP_FLASH 4 +#define SKINNY_LAMP_BLINK 5 + +#define SKINNY_RING_OFF 1 +#define SKINNY_RING_INSIDE 2 +#define SKINNY_RING_OUTSIDE 3 +#define SKINNY_RING_FEATURE 4 + +#define SKINNY_CFWD_ALL (1 << 0) +#define SKINNY_CFWD_BUSY (1 << 1) +#define SKINNY_CFWD_NOANSWER (1 << 2) + +#define TYPE_TRUNK 1 +#define TYPE_LINE 2 + +/* Skinny rtp stream modes. Do we really need this? */ +#define SKINNY_CX_SENDONLY 0 +#define SKINNY_CX_RECVONLY 1 +#define SKINNY_CX_SENDRECV 2 +#define SKINNY_CX_CONF 3 +#define SKINNY_CX_CONFERENCE 3 +#define SKINNY_CX_MUTE 4 +#define SKINNY_CX_INACTIVE 4 + +#if 0 +static char *skinny_cxmodes[] = { + "sendonly", + "recvonly", + "sendrecv", + "confrnce", + "inactive" +}; +#endif + +/* driver scheduler */ +static struct sched_context *sched = NULL; +static struct io_context *io; + +/* Protect the monitoring thread, so only one process can kill or start it, and not + when it's doing something critical. */ +AST_MUTEX_DEFINE_STATIC(monlock); +/* Protect the network socket */ +AST_MUTEX_DEFINE_STATIC(netlock); +/* Protect the session list */ +AST_MUTEX_DEFINE_STATIC(sessionlock); +/* Protect the device list */ +AST_MUTEX_DEFINE_STATIC(devicelock); +#if 0 +/* Protect the paging device list */ +AST_MUTEX_DEFINE_STATIC(pagingdevicelock); +#endif + +/* This is the thread for the monitor which checks for input on the channels + which are not currently in use. */ +static pthread_t monitor_thread = AST_PTHREADT_NULL; + +/* Wait up to 16 seconds for first digit */ +static int firstdigittimeout = 16000; + +/* How long to wait for following digits */ +static int gendigittimeout = 8000; + +/* How long to wait for an extra digit, if there is an ambiguous match */ +static int matchdigittimeout = 3000; + +struct skinny_subchannel { + ast_mutex_t lock; + struct ast_channel *owner; + struct ast_rtp *rtp; + struct ast_rtp *vrtp; + unsigned int callid; + /* time_t lastouttime; */ /* Unused */ + int progress; + int ringing; + int onhold; + /* int lastout; */ /* Unused */ + int cxmode; + int nat; + int outgoing; + int alreadygone; + + struct skinny_subchannel *next; + struct skinny_line *parent; +}; + +struct skinny_line { + ast_mutex_t lock; + char name[80]; + char label[24]; /* Label that shows next to the line buttons */ + char accountcode[AST_MAX_ACCOUNT_CODE]; + char exten[AST_MAX_EXTENSION]; /* Extension where to start */ + char context[AST_MAX_CONTEXT]; + char language[MAX_LANGUAGE]; + char cid_num[AST_MAX_EXTENSION]; /* Caller*ID */ + char cid_name[AST_MAX_EXTENSION]; /* Caller*ID */ + char lastcallerid[AST_MAX_EXTENSION]; /* Last Caller*ID */ + int cfwdtype; + char call_forward_all[AST_MAX_EXTENSION]; + char call_forward_busy[AST_MAX_EXTENSION]; + char call_forward_noanswer[AST_MAX_EXTENSION]; + char mailbox[AST_MAX_EXTENSION]; + char vmexten[AST_MAX_EXTENSION]; + char regexten[AST_MAX_EXTENSION]; /* Extension for auto-extensions */ + char regcontext[AST_MAX_CONTEXT]; /* Context for auto-extensions */ + char mohinterpret[MAX_MUSICCLASS]; + char mohsuggest[MAX_MUSICCLASS]; + char lastnumberdialed[AST_MAX_EXTENSION]; /* Last number that was dialed - used for redial */ + int curtone; /* Current tone being played */ + ast_group_t callgroup; + ast_group_t pickupgroup; + int callwaiting; + int transfer; + int threewaycalling; + int mwiblink; + int cancallforward; + int getforward; + int callreturn; + int dnd; /* How does this affect callwait? Do we just deny a skinny_request if we're dnd? */ + int hascallerid; + int hidecallerid; + int amaflags; + int type; + int instance; + int group; + int needdestroy; + int capability; + int nonCodecCapability; + int onhooktime; + int msgstate; /* voicemail message state */ + int immediate; + int hookstate; + int nat; + int canreinvite; + + struct ast_codec_pref prefs; + struct skinny_subchannel *sub; + struct skinny_line *next; + struct skinny_device *parent; + struct ast_variable *chanvars; /*!< Channel variables to set for inbound call */ +}; + +struct skinny_speeddial { + ast_mutex_t lock; + char label[42]; + char context[AST_MAX_CONTEXT]; + char exten[AST_MAX_EXTENSION]; + int instance; + int stateid; + int laststate; + int isHint; + + struct skinny_speeddial *next; + struct skinny_device *parent; +}; + +struct skinny_addon { + ast_mutex_t lock; + char type[10]; + + struct skinny_addon *next; + struct skinny_device *parent; +}; + +static struct skinny_device { + /* A device containing one or more lines */ + char name[80]; + char id[16]; + char version_id[16]; + char exten[AST_MAX_EXTENSION]; /* Cruddy variable name, pick a better one */ + int type; + int registered; + int lastlineinstance; + int lastcallreference; + int capability; + struct sockaddr_in addr; + struct in_addr ourip; + struct skinny_line *lines; + struct skinny_speeddial *speeddials; + struct skinny_addon *addons; + struct ast_codec_pref prefs; + struct ast_ha *ha; + struct skinnysession *session; + struct skinny_device *next; +} *devices = NULL; + +struct skinny_paging_device { + char name[80]; + char id[16]; + struct skinny_device ** devices; + struct skinny_paging_device *next; +}; + +static struct skinnysession { + pthread_t t; + ast_mutex_t lock; + struct sockaddr_in sin; + int fd; + char inbuf[SKINNY_MAX_PACKET]; + char outbuf[SKINNY_MAX_PACKET]; + struct skinny_device *device; + struct skinnysession *next; +} *sessions = NULL; + +static struct ast_channel *skinny_request(const char *type, int format, void *data, int *cause); +static int skinny_devicestate(void *data); +static int skinny_call(struct ast_channel *ast, char *dest, int timeout); +static int skinny_hangup(struct ast_channel *ast); +static int skinny_answer(struct ast_channel *ast); +static struct ast_frame *skinny_read(struct ast_channel *ast); +static int skinny_write(struct ast_channel *ast, struct ast_frame *frame); +static int skinny_indicate(struct ast_channel *ast, int ind, const void *data, size_t datalen); +static int skinny_fixup(struct ast_channel *oldchan, struct ast_channel *newchan); +static int skinny_senddigit_begin(struct ast_channel *ast, char digit); +static int skinny_senddigit_end(struct ast_channel *ast, char digit, unsigned int duration); +static int handle_time_date_req_message(struct skinny_req *req, struct skinnysession *s); + +static const struct ast_channel_tech skinny_tech = { + .type = "Skinny", + .description = tdesc, + .capabilities = AST_FORMAT_AUDIO_MASK, + .properties = AST_CHAN_TP_WANTSJITTER | AST_CHAN_TP_CREATESJITTER, + .requester = skinny_request, + .devicestate = skinny_devicestate, + .call = skinny_call, + .hangup = skinny_hangup, + .answer = skinny_answer, + .read = skinny_read, + .write = skinny_write, + .indicate = skinny_indicate, + .fixup = skinny_fixup, + .send_digit_begin = skinny_senddigit_begin, + .send_digit_end = skinny_senddigit_end, + .bridge = ast_rtp_bridge, +}; + +static int skinny_extensionstate_cb(char *context, char* exten, int state, void *data); + +static void *get_button_template(struct skinnysession *s, struct button_definition_template *btn) +{ + struct skinny_device *d = s->device; + struct skinny_addon *a = d->addons; + int i; + + switch (d->type) { + case SKINNY_DEVICE_30SPPLUS: + case SKINNY_DEVICE_30VIP: + /* 13 rows, 2 columns */ + for (i = 0; i < 4; i++) + (btn++)->buttonDefinition = BT_CUST_LINE; + (btn++)->buttonDefinition = BT_REDIAL; + (btn++)->buttonDefinition = BT_VOICEMAIL; + (btn++)->buttonDefinition = BT_CALLPARK; + (btn++)->buttonDefinition = BT_FORWARDALL; + (btn++)->buttonDefinition = BT_CONFERENCE; + for (i = 0; i < 4; i++) + (btn++)->buttonDefinition = BT_NONE; + for (i = 0; i < 13; i++) + (btn++)->buttonDefinition = BT_SPEEDDIAL; + + break; + case SKINNY_DEVICE_12SPPLUS: + case SKINNY_DEVICE_12SP: + case SKINNY_DEVICE_12: + /* 6 rows, 2 columns */ + for (i = 0; i < 2; i++) + (btn++)->buttonDefinition = BT_CUST_LINE; + for (i = 0; i < 4; i++) + (btn++)->buttonDefinition = BT_SPEEDDIAL; + (btn++)->buttonDefinition = BT_HOLD; + (btn++)->buttonDefinition = BT_REDIAL; + (btn++)->buttonDefinition = BT_TRANSFER; + (btn++)->buttonDefinition = BT_FORWARDALL; + (btn++)->buttonDefinition = BT_CALLPARK; + (btn++)->buttonDefinition = BT_VOICEMAIL; + break; + case SKINNY_DEVICE_7910: + (btn++)->buttonDefinition = BT_LINE; + (btn++)->buttonDefinition = BT_HOLD; + (btn++)->buttonDefinition = BT_TRANSFER; + (btn++)->buttonDefinition = BT_DISPLAY; + (btn++)->buttonDefinition = BT_VOICEMAIL; + (btn++)->buttonDefinition = BT_CONFERENCE; + (btn++)->buttonDefinition = BT_FORWARDALL; + for (i = 0; i < 2; i++) + (btn++)->buttonDefinition = BT_SPEEDDIAL; + (btn++)->buttonDefinition = BT_REDIAL; + break; + case SKINNY_DEVICE_7960: + case SKINNY_DEVICE_7961: + case SKINNY_DEVICE_7961GE: + for (i = 0; i < 6; i++) + (btn++)->buttonDefinition = BT_CUST_LINESPEEDDIAL; + break; + case SKINNY_DEVICE_7940: + case SKINNY_DEVICE_7941: + case SKINNY_DEVICE_7941GE: + for (i = 0; i < 2; i++) + (btn++)->buttonDefinition = BT_CUST_LINESPEEDDIAL; + break; + case SKINNY_DEVICE_7935: + case SKINNY_DEVICE_7936: + for (i = 0; i < 2; i++) + (btn++)->buttonDefinition = BT_LINE; + break; + case SKINNY_DEVICE_ATA186: + (btn++)->buttonDefinition = BT_LINE; + break; + case SKINNY_DEVICE_7970: + case SKINNY_DEVICE_7971: + case SKINNY_DEVICE_CIPC: + for (i = 0; i < 8; i++) + (btn++)->buttonDefinition = BT_CUST_LINESPEEDDIAL; + break; + case SKINNY_DEVICE_7985: + /* XXX I have no idea what the buttons look like on these. */ + ast_log(LOG_WARNING, "Unsupported device type '%d (7985)' found.\n", d->type); + break; + case SKINNY_DEVICE_7912: + case SKINNY_DEVICE_7911: + case SKINNY_DEVICE_7905: + (btn++)->buttonDefinition = BT_LINE; + (btn++)->buttonDefinition = BT_HOLD; + break; + case SKINNY_DEVICE_7920: + case SKINNY_DEVICE_7921: + /* XXX I don't know if this is right. */ + for (i = 0; i < 4; i++) + (btn++)->buttonDefinition = BT_CUST_LINESPEEDDIAL; + break; + case SKINNY_DEVICE_7902: + ast_log(LOG_WARNING, "Unsupported device type '%d (7902)' found.\n", d->type); + break; + case SKINNY_DEVICE_SCCPGATEWAY_AN: + case SKINNY_DEVICE_SCCPGATEWAY_BRI: + ast_log(LOG_WARNING, "Unsupported device type '%d (SCCP gateway)' found.\n", d->type); + break; + default: + ast_log(LOG_WARNING, "Unknown device type '%d' found.\n", d->type); + break; + } + + for (a = d->addons; a; a = a->next) { + if (!strcasecmp(a->type, "7914")) { + for (i = 0; i < 14; i++) + (btn++)->buttonDefinition = BT_CUST_LINESPEEDDIAL; + } else { + ast_log(LOG_WARNING, "Unknown addon type '%s' found. Skipping.\n", a->type); + } + } + + return btn; +} + +static struct skinny_req *req_alloc(size_t size, int response_message) +{ + struct skinny_req *req; + + if (!(req = ast_calloc(1, skinny_header_size + size + 4))) + return NULL; + + req->len = htolel(size+4); + req->e = htolel(response_message); + + return req; +} + +static struct skinny_line *find_line_by_instance(struct skinny_device *d, int instance) +{ + struct skinny_line *l; + + /*Dialing from on hook or on a 7920 uses instance 0 in requests + but we need to start looking at instance 1 */ + + if (!instance) + instance = 1; + + for (l = d->lines; l; l = l->next) { + if (l->instance == instance) + break; + } + + if (!l) { + ast_log(LOG_WARNING, "Could not find line with instance '%d' on device '%s'\n", instance, d->name); + } + return l; +} + +static struct skinny_line *find_line_by_name(const char *dest) +{ + struct skinny_line *l; + struct skinny_line *tmpl = NULL; + struct skinny_device *d; + char line[256]; + char *at; + char *device; + int checkdevice = 0; + + ast_copy_string(line, dest, sizeof(line)); + at = strchr(line, '@'); + if (at) + *at++ = '\0'; + device = at; + + if (!ast_strlen_zero(device)) + checkdevice = 1; + + ast_mutex_lock(&devicelock); + for (d = devices; d; d = d->next) { + if (checkdevice && tmpl) + break; + else if (!checkdevice) { + /* This is a match, since we're checking for line on every device. */ + } else if (!strcasecmp(d->name, device)) { + if (skinnydebug) + ast_verb(2, "Found device: %s\n", d->name); + } else + continue; + + /* Found the device (or we don't care which device) */ + for (l = d->lines; l; l = l->next) { + /* Search for the right line */ + if (!strcasecmp(l->name, line)) { + if (tmpl) { + ast_verb(2, "Ambiguous line name: %s\n", line); + ast_mutex_unlock(&devicelock); + return NULL; + } else + tmpl = l; + } + } + } + ast_mutex_unlock(&devicelock); + return tmpl; +} + +/*! + * implement the setvar config line + */ +static struct ast_variable *add_var(const char *buf, struct ast_variable *list) +{ + struct ast_variable *tmpvar = NULL; + char *varname = ast_strdupa(buf), *varval = NULL; + + if ((varval = strchr(varname,'='))) { + *varval++ = '\0'; + if ((tmpvar = ast_variable_new(varname, varval, ""))) { + tmpvar->next = list; + list = tmpvar; + } + } + return list; +} + +/* It's quicker/easier to find the subchannel when we know the instance number too */ +static struct skinny_subchannel *find_subchannel_by_instance_reference(struct skinny_device *d, int instance, int reference) +{ + struct skinny_line *l = find_line_by_instance(d, instance); + struct skinny_subchannel *sub; + + if (!l) { + return NULL; + } + + /* 7920 phones set call reference to 0, so use the first + sub-channel on the list. + This MIGHT need more love to be right */ + if (!reference) + sub = l->sub; + else { + for (sub = l->sub; sub; sub = sub->next) { + if (sub->callid == reference) + break; + } + } + if (!sub) { + ast_log(LOG_WARNING, "Could not find subchannel with reference '%d' on '%s'\n", reference, d->name); + } + return sub; +} + +/* Find the subchannel when we only have the callid - this shouldn't happen often */ +static struct skinny_subchannel *find_subchannel_by_reference(struct skinny_device *d, int reference) +{ + struct skinny_line *l; + struct skinny_subchannel *sub = NULL; + + for (l = d->lines; l; l = l->next) { + for (sub = l->sub; sub; sub = sub->next) { + if (sub->callid == reference) + break; + } + if (sub) + break; + } + + if (!l) { + ast_log(LOG_WARNING, "Could not find any lines that contained a subchannel with reference '%d' on device '%s'\n", reference, d->name); + } else { + if (!sub) { + ast_log(LOG_WARNING, "Could not find subchannel with reference '%d' on '%s@%s'\n", reference, l->name, d->name); + } + } + return sub; +} + +static struct skinny_speeddial *find_speeddial_by_instance(struct skinny_device *d, int instance, int isHint) +{ + struct skinny_speeddial *sd; + + for (sd = d->speeddials; sd; sd = sd->next) { + if (sd->isHint == isHint && sd->instance == instance) + break; + } + + if (!sd) { + ast_log(LOG_WARNING, "Could not find speeddial with instance '%d' on device '%s'\n", instance, d->name); + } + return sd; +} + +static int codec_skinny2ast(enum skinny_codecs skinnycodec) +{ + switch (skinnycodec) { + case SKINNY_CODEC_ALAW: + return AST_FORMAT_ALAW; + case SKINNY_CODEC_ULAW: + return AST_FORMAT_ULAW; + case SKINNY_CODEC_G723_1: + return AST_FORMAT_G723_1; + case SKINNY_CODEC_G729A: + return AST_FORMAT_G729A; + case SKINNY_CODEC_G726_32: + return AST_FORMAT_G726_AAL2; /* XXX Is this right? */ + case SKINNY_CODEC_H261: + return AST_FORMAT_H261; + case SKINNY_CODEC_H263: + return AST_FORMAT_H263; + default: + return 0; + } +} + +static int codec_ast2skinny(int astcodec) +{ + switch (astcodec) { + case AST_FORMAT_ALAW: + return SKINNY_CODEC_ALAW; + case AST_FORMAT_ULAW: + return SKINNY_CODEC_ULAW; + case AST_FORMAT_G723_1: + return SKINNY_CODEC_G723_1; + case AST_FORMAT_G729A: + return SKINNY_CODEC_G729A; + case AST_FORMAT_G726_AAL2: /* XXX Is this right? */ + return SKINNY_CODEC_G726_32; + case AST_FORMAT_H261: + return SKINNY_CODEC_H261; + case AST_FORMAT_H263: + return SKINNY_CODEC_H263; + default: + return 0; + } +} + +static int set_callforwards(struct skinny_line *l, const char *cfwd, int cfwdtype) +{ + if (!l) + return 0; + + if (!ast_strlen_zero(cfwd)) { + if (cfwdtype & SKINNY_CFWD_ALL) { + l->cfwdtype |= SKINNY_CFWD_ALL; + ast_copy_string(l->call_forward_all, cfwd, sizeof(l->call_forward_all)); + } + if (cfwdtype & SKINNY_CFWD_BUSY) { + l->cfwdtype |= SKINNY_CFWD_BUSY; + ast_copy_string(l->call_forward_busy, cfwd, sizeof(l->call_forward_busy)); + } + if (cfwdtype & SKINNY_CFWD_NOANSWER) { + l->cfwdtype |= SKINNY_CFWD_NOANSWER; + ast_copy_string(l->call_forward_noanswer, cfwd, sizeof(l->call_forward_noanswer)); + } + } else { + if (cfwdtype & SKINNY_CFWD_ALL) { + l->cfwdtype &= ~SKINNY_CFWD_ALL; + memset(l->call_forward_all, 0, sizeof(l->call_forward_all)); + } + if (cfwdtype & SKINNY_CFWD_BUSY) { + l->cfwdtype &= ~SKINNY_CFWD_BUSY; + memset(l->call_forward_busy, 0, sizeof(l->call_forward_busy)); + } + if (cfwdtype & SKINNY_CFWD_NOANSWER) { + l->cfwdtype &= ~SKINNY_CFWD_NOANSWER; + memset(l->call_forward_noanswer, 0, sizeof(l->call_forward_noanswer)); + } + } + return l->cfwdtype; +} + +static void cleanup_stale_contexts(char *new, char *old) +{ + char *oldcontext, *newcontext, *stalecontext, *stringp, newlist[AST_MAX_CONTEXT]; + + while ((oldcontext = strsep(&old, "&"))) { + stalecontext = '\0'; + ast_copy_string(newlist, new, sizeof(newlist)); + stringp = newlist; + while ((newcontext = strsep(&stringp, "&"))) { + if (strcmp(newcontext, oldcontext) == 0) { + /* This is not the context you're looking for */ + stalecontext = '\0'; + break; + } else if (strcmp(newcontext, oldcontext)) { + stalecontext = oldcontext; + } + + } + if (stalecontext) + ast_context_destroy(ast_context_find(stalecontext), "Skinny"); + } +} + +static void register_exten(struct skinny_line *l) +{ + char multi[256]; + char *stringp, *ext, *context; + + if (ast_strlen_zero(regcontext)) + return; + + ast_copy_string(multi, S_OR(l->regexten, l->name), sizeof(multi)); + stringp = multi; + while ((ext = strsep(&stringp, "&"))) { + if ((context = strchr(ext, '@'))) { + *context++ = '\0'; /* split ext@context */ + if (!ast_context_find(context)) { + ast_log(LOG_WARNING, "Context %s must exist in regcontext= in skinny.conf!\n", context); + continue; + } + } else { + context = regcontext; + } + ast_add_extension(context, 1, ext, 1, NULL, NULL, "Noop", + ast_strdup(l->name), ast_free_ptr, "Skinny"); + } +} + +static void unregister_exten(struct skinny_line *l) +{ + char multi[256]; + char *stringp, *ext, *context; + + if (ast_strlen_zero(regcontext)) + return; + + ast_copy_string(multi, S_OR(l->regexten, l->name), sizeof(multi)); + stringp = multi; + while ((ext = strsep(&stringp, "&"))) { + if ((context = strchr(ext, '@'))) { + *context++ = '\0'; /* split ext@context */ + if (!ast_context_find(context)) { + ast_log(LOG_WARNING, "Context %s must exist in regcontext= in skinny.conf!\n", context); + continue; + } + } else { + context = regcontext; + } + ast_context_remove_extension(context, ext, 1, NULL); + } +} + +static int skinny_register(struct skinny_req *req, struct skinnysession *s) +{ + struct skinny_device *d; + struct skinny_line *l; + struct skinny_speeddial *sd; + struct sockaddr_in sin; + socklen_t slen; + + ast_mutex_lock(&devicelock); + for (d = devices; d; d = d->next) { + if (!strcasecmp(req->data.reg.name, d->id) + && ast_apply_ha(d->ha, &(s->sin))) { + s->device = d; + d->type = letohl(req->data.reg.type); + if (ast_strlen_zero(d->version_id)) { + ast_copy_string(d->version_id, version_id, sizeof(d->version_id)); + } + d->registered = 1; + d->session = s; + + slen = sizeof(sin); + if (getsockname(s->fd, (struct sockaddr *)&sin, &slen)) { + ast_log(LOG_WARNING, "Cannot get socket name\n"); + sin.sin_addr = __ourip; + } + d->ourip = sin.sin_addr; + + for (sd = d->speeddials; sd; sd = sd->next) { + sd->stateid = ast_extension_state_add(sd->context, sd->exten, skinny_extensionstate_cb, sd); + } + for (l = d->lines; l; l = l->next) { + register_exten(l); + ast_device_state_changed("Skinny/%s@%s", l->name, d->name); + } + break; + } + } + ast_mutex_unlock(&devicelock); + if (!d) { + return 0; + } + return 1; +} + +static int skinny_unregister(struct skinny_req *req, struct skinnysession *s) +{ + struct skinny_device *d; + struct skinny_line *l; + struct skinny_speeddial *sd; + + d = s->device; + + if (d) { + d->session = NULL; + d->registered = 0; + + for (sd = d->speeddials; sd; sd = sd->next) { + if (sd->stateid > -1) + ast_extension_state_del(sd->stateid, NULL); + } + for (l = d->lines; l; l = l->next) { + unregister_exten(l); + ast_device_state_changed("Skinny/%s@%s", l->name, d->name); + } + } + + return -1; /* main loop will destroy the session */ +} + +static int transmit_response(struct skinnysession *s, struct skinny_req *req) +{ + int res = 0; + + if (!s) { + ast_log(LOG_WARNING, "Asked to transmit to a non-existant session!\n"); + return -1; + } + + ast_mutex_lock(&s->lock); + + if (skinnydebug) + ast_log(LOG_VERBOSE, "writing packet type %04X (%d bytes) to socket %d\n", letohl(req->e), letohl(req->len)+8, s->fd); + + if (letohl(req->len > SKINNY_MAX_PACKET) || letohl(req->len < 0)) { + ast_log(LOG_WARNING, "transmit_response: the length of the request is out of bounds\n"); + return -1; + } + + memset(s->outbuf,0,sizeof(s->outbuf)); + memcpy(s->outbuf, req, skinny_header_size); + memcpy(s->outbuf+skinny_header_size, &req->data, letohl(req->len)); + + res = write(s->fd, s->outbuf, letohl(req->len)+8); + + if (res != letohl(req->len)+8) { + ast_log(LOG_WARNING, "Transmit: write only sent %d out of %d bytes: %s\n", res, letohl(req->len)+8, strerror(errno)); + if (res == -1) { + if (skinnydebug) + ast_log(LOG_WARNING, "Transmit: Skinny Client was lost, unregistering\n"); + skinny_unregister(NULL, s); + } + + } + + ast_mutex_unlock(&s->lock); + return 1; +} + +static void transmit_speaker_mode(struct skinnysession *s, int mode) +{ + struct skinny_req *req; + + if (!(req = req_alloc(sizeof(struct set_speaker_message), SET_SPEAKER_MESSAGE))) + return; + + req->data.setspeaker.mode = htolel(mode); + transmit_response(s, req); +} +/* +static void transmit_microphone_mode(struct skinnysession *s, int mode) +{ + struct skinny_req *req; + + if (!(req = req_alloc(sizeof(struct set_microphone_message), SET_MICROPHONE_MESSAGE))) + return; + + req->data.setmicrophone.mode = htolel(mode); + transmit_response(s, req); +} +*/ + +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) +{ + struct skinny_req *req; + + if (!(req = req_alloc(sizeof(struct call_info_message), CALL_INFO_MESSAGE))) + return; + + if (skinnydebug) + ast_verbose("Setting Callinfo to %s(%s) from %s(%s) on %s(%d)\n", fromname, fromnum, toname, tonum, s->device->name, instance); + + if (fromname) { + ast_copy_string(req->data.callinfo.callingPartyName, fromname, sizeof(req->data.callinfo.callingPartyName)); + } + if (fromnum) { + ast_copy_string(req->data.callinfo.callingParty, fromnum, sizeof(req->data.callinfo.callingParty)); + } + if (toname) { + ast_copy_string(req->data.callinfo.calledPartyName, toname, sizeof(req->data.callinfo.calledPartyName)); + } + if (tonum) { + ast_copy_string(req->data.callinfo.calledParty, tonum, sizeof(req->data.callinfo.calledParty)); + } + req->data.callinfo.instance = htolel(instance); + req->data.callinfo.reference = htolel(callid); + req->data.callinfo.type = htolel(calltype); + transmit_response(s, req); +} + +static void transmit_connect(struct skinnysession *s, struct skinny_subchannel *sub) +{ + struct skinny_req *req; + struct skinny_line *l = sub->parent; + struct ast_format_list fmt; + + if (!(req = req_alloc(sizeof(struct open_receive_channel_message), OPEN_RECEIVE_CHANNEL_MESSAGE))) + return; + + fmt = ast_codec_pref_getsize(&l->prefs, ast_best_codec(l->capability)); + + req->data.openreceivechannel.conferenceId = htolel(sub->callid); + req->data.openreceivechannel.partyId = htolel(sub->callid); + req->data.openreceivechannel.packets = htolel(fmt.cur_ms); + req->data.openreceivechannel.capability = htolel(codec_ast2skinny(fmt.bits)); + req->data.openreceivechannel.echo = htolel(0); + req->data.openreceivechannel.bitrate = htolel(0); + transmit_response(s, req); +} + +static void transmit_tone(struct skinnysession *s, int tone, int instance, int reference) +{ + struct skinny_req *req; + + if (tone == SKINNY_NOTONE) { + /* This is bad, mmm'kay? */ + return; + } + + if (tone > 0) { + if (!(req = req_alloc(sizeof(struct start_tone_message), START_TONE_MESSAGE))) + return; + req->data.starttone.tone = htolel(tone); + req->data.starttone.instance = htolel(instance); + req->data.starttone.reference = htolel(reference); + } else { + if (!(req = req_alloc(sizeof(struct stop_tone_message), STOP_TONE_MESSAGE))) + return; + req->data.stoptone.instance = htolel(instance); + req->data.stoptone.reference = htolel(reference); + } + + if (tone > 0) { + req->data.starttone.tone = htolel(tone); + } + transmit_response(s, req); +} + +static void transmit_selectsoftkeys(struct skinnysession *s, int instance, int callid, int softkey) +{ + struct skinny_req *req; + + if (!(req = req_alloc(sizeof(struct select_soft_keys_message), SELECT_SOFT_KEYS_MESSAGE))) + return; + + req->data.selectsoftkey.instance = htolel(instance); + req->data.selectsoftkey.reference = htolel(callid); + req->data.selectsoftkey.softKeySetIndex = htolel(softkey); + req->data.selectsoftkey.validKeyMask = htolel(0xFFFFFFFF); + transmit_response(s, req); +} + +static void transmit_lamp_indication(struct skinnysession *s, int stimulus, int instance, int indication) +{ + struct skinny_req *req; + + if (!(req = req_alloc(sizeof(struct set_lamp_message), SET_LAMP_MESSAGE))) + return; + + req->data.setlamp.stimulus = htolel(stimulus); + req->data.setlamp.stimulusInstance = htolel(instance); + req->data.setlamp.deviceStimulus = htolel(indication); + transmit_response(s, req); +} + +static void transmit_ringer_mode(struct skinnysession *s, int mode) +{ + struct skinny_req *req; + + if (skinnydebug) + ast_verbose("Setting ringer mode to '%d'.\n", mode); + + if (!(req = req_alloc(sizeof(struct set_ringer_message), SET_RINGER_MESSAGE))) + return; + + req->data.setringer.ringerMode = htolel(mode); + /* XXX okay, I don't quite know what this is, but here's what happens (on a 7960). + Note: The phone will always show as ringing on the display. + + 1: phone will audibly ring over and over + 2: phone will audibly ring only once + any other value, will NOT cause the phone to audibly ring + */ + req->data.setringer.unknown1 = htolel(1); + /* XXX the value here doesn't seem to change anything. Must be higher than 0. + Perhaps a packet capture can shed some light on this. */ + req->data.setringer.unknown2 = htolel(1); + transmit_response(s, req); +} + +static void transmit_displaymessage(struct skinnysession *s, const char *text, int instance, int reference) +{ + struct skinny_req *req; + + if (text == 0) { + if (!(req = req_alloc(0, CLEAR_DISPLAY_MESSAGE))) + return; + + req->data.clearpromptstatus.lineInstance = instance; + req->data.clearpromptstatus.callReference = reference; + + if (skinnydebug) + ast_verbose("Clearing Display\n"); + } else { + if (!(req = req_alloc(sizeof(struct displaytext_message), DISPLAYTEXT_MESSAGE))) + return; + + ast_copy_string(req->data.displaytext.text, text, sizeof(req->data.displaytext.text)); + if (skinnydebug) + ast_verbose("Displaying message '%s'\n", req->data.displaytext.text); + } + + transmit_response(s, req); +} + +static void transmit_displaynotify(struct skinnysession *s, const char *text, int t) +{ + struct skinny_req *req; + + if (!(req = req_alloc(sizeof(struct display_notify_message), DISPLAY_NOTIFY_MESSAGE))) + return; + + ast_copy_string(req->data.displaynotify.displayMessage, text, sizeof(req->data.displaynotify.displayMessage)); + req->data.displaynotify.displayTimeout = htolel(t); + + if (skinnydebug) + ast_verbose("Displaying notify '%s'\n", text); + + transmit_response(s, req); +} + +static void transmit_displaypromptstatus(struct skinnysession *s, const char *text, int t, int instance, int callid) +{ + struct skinny_req *req; + + if (text == 0) { + if (!(req = req_alloc(sizeof(struct clear_prompt_message), CLEAR_PROMPT_MESSAGE))) + return; + + req->data.clearpromptstatus.lineInstance = htolel(instance); + req->data.clearpromptstatus.callReference = htolel(callid); + + if (skinnydebug) + ast_verbose("Clearing Prompt\n"); + } else { + if (!(req = req_alloc(sizeof(struct display_prompt_status_message), DISPLAY_PROMPT_STATUS_MESSAGE))) + return; + + ast_copy_string(req->data.displaypromptstatus.promptMessage, text, sizeof(req->data.displaypromptstatus.promptMessage)); + req->data.displaypromptstatus.messageTimeout = htolel(t); + req->data.displaypromptstatus.lineInstance = htolel(instance); + req->data.displaypromptstatus.callReference = htolel(callid); + + if (skinnydebug) + ast_verbose("Displaying Prompt Status '%s'\n", text); + } + + transmit_response(s, req); +} + +static void transmit_dialednumber(struct skinnysession *s, const char *text, int instance, int callid) +{ + struct skinny_req *req; + + if (!(req = req_alloc(sizeof(struct dialed_number_message), DIALED_NUMBER_MESSAGE))) + return; + + ast_copy_string(req->data.dialednumber.dialedNumber, text, sizeof(req->data.dialednumber.dialedNumber)); + req->data.dialednumber.lineInstance = htolel(instance); + req->data.dialednumber.callReference = htolel(callid); + + transmit_response(s, req); +} + +static void transmit_callstate(struct skinnysession *s, int instance, int state, unsigned callid) +{ + struct skinny_req *req; + + if (state == SKINNY_ONHOOK) { + if (!(req = req_alloc(sizeof(struct close_receive_channel_message), CLOSE_RECEIVE_CHANNEL_MESSAGE))) + return; + + req->data.closereceivechannel.conferenceId = htolel(callid); + req->data.closereceivechannel.partyId = htolel(callid); + transmit_response(s, req); + + if (!(req = req_alloc(sizeof(struct stop_media_transmission_message), STOP_MEDIA_TRANSMISSION_MESSAGE))) + return; + + req->data.stopmedia.conferenceId = htolel(callid); + req->data.stopmedia.passThruPartyId = htolel(callid); + transmit_response(s, req); + + transmit_speaker_mode(s, SKINNY_SPEAKEROFF); + + transmit_displaypromptstatus(s, NULL, 0, instance, callid); + } + + if (!(req = req_alloc(sizeof(struct call_state_message), CALL_STATE_MESSAGE))) + return; + + req->data.callstate.callState = htolel(state); + req->data.callstate.lineInstance = htolel(instance); + req->data.callstate.callReference = htolel(callid); + transmit_response(s, req); + + if (state == SKINNY_ONHOOK) { + transmit_selectsoftkeys(s, 0, 0, KEYDEF_ONHOOK); + } + + if (state == SKINNY_OFFHOOK || state == SKINNY_ONHOOK) { + if (!(req = req_alloc(sizeof(struct activate_call_plane_message), ACTIVATE_CALL_PLANE_MESSAGE))) + return; + + req->data.activatecallplane.lineInstance = htolel(instance); + transmit_response(s, req); + } +} + + +static void transmit_cfwdstate(struct skinnysession *s, struct skinny_line *l) +{ + struct skinny_req *req; + int anyon = 0; + + if (!(req = req_alloc(sizeof(struct forward_stat_message), FORWARD_STAT_MESSAGE))) + return; + + if (l->cfwdtype & SKINNY_CFWD_ALL) { + if (!ast_strlen_zero(l->call_forward_all)) { + ast_copy_string(req->data.forwardstat.fwdallnum, l->call_forward_all, sizeof(req->data.forwardstat.fwdallnum)); + req->data.forwardstat.fwdall = htolel(1); + anyon++; + } else { + req->data.forwardstat.fwdall = htolel(0); + } + } + if (l->cfwdtype & SKINNY_CFWD_BUSY) { + if (!ast_strlen_zero(l->call_forward_busy)) { + ast_copy_string(req->data.forwardstat.fwdbusynum, l->call_forward_busy, sizeof(req->data.forwardstat.fwdbusynum)); + req->data.forwardstat.fwdbusy = htolel(1); + anyon++; + } else { + req->data.forwardstat.fwdbusy = htolel(0); + } + } + if (l->cfwdtype & SKINNY_CFWD_NOANSWER) { + if (!ast_strlen_zero(l->call_forward_noanswer)) { + ast_copy_string(req->data.forwardstat.fwdnoanswernum, l->call_forward_noanswer, sizeof(req->data.forwardstat.fwdnoanswernum)); + req->data.forwardstat.fwdnoanswer = htolel(1); + anyon++; + } else { + req->data.forwardstat.fwdnoanswer = htolel(0); + } + } + req->data.forwardstat.lineNumber = htolel(l->instance); + if (anyon) + req->data.forwardstat.activeforward = htolel(7); + else + req->data.forwardstat.activeforward = htolel(0); + + transmit_response(s, req); +} + +static int skinny_extensionstate_cb(char *context, char *exten, int state, void *data) +{ + struct skinny_speeddial *sd = data; + struct skinny_device *d = sd->parent; + struct skinnysession *s = d->session; + char hint[AST_MAX_EXTENSION]; + int callstate = SKINNY_CALLREMOTEMULTILINE; + int lamp = SKINNY_LAMP_OFF; + + switch (state) { + case AST_EXTENSION_DEACTIVATED: /* Retry after a while */ + case AST_EXTENSION_REMOVED: /* Extension is gone */ + ast_verb(2, "Extension state: Watcher for hint %s %s. Notify Device %s\n", exten, state == AST_EXTENSION_DEACTIVATED ? "deactivated" : "removed", d->name); + sd->stateid = -1; + callstate = SKINNY_ONHOOK; + lamp = SKINNY_LAMP_OFF; + break; + case AST_EXTENSION_RINGING: + case AST_EXTENSION_UNAVAILABLE: + callstate = SKINNY_RINGIN; + lamp = SKINNY_LAMP_BLINK; + break; + case AST_EXTENSION_BUSY: /* callstate = SKINNY_BUSY wasn't wanting to work - I'll settle for this */ + case AST_EXTENSION_INUSE: + callstate = SKINNY_CALLREMOTEMULTILINE; + lamp = SKINNY_LAMP_ON; + break; + case AST_EXTENSION_ONHOLD: + callstate = SKINNY_HOLD; + lamp = SKINNY_LAMP_WINK; + break; + case AST_EXTENSION_NOT_INUSE: + default: + callstate = SKINNY_ONHOOK; + lamp = SKINNY_LAMP_OFF; + break; + } + + if (ast_get_hint(hint, sizeof(hint), NULL, 0, NULL, sd->context, sd->exten)) { + /* If they are not registered, we will override notification and show no availability */ + if (ast_device_state(hint) == AST_DEVICE_UNAVAILABLE) { + callstate = SKINNY_ONHOOK; + lamp = SKINNY_LAMP_FLASH; + } + } + + transmit_lamp_indication(s, STIMULUS_LINE, sd->instance, lamp); + transmit_callstate(s, sd->instance, callstate, 0); + sd->laststate = state; + + return 0; +} + +static int has_voicemail(struct skinny_line *l) +{ + return ast_app_has_voicemail(l->mailbox, NULL); +} + +static void do_housekeeping(struct skinnysession *s) +{ + int new; + int old; + int device_lamp = 0; + struct skinny_device *d = s->device; + struct skinny_line *l; + + /* Update time on device */ + handle_time_date_req_message(NULL, s); + + /* Set MWI on individual lines */ + for (l = d->lines; l; l = l->next) { + if (has_voicemail(l)) { + if (skinnydebug) + ast_verbose("Checking for voicemail Skinny %s@%s\n", l->name, d->name); + ast_app_inboxcount(l->mailbox, &new, &old); + if (skinnydebug) + ast_verbose("Skinny %s@%s has voicemail!\n", l->name, d->name); + transmit_lamp_indication(s, STIMULUS_VOICEMAIL, l->instance, l->mwiblink?SKINNY_LAMP_BLINK:SKINNY_LAMP_ON); + device_lamp++; + } else { + transmit_lamp_indication(s, STIMULUS_VOICEMAIL, l->instance, SKINNY_LAMP_OFF); + } + } + /* If at least one line has VM, turn the device level lamp on */ + if (device_lamp) + transmit_lamp_indication(s, STIMULUS_VOICEMAIL, 0, SKINNY_LAMP_ON); + else + transmit_lamp_indication(s, STIMULUS_VOICEMAIL, 0, SKINNY_LAMP_OFF); +} + +/* I do not believe skinny can deal with video. + Anyone know differently? */ +/* Yes, it can. Currently 7985 and Cisco VT Advantage do video. */ +static enum ast_rtp_get_result skinny_get_vrtp_peer(struct ast_channel *c, struct ast_rtp **rtp) +{ + struct skinny_subchannel *sub = NULL; + + if (!(sub = c->tech_pvt) || !(sub->vrtp)) + return AST_RTP_GET_FAILED; + + *rtp = sub->vrtp; + + return AST_RTP_TRY_NATIVE; +} + +static enum ast_rtp_get_result skinny_get_rtp_peer(struct ast_channel *c, struct ast_rtp **rtp) +{ + struct skinny_subchannel *sub = NULL; + struct skinny_line *l; + enum ast_rtp_get_result res = AST_RTP_TRY_NATIVE; + + if (skinnydebug) + ast_verbose("skinny_get_rtp_peer() Channel = %s\n", c->name); + + + if (!(sub = c->tech_pvt)) + return AST_RTP_GET_FAILED; + + ast_mutex_lock(&sub->lock); + + if (!(sub->rtp)){ + ast_mutex_unlock(&sub->lock); + return AST_RTP_GET_FAILED; + } + + *rtp = sub->rtp; + + l = sub->parent; + + if (!l->canreinvite || l->nat){ + res = AST_RTP_TRY_PARTIAL; + if (skinnydebug) + ast_verbose("skinny_get_rtp_peer() Using AST_RTP_TRY_PARTIAL \n"); + } + + ast_mutex_unlock(&sub->lock); + + return res; + +} + +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) +{ + struct skinny_subchannel *sub; + struct skinny_line *l; + struct skinny_device *d; + struct skinnysession *s; + struct ast_format_list fmt; + struct sockaddr_in us; + struct sockaddr_in them; + struct skinny_req *req; + + sub = c->tech_pvt; + + if (c->_state != AST_STATE_UP) + return 0; + + if (!sub) { + return -1; + } + + l = sub->parent; + d = l->parent; + s = d->session; + + if (rtp){ + ast_rtp_get_peer(rtp, &them); + + /* Shutdown any early-media or previous media on re-invite */ + if (!(req = req_alloc(sizeof(struct stop_media_transmission_message), STOP_MEDIA_TRANSMISSION_MESSAGE))) + return -1; + + req->data.stopmedia.conferenceId = htolel(sub->callid); + req->data.stopmedia.passThruPartyId = htolel(sub->callid); + transmit_response(s, req); + + if (skinnydebug) + ast_verbose("Peerip = %s:%d\n", ast_inet_ntoa(them.sin_addr), ntohs(them.sin_port)); + + if (!(req = req_alloc(sizeof(struct start_media_transmission_message), START_MEDIA_TRANSMISSION_MESSAGE))) + return -1; + + fmt = ast_codec_pref_getsize(&l->prefs, ast_best_codec(l->capability)); + + if (skinnydebug) + ast_verbose("Setting payloadType to '%d' (%d ms)\n", fmt.bits, fmt.cur_ms); + + req->data.startmedia.conferenceId = htolel(sub->callid); + req->data.startmedia.passThruPartyId = htolel(sub->callid); + if (!(l->canreinvite) || (l->nat)){ + ast_rtp_get_us(rtp, &us); + req->data.startmedia.remoteIp = htolel(d->ourip.s_addr); + req->data.startmedia.remotePort = htolel(ntohs(us.sin_port)); + } else { + req->data.startmedia.remoteIp = htolel(them.sin_addr.s_addr); + req->data.startmedia.remotePort = htolel(ntohs(them.sin_port)); + } + req->data.startmedia.packetSize = htolel(fmt.cur_ms); + req->data.startmedia.payloadType = htolel(codec_ast2skinny(fmt.bits)); + req->data.startmedia.qualifier.precedence = htolel(127); + req->data.startmedia.qualifier.vad = htolel(0); + req->data.startmedia.qualifier.packets = htolel(0); + req->data.startmedia.qualifier.bitRate = htolel(0); + transmit_response(s, req); + + return 0; + } + /* Need a return here to break the bridge */ + return 0; +} + +static struct ast_rtp_protocol skinny_rtp = { + .type = "Skinny", + .get_rtp_info = skinny_get_rtp_peer, + .get_vrtp_info = skinny_get_vrtp_peer, + .set_rtp_peer = skinny_set_rtp_peer, +}; + +static char *handle_skinny_set_debug(struct ast_cli_entry *e, int cmd, struct ast_cli_args *a) +{ + switch (cmd) { + case CLI_INIT: + e->command = "skinny set debug"; + e->usage = + "Usage: skinny set debug\n" + " Enables dumping of Skinny packets for debugging purposes\n"; + return NULL; + case CLI_GENERATE: + return NULL; + } + + if (a->argc != 3) + return CLI_SHOWUSAGE; + + skinnydebug = 1; + ast_cli(a->fd, "Skinny Debugging Enabled\n"); + return CLI_SUCCESS; +} + +static char *handle_skinny_set_debug_off(struct ast_cli_entry *e, int cmd, struct ast_cli_args *a) +{ + switch (cmd) { + case CLI_INIT: + e->command = "skinny set debug off"; + e->usage = + "Usage: skinny set debug off\n" + " Disables dumping of Skinny packets for debugging purposes\n"; + return NULL; + case CLI_GENERATE: + return NULL; + } + + if (a->argc != 4) + return CLI_SHOWUSAGE; + + skinnydebug = 0; + ast_cli(a->fd, "Skinny Debugging Disabled\n"); + return CLI_SUCCESS; +} + +static char *complete_skinny_devices(const char *word, int state) +{ + struct skinny_device *d; + char *result = NULL; + int wordlen = strlen(word), which = 0; + + for (d = devices; d && !result; d = d->next) { + if (!strncasecmp(word, d->id, wordlen) && ++which > state) + result = ast_strdup(d->id); + } + + return result; +} + +static char *complete_skinny_show_device(const char *line, const char *word, int pos, int state) +{ + return (pos == 3 ? ast_strdup(complete_skinny_devices(word, state)) : NULL); +} + +static char *complete_skinny_reset(const char *line, const char *word, int pos, int state) +{ + return (pos == 2 ? ast_strdup(complete_skinny_devices(word, state)) : NULL); +} + +static char *complete_skinny_show_line(const char *line, const char *word, int pos, int state) +{ + struct skinny_device *d; + struct skinny_line *l; + char *result = NULL; + int wordlen = strlen(word), which = 0; + + if (pos != 3) + return NULL; + + for (d = devices; d && !result; d = d->next) { + for (l = d->lines; l && !result; l = l->next) { + if (!strncasecmp(word, l->name, wordlen) && ++which > state) + result = ast_strdup(l->name); + } + } + + return result; +} + +static char *handle_skinny_reset(struct ast_cli_entry *e, int cmd, struct ast_cli_args *a) +{ + struct skinny_device *d; + struct skinny_req *req; + + switch (cmd) { + case CLI_INIT: + e->command = "skinny reset"; + e->usage = + "Usage: skinny reset <DeviceId|DeviceName|all> [restart]\n" + " Causes a Skinny device to reset itself, optionally with a full restart\n"; + return NULL; + case CLI_GENERATE: + return complete_skinny_reset(a->line, a->word, a->pos, a->n); + } + + if (a->argc < 3 || a->argc > 4) + return CLI_SHOWUSAGE; + + ast_mutex_lock(&devicelock); + + for (d = devices; d; d = d->next) { + int fullrestart = 0; + if (!strcasecmp(a->argv[2], d->id) || !strcasecmp(a->argv[2], d->name) || !strcasecmp(a->argv[2], "all")) { + if (!(d->session)) + continue; + + if (!(req = req_alloc(sizeof(struct reset_message), RESET_MESSAGE))) + continue; + + if (a->argc == 4 && !strcasecmp(a->argv[3], "restart")) + fullrestart = 1; + + if (fullrestart) + req->data.reset.resetType = 2; + else + req->data.reset.resetType = 1; + + ast_verb(3, "%s device %s.\n", (fullrestart) ? "Restarting" : "Resetting", d->id); + transmit_response(d->session, req); + } + } + ast_mutex_unlock(&devicelock); + return CLI_SUCCESS; +} + +static char *device2str(int type) +{ + char *tmp; + + switch (type) { + case SKINNY_DEVICE_NONE: + return "No Device"; + case SKINNY_DEVICE_30SPPLUS: + return "30SP Plus"; + case SKINNY_DEVICE_12SPPLUS: + return "12SP Plus"; + case SKINNY_DEVICE_12SP: + return "12SP"; + case SKINNY_DEVICE_12: + return "12"; + case SKINNY_DEVICE_30VIP: + return "30VIP"; + case SKINNY_DEVICE_7910: + return "7910"; + case SKINNY_DEVICE_7960: + return "7960"; + case SKINNY_DEVICE_7940: + return "7940"; + case SKINNY_DEVICE_7935: + return "7935"; + case SKINNY_DEVICE_ATA186: + return "ATA186"; + case SKINNY_DEVICE_7941: + return "7941"; + case SKINNY_DEVICE_7971: + return "7971"; + case SKINNY_DEVICE_7985: + return "7985"; + case SKINNY_DEVICE_7911: + return "7911"; + case SKINNY_DEVICE_7961GE: + return "7961GE"; + case SKINNY_DEVICE_7941GE: + return "7941GE"; + case SKINNY_DEVICE_7921: + return "7921"; + case SKINNY_DEVICE_7905: + return "7905"; + case SKINNY_DEVICE_7920: + return "7920"; + case SKINNY_DEVICE_7970: + return "7970"; + case SKINNY_DEVICE_7912: + return "7912"; + case SKINNY_DEVICE_7902: + return "7902"; + case SKINNY_DEVICE_CIPC: + return "IP Communicator"; + case SKINNY_DEVICE_7961: + return "7961"; + case SKINNY_DEVICE_7936: + return "7936"; + case SKINNY_DEVICE_SCCPGATEWAY_AN: + return "SCCPGATEWAY_AN"; + case SKINNY_DEVICE_SCCPGATEWAY_BRI: + return "SCCPGATEWAY_BRI"; + case SKINNY_DEVICE_UNKNOWN: + return "Unknown"; + default: + if (!(tmp = ast_threadstorage_get(&device2str_threadbuf, DEVICE2STR_BUFSIZE))) + return "Unknown"; + snprintf(tmp, DEVICE2STR_BUFSIZE, "UNKNOWN-%d", type); + return tmp; + } +} + +/*! \brief Print codec list from preference to CLI/manager */ +static void print_codec_to_cli(int fd, struct ast_codec_pref *pref) +{ + int x, codec; + + for(x = 0; x < 32 ; x++) { + codec = ast_codec_pref_index(pref, x); + if (!codec) + break; + ast_cli(fd, "%s", ast_getformatname(codec)); + ast_cli(fd, ":%d", pref->framing[x]); + if (x < 31 && ast_codec_pref_index(pref, x + 1)) + ast_cli(fd, ","); + } + if (!x) + ast_cli(fd, "none"); +} + +static char *handle_skinny_show_devices(struct ast_cli_entry *e, int cmd, struct ast_cli_args *a) +{ + struct skinny_device *d; + struct skinny_line *l; + + switch (cmd) { + case CLI_INIT: + e->command = "skinny show devices"; + e->usage = + "Usage: skinny show devices\n" + " Lists all devices known to the Skinny subsystem.\n"; + return NULL; + case CLI_GENERATE: + return NULL; + } + + if (a->argc != 3) + return CLI_SHOWUSAGE; + + ast_mutex_lock(&devicelock); + + ast_cli(a->fd, "Name DeviceId IP Type R NL\n"); + ast_cli(a->fd, "-------------------- ---------------- --------------- --------------- - --\n"); + + for (d = devices; d; d = d->next) { + int numlines = 0; + + for (l = d->lines; l; l = l->next) + numlines++; + + ast_cli(a->fd, "%-20s %-16s %-15s %-15s %c %2d\n", + d->name, + d->id, + d->session?ast_inet_ntoa(d->session->sin.sin_addr):"", + device2str(d->type), + d->registered?'Y':'N', + numlines); + } + + ast_mutex_unlock(&devicelock); + + return CLI_SUCCESS; +} + +/*! \brief Show device information */ +static char *handle_skinny_show_device(struct ast_cli_entry *e, int cmd, struct ast_cli_args *a) +{ + struct skinny_device *d; + struct skinny_line *l; + struct skinny_speeddial *sd; + struct skinny_addon *sa; + + switch (cmd) { + case CLI_INIT: + e->command = "skinny show device"; + e->usage = + "Usage: skinny show device <DeviceId|DeviceName>\n" + " Lists all deviceinformation of a specific device known to the Skinny subsystem.\n"; + return NULL; + case CLI_GENERATE: + return complete_skinny_show_device(a->line, a->word, a->pos, a->n); + } + + if (a->argc < 4) + return CLI_SHOWUSAGE; + + ast_mutex_lock(&devicelock); + for (d = devices; d; d = d->next) { + if (!strcasecmp(a->argv[3], d->id) || !strcasecmp(a->argv[3], d->name)) { + int numlines = 0, numaddons = 0, numspeeddials = 0; + + for (l = d->lines; l; l = l->next) + numlines++; + + ast_cli(a->fd, "Name: %s\n", d->name); + ast_cli(a->fd, "Id: %s\n", d->id); + ast_cli(a->fd, "version: %s\n", S_OR(d->version_id, "Unknown")); + ast_cli(a->fd, "Ip address: %s\n", (d->session ? ast_inet_ntoa(d->session->sin.sin_addr) : "Unknown")); + ast_cli(a->fd, "Port: %d\n", (d->session ? ntohs(d->session->sin.sin_port) : 0)); + ast_cli(a->fd, "Device Type: %s\n", device2str(d->type)); + ast_cli(a->fd, "Registered: %s\n", (d->registered ? "Yes" : "No")); + ast_cli(a->fd, "Lines: %d\n", numlines); + for (l = d->lines; l; l = l->next) + ast_cli(a->fd, " %s (%s)\n", l->name, l->label); + for (sa = d->addons; sa; sa = sa->next) + numaddons++; + ast_cli(a->fd, "Addons: %d\n", numaddons); + for (sa = d->addons; sa; sa = sa->next) + ast_cli(a->fd, " %s\n", sa->type); + for (sd = d->speeddials; sd; sd = sd->next) + numspeeddials++; + ast_cli(a->fd, "Speeddials: %d\n", numspeeddials); + for (sd = d->speeddials; sd; sd = sd->next) + ast_cli(a->fd, " %s (%s) ishint: %d\n", sd->exten, sd->label, sd->isHint); + } + } + ast_mutex_unlock(&devicelock); + return CLI_SUCCESS; +} + +static char *handle_skinny_show_lines(struct ast_cli_entry *e, int cmd, struct ast_cli_args *a) +{ + struct skinny_device *d; + struct skinny_line *l; + + switch (cmd) { + case CLI_INIT: + e->command = "skinny show lines"; + e->usage = + "Usage: skinny show lines\n" + " Lists all lines known to the Skinny subsystem.\n"; + return NULL; + case CLI_GENERATE: + return NULL; + } + + if (a->argc != 3) + return CLI_SHOWUSAGE; + + ast_mutex_lock(&devicelock); + + ast_cli(a->fd, "Device Name Instance Name Label \n"); + ast_cli(a->fd, "-------------------- -------- -------------------- --------------------\n"); + for (d = devices; d; d = d->next) { + for (l = d->lines; l; l = l->next) { + ast_cli(a->fd, "%-20s %8d %-20s %-20s\n", + d->name, + l->instance, + l->name, + l->label); + } + } + + ast_mutex_unlock(&devicelock); + return CLI_SUCCESS; +} + +/*! \brief List line information. */ +static char *handle_skinny_show_line(struct ast_cli_entry *e, int cmd, struct ast_cli_args *a) +{ + struct skinny_device *d; + struct skinny_line *l; + char codec_buf[512]; + char group_buf[256]; + + switch (cmd) { + case CLI_INIT: + e->command = "skinny show line"; + e->usage = + "Usage: skinny show line <Line> [ on <DeviceID|DeviceName> ]\n" + " List all lineinformation of a specific line known to the Skinny subsystem.\n"; + return NULL; + case CLI_GENERATE: + return complete_skinny_show_line(a->line, a->word, a->pos, a->n); + } + + if (a->argc < 4) + return CLI_SHOWUSAGE; + + ast_mutex_lock(&devicelock); + + /* Show all lines matching the one supplied */ + for (d = devices; d; d = d->next) { + if (a->argc == 6 && (strcasecmp(a->argv[5], d->id) && strcasecmp(a->argv[5], d->name))) + continue; + for (l = d->lines; l; l = l->next) { + if (strcasecmp(a->argv[3], l->name)) + continue; + ast_cli(a->fd, "Line: %s\n", l->name); + ast_cli(a->fd, "On Device: %s\n", d->name); + ast_cli(a->fd, "Line Label: %s\n", l->label); + ast_cli(a->fd, "Extension: %s\n", S_OR(l->exten, "<not set>")); + ast_cli(a->fd, "Context: %s\n", l->context); + ast_cli(a->fd, "CallGroup: %s\n", ast_print_group(group_buf, sizeof(group_buf), l->callgroup)); + ast_cli(a->fd, "PickupGroup: %s\n", ast_print_group(group_buf, sizeof(group_buf), l->pickupgroup)); + ast_cli(a->fd, "Language: %s\n", S_OR(l->language, "<not set>")); + ast_cli(a->fd, "Accountcode: %s\n", S_OR(l->accountcode, "<not set>")); + ast_cli(a->fd, "AmaFlag: %s\n", ast_cdr_flags2str(l->amaflags)); + ast_cli(a->fd, "CallerId Number: %s\n", S_OR(l->cid_num, "<not set>")); + ast_cli(a->fd, "CallerId Name: %s\n", S_OR(l->cid_name, "<not set>")); + ast_cli(a->fd, "Hide CallerId: %s\n", (l->hidecallerid ? "Yes" : "No")); + ast_cli(a->fd, "CFwdAll: %s\n", S_COR((l->cfwdtype & SKINNY_CFWD_ALL), l->call_forward_all, "<not set>")); + ast_cli(a->fd, "CFwdBusy: %s\n", S_COR((l->cfwdtype & SKINNY_CFWD_BUSY), l->call_forward_busy, "<not set>")); + ast_cli(a->fd, "CFwdNoAnswer: %s\n", S_COR((l->cfwdtype & SKINNY_CFWD_NOANSWER), l->call_forward_noanswer, "<not set>")); + ast_cli(a->fd, "VoicemailBox: %s\n", S_OR(l->mailbox, "<not set>")); + ast_cli(a->fd, "VoicemailNumber: %s\n", S_OR(l->vmexten, "<not set>")); + ast_cli(a->fd, "MWIblink: %d\n", l->mwiblink); + ast_cli(a->fd, "Regextension: %s\n", S_OR(l->regexten, "<not set>")); + ast_cli(a->fd, "Regcontext: %s\n", S_OR(l->regcontext, "<not set>")); + ast_cli(a->fd, "MoHInterpret: %s\n", S_OR(l->mohinterpret, "<not set>")); + ast_cli(a->fd, "MoHSuggest: %s\n", S_OR(l->mohsuggest, "<not set>")); + ast_cli(a->fd, "Last dialed nr: %s\n", S_OR(l->lastnumberdialed, "<no calls made yet>")); + ast_cli(a->fd, "Last CallerID: %s\n", S_OR(l->lastcallerid, "<not set>")); + ast_cli(a->fd, "Transfer enabled: %s\n", (l->transfer ? "Yes" : "No")); + ast_cli(a->fd, "Callwaiting: %s\n", (l->callwaiting ? "Yes" : "No")); + ast_cli(a->fd, "3Way Calling: %s\n", (l->threewaycalling ? "Yes" : "No")); + ast_cli(a->fd, "Can forward: %s\n", (l->cancallforward ? "Yes" : "No")); + ast_cli(a->fd, "Do Not Disturb: %s\n", (l->dnd ? "Yes" : "No")); + ast_cli(a->fd, "NAT: %s\n", (l->nat ? "Yes" : "No")); + ast_cli(a->fd, "immediate: %s\n", (l->immediate ? "Yes" : "No")); + ast_cli(a->fd, "Group: %d\n", l->group); + ast_cli(a->fd, "Codecs: "); + ast_getformatname_multiple(codec_buf, sizeof(codec_buf) - 1, l->capability); + ast_cli(a->fd, "%s\n", codec_buf); + ast_cli(a->fd, "Codec Order: ("); + print_codec_to_cli(a->fd, &l->prefs); + ast_cli(a->fd, ")\n"); + ast_cli(a->fd, "\n"); + } + } + + ast_mutex_unlock(&devicelock); + return CLI_SUCCESS; +} + +/*! \brief List global settings for the Skinny subsystem. */ +static char *handle_skinny_show_settings(struct ast_cli_entry *e, int cmd, struct ast_cli_args *a) +{ + switch (cmd) { + case CLI_INIT: + e->command = "skinny show settings"; + e->usage = + "Usage: skinny show settings\n" + " Lists all global configuration settings of the Skinny subsystem.\n"; + return NULL; + case CLI_GENERATE: + return NULL; + } + + if (a->argc != 3) + return CLI_SHOWUSAGE; + + ast_cli(a->fd, "\nGlobal Settings:\n"); + ast_cli(a->fd, " Skinny Port: %d\n", ntohs(bindaddr.sin_port)); + ast_cli(a->fd, " Bindaddress: %s\n", ast_inet_ntoa(bindaddr.sin_addr)); + ast_cli(a->fd, " KeepAlive: %d\n", keep_alive); + ast_cli(a->fd, " Date Format: %s\n", date_format); + ast_cli(a->fd, " Voice Mail Extension: %s\n", S_OR(vmexten, "(not set)")); + ast_cli(a->fd, " Reg. context: %s\n", S_OR(regcontext, "(not set)")); + ast_cli(a->fd, " Jitterbuffer enabled: %s\n", (ast_test_flag(&global_jbconf, AST_JB_ENABLED) ? "Yes" : "No")); + ast_cli(a->fd, " Jitterbuffer forced: %s\n", (ast_test_flag(&global_jbconf, AST_JB_FORCED) ? "Yes" : "No")); + ast_cli(a->fd, " Jitterbuffer max size: %ld\n", global_jbconf.max_size); + ast_cli(a->fd, " Jitterbuffer resync: %ld\n", global_jbconf.resync_threshold); + ast_cli(a->fd, " Jitterbuffer impl: %s\n", global_jbconf.impl); + ast_cli(a->fd, " Jitterbuffer log: %s\n", (ast_test_flag(&global_jbconf, AST_JB_LOG) ? "Yes" : "No")); + + return CLI_SUCCESS; +} + +static struct ast_cli_entry cli_skinny[] = { + AST_CLI_DEFINE(handle_skinny_show_devices, "List defined Skinny devices"), + AST_CLI_DEFINE(handle_skinny_show_device, "List Skinny device information"), + AST_CLI_DEFINE(handle_skinny_show_lines, "List defined Skinny lines per device"), + AST_CLI_DEFINE(handle_skinny_show_line, "List Skinny line information"), + AST_CLI_DEFINE(handle_skinny_show_settings, "List global Skinny settings"), + AST_CLI_DEFINE(handle_skinny_set_debug, "Enable Skinny debugging"), + AST_CLI_DEFINE(handle_skinny_set_debug_off, "Disable Skinny debugging"), + AST_CLI_DEFINE(handle_skinny_reset, "Reset Skinny device(s)"), +}; + +#if 0 +static struct skinny_paging_device *build_paging_device(const char *cat, struct ast_variable *v) +{ + return NULL; +} +#endif + +static struct skinny_device *build_device(const char *cat, struct ast_variable *v) +{ + struct skinny_device *d; + struct skinny_line *l; + struct skinny_speeddial *sd; + struct skinny_addon *a; + char device_vmexten[AST_MAX_EXTENSION]; + struct ast_variable *chanvars = NULL; + int lineInstance = 1; + int speeddialInstance = 1; + int y = 0; + + if (!(d = ast_calloc(1, sizeof(*d)))) { + return NULL; + } else { + ast_copy_string(d->name, cat, sizeof(d->name)); + d->lastlineinstance = 1; + d->capability = default_capability; + d->prefs = default_prefs; + if (!ast_strlen_zero(vmexten)) + ast_copy_string(device_vmexten, vmexten, sizeof(device_vmexten)); + else + memset(device_vmexten, 0, sizeof(device_vmexten)); + + while(v) { + if (!strcasecmp(v->name, "host")) { + if (ast_get_ip(&d->addr, v->value)) { + ast_free(d); + return NULL; + } + } else if (!strcasecmp(v->name, "port")) { + d->addr.sin_port = htons(atoi(v->value)); + } else if (!strcasecmp(v->name, "device")) { + ast_copy_string(d->id, v->value, sizeof(d->id)); + } else if (!strcasecmp(v->name, "permit") || !strcasecmp(v->name, "deny")) { + d->ha = ast_append_ha(v->name, v->value, d->ha, NULL); + } else if (!strcasecmp(v->name, "vmexten")) { + ast_copy_string(device_vmexten, v->value, sizeof(device_vmexten)); + } else if (!strcasecmp(v->name, "context")) { + ast_copy_string(context, v->value, sizeof(context)); + } else if (!strcasecmp(v->name, "regexten")) { + ast_copy_string(regexten, v->value, sizeof(regexten)); + } else if (!strcasecmp(v->name, "allow")) { + ast_parse_allow_disallow(&d->prefs, &d->capability, v->value, 1); + } else if (!strcasecmp(v->name, "disallow")) { + ast_parse_allow_disallow(&d->prefs, &d->capability, v->value, 0); + } else if (!strcasecmp(v->name, "version")) { + ast_copy_string(d->version_id, v->value, sizeof(d->version_id)); + } else if (!strcasecmp(v->name, "canreinvite")) { + canreinvite = ast_true(v->value); + } else if (!strcasecmp(v->name, "nat")) { + nat = ast_true(v->value); + } else if (!strcasecmp(v->name, "callerid")) { + if (!strcasecmp(v->value, "asreceived")) { + cid_num[0] = '\0'; + cid_name[0] = '\0'; + } else { + ast_callerid_split(v->value, cid_name, sizeof(cid_name), cid_num, sizeof(cid_num)); + } + } else if (!strcasecmp(v->name, "language")) { + ast_copy_string(language, v->value, sizeof(language)); + } else if (!strcasecmp(v->name, "accountcode")) { + ast_copy_string(accountcode, v->value, sizeof(accountcode)); + } else if (!strcasecmp(v->name, "amaflags")) { + y = ast_cdr_amaflags2int(v->value); + if (y < 0) { + ast_log(LOG_WARNING, "Invalid AMA flags: %s at line %d\n", v->value, v->lineno); + } else { + amaflags = y; + } + } else if (!strcasecmp(v->name, "mohinterpret") || !strcasecmp(v->name, "musiconhold")) { + ast_copy_string(mohinterpret, v->value, sizeof(mohinterpret)); + } else if (!strcasecmp(v->name, "mohsuggest")) { + ast_copy_string(mohsuggest, v->value, sizeof(mohsuggest)); + } else if (!strcasecmp(v->name, "callgroup")) { + cur_callergroup = ast_get_group(v->value); + } else if (!strcasecmp(v->name, "pickupgroup")) { + cur_pickupgroup = ast_get_group(v->value); + } else if (!strcasecmp(v->name, "immediate")) { + immediate = ast_true(v->value); + } else if (!strcasecmp(v->name, "cancallforward")) { + cancallforward = ast_true(v->value); + } else if (!strcasecmp(v->name, "mailbox")) { + ast_copy_string(mailbox, v->value, sizeof(mailbox)); + } else if (!strcasecmp(v->name, "callreturn")) { + callreturn = ast_true(v->value); + } else if (!strcasecmp(v->name, "callwaiting")) { + callwaiting = ast_true(v->value); + } else if (!strcasecmp(v->name, "transfer")) { + transfer = ast_true(v->value); + } else if (!strcasecmp(v->name, "threewaycalling")) { + threewaycalling = ast_true(v->value); + } else if (!strcasecmp(v->name, "mwiblink")) { + mwiblink = ast_true(v->value); + } else if (!strcasecmp(v->name, "linelabel")) { + ast_copy_string(linelabel, v->value, sizeof(linelabel)); + } else if (!strcasecmp(v->name, "setvar")) { + chanvars = add_var(v->value, chanvars); + } else if (!strcasecmp(v->name, "speeddial")) { + if (!(sd = ast_calloc(1, sizeof(*sd)))) { + return NULL; + } else { + char buf[256]; + char *stringp = buf, *exten, *context, *label; + + ast_copy_string(buf, v->value, sizeof(buf)); + exten = strsep(&stringp, ","); + if ((context = strchr(exten, '@'))) { + *context++ = '\0'; + } + label = stringp; + ast_mutex_init(&sd->lock); + ast_copy_string(sd->exten, exten, sizeof(sd->exten)); + if (!ast_strlen_zero(context)) { + sd->isHint = 1; + sd->instance = lineInstance++; + ast_copy_string(sd->context, context, sizeof(sd->context)); + } else { + sd->isHint = 0; + sd->instance = speeddialInstance++; + sd->context[0] = '\0'; + } + ast_copy_string(sd->label, S_OR(label, exten), sizeof(sd->label)); + + sd->parent = d; + + sd->next = d->speeddials; + d->speeddials = sd; + } + } else if (!strcasecmp(v->name, "addon")) { + if (!(a = ast_calloc(1, sizeof(*a)))) { + return NULL; + } else { + ast_mutex_init(&a->lock); + ast_copy_string(a->type, v->value, sizeof(a->type)); + + a->next = d->addons; + d->addons = a; + } + } else if (!strcasecmp(v->name, "trunk") || !strcasecmp(v->name, "line")) { + if (!(l = ast_calloc(1, sizeof(*l)))) { + return NULL; + } else { + ast_mutex_init(&l->lock); + ast_copy_string(l->name, v->value, sizeof(l->name)); + + /* XXX Should we check for uniqueness?? XXX */ + ast_copy_string(l->context, context, sizeof(l->context)); + ast_copy_string(l->cid_num, cid_num, sizeof(l->cid_num)); + ast_copy_string(l->cid_name, cid_name, sizeof(l->cid_name)); + ast_copy_string(l->label, linelabel, sizeof(l->label)); + ast_copy_string(l->language, language, sizeof(l->language)); + ast_copy_string(l->mohinterpret, mohinterpret, sizeof(l->mohinterpret)); + ast_copy_string(l->mohsuggest, mohsuggest, sizeof(l->mohsuggest)); + ast_copy_string(l->regexten, regexten, sizeof(l->regexten)); + ast_copy_string(l->mailbox, mailbox, sizeof(l->mailbox)); + if (!ast_strlen_zero(mailbox)) + ast_verb(3, "Setting mailbox '%s' on %s@%s\n", mailbox, d->name, l->name); + ast_copy_string(l->vmexten, device_vmexten, sizeof(vmexten)); + l->chanvars = chanvars; + l->msgstate = -1; + l->capability = d->capability; + l->prefs = d->prefs; + l->parent = d; + if (!strcasecmp(v->name, "trunk")) { + l->type = TYPE_TRUNK; + } else { + l->type = TYPE_LINE; + } + l->immediate = immediate; + l->callgroup = cur_callergroup; + l->pickupgroup = cur_pickupgroup; + l->callreturn = callreturn; + l->cancallforward = cancallforward; + l->getforward = 0; + set_callforwards(l, NULL, 0); + l->callwaiting = callwaiting; + l->transfer = transfer; + l->threewaycalling = threewaycalling; + l->mwiblink = mwiblink; + l->onhooktime = time(NULL); + l->instance = lineInstance++; + /* ASSUME we're onhook at this point */ + l->hookstate = SKINNY_ONHOOK; + l->nat = nat; + l->canreinvite = canreinvite; + + l->next = d->lines; + d->lines = l; + } + } else { + ast_log(LOG_WARNING, "Don't know keyword '%s' at line %d\n", v->name, v->lineno); + } + v = v->next; + } + + if (!d->lines) { + ast_log(LOG_ERROR, "A Skinny device must have at least one line!\n"); + return NULL; + } + if (/*d->addr.sin_addr.s_addr && */!ntohs(d->addr.sin_port)) { + d->addr.sin_port = htons(DEFAULT_SKINNY_PORT); + } +#if 0 + /* I don't think we need this anymore at all, since d->ourip is set in skinny_register now */ + if (d->addr.sin_addr.s_addr) { + /* XXX See note above, in 'host' option. */ + if (ast_ouraddrfor(&d->addr.sin_addr, &d->ourip)) { + d->ourip = __ourip; + } + } else { + d->ourip = __ourip; + } +#endif + } + return d; +} + +static void start_rtp(struct skinny_subchannel *sub) +{ + struct skinny_line *l = sub->parent; + struct skinny_device *d = l->parent; + int hasvideo = 0; + + ast_mutex_lock(&sub->lock); + /* Allocate the RTP */ + sub->rtp = ast_rtp_new_with_bindaddr(sched, io, 1, 0, bindaddr.sin_addr); + if (hasvideo) + sub->vrtp = ast_rtp_new_with_bindaddr(sched, io, 1, 0, bindaddr.sin_addr); + + if (sub->rtp && sub->owner) { + ast_channel_set_fd(sub->owner, 0, ast_rtp_fd(sub->rtp)); + ast_channel_set_fd(sub->owner, 1, ast_rtcp_fd(sub->rtp)); + } + if (hasvideo && sub->vrtp && sub->owner) { + ast_channel_set_fd(sub->owner, 2, ast_rtp_fd(sub->vrtp)); + ast_channel_set_fd(sub->owner, 3, ast_rtcp_fd(sub->vrtp)); + } + if (sub->rtp) { + ast_rtp_setqos(sub->rtp, tos_audio, cos_audio, "Skinny RTP"); + ast_rtp_setnat(sub->rtp, l->nat); + } + if (sub->vrtp) { + ast_rtp_setqos(sub->vrtp, tos_video, cos_video, "Skinny VRTP"); + ast_rtp_setnat(sub->vrtp, l->nat); + } + /* Set Frame packetization */ + if (sub->rtp) + ast_rtp_codec_setpref(sub->rtp, &l->prefs); + + /* Create the RTP connection */ + transmit_connect(d->session, sub); + ast_mutex_unlock(&sub->lock); +} + +static void *skinny_newcall(void *data) +{ + struct ast_channel *c = data; + struct skinny_subchannel *sub = c->tech_pvt; + struct skinny_line *l = sub->parent; + struct skinny_device *d = l->parent; + struct skinnysession *s = d->session; + int res = 0; + + ast_copy_string(l->lastnumberdialed, c->exten, sizeof(l->lastnumberdialed)); + ast_set_callerid(c, + l->hidecallerid ? "" : l->cid_num, + l->hidecallerid ? "" : l->cid_name, + c->cid.cid_ani ? NULL : l->cid_num); + ast_setstate(c, AST_STATE_RING); + res = ast_pbx_run(c); + if (res) { + ast_log(LOG_WARNING, "PBX exited non-zero\n"); + transmit_tone(s, SKINNY_REORDER, l->instance, sub->callid); + } + return NULL; +} + +static void *skinny_ss(void *data) +{ + struct ast_channel *c = data; + struct skinny_subchannel *sub = c->tech_pvt; + struct skinny_line *l = sub->parent; + struct skinny_device *d = l->parent; + struct skinnysession *s = d->session; + int len = 0; + int timeout = firstdigittimeout; + int res = 0; + int loop_pause = 100; + + ast_verb(3, "Starting simple switch on '%s@%s'\n", l->name, d->name); + + len = strlen(d->exten); + + while (len < AST_MAX_EXTENSION-1) { + res = 1; /* Assume that we will get a digit */ + while (strlen(d->exten) == len){ + ast_safe_sleep(c, loop_pause); + timeout -= loop_pause; + if ( (timeout -= loop_pause) <= 0){ + res = 0; + break; + } + res = 1; + } + + timeout = 0; + len = strlen(d->exten); + + if (!ast_ignore_pattern(c->context, d->exten)) { + transmit_tone(s, SKINNY_SILENCE, l->instance, sub->callid); + } + if (ast_exists_extension(c, c->context, d->exten, 1, l->cid_num)) { + if (!res || !ast_matchmore_extension(c, c->context, d->exten, 1, l->cid_num)) { + if (l->getforward) { + /* Record this as the forwarding extension */ + set_callforwards(l, d->exten, l->getforward); + ast_verb(3, "Setting call forward (%d) to '%s' on channel %s\n", + l->cfwdtype, d->exten, c->name); + transmit_tone(s, SKINNY_DIALTONE, l->instance, sub->callid); + transmit_lamp_indication(s, STIMULUS_FORWARDALL, 1, SKINNY_LAMP_ON); + transmit_displaynotify(s, "CFwd enabled", 10); + transmit_cfwdstate(s, l); + ast_safe_sleep(c, 500); + ast_indicate(c, -1); + ast_safe_sleep(c, 1000); + memset(d->exten, 0, sizeof(d->exten)); + len = 0; + l->getforward = 0; + if (sub->owner && sub->owner->_state != AST_STATE_UP) { + ast_indicate(c, -1); + ast_hangup(c); + } + return NULL; + } else { + ast_copy_string(c->exten, d->exten, sizeof(c->exten)); + ast_copy_string(l->lastnumberdialed, d->exten, sizeof(l->lastnumberdialed)); + memset(d->exten, 0, sizeof(d->exten)); + skinny_newcall(c); + return NULL; + } + } else { + /* It's a match, but they just typed a digit, and there is an ambiguous match, + so just set the timeout to matchdigittimeout and wait some more */ + timeout = matchdigittimeout; + } + } else if (res == 0) { + ast_debug(1, "Not enough digits (%s) (and no ambiguous match)...\n", d->exten); + memset(d->exten, 0, sizeof(d->exten)); + transmit_tone(s, SKINNY_REORDER, l->instance, sub->callid); + if (sub->owner && sub->owner->_state != AST_STATE_UP) { + ast_indicate(c, -1); + ast_hangup(c); + } + return NULL; + } else if (!ast_canmatch_extension(c, c->context, d->exten, 1, c->cid.cid_num) && + ((d->exten[0] != '*') || (!ast_strlen_zero(d->exten) > 2))) { + 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); + memset(d->exten, 0, sizeof(d->exten)); + transmit_tone(s, SKINNY_REORDER, l->instance, sub->callid); + /* hang out for 3 seconds to let congestion play */ + ast_safe_sleep(c, 3000); + break; + } + if (!timeout) { + timeout = gendigittimeout; + } + if (len && !ast_ignore_pattern(c->context, d->exten)) { + ast_indicate(c, -1); + } + } + if (c) + ast_hangup(c); + memset(d->exten, 0, sizeof(d->exten)); + return NULL; +} + + + +static int skinny_call(struct ast_channel *ast, char *dest, int timeout) +{ + int res = 0; + int tone = 0; + struct skinny_subchannel *sub = ast->tech_pvt; + struct skinny_line *l = sub->parent; + struct skinny_device *d = l->parent; + struct skinnysession *s = d->session; + + if (!d->registered) { + ast_log(LOG_ERROR, "Device not registered, cannot call %s\n", dest); + return -1; + } + + if ((ast->_state != AST_STATE_DOWN) && (ast->_state != AST_STATE_RESERVED)) { + ast_log(LOG_WARNING, "skinny_call called on %s, neither down nor reserved\n", ast->name); + return -1; + } + + if (skinnydebug) + ast_verb(3, "skinny_call(%s)\n", ast->name); + + if (l->dnd) { + ast_queue_control(ast, AST_CONTROL_BUSY); + return -1; + } + + switch (l->hookstate) { + case SKINNY_OFFHOOK: + tone = SKINNY_CALLWAITTONE; + break; + case SKINNY_ONHOOK: + tone = SKINNY_ALERT; + break; + default: + ast_log(LOG_ERROR, "Don't know how to deal with hookstate %d\n", l->hookstate); + break; + } + + transmit_callstate(s, l->instance, SKINNY_RINGIN, sub->callid); + transmit_selectsoftkeys(s, l->instance, sub->callid, KEYDEF_RINGIN); + transmit_displaypromptstatus(s, "Ring-In", 0, l->instance, sub->callid); + transmit_callinfo(s, ast->cid.cid_name, ast->cid.cid_num, l->cid_name, l->cid_num, l->instance, sub->callid, 1); + transmit_lamp_indication(s, STIMULUS_LINE, l->instance, SKINNY_LAMP_BLINK); + transmit_ringer_mode(s, SKINNY_RING_INSIDE); + + ast_setstate(ast, AST_STATE_RINGING); + ast_queue_control(ast, AST_CONTROL_RINGING); + sub->outgoing = 1; + return res; +} + +static int skinny_hangup(struct ast_channel *ast) +{ + struct skinny_subchannel *sub = ast->tech_pvt; + struct skinny_line *l; + struct skinny_device *d; + struct skinnysession *s; + + if (!sub) { + ast_debug(1, "Asked to hangup channel not connected\n"); + return 0; + } + l = sub->parent; + d = l->parent; + s = d->session; + if (skinnydebug) + ast_verbose("skinny_hangup(%s) on %s@%s\n", ast->name, l->name, d->name); + + if (d->registered) { + if ((l->type = TYPE_LINE) && (l->hookstate == SKINNY_OFFHOOK)) { + l->hookstate = SKINNY_ONHOOK; + transmit_callstate(s, l->instance, SKINNY_ONHOOK, sub->callid); + transmit_lamp_indication(s, STIMULUS_LINE, l->instance, SKINNY_LAMP_OFF); + transmit_speaker_mode(s, SKINNY_SPEAKEROFF); + } else if ((l->type = TYPE_LINE) && (l->hookstate == SKINNY_ONHOOK)) { + transmit_tone(s, SKINNY_SILENCE, l->instance, sub->callid); + transmit_callstate(s, l->instance, SKINNY_ONHOOK, sub->callid); + transmit_ringer_mode(s, SKINNY_RING_OFF); + transmit_lamp_indication(s, STIMULUS_LINE, l->instance, SKINNY_LAMP_OFF); + do_housekeeping(s); + } + } + ast_mutex_lock(&sub->lock); + sub->owner = NULL; + ast->tech_pvt = NULL; + sub->alreadygone = 0; + sub->outgoing = 0; + if (sub->rtp) { + ast_rtp_destroy(sub->rtp); + sub->rtp = NULL; + } + ast_mutex_unlock(&sub->lock); + return 0; +} + +static int skinny_answer(struct ast_channel *ast) +{ + int res = 0; + struct skinny_subchannel *sub = ast->tech_pvt; + struct skinny_line *l = sub->parent; + struct skinny_device *d = l->parent; + struct skinnysession *s = d->session; + char exten[AST_MAX_EXTENSION] = ""; + + ast_copy_string(exten, S_OR(ast->macroexten, ast->exten), sizeof(exten)); + + sub->cxmode = SKINNY_CX_SENDRECV; + if (!sub->rtp) { + start_rtp(sub); + } + if (skinnydebug) + ast_verbose("skinny_answer(%s) on %s@%s-%d\n", ast->name, l->name, d->name, sub->callid); + if (ast->_state != AST_STATE_UP) { + ast_setstate(ast, AST_STATE_UP); + } + + transmit_tone(s, SKINNY_SILENCE, l->instance, sub->callid); + /* order matters here... + for some reason, transmit_callinfo must be before transmit_callstate, + or you won't get keypad messages in some situations. */ + transmit_callinfo(s, ast->cid.cid_name, ast->cid.cid_num, exten, exten, l->instance, sub->callid, 2); + transmit_callstate(s, l->instance, SKINNY_CONNECTED, sub->callid); + transmit_selectsoftkeys(s, l->instance, sub->callid, KEYDEF_CONNECTED); + transmit_displaypromptstatus(s, "Connected", 0, l->instance, sub->callid); + return res; +} + +/* Retrieve audio/etc from channel. Assumes sub->lock is already held. */ +static struct ast_frame *skinny_rtp_read(struct skinny_subchannel *sub) +{ + struct ast_channel *ast = sub->owner; + struct ast_frame *f; + + if (!sub->rtp) { + /* We have no RTP allocated for this channel */ + return &ast_null_frame; + } + + switch(ast->fdno) { + case 0: + f = ast_rtp_read(sub->rtp); /* RTP Audio */ + break; + case 1: + f = ast_rtcp_read(sub->rtp); /* RTCP Control Channel */ + break; + case 2: + f = ast_rtp_read(sub->vrtp); /* RTP Video */ + break; + case 3: + f = ast_rtcp_read(sub->vrtp); /* RTCP Control Channel for video */ + break; +#if 0 + case 5: + /* Not yet supported */ + f = ast_udptl_read(sub->udptl); /* UDPTL for T.38 */ + break; +#endif + default: + f = &ast_null_frame; + } + + if (ast) { + /* We already hold the channel lock */ + if (f->frametype == AST_FRAME_VOICE) { + if (f->subclass != ast->nativeformats) { + ast_debug(1, "Oooh, format changed to %d\n", f->subclass); + ast->nativeformats = f->subclass; + ast_set_read_format(ast, ast->readformat); + ast_set_write_format(ast, ast->writeformat); + } + } + } + return f; +} + +static struct ast_frame *skinny_read(struct ast_channel *ast) +{ + struct ast_frame *fr; + struct skinny_subchannel *sub = ast->tech_pvt; + ast_mutex_lock(&sub->lock); + fr = skinny_rtp_read(sub); + ast_mutex_unlock(&sub->lock); + return fr; +} + +static int skinny_write(struct ast_channel *ast, struct ast_frame *frame) +{ + struct skinny_subchannel *sub = ast->tech_pvt; + int res = 0; + if (frame->frametype != AST_FRAME_VOICE) { + if (frame->frametype == AST_FRAME_IMAGE) { + return 0; + } else { + ast_log(LOG_WARNING, "Can't send %d type frames with skinny_write\n", frame->frametype); + return 0; + } + } else { + if (!(frame->subclass & ast->nativeformats)) { + ast_log(LOG_WARNING, "Asked to transmit frame type %d, while native formats is %d (read/write = %d/%d)\n", + frame->subclass, ast->nativeformats, ast->readformat, ast->writeformat); + return -1; + } + } + if (sub) { + ast_mutex_lock(&sub->lock); + if (sub->rtp) { + res = ast_rtp_write(sub->rtp, frame); + } + ast_mutex_unlock(&sub->lock); + } + return res; +} + +static int skinny_fixup(struct ast_channel *oldchan, struct ast_channel *newchan) +{ + struct skinny_subchannel *sub = newchan->tech_pvt; + ast_log(LOG_NOTICE, "skinny_fixup(%s, %s)\n", oldchan->name, newchan->name); + if (sub->owner != oldchan) { + ast_log(LOG_WARNING, "old channel wasn't %p but was %p\n", oldchan, sub->owner); + return -1; + } + sub->owner = newchan; + return 0; +} + +static int skinny_senddigit_begin(struct ast_channel *ast, char digit) +{ + return -1; /* Start inband indications */ +} + +static int skinny_senddigit_end(struct ast_channel *ast, char digit, unsigned int duration) +{ +#if 0 + struct skinny_subchannel *sub = ast->tech_pvt; + struct skinny_line *l = sub->parent; + struct skinny_device *d = l->parent; + int tmp; + /* not right */ + sprintf(tmp, "%d", digit); + transmit_tone(d->session, digit, l->instance, sub->callid); +#endif + return -1; /* Stop inband indications */ +} + +static int get_devicestate(struct skinny_line *l) +{ + struct skinny_subchannel *sub; + int res = AST_DEVICE_UNKNOWN; + + if (!l) + res = AST_DEVICE_INVALID; + else if (!l->parent) + res = AST_DEVICE_UNAVAILABLE; + else if (l->dnd) + res = AST_DEVICE_BUSY; + else { + if (l->hookstate == SKINNY_ONHOOK) { + res = AST_DEVICE_NOT_INUSE; + } else { + res = AST_DEVICE_INUSE; + } + + for (sub = l->sub; sub; sub = sub->next) { + if (sub->onhold) { + res = AST_DEVICE_ONHOLD; + break; + } + } + } + + return res; +} + +static char *control2str(int ind) { + char *tmp; + + switch (ind) { + case AST_CONTROL_HANGUP: + return "Other end has hungup"; + case AST_CONTROL_RING: + return "Local ring"; + case AST_CONTROL_RINGING: + return "Remote end is ringing"; + case AST_CONTROL_ANSWER: + return "Remote end has answered"; + case AST_CONTROL_BUSY: + return "Remote end is busy"; + case AST_CONTROL_TAKEOFFHOOK: + return "Make it go off hook"; + case AST_CONTROL_OFFHOOK: + return "Line is off hook"; + case AST_CONTROL_CONGESTION: + return "Congestion (circuits busy)"; + case AST_CONTROL_FLASH: + return "Flash hook"; + case AST_CONTROL_WINK: + return "Wink"; + case AST_CONTROL_OPTION: + return "Set a low-level option"; + case AST_CONTROL_RADIO_KEY: + return "Key Radio"; + case AST_CONTROL_RADIO_UNKEY: + return "Un-Key Radio"; + case AST_CONTROL_PROGRESS: + return "Remote end is making Progress"; + case AST_CONTROL_PROCEEDING: + return "Remote end is proceeding"; + case AST_CONTROL_HOLD: + return "Hold"; + case AST_CONTROL_UNHOLD: + return "Unhold"; + case -1: + return "Stop tone"; + default: + if (!(tmp = ast_threadstorage_get(&control2str_threadbuf, CONTROL2STR_BUFSIZE))) + return "Unknown"; + snprintf(tmp, CONTROL2STR_BUFSIZE, "UNKNOWN-%d", ind); + return tmp; + } +} + + +static int skinny_indicate(struct ast_channel *ast, int ind, const void *data, size_t datalen) +{ + struct skinny_subchannel *sub = ast->tech_pvt; + struct skinny_line *l = sub->parent; + struct skinny_device *d = l->parent; + struct skinnysession *s = d->session; + char exten[AST_MAX_EXTENSION] = ""; + + if (!s) { + ast_log(LOG_NOTICE, "Asked to indicate '%s' condition on channel %s, but session does not exist.\n", control2str(ind), ast->name); + return -1; + } + + ast_copy_string(exten, S_OR(ast->macroexten, ast->exten), sizeof(exten)); + + if (skinnydebug) + ast_verb(3, "Asked to indicate '%s' condition on channel %s\n", control2str(ind), ast->name); + switch(ind) { + case AST_CONTROL_RINGING: + if (ast->_state != AST_STATE_UP) { + if (!sub->progress) { + transmit_tone(s, SKINNY_ALERT, l->instance, sub->callid); + transmit_callstate(s, l->instance, SKINNY_RINGOUT, sub->callid); + transmit_dialednumber(s, exten, l->instance, sub->callid); + transmit_displaypromptstatus(s, "Ring Out", 0, l->instance, sub->callid); + transmit_callinfo(s, ast->cid.cid_name, ast->cid.cid_num, exten, exten, l->instance, sub->callid, 2); /* 2 = outgoing from phone */ + sub->ringing = 1; + break; + } + } + return -1; + case AST_CONTROL_BUSY: + if (ast->_state != AST_STATE_UP) { + transmit_tone(s, SKINNY_BUSYTONE, l->instance, sub->callid); + transmit_callstate(s, l->instance, SKINNY_BUSY, sub->callid); + sub->alreadygone = 1; + ast_softhangup_nolock(ast, AST_SOFTHANGUP_DEV); + break; + } + return -1; + case AST_CONTROL_CONGESTION: + if (ast->_state != AST_STATE_UP) { + transmit_tone(s, SKINNY_REORDER, l->instance, sub->callid); + transmit_callstate(s, l->instance, SKINNY_CONGESTION, sub->callid); + sub->alreadygone = 1; + ast_softhangup_nolock(ast, AST_SOFTHANGUP_DEV); + break; + } + return -1; + case AST_CONTROL_PROGRESS: + if ((ast->_state != AST_STATE_UP) && !sub->progress && !sub->outgoing) { + transmit_tone(s, SKINNY_ALERT, l->instance, sub->callid); + transmit_callstate(s, l->instance, SKINNY_PROGRESS, sub->callid); + transmit_displaypromptstatus(s, "Call Progress", 0, l->instance, sub->callid); + transmit_callinfo(s, ast->cid.cid_name, ast->cid.cid_num, exten, exten, l->instance, sub->callid, 2); /* 2 = outgoing from phone */ + sub->progress = 1; + break; + } + return -1; + case -1: + transmit_tone(s, SKINNY_SILENCE, l->instance, sub->callid); + break; + case AST_CONTROL_HOLD: + ast_moh_start(ast, data, l->mohinterpret); + break; + case AST_CONTROL_UNHOLD: + ast_moh_stop(ast); + break; + case AST_CONTROL_PROCEEDING: + break; + default: + ast_log(LOG_WARNING, "Don't know how to indicate condition %d\n", ind); + return -1; + } + return 0; +} + +static struct ast_channel *skinny_new(struct skinny_line *l, int state) +{ + struct ast_channel *tmp; + struct skinny_subchannel *sub; + struct skinny_device *d = l->parent; + struct ast_variable *v = NULL; + int fmt; + + tmp = ast_channel_alloc(1, state, l->cid_num, l->cid_name, l->accountcode, l->exten, l->context, l->amaflags, "Skinny/%s@%s-%d", l->name, d->name, callnums); + if (!tmp) { + ast_log(LOG_WARNING, "Unable to allocate channel structure\n"); + return NULL; + } else { + sub = ast_calloc(1, sizeof(*sub)); + if (!sub) { + ast_log(LOG_WARNING, "Unable to allocate Skinny subchannel\n"); + return NULL; + } else { + ast_mutex_init(&sub->lock); + + sub->owner = tmp; + sub->callid = callnums++; + d->lastlineinstance = l->instance; + d->lastcallreference = sub->callid; + sub->cxmode = SKINNY_CX_INACTIVE; + sub->nat = l->nat; + sub->parent = l; + sub->onhold = 0; + + sub->next = l->sub; + l->sub = sub; + } + tmp->tech = &skinny_tech; + tmp->tech_pvt = sub; + tmp->nativeformats = l->capability; + if (!tmp->nativeformats) + tmp->nativeformats = default_capability; + fmt = ast_best_codec(tmp->nativeformats); + if (skinnydebug) + ast_verbose("skinny_new: tmp->nativeformats=%d fmt=%d\n", tmp->nativeformats, fmt); + if (sub->rtp) { + ast_channel_set_fd(tmp, 0, ast_rtp_fd(sub->rtp)); + } + if (state == AST_STATE_RING) { + tmp->rings = 1; + } + tmp->writeformat = fmt; + tmp->rawwriteformat = fmt; + tmp->readformat = fmt; + tmp->rawreadformat = fmt; + if (!ast_strlen_zero(l->language)) + ast_string_field_set(tmp, language, l->language); + if (!ast_strlen_zero(l->accountcode)) + ast_string_field_set(tmp, accountcode, l->accountcode); + if (l->amaflags) + tmp->amaflags = l->amaflags; + + ast_module_ref(ast_module_info->self); + tmp->callgroup = l->callgroup; + tmp->pickupgroup = l->pickupgroup; + + /* XXX Need to figure out how to handle CFwdNoAnswer */ + if (l->cfwdtype & SKINNY_CFWD_ALL) { + ast_string_field_set(tmp, call_forward, l->call_forward_all); + } else if (l->cfwdtype & SKINNY_CFWD_BUSY) { + if (get_devicestate(l) != AST_DEVICE_NOT_INUSE) { + ast_string_field_set(tmp, call_forward, l->call_forward_busy); + } + } + + ast_copy_string(tmp->context, l->context, sizeof(tmp->context)); + ast_copy_string(tmp->exten, l->exten, sizeof(tmp->exten)); + + /* Don't use ast_set_callerid() here because it will + * generate a needless NewCallerID event */ + tmp->cid.cid_ani = ast_strdup(l->cid_num); + + tmp->priority = 1; + tmp->adsicpe = AST_ADSI_UNAVAILABLE; + + if (sub->rtp) + ast_jb_configure(tmp, &global_jbconf); + + /* Set channel variables for this call from configuration */ + for (v = l->chanvars ; v ; v = v->next) + pbx_builtin_setvar_helper(tmp, v->name, v->value); + + if (state != AST_STATE_DOWN) { + if (ast_pbx_start(tmp)) { + ast_log(LOG_WARNING, "Unable to start PBX on %s\n", tmp->name); + ast_hangup(tmp); + tmp = NULL; + } + } + } + return tmp; +} + +static int skinny_hold(struct skinny_subchannel *sub) +{ + struct skinny_line *l = sub->parent; + struct skinny_device *d = l->parent; + struct skinnysession *s = d->session; + struct skinny_req *req; + + /* Don't try to hold a channel that doesn't exist */ + if (!sub || !sub->owner) + return 0; + + /* Channel needs to be put on hold */ + if (skinnydebug) + ast_verbose("Putting on Hold(%d)\n", l->instance); + + ast_queue_control_data(sub->owner, AST_CONTROL_HOLD, + S_OR(l->mohsuggest, NULL), + !ast_strlen_zero(l->mohsuggest) ? strlen(l->mohsuggest) + 1 : 0); + + if (!(req = req_alloc(sizeof(struct activate_call_plane_message), ACTIVATE_CALL_PLANE_MESSAGE))) + return 0; + + req->data.activatecallplane.lineInstance = htolel(l->instance); + transmit_response(s, req); + + if (!(req = req_alloc(sizeof(struct close_receive_channel_message), CLOSE_RECEIVE_CHANNEL_MESSAGE))) + return 0; + + req->data.closereceivechannel.conferenceId = htolel(sub->callid); + req->data.closereceivechannel.partyId = htolel(sub->callid); + transmit_response(s, req); + + if (!(req = req_alloc(sizeof(struct stop_media_transmission_message), STOP_MEDIA_TRANSMISSION_MESSAGE))) + return 0; + + req->data.stopmedia.conferenceId = htolel(sub->callid); + req->data.stopmedia.passThruPartyId = htolel(sub->callid); + transmit_response(s, req); + + transmit_lamp_indication(s, STIMULUS_LINE, l->instance, SKINNY_LAMP_WINK); + sub->onhold = 1; + return 1; +} + +static int skinny_unhold(struct skinny_subchannel *sub) +{ + struct skinny_line *l = sub->parent; + struct skinny_device *d = l->parent; + struct skinnysession *s = d->session; + struct skinny_req *req; + + /* Don't try to unhold a channel that doesn't exist */ + if (!sub || !sub->owner) + return 0; + + /* Channel is on hold, so we will unhold */ + if (skinnydebug) + ast_verbose("Taking off Hold(%d)\n", l->instance); + + ast_queue_control(sub->owner, AST_CONTROL_UNHOLD); + + if (!(req = req_alloc(sizeof(struct activate_call_plane_message), ACTIVATE_CALL_PLANE_MESSAGE))) + return 0; + + req->data.activatecallplane.lineInstance = htolel(l->instance); + transmit_response(s, req); + + transmit_connect(s, sub); + transmit_lamp_indication(s, STIMULUS_LINE, l->instance, SKINNY_LAMP_ON); + sub->onhold = 0; + return 1; +} + +static int handle_keep_alive_message(struct skinny_req *req, struct skinnysession *s) +{ + if (!(req = req_alloc(0, KEEP_ALIVE_ACK_MESSAGE))) + return -1; + + transmit_response(s, req); + do_housekeeping(s); + return 1; +} + +static int handle_register_message(struct skinny_req *req, struct skinnysession *s) +{ + char name[16]; + int res; + + memcpy(&name, req->data.reg.name, sizeof(name)); + + res = skinny_register(req, s); + if (!res) { + ast_log(LOG_ERROR, "Rejecting Device %s: Device not found\n", name); + if (!(req = req_alloc(sizeof(struct register_rej_message), REGISTER_REJ_MESSAGE))) + return -1; + + snprintf(req->data.regrej.errMsg, sizeof(req->data.regrej.errMsg), "No Authority: %s", name); + transmit_response(s, req); + return 0; + } + ast_verb(3, "Device '%s' successfully registered\n", name); + + if (!(req = req_alloc(sizeof(struct register_ack_message), REGISTER_ACK_MESSAGE))) + return -1; + + req->data.regack.res[0] = '0'; + req->data.regack.res[1] = '\0'; + req->data.regack.keepAlive = htolel(keep_alive); + memcpy(req->data.regack.dateTemplate, date_format, sizeof(req->data.regack.dateTemplate)); + req->data.regack.res2[0] = '0'; + req->data.regack.res2[1] = '\0'; + req->data.regack.secondaryKeepAlive = htolel(keep_alive); + transmit_response(s, req); + if (skinnydebug) + ast_verbose("Requesting capabilities\n"); + + if (!(req = req_alloc(0, CAPABILITIES_REQ_MESSAGE))) + return -1; + + transmit_response(s, req); + + return res; +} + +static int handle_callforward_button(struct skinny_subchannel *sub, int cfwdtype) +{ + struct skinny_line *l = sub->parent; + struct skinny_device *d = l->parent; + struct skinnysession *s = d->session; + struct ast_channel *c = sub->owner; + pthread_t t; + + if (l->hookstate == SKINNY_ONHOOK) { + l->hookstate = SKINNY_OFFHOOK; + transmit_speaker_mode(s, SKINNY_SPEAKERON); + transmit_callstate(s, l->instance, SKINNY_OFFHOOK, sub->callid); + } + if (skinnydebug) + ast_verbose("Attempting to Clear display on Skinny %s@%s\n", l->name, d->name); + transmit_displaymessage(s, NULL, l->instance, sub->callid); /* clear display */ + + if (l->cfwdtype & cfwdtype) { + set_callforwards(l, NULL, cfwdtype); + ast_safe_sleep(c, 500); + transmit_speaker_mode(s, SKINNY_SPEAKEROFF); + transmit_callstate(s, l->instance, SKINNY_ONHOOK, sub->callid); + transmit_displaynotify(s, "CFwd disabled", 10); + if (sub->owner && sub->owner->_state != AST_STATE_UP) { + ast_indicate(c, -1); + ast_hangup(c); + } + transmit_cfwdstate(s, l); + } else { + l->getforward = cfwdtype; + transmit_tone(s, SKINNY_DIALTONE, l->instance, sub->callid); + transmit_selectsoftkeys(s, l->instance, sub->callid, KEYDEF_RINGOUT); + if (ast_pthread_create(&t, NULL, skinny_ss, c)) { + ast_log(LOG_WARNING, "Unable to create switch thread: %s\n", strerror(errno)); + ast_hangup(c); + } + } + return 0; +} +static int handle_ip_port_message(struct skinny_req *req, struct skinnysession *s) +{ + /* no response necessary */ + return 1; +} + +static int handle_keypad_button_message(struct skinny_req *req, struct skinnysession *s) +{ + struct skinny_subchannel *sub = NULL; + struct skinny_line *l; + struct skinny_device *d = s->device; + struct ast_frame f = { 0, }; + char dgt; + int digit; + int lineInstance; + int callReference; + + digit = letohl(req->data.keypad.button); + lineInstance = letohl(req->data.keypad.lineInstance); + callReference = letohl(req->data.keypad.callReference); + + if (digit == 14) { + dgt = '*'; + } else if (digit == 15) { + dgt = '#'; + } else if (digit >= 0 && digit <= 9) { + dgt = '0' + digit; + } else { + /* digit=10-13 (A,B,C,D ?), or + * digit is bad value + * + * probably should not end up here, but set + * value for backward compatibility, and log + * a warning. + */ + dgt = '0' + digit; + ast_log(LOG_WARNING, "Unsupported digit %d\n", digit); + } + + f.subclass = dgt; + + f.src = "skinny"; + + if (lineInstance && callReference) + sub = find_subchannel_by_instance_reference(d, lineInstance, callReference); + else + sub = find_subchannel_by_instance_reference(d, d->lastlineinstance, d->lastcallreference); + + if (!sub) + return 0; + + l = sub->parent; + if (sub->owner) { + if (sub->owner->_state == 0) { + f.frametype = AST_FRAME_DTMF_BEGIN; + ast_queue_frame(sub->owner, &f); + } + /* XXX MUST queue this frame to all lines in threeway call if threeway call is active */ + f.frametype = AST_FRAME_DTMF_END; + ast_queue_frame(sub->owner, &f); + /* XXX This seriously needs to be fixed */ + if (sub->next && sub->next->owner) { + if (sub->owner->_state == 0) { + f.frametype = AST_FRAME_DTMF_BEGIN; + ast_queue_frame(sub->next->owner, &f); + } + f.frametype = AST_FRAME_DTMF_END; + ast_queue_frame(sub->next->owner, &f); + } + } else { + if (skinnydebug) + ast_verbose("No owner: %s\n", l->name); + } + return 1; +} + +static int handle_stimulus_message(struct skinny_req *req, struct skinnysession *s) +{ + struct skinny_device *d = s->device; + struct skinny_line *l; + struct skinny_subchannel *sub; + /*struct skinny_speeddial *sd;*/ + struct ast_channel *c; + pthread_t t; + int event; + int instance; + int callreference; + /*int res = 0;*/ + + event = letohl(req->data.stimulus.stimulus); + instance = letohl(req->data.stimulus.stimulusInstance); + callreference = letohl(req->data.stimulus.callreference); + if (skinnydebug) + ast_verbose("callreference in handle_stimulus_message is '%d'\n", callreference); + + /* Note that this call should be using the passed in instance and callreference */ + sub = find_subchannel_by_instance_reference(d, d->lastlineinstance, d->lastcallreference); + + if (!sub) { + l = find_line_by_instance(d, d->lastlineinstance); + if (!l) { + return 0; + } + } else { + l = sub->parent; + } + + switch(event) { + case STIMULUS_REDIAL: + if (skinnydebug) + ast_verbose("Received Stimulus: Redial(%d/%d)\n", instance, callreference); + + if (ast_strlen_zero(l->lastnumberdialed)) { + ast_log(LOG_WARNING, "Attempted redial, but no previously dialed number found.\n"); + l->hookstate = SKINNY_ONHOOK; + transmit_speaker_mode(s, SKINNY_SPEAKEROFF); + transmit_callstate(s, l->instance, SKINNY_ONHOOK, instance); + break; + } + + c = skinny_new(l, AST_STATE_DOWN); + if (!c) { + ast_log(LOG_WARNING, "Unable to create channel for %s@%s\n", l->name, d->name); + } else { + sub = c->tech_pvt; + l = sub->parent; + if (l->hookstate == SKINNY_ONHOOK) { + l->hookstate = SKINNY_OFFHOOK; + transmit_callstate(s, l->instance, SKINNY_OFFHOOK, sub->callid); + } + if (skinnydebug) + ast_verbose("Attempting to Clear display on Skinny %s@%s\n", l->name, d->name); + transmit_displaymessage(s, NULL, l->instance, sub->callid); /* clear display */ + transmit_tone(s, SKINNY_DIALTONE, l->instance, sub->callid); + transmit_selectsoftkeys(s, l->instance, sub->callid, KEYDEF_RINGOUT); + + if (!ast_ignore_pattern(c->context, l->lastnumberdialed)) { + transmit_tone(s, SKINNY_SILENCE, l->instance, sub->callid); + } + ast_copy_string(c->exten, l->lastnumberdialed, sizeof(c->exten)); + if (ast_pthread_create(&t, NULL, skinny_newcall, c)) { + ast_log(LOG_WARNING, "Unable to create new call thread: %s\n", strerror(errno)); + ast_hangup(c); + } + } + break; + case STIMULUS_SPEEDDIAL: + { + struct skinny_speeddial *sd; + + if (skinnydebug) + ast_verbose("Received Stimulus: SpeedDial(%d/%d)\n", instance, callreference); + if (!(sd = find_speeddial_by_instance(d, instance, 0))) { + return 0; + } + + if (!sub || !sub->owner) + c = skinny_new(l, AST_STATE_DOWN); + else + c = sub->owner; + + if (!c) { + ast_log(LOG_WARNING, "Unable to create channel for %s@%s\n", l->name, d->name); + } else { + sub = c->tech_pvt; + l = sub->parent; + if (l->hookstate == SKINNY_ONHOOK) { + l->hookstate = SKINNY_OFFHOOK; + transmit_speaker_mode(s, SKINNY_SPEAKERON); + transmit_callstate(s, l->instance, SKINNY_OFFHOOK, sub->callid); + } + if (skinnydebug) + ast_verbose("Attempting to Clear display on Skinny %s@%s\n", l->name, d->name); + transmit_displaymessage(s, NULL, l->instance, sub->callid); /* clear display */ + transmit_tone(s, SKINNY_DIALTONE, l->instance, sub->callid); + transmit_selectsoftkeys(s, l->instance, sub->callid, KEYDEF_RINGOUT); + + if (!ast_ignore_pattern(c->context, sd->exten)) { + transmit_tone(s, SKINNY_SILENCE, l->instance, sub->callid); + } + if (ast_exists_extension(c, c->context, sd->exten, 1, l->cid_num)) { + ast_copy_string(c->exten, sd->exten, sizeof(c->exten)); + ast_copy_string(l->lastnumberdialed, sd->exten, sizeof(l->lastnumberdialed)); + + if (ast_pthread_create(&t, NULL, skinny_newcall, c)) { + ast_log(LOG_WARNING, "Unable to create new call thread: %s\n", strerror(errno)); + ast_hangup(c); + } + break; + } + } + } + break; + case STIMULUS_HOLD: + if (skinnydebug) + ast_verbose("Received Stimulus: Hold(%d/%d)\n", instance, callreference); + + if (!sub) + break; + + if (sub->onhold) { + skinny_unhold(sub); + } else { + skinny_hold(sub); + } + break; + case STIMULUS_TRANSFER: + if (skinnydebug) + ast_verbose("Received Stimulus: Transfer(%d/%d)\n", instance, callreference); + /* XXX figure out how to transfer */ + break; + case STIMULUS_CONFERENCE: + if (skinnydebug) + ast_verbose("Received Stimulus: Conference(%d/%d)\n", instance, callreference); + /* XXX determine the best way to pull off a conference. Meetme? */ + break; + case STIMULUS_VOICEMAIL: + if (skinnydebug) + ast_verbose("Received Stimulus: Voicemail(%d/%d)\n", instance, callreference); + + if (!sub || !sub->owner) { + c = skinny_new(l, AST_STATE_DOWN); + } else { + c = sub->owner; + } + if (!c) { + ast_log(LOG_WARNING, "Unable to create channel for %s@%s\n", l->name, d->name); + } else { + sub = c->tech_pvt; + l = sub->parent; + + if (ast_strlen_zero(l->vmexten)) /* Exit the call if no VM pilot */ + break; + + if (l->hookstate == SKINNY_ONHOOK){ + l->hookstate = SKINNY_OFFHOOK; + transmit_speaker_mode(s, SKINNY_SPEAKERON); + transmit_callstate(s, l->instance, SKINNY_OFFHOOK, sub->callid); + } + + if (skinnydebug) + ast_verbose("Attempting to Clear display on Skinny %s@%s\n", l->name, d->name); + + transmit_displaymessage(s, NULL, l->instance, sub->callid); /* clear display */ + transmit_tone(s, SKINNY_DIALTONE, l->instance, sub->callid); + transmit_selectsoftkeys(s, l->instance, sub->callid, KEYDEF_RINGOUT); + + if (!ast_ignore_pattern(c->context, vmexten)) { + transmit_tone(s, SKINNY_SILENCE, l->instance, sub->callid); + } + + if (ast_exists_extension(c, c->context, l->vmexten, 1, l->cid_num)) { + ast_copy_string(c->exten, l->vmexten, sizeof(c->exten)); + ast_copy_string(l->lastnumberdialed, l->vmexten, sizeof(l->lastnumberdialed)); + if (ast_pthread_create(&t, NULL, skinny_newcall, c)) { + ast_log(LOG_WARNING, "Unable to create new call thread: %s\n", strerror(errno)); + ast_hangup(c); + } + break; + } + } + break; + case STIMULUS_CALLPARK: + if (skinnydebug) + ast_verbose("Received Stimulus: Park Call(%d/%d)\n", instance, callreference); + /* XXX Park the call */ + break; + case STIMULUS_DND: + if (skinnydebug) + ast_verbose("Received Stimulus: DND (%d/%d)\n", instance, callreference); + + /* Do not disturb */ + if (l->dnd != 0){ + ast_verb(3, "Disabling DND on %s@%s\n", l->name, d->name); + l->dnd = 0; + transmit_lamp_indication(s, STIMULUS_DND, 1, SKINNY_LAMP_ON); + transmit_displaynotify(s, "DnD disabled", 10); + } else { + ast_verb(3, "Enabling DND on %s@%s\n", l->name, d->name); + l->dnd = 1; + transmit_lamp_indication(s, STIMULUS_DND, 1, SKINNY_LAMP_OFF); + transmit_displaynotify(s, "DnD enabled", 10); + } + break; + case STIMULUS_FORWARDALL: + if (skinnydebug) + ast_verbose("Received Stimulus: Forward All(%d/%d)\n", instance, callreference); + + if (!sub || !sub->owner) { + c = skinny_new(l, AST_STATE_DOWN); + } else { + c = sub->owner; + } + + if (!c) { + ast_log(LOG_WARNING, "Unable to create channel for %s@%s\n", l->name, d->name); + } else { + sub = c->tech_pvt; + handle_callforward_button(sub, SKINNY_CFWD_ALL); + } + break; + case STIMULUS_FORWARDBUSY: + if (skinnydebug) + ast_verbose("Received Stimulus: Forward Busy (%d/%d)\n", instance, callreference); + + if (!sub || !sub->owner) { + c = skinny_new(l, AST_STATE_DOWN); + } else { + c = sub->owner; + } + + if (!c) { + ast_log(LOG_WARNING, "Unable to create channel for %s@%s\n", l->name, d->name); + } else { + sub = c->tech_pvt; + handle_callforward_button(sub, SKINNY_CFWD_BUSY); + } + break; + case STIMULUS_FORWARDNOANSWER: + if (skinnydebug) + ast_verbose("Received Stimulus: Forward No Answer (%d/%d)\n", instance, callreference); + +#if 0 /* Not sure how to handle this yet */ + if (!sub || !sub->owner) { + c = skinny_new(l, AST_STATE_DOWN); + } else { + c = sub->owner; + } + + if (!c) { + ast_log(LOG_WARNING, "Unable to create channel for %s@%s\n", l->name, d->name); + } else { + sub = c->tech_pvt; + handle_callforward_button(sub, SKINNY_CFWD_NOANSWER); + } +#endif + break; + case STIMULUS_DISPLAY: + /* Not sure what this is */ + if (skinnydebug) + ast_verbose("Received Stimulus: Display(%d/%d)\n", instance, callreference); + break; + case STIMULUS_LINE: + if (skinnydebug) + ast_verbose("Received Stimulus: Line(%d/%d)\n", instance, callreference); + + l = find_line_by_instance(d, instance); + + if (!l) { + return 0; + } + + /* turn the speaker on */ + transmit_speaker_mode(s, SKINNY_SPEAKERON); + transmit_ringer_mode(s, SKINNY_RING_OFF); + transmit_lamp_indication(s, STIMULUS_LINE, l->instance, SKINNY_LAMP_ON); + + l->hookstate = SKINNY_OFFHOOK; + + ast_device_state_changed("Skinny/%s@%s", l->name, d->name); + + if (sub && sub->outgoing) { + /* We're answering a ringing call */ + ast_queue_control(sub->owner, AST_CONTROL_ANSWER); + transmit_callstate(s, l->instance, SKINNY_OFFHOOK, sub->callid); + transmit_tone(s, SKINNY_SILENCE, l->instance, sub->callid); + transmit_callstate(s, l->instance, SKINNY_CONNECTED, sub->callid); + transmit_displaypromptstatus(s, "Connected", 0, l->instance, sub->callid); + transmit_selectsoftkeys(s, l->instance, sub->callid, KEYDEF_CONNECTED); + start_rtp(sub); + ast_setstate(sub->owner, AST_STATE_UP); + } else { + if (sub && sub->owner) { + ast_debug(1, "Current subchannel [%s] already has owner\n", sub->owner->name); + } else { + c = skinny_new(l, AST_STATE_DOWN); + if (c) { + sub = c->tech_pvt; + transmit_callstate(s, l->instance, SKINNY_OFFHOOK, sub->callid); + if (skinnydebug) + ast_verbose("Attempting to Clear display on Skinny %s@%s\n", l->name, d->name); + transmit_displaymessage(s, NULL, l->instance, sub->callid); /* clear display */ + transmit_tone(s, SKINNY_DIALTONE, l->instance, sub->callid); + transmit_selectsoftkeys(s, l->instance, sub->callid, KEYDEF_OFFHOOK); + + /* start the switch thread */ + if (ast_pthread_create(&t, NULL, skinny_ss, c)) { + ast_log(LOG_WARNING, "Unable to create switch thread: %s\n", strerror(errno)); + ast_hangup(c); + } + } else { + ast_log(LOG_WARNING, "Unable to create channel for %s@%s\n", l->name, d->name); + } + } + } + break; + default: + if (skinnydebug) + ast_verbose("RECEIVED UNKNOWN STIMULUS: %d(%d/%d)\n", event, instance, callreference); + break; + } + ast_device_state_changed("Skinny/%s@%s", l->name, d->name); + + return 1; +} + +static int handle_offhook_message(struct skinny_req *req, struct skinnysession *s) +{ + struct skinny_device *d = s->device; + struct skinny_line *l; + struct skinny_subchannel *sub; + struct ast_channel *c; + pthread_t t; + int unknown1; + int unknown2; + + unknown1 = letohl(req->data.offhook.unknown1); + unknown2 = letohl(req->data.offhook.unknown2); + + sub = find_subchannel_by_instance_reference(d, d->lastlineinstance, d->lastcallreference); + + if (!sub) { + l = find_line_by_instance(d, d->lastlineinstance); + if (!l) { + return 0; + } + } else { + l = sub->parent; + } + + transmit_ringer_mode(s, SKINNY_RING_OFF); + l->hookstate = SKINNY_OFFHOOK; + + ast_device_state_changed("Skinny/%s@%s", l->name, d->name); + + if (sub && sub->onhold) { + return 1; + } + + transmit_lamp_indication(s, STIMULUS_LINE, l->instance, SKINNY_LAMP_ON); + + if (sub && sub->outgoing) { + /* We're answering a ringing call */ + ast_queue_control(sub->owner, AST_CONTROL_ANSWER); + transmit_callstate(s, l->instance, SKINNY_OFFHOOK, sub->callid); + transmit_tone(s, SKINNY_SILENCE, l->instance, sub->callid); + transmit_callstate(s, l->instance, SKINNY_CONNECTED, sub->callid); + transmit_selectsoftkeys(s, l->instance, sub->callid, KEYDEF_CONNECTED); + start_rtp(sub); + ast_setstate(sub->owner, AST_STATE_UP); + } else { + if (sub && sub->owner) { + ast_debug(1, "Current sub [%s] already has owner\n", sub->owner->name); + } else { + c = skinny_new(l, AST_STATE_DOWN); + if (c) { + sub = c->tech_pvt; + transmit_callstate(s, l->instance, SKINNY_OFFHOOK, sub->callid); + if (skinnydebug) + ast_verbose("Attempting to Clear display on Skinny %s@%s\n", l->name, d->name); + transmit_displaymessage(s, NULL, l->instance, sub->callid); /* clear display */ + transmit_tone(s, SKINNY_DIALTONE, l->instance, sub->callid); + transmit_selectsoftkeys(s, l->instance, sub->callid, KEYDEF_OFFHOOK); + + /* start the switch thread */ + if (ast_pthread_create(&t, NULL, skinny_ss, c)) { + ast_log(LOG_WARNING, "Unable to create switch thread: %s\n", strerror(errno)); + ast_hangup(c); + } + } else { + ast_log(LOG_WARNING, "Unable to create channel for %s@%s\n", l->name, d->name); + } + } + } + return 1; +} + +static int handle_onhook_message(struct skinny_req *req, struct skinnysession *s) +{ + struct skinny_device *d = s->device; + struct skinny_line *l; + struct skinny_subchannel *sub; + int unknown1; + int unknown2; + + unknown1 = letohl(req->data.onhook.unknown1); + unknown2 = letohl(req->data.onhook.unknown2); + + sub = find_subchannel_by_instance_reference(d, d->lastlineinstance, d->lastcallreference); + + if (!sub) { + return 0; + } + l = sub->parent; + + if (l->hookstate == SKINNY_ONHOOK) { + /* Something else already put us back on hook */ + return 0; + } + l->hookstate = SKINNY_ONHOOK; + + ast_device_state_changed("Skinny/%s@%s", l->name, d->name); + + if (sub->onhold) { + return 0; + } + + sub->cxmode = SKINNY_CX_RECVONLY; + transmit_callstate(s, l->instance, l->hookstate, sub->callid); + if (skinnydebug) + ast_verbose("Skinny %s@%s went on hook\n", l->name, d->name); + if (l->transfer && (sub->owner && sub->next && sub->next->owner) && ((!sub->outgoing) || (sub->next && !sub->next->outgoing))) { + /* We're allowed to transfer, we have two active calls and + we made at least one of the calls. Let's try and transfer */ + +#if 0 + if ((res = attempt_transfer(p)) < 0) { + if (sub->next && sub->next->owner) { + sub->next->alreadygone = 1; + ast_queue_hangup(sub->next->owner,1); + } + } else if (res) { + ast_log(LOG_WARNING, "Transfer attempt failed\n"); + return 0; + } +#endif + } else { + /* Hangup the current call */ + /* If there is another active call, skinny_hangup will ring the phone with the other call */ + if (sub->owner) { + sub->alreadygone = 1; + ast_queue_hangup(sub->owner); + } else { + ast_log(LOG_WARNING, "Skinny(%s@%s-%d) channel already destroyed\n", + l->name, d->name, sub->callid); + } + } + if ((l->hookstate == SKINNY_ONHOOK) && (sub->next && !sub->next->rtp)) { + do_housekeeping(s); + } + return 1; +} + +static int handle_capabilities_res_message(struct skinny_req *req, struct skinnysession *s) +{ + struct skinny_device *d = s->device; + struct skinny_line *l; + uint32_t count = 0; + int codecs = 0; + int i; + + count = letohl(req->data.caps.count); + if (count > SKINNY_MAX_CAPABILITIES) { + count = SKINNY_MAX_CAPABILITIES; + ast_log(LOG_WARNING, "Received more capabilities than we can handle (%d). Ignoring the rest.\n", SKINNY_MAX_CAPABILITIES); + } + + for (i = 0; i < count; i++) { + int acodec = 0; + int scodec = 0; + scodec = letohl(req->data.caps.caps[i].codec); + acodec = codec_skinny2ast(scodec); + if (skinnydebug) + ast_verbose("Adding codec capability '%d (%d)'\n", acodec, scodec); + codecs |= acodec; + } + + d->capability &= codecs; + ast_verbose("Device capability set to '%d'\n", d->capability); + for (l = d->lines; l; l = l->next) { + ast_mutex_lock(&l->lock); + l->capability = d->capability; + ast_mutex_unlock(&l->lock); + } + + return 1; +} + +static int handle_speed_dial_stat_req_message(struct skinny_req *req, struct skinnysession *s) +{ + struct skinny_device *d = s->device; + struct skinny_speeddial *sd; + int instance; + + instance = letohl(req->data.speeddialreq.speedDialNumber); + + sd = find_speeddial_by_instance(d, instance, 0); + + if (!sd) { + return 0; + } + + if (!(req = req_alloc(sizeof(struct speed_dial_stat_res_message), SPEED_DIAL_STAT_RES_MESSAGE))) + return -1; + + req->data.speeddialreq.speedDialNumber = htolel(instance); + ast_copy_string(req->data.speeddial.speedDialDirNumber, sd->exten, sizeof(req->data.speeddial.speedDialDirNumber)); + ast_copy_string(req->data.speeddial.speedDialDisplayName, sd->label, sizeof(req->data.speeddial.speedDialDisplayName)); + + transmit_response(s, req); + return 1; +} + +static int handle_line_state_req_message(struct skinny_req *req, struct skinnysession *s) +{ + struct skinny_device *d = s->device; + struct skinny_line *l; + struct skinny_speeddial *sd = NULL; + int instance; + + instance = letohl(req->data.line.lineNumber); + + ast_mutex_lock(&devicelock); + + l = find_line_by_instance(d, instance); + + if (!l) { + sd = find_speeddial_by_instance(d, instance, 1); + } + + if (!l && !sd) { + return 0; + } + + ast_mutex_unlock(&devicelock); + + if (!(req = req_alloc(sizeof(struct line_stat_res_message), LINE_STAT_RES_MESSAGE))) + return -1; + + req->data.linestat.lineNumber = letohl(instance); + if (!l) { + memcpy(req->data.linestat.lineDirNumber, sd->label, sizeof(req->data.linestat.lineDirNumber)); + memcpy(req->data.linestat.lineDisplayName, sd->label, sizeof(req->data.linestat.lineDisplayName)); + } else { + memcpy(req->data.linestat.lineDirNumber, l->name, sizeof(req->data.linestat.lineDirNumber)); + memcpy(req->data.linestat.lineDisplayName, l->label, sizeof(req->data.linestat.lineDisplayName)); + } + transmit_response(s,req); + return 1; +} + +static int handle_time_date_req_message(struct skinny_req *req, struct skinnysession *s) +{ + struct timeval tv = ast_tvnow(); + struct ast_tm cmtime; + + if (!(req = req_alloc(sizeof(struct definetimedate_message), DEFINETIMEDATE_MESSAGE))) + return -1; + + ast_localtime(&tv, &cmtime, NULL); + req->data.definetimedate.year = htolel(cmtime.tm_year+1900); + req->data.definetimedate.month = htolel(cmtime.tm_mon+1); + req->data.definetimedate.dayofweek = htolel(cmtime.tm_wday); + req->data.definetimedate.day = htolel(cmtime.tm_mday); + req->data.definetimedate.hour = htolel(cmtime.tm_hour); + req->data.definetimedate.minute = htolel(cmtime.tm_min); + req->data.definetimedate.seconds = htolel(cmtime.tm_sec); + req->data.definetimedate.milliseconds = htolel(cmtime.tm_usec / 1000); + req->data.definetimedate.timestamp = htolel(tv.tv_sec); + transmit_response(s, req); + return 1; +} + +static int handle_button_template_req_message(struct skinny_req *req, struct skinnysession *s) +{ + struct skinny_device *d = s->device; + struct skinny_line *l; + int i; + + struct skinny_speeddial *sd; + struct button_definition_template btn[42]; + int lineInstance = 1; + int speeddialInstance = 1; + int buttonCount = 0; + + if (!(req = req_alloc(sizeof(struct button_template_res_message), BUTTON_TEMPLATE_RES_MESSAGE))) + return -1; + + memset(&btn, 0, sizeof(btn)); + + get_button_template(s, btn); + + for (i=0; i<42; i++) { + int btnSet = 0; + switch (btn[i].buttonDefinition) { + case BT_CUST_LINE: + /* assume failure */ + req->data.buttontemplate.definition[i].buttonDefinition = BT_NONE; + req->data.buttontemplate.definition[i].instanceNumber = htolel(0); + + for (l = d->lines; l; l = l->next) { + if (l->instance == lineInstance) { + ast_verbose("Adding button: %d, %d\n", BT_LINE, lineInstance); + req->data.buttontemplate.definition[i].buttonDefinition = BT_LINE; + req->data.buttontemplate.definition[i].instanceNumber = htolel(lineInstance); + lineInstance++; + buttonCount++; + btnSet = 1; + break; + } + } + + if (!btnSet) { + for (sd = d->speeddials; sd; sd = sd->next) { + if (sd->isHint && sd->instance == lineInstance) { + ast_verbose("Adding button: %d, %d\n", BT_LINE, lineInstance); + req->data.buttontemplate.definition[i].buttonDefinition = BT_LINE; + req->data.buttontemplate.definition[i].instanceNumber = htolel(lineInstance); + lineInstance++; + buttonCount++; + btnSet = 1; + break; + } + } + } + break; + case BT_CUST_LINESPEEDDIAL: + /* assume failure */ + req->data.buttontemplate.definition[i].buttonDefinition = BT_NONE; + req->data.buttontemplate.definition[i].instanceNumber = htolel(0); + + for (l = d->lines; l; l = l->next) { + if (l->instance == lineInstance) { + ast_verbose("Adding button: %d, %d\n", BT_LINE, lineInstance); + req->data.buttontemplate.definition[i].buttonDefinition = BT_LINE; + req->data.buttontemplate.definition[i].instanceNumber = htolel(lineInstance); + lineInstance++; + buttonCount++; + btnSet = 1; + break; + } + } + + if (!btnSet) { + for (sd = d->speeddials; sd; sd = sd->next) { + if (sd->isHint && sd->instance == lineInstance) { + ast_verbose("Adding button: %d, %d\n", BT_LINE, lineInstance); + req->data.buttontemplate.definition[i].buttonDefinition = BT_LINE; + req->data.buttontemplate.definition[i].instanceNumber = htolel(lineInstance); + lineInstance++; + buttonCount++; + btnSet = 1; + break; + } else if (!sd->isHint && sd->instance == speeddialInstance) { + ast_verbose("Adding button: %d, %d\n", BT_SPEEDDIAL, speeddialInstance); + req->data.buttontemplate.definition[i].buttonDefinition = BT_SPEEDDIAL; + req->data.buttontemplate.definition[i].instanceNumber = htolel(speeddialInstance); + speeddialInstance++; + buttonCount++; + btnSet = 1; + break; + } + } + } + break; + case BT_LINE: + req->data.buttontemplate.definition[i].buttonDefinition = htolel(BT_NONE); + req->data.buttontemplate.definition[i].instanceNumber = htolel(0); + + for (l = d->lines; l; l = l->next) { + if (l->instance == lineInstance) { + ast_verbose("Adding button: %d, %d\n", BT_LINE, lineInstance); + req->data.buttontemplate.definition[i].buttonDefinition = BT_LINE; + req->data.buttontemplate.definition[i].instanceNumber = htolel(lineInstance); + lineInstance++; + buttonCount++; + btnSet = 1; + break; + } + } + break; + case BT_SPEEDDIAL: + req->data.buttontemplate.definition[i].buttonDefinition = BT_NONE; + req->data.buttontemplate.definition[i].instanceNumber = 0; + + for (sd = d->speeddials; sd; sd = sd->next) { + if (!sd->isHint && sd->instance == speeddialInstance) { + ast_verbose("Adding button: %d, %d\n", BT_SPEEDDIAL, speeddialInstance); + req->data.buttontemplate.definition[i].buttonDefinition = BT_SPEEDDIAL; + req->data.buttontemplate.definition[i].instanceNumber = htolel(speeddialInstance - 1); + speeddialInstance++; + buttonCount++; + btnSet = 1; + break; + } + } + break; + case BT_NONE: + break; + default: + ast_verbose("Adding button: %d, %d\n", btn[i].buttonDefinition, 0); + req->data.buttontemplate.definition[i].buttonDefinition = htolel(btn[i].buttonDefinition); + req->data.buttontemplate.definition[i].instanceNumber = htolel(0); + buttonCount++; + btnSet = 1; + break; + } + } + + req->data.buttontemplate.buttonOffset = htolel(0); + req->data.buttontemplate.buttonCount = htolel(buttonCount); + req->data.buttontemplate.totalButtonCount = htolel(buttonCount); + + if (skinnydebug) + ast_verbose("Sending %d template to %s\n", + d->type, + d->name); + transmit_response(s, req); + return 1; +} + +static int handle_version_req_message(struct skinny_req *req, struct skinnysession *s) +{ + struct skinny_device *d = s->device; + if (!(req = req_alloc(sizeof(struct version_res_message), VERSION_RES_MESSAGE))) + return -1; + + ast_copy_string(req->data.version.version, d->version_id, sizeof(req->data.version.version)); + transmit_response(s, req); + return 1; +} + +static int handle_server_request_message(struct skinny_req *req, struct skinnysession *s) +{ + struct skinny_device *d = s->device; + if (!(req = req_alloc(sizeof(struct server_res_message), SERVER_RES_MESSAGE))) + return -1; + + memcpy(req->data.serverres.server[0].serverName, ourhost, + sizeof(req->data.serverres.server[0].serverName)); + req->data.serverres.serverListenPort[0] = htolel(ourport); + req->data.serverres.serverIpAddr[0] = htolel(d->ourip.s_addr); + transmit_response(s, req); + return 1; +} + +static int handle_alarm_message(struct skinny_req *req, struct skinnysession *s) +{ + /* no response necessary */ + if (skinnydebug) + ast_verbose("Received Alarm Message: %s\n", req->data.alarm.displayMessage); + + return 1; +} + +static int handle_open_receive_channel_ack_message(struct skinny_req *req, struct skinnysession *s) +{ + struct skinny_device *d = s->device; + struct skinny_line *l; + struct skinny_subchannel *sub; + struct ast_format_list fmt; + struct sockaddr_in sin; + struct sockaddr_in us; + uint32_t addr; + int port; + int status; + int passthruid; + + status = letohl(req->data.openreceivechannelack.status); + if (status) { + ast_log(LOG_ERROR, "Open Receive Channel Failure\n"); + return 0; + } + addr = letohl(req->data.openreceivechannelack.ipAddr); + port = letohl(req->data.openreceivechannelack.port); + passthruid = letohl(req->data.openreceivechannelack.passThruId); + + sin.sin_family = AF_INET; + sin.sin_addr.s_addr = addr; + sin.sin_port = htons(port); + + sub = find_subchannel_by_reference(d, passthruid); + + if (!sub) + return 0; + + l = sub->parent; + + if (sub->rtp) { + ast_rtp_set_peer(sub->rtp, &sin); + ast_rtp_get_us(sub->rtp, &us); + } else { + ast_log(LOG_ERROR, "No RTP structure, this is very bad\n"); + return 0; + } + + if (skinnydebug) + ast_verbose("ipaddr = %s:%d\n", ast_inet_ntoa(sin.sin_addr), ntohs(sin.sin_port)); + + if (!(req = req_alloc(sizeof(struct start_media_transmission_message), START_MEDIA_TRANSMISSION_MESSAGE))) + return -1; + + fmt = ast_codec_pref_getsize(&l->prefs, ast_best_codec(l->capability)); + + if (skinnydebug) + ast_verbose("Setting payloadType to '%d' (%d ms)\n", fmt.bits, fmt.cur_ms); + + req->data.startmedia.conferenceId = htolel(sub->callid); + req->data.startmedia.passThruPartyId = htolel(sub->callid); + req->data.startmedia.remoteIp = htolel(d->ourip.s_addr); + req->data.startmedia.remotePort = htolel(ntohs(us.sin_port)); + req->data.startmedia.packetSize = htolel(fmt.cur_ms); + req->data.startmedia.payloadType = htolel(codec_ast2skinny(fmt.bits)); + req->data.startmedia.qualifier.precedence = htolel(127); + req->data.startmedia.qualifier.vad = htolel(0); + req->data.startmedia.qualifier.packets = htolel(0); + req->data.startmedia.qualifier.bitRate = htolel(0); + transmit_response(s, req); + + return 1; +} + +static int handle_enbloc_call_message(struct skinny_req *req, struct skinnysession *s) +{ + struct skinny_device *d = s->device; + struct skinny_line *l; + struct skinny_subchannel *sub = NULL; + struct ast_channel *c; + pthread_t t; + + if (skinnydebug) + ast_verbose("Received Enbloc Call: %s\n", req->data.enbloccallmessage.calledParty); + + sub = find_subchannel_by_instance_reference(d, d->lastlineinstance, d->lastcallreference); + + if (!sub) { + l = find_line_by_instance(d, d->lastlineinstance); + if (!l) { + return 0; + } + } else { + l = sub->parent; + } + + c = skinny_new(l, AST_STATE_DOWN); + + if(!c) { + ast_log(LOG_WARNING, "Unable to create channel for %s@%s\n", l->name, d->name); + } else { + l->hookstate = SKINNY_OFFHOOK; + + sub = c->tech_pvt; + transmit_callstate(s, l->instance, SKINNY_OFFHOOK, sub->callid); + if (skinnydebug) + ast_verbose("Attempting to Clear display on Skinny %s@%s\n", l->name, d->name); + transmit_displaymessage(s, NULL, l->instance, sub->callid); /* clear display */ + transmit_tone(s, SKINNY_DIALTONE, l->instance, sub->callid); + + if (!ast_ignore_pattern(c->context, req->data.enbloccallmessage.calledParty)) { + transmit_tone(s, SKINNY_SILENCE, l->instance, sub->callid); + } + ast_copy_string(c->exten, req->data.enbloccallmessage.calledParty, sizeof(c->exten)); + if (ast_pthread_create(&t, NULL, skinny_newcall, c)) { + ast_log(LOG_WARNING, "Unable to create new call thread: %s\n", strerror(errno)); + ast_hangup(c); + } + } + + return 1; +} + + +static int handle_soft_key_set_req_message(struct skinny_req *req, struct skinnysession *s) +{ + int i; + int x; + int y; + const struct soft_key_definitions *softkeymode = soft_key_default_definitions; + + if (!(req = req_alloc(sizeof(struct soft_key_set_res_message), SOFT_KEY_SET_RES_MESSAGE))) + return -1; + + req->data.softkeysets.softKeySetOffset = htolel(0); + req->data.softkeysets.softKeySetCount = htolel(11); + req->data.softkeysets.totalSoftKeySetCount = htolel(11); + for (x = 0; x < sizeof(soft_key_default_definitions) / sizeof(struct soft_key_definitions); x++) { + const uint8_t *defaults = softkeymode->defaults; + /* XXX I wanted to get the size of the array dynamically, but that wasn't wanting to work. + This will have to do for now. */ + for (y = 0; y < softkeymode->count; y++) { + for (i = 0; i < (sizeof(soft_key_template_default) / sizeof(struct soft_key_template_definition)); i++) { + if (defaults[y] == i+1) { + req->data.softkeysets.softKeySetDefinition[softkeymode->mode].softKeyTemplateIndex[y] = htolel(i+1); + req->data.softkeysets.softKeySetDefinition[softkeymode->mode].softKeyInfoIndex[y] = htolel(i+301); + } + } + } + softkeymode++; + } + transmit_response(s,req); + transmit_selectsoftkeys(s, 0, 0, KEYDEF_ONHOOK); + return 1; +} + +static int handle_soft_key_event_message(struct skinny_req *req, struct skinnysession *s) +{ + struct skinny_device *d = s->device; + struct skinny_line *l; + struct skinny_subchannel *sub = NULL; + struct ast_channel *c; + pthread_t t; + int event; + int instance; + int callreference; + + event = letohl(req->data.softkeyeventmessage.softKeyEvent); + instance = letohl(req->data.softkeyeventmessage.instance); + callreference = letohl(req->data.softkeyeventmessage.callreference); + + if (instance) { + l = find_line_by_instance(d, instance); + if (callreference) { + sub = find_subchannel_by_instance_reference(d, instance, callreference); + } else { + sub = find_subchannel_by_instance_reference(d, instance, d->lastcallreference); + } + } else { + l = find_line_by_instance(d, d->lastlineinstance); + } + + if (!l) { + if (skinnydebug) + ast_verbose("Received Softkey Event: %d(%d/%d)\n", event, instance, callreference); + return 0; + } + + ast_device_state_changed("Skinny/%s@%s", l->name, d->name); + + switch(event) { + case SOFTKEY_NONE: + if (skinnydebug) + ast_verbose("Received Softkey Event: None(%d/%d)\n", instance, callreference); + break; + case SOFTKEY_REDIAL: + if (skinnydebug) + ast_verbose("Received Softkey Event: Redial(%d/%d)\n", instance, callreference); + + if (ast_strlen_zero(l->lastnumberdialed)) { + ast_log(LOG_WARNING, "Attempted redial, but no previously dialed number found.\n"); + l->hookstate = SKINNY_ONHOOK; + transmit_speaker_mode(s, SKINNY_SPEAKEROFF); + transmit_callstate(s, l->instance, SKINNY_ONHOOK, instance); + break; + } + + if (!sub || !sub->owner) { + c = skinny_new(l, AST_STATE_DOWN); + } else { + c = sub->owner; + } + + if (!c) { + ast_log(LOG_WARNING, "Unable to create channel for %s@%s\n", l->name, d->name); + } else { + sub = c->tech_pvt; + if (l->hookstate == SKINNY_ONHOOK) { + l->hookstate = SKINNY_OFFHOOK; + transmit_speaker_mode(s, SKINNY_SPEAKERON); + transmit_callstate(s, l->instance, SKINNY_OFFHOOK, sub->callid); + } + if (skinnydebug) + ast_verbose("Attempting to Clear display on Skinny %s@%s\n", l->name, d->name); + transmit_displaymessage(s, NULL, l->instance, sub->callid); /* clear display */ + transmit_tone(s, SKINNY_DIALTONE, l->instance, sub->callid); + transmit_selectsoftkeys(s, l->instance, sub->callid, KEYDEF_RINGOUT); + + if (!ast_ignore_pattern(c->context, l->lastnumberdialed)) { + transmit_tone(s, SKINNY_SILENCE, l->instance, sub->callid); + } + ast_copy_string(c->exten, l->lastnumberdialed, sizeof(c->exten)); + if (ast_pthread_create(&t, NULL, skinny_newcall, c)) { + ast_log(LOG_WARNING, "Unable to create new call thread: %s\n", strerror(errno)); + ast_hangup(c); + } + } + break; + case SOFTKEY_NEWCALL: /* Actually the DIAL softkey */ + if (skinnydebug) + ast_verbose("Received Softkey Event: New Call(%d/%d)\n", instance, callreference); + + if (!sub || !sub->owner) { + c = skinny_new(l, AST_STATE_DOWN); + } else { + c = sub->owner; + } + + /* transmit_ringer_mode(s,SKINNY_RING_OFF); + transmit_lamp_indication(s, STIMULUS_LINE, l->instance, SKINNY_LAMP_ON); */ + + /* l->hookstate = SKINNY_OFFHOOK; */ + + if (!c) { + ast_log(LOG_WARNING, "Unable to create channel for %s@%s\n", l->name, d->name); + } else { + sub = c->tech_pvt; + if (l->hookstate == SKINNY_ONHOOK) { + l->hookstate = SKINNY_OFFHOOK; + transmit_speaker_mode(s, SKINNY_SPEAKERON); + transmit_callstate(s, l->instance, SKINNY_OFFHOOK, sub->callid); + } + + if (skinnydebug) + ast_verbose("Attempting to Clear display on Skinny %s@%s\n", l->name, d->name); + transmit_displaymessage(s, NULL, l->instance, sub->callid); /* clear display */ + transmit_tone(s, SKINNY_DIALTONE, l->instance, sub->callid); + transmit_selectsoftkeys(s, l->instance, sub->callid, KEYDEF_OFFHOOK); + + /* start the switch thread */ + if (ast_pthread_create(&t, NULL, skinny_ss, c)) { + ast_log(LOG_WARNING, "Unable to create switch thread: %s\n", strerror(errno)); + ast_hangup(c); + } + } + break; + case SOFTKEY_HOLD: + if (skinnydebug) + ast_verbose("Received Softkey Event: Hold(%d/%d)\n", instance, callreference); + + if (sub) { + if (sub->onhold) { + skinny_unhold(sub); + } else { + skinny_hold(sub); + } + } + + break; + case SOFTKEY_TRNSFER: + if (skinnydebug) + ast_verbose("Received Softkey Event: Transfer(%d/%d)\n", instance, callreference); + /* XXX figure out how to transfer */ + break; + case SOFTKEY_DND: + if (skinnydebug) + ast_verbose("Received Softkey Event: DND(%d/%d)\n", instance, callreference); + + /* Do not disturb */ + if (l->dnd != 0){ + ast_verb(3, "Disabling DND on %s@%s\n", l->name, d->name); + l->dnd = 0; + transmit_lamp_indication(s, STIMULUS_DND, 1, SKINNY_LAMP_ON); + transmit_displaynotify(s, "DnD disabled", 10); + } else { + ast_verb(3, "Enabling DND on %s@%s\n", l->name, d->name); + l->dnd = 1; + transmit_lamp_indication(s, STIMULUS_DND, 1, SKINNY_LAMP_OFF); + transmit_displaynotify(s, "DnD enabled", 10); + } + break; + case SOFTKEY_CFWDALL: + if (skinnydebug) + ast_verbose("Received Softkey Event: Forward All(%d/%d)\n", instance, callreference); + + if (!sub || !sub->owner) { + c = skinny_new(l, AST_STATE_DOWN); + } else { + c = sub->owner; + } + + if (!c) { + ast_log(LOG_WARNING, "Unable to create channel for %s@%s\n", l->name, d->name); + } else { + sub = c->tech_pvt; + handle_callforward_button(sub, SKINNY_CFWD_ALL); + } + break; + case SOFTKEY_CFWDBUSY: + if (skinnydebug) + ast_verbose("Received Softkey Event: Forward Busy (%d/%d)\n", instance, callreference); + + if (!sub || !sub->owner) { + c = skinny_new(l, AST_STATE_DOWN); + } else { + c = sub->owner; + } + + if (!c) { + ast_log(LOG_WARNING, "Unable to create channel for %s@%s\n", l->name, d->name); + } else { + sub = c->tech_pvt; + handle_callforward_button(sub, SKINNY_CFWD_BUSY); + } + break; + case SOFTKEY_CFWDNOANSWER: + if (skinnydebug) + ast_verbose("Received Softkey Event: Forward No Answer (%d/%d)\n", instance, callreference); + +#if 0 /* Not sure how to handle this yet */ + if (!sub || !sub->owner) { + c = skinny_new(l, AST_STATE_DOWN); + } else { + c = sub->owner; + } + + if (!c) { + ast_log(LOG_WARNING, "Unable to create channel for %s@%s\n", l->name, d->name); + } else { + sub = c->tech_pvt; + handle_callforward_button(sub, SKINNY_CFWD_NOANSWER); + } +#endif + break; + case SOFTKEY_BKSPC: + if (skinnydebug) + ast_verbose("Received Softkey Event: Backspace(%d/%d)\n", instance, callreference); + break; + case SOFTKEY_ENDCALL: + if (skinnydebug) + ast_verbose("Received Softkey Event: End Call(%d/%d)\n", instance, callreference); + + if (l->hookstate == SKINNY_ONHOOK) { + /* Something else already put us back on hook */ + break; + } + if (sub) { + sub->cxmode = SKINNY_CX_RECVONLY; + l->hookstate = SKINNY_ONHOOK; + transmit_callstate(s, l->instance, l->hookstate, sub->callid); + if (skinnydebug) + ast_verbose("Skinny %s@%s went on hook\n", l->name, d->name); + if (l->transfer && (sub->owner && sub->next && sub->next->owner) && ((!sub->outgoing) || (sub->next && !sub->next->outgoing))) { + /* We're allowed to transfer, we have two active calls and + we made at least one of the calls. Let's try and transfer */ + +#if 0 + if ((res = attempt_transfer(p)) < 0) { + if (sub->next && sub->next->owner) { + sub->next->alreadygone = 1; + ast_queue_hangup(sub->next->owner, 1); + } + } else if (res) { + ast_log(LOG_WARNING, "Transfer attempt failed\n"); + break; + } +#endif + } else { + /* Hangup the current call */ + /* If there is another active call, skinny_hangup will ring the phone with the other call */ + if (sub->owner) { + sub->alreadygone = 1; + ast_queue_hangup(sub->owner); + } else { + ast_log(LOG_WARNING, "Skinny(%s@%s-%d) channel already destroyed\n", + l->name, d->name, sub->callid); + } + } + if ((l->hookstate == SKINNY_ONHOOK) && (sub->next && !sub->next->rtp)) { + do_housekeeping(s); + } + } + break; + case SOFTKEY_RESUME: + if (skinnydebug) + ast_verbose("Received Softkey Event: Resume(%d/%d)\n", instance, callreference); + break; + case SOFTKEY_ANSWER: + if (skinnydebug) + ast_verbose("Received Softkey Event: Answer(%d/%d)\n", instance, callreference); + + transmit_ringer_mode(s,SKINNY_RING_OFF); + transmit_lamp_indication(s, STIMULUS_LINE, l->instance, SKINNY_LAMP_ON); + + l->hookstate = SKINNY_OFFHOOK; + + if (sub && sub->outgoing) { + /* We're answering a ringing call */ + ast_queue_control(sub->owner, AST_CONTROL_ANSWER); + transmit_callstate(s, l->instance, SKINNY_OFFHOOK, sub->callid); + transmit_tone(s, SKINNY_SILENCE, l->instance, sub->callid); + transmit_callstate(s, l->instance, SKINNY_CONNECTED, sub->callid); + transmit_selectsoftkeys(s, l->instance, sub->callid, KEYDEF_CONNECTED); + start_rtp(sub); + ast_setstate(sub->owner, AST_STATE_UP); + } + break; + case SOFTKEY_INFO: + if (skinnydebug) + ast_verbose("Received Softkey Event: Info(%d/%d)\n", instance, callreference); + break; + case SOFTKEY_CONFRN: + if (skinnydebug) + ast_verbose("Received Softkey Event: Conference(%d/%d)\n", instance, callreference); + /* XXX determine the best way to pull off a conference. Meetme? */ + break; + case SOFTKEY_PARK: + if (skinnydebug) + ast_verbose("Received Softkey Event: Park Call(%d/%d)\n", instance, callreference); + /* XXX Park the call */ + break; + case SOFTKEY_JOIN: + if (skinnydebug) + ast_verbose("Received Softkey Event: Join(%d/%d)\n", instance, callreference); + break; + case SOFTKEY_MEETME: + /* XXX How is this different from CONFRN? */ + if (skinnydebug) + ast_verbose("Received Softkey Event: Meetme(%d/%d)\n", instance, callreference); + break; + case SOFTKEY_PICKUP: + if (skinnydebug) + ast_verbose("Received Softkey Event: Pickup(%d/%d)\n", instance, callreference); + break; + case SOFTKEY_GPICKUP: + if (skinnydebug) + ast_verbose("Received Softkey Event: Group Pickup(%d/%d)\n", instance, callreference); + break; + default: + if (skinnydebug) + ast_verbose("Received unknown Softkey Event: %d(%d/%d)\n", event, instance, callreference); + break; + } + ast_device_state_changed("Skinny/%s@%s", l->name, d->name); + + return 1; +} + +static int handle_unregister_message(struct skinny_req *req, struct skinnysession *s) +{ + return skinny_unregister(req, s); +} + +static int handle_soft_key_template_req_message(struct skinny_req *req, struct skinnysession *s) +{ + if (!(req = req_alloc(sizeof(struct soft_key_template_res_message), SOFT_KEY_TEMPLATE_RES_MESSAGE))) + return -1; + + req->data.softkeytemplate.softKeyOffset = htolel(0); + req->data.softkeytemplate.softKeyCount = htolel(sizeof(soft_key_template_default) / sizeof(struct soft_key_template_definition)); + req->data.softkeytemplate.totalSoftKeyCount = htolel(sizeof(soft_key_template_default) / sizeof(struct soft_key_template_definition)); + memcpy(req->data.softkeytemplate.softKeyTemplateDefinition, + soft_key_template_default, + sizeof(soft_key_template_default)); + transmit_response(s,req); + return 1; +} + +static int handle_headset_status_message(struct skinny_req *req, struct skinnysession *s) +{ + /* XXX umm...okay? Why do I care? */ + return 1; +} + +static int handle_register_available_lines_message(struct skinny_req *req, struct skinnysession *s) +{ + /* XXX I have no clue what this is for, but my phone was sending it, so... */ + return 1; +} + +static int handle_message(struct skinny_req *req, struct skinnysession *s) +{ + int res = 0; + + if ((!s->device) && (letohl(req->e) != REGISTER_MESSAGE && letohl(req->e) != ALARM_MESSAGE)) { + ast_log(LOG_WARNING, "Client sent message #%d without first registering.\n", req->e); + ast_free(req); + return 0; + } + + switch(letohl(req->e)) { + case KEEP_ALIVE_MESSAGE: + res = handle_keep_alive_message(req, s); + break; + case REGISTER_MESSAGE: + if (skinnydebug) + ast_verbose("Device %s is attempting to register\n", req->data.reg.name); + + res = handle_register_message(req, s); + break; + case IP_PORT_MESSAGE: + res = handle_ip_port_message(req, s); + break; + case KEYPAD_BUTTON_MESSAGE: + { + struct skinny_device *d = s->device; + struct skinny_subchannel *sub; + int lineInstance; + int callReference; + + if (skinnydebug) + ast_verbose("Collected digit: [%d]\n", letohl(req->data.keypad.button)); + + lineInstance = letohl(req->data.keypad.lineInstance); + callReference = letohl(req->data.keypad.callReference); + + sub = find_subchannel_by_instance_reference(d, lineInstance, callReference); + + if (sub && (sub->owner && sub->owner->_state < AST_STATE_UP)) { + char dgt; + int digit = letohl(req->data.keypad.button); + + if (digit == 14) { + dgt = '*'; + } else if (digit == 15) { + dgt = '#'; + } else if (digit >= 0 && digit <= 9) { + dgt = '0' + digit; + } else { + /* digit=10-13 (A,B,C,D ?), or + * digit is bad value + * + * probably should not end up here, but set + * value for backward compatibility, and log + * a warning. + */ + dgt = '0' + digit; + ast_log(LOG_WARNING, "Unsupported digit %d\n", digit); + } + + d->exten[strlen(d->exten)] = dgt; + d->exten[strlen(d->exten)+1] = '\0'; + } else + res = handle_keypad_button_message(req, s); + } + break; + case ENBLOC_CALL_MESSAGE: + res = handle_enbloc_call_message(req, s); + break; + case STIMULUS_MESSAGE: + res = handle_stimulus_message(req, s); + break; + case OFFHOOK_MESSAGE: + res = handle_offhook_message(req, s); + break; + case ONHOOK_MESSAGE: + res = handle_onhook_message(req, s); + break; + case CAPABILITIES_RES_MESSAGE: + if (skinnydebug) + ast_verbose("Received CapabilitiesRes\n"); + + res = handle_capabilities_res_message(req, s); + break; + case SPEED_DIAL_STAT_REQ_MESSAGE: + if (skinnydebug) + ast_verbose("Received SpeedDialStatRequest\n"); + + res = handle_speed_dial_stat_req_message(req, s); + break; + case LINE_STATE_REQ_MESSAGE: + if (skinnydebug) + ast_verbose("Received LineStatRequest\n"); + res = handle_line_state_req_message(req, s); + break; + case TIME_DATE_REQ_MESSAGE: + if (skinnydebug) + ast_verbose("Received Time/Date Request\n"); + + res = handle_time_date_req_message(req, s); + break; + case BUTTON_TEMPLATE_REQ_MESSAGE: + if (skinnydebug) + ast_verbose("Buttontemplate requested\n"); + + res = handle_button_template_req_message(req, s); + break; + case VERSION_REQ_MESSAGE: + if (skinnydebug) + ast_verbose("Version Request\n"); + + res = handle_version_req_message(req, s); + break; + case SERVER_REQUEST_MESSAGE: + if (skinnydebug) + ast_verbose("Received Server Request\n"); + + res = handle_server_request_message(req, s); + break; + case ALARM_MESSAGE: + res = handle_alarm_message(req, s); + break; + case OPEN_RECEIVE_CHANNEL_ACK_MESSAGE: + if (skinnydebug) + ast_verbose("Received Open Receive Channel Ack\n"); + + res = handle_open_receive_channel_ack_message(req, s); + break; + case SOFT_KEY_SET_REQ_MESSAGE: + if (skinnydebug) + ast_verbose("Received SoftKeySetReq\n"); + + res = handle_soft_key_set_req_message(req, s); + break; + case SOFT_KEY_EVENT_MESSAGE: + res = handle_soft_key_event_message(req, s); + break; + case UNREGISTER_MESSAGE: + if (skinnydebug) + ast_verbose("Received Unregister Request\n"); + + res = handle_unregister_message(req, s); + break; + case SOFT_KEY_TEMPLATE_REQ_MESSAGE: + if (skinnydebug) + ast_verbose("Received SoftKey Template Request\n"); + + res = handle_soft_key_template_req_message(req, s); + break; + case HEADSET_STATUS_MESSAGE: + res = handle_headset_status_message(req, s); + break; + case REGISTER_AVAILABLE_LINES_MESSAGE: + res = handle_register_available_lines_message(req, s); + break; + default: + if (skinnydebug) + ast_verbose("RECEIVED UNKNOWN MESSAGE TYPE: %x\n", letohl(req->e)); + break; + } + if (res >= 0 && req) + ast_free(req); + return res; +} + +static void destroy_session(struct skinnysession *s) +{ + struct skinnysession *cur, *prev = NULL; + ast_mutex_lock(&sessionlock); + cur = sessions; + while(cur) { + if (cur == s) { + break; + } + prev = cur; + cur = cur->next; + } + if (cur) { + if (prev) { + prev->next = cur->next; + } else { + sessions = cur->next; + } + if (s->fd > -1) { + close(s->fd); + } + ast_mutex_destroy(&s->lock); + ast_free(s); + } else { + ast_log(LOG_WARNING, "Trying to delete nonexistent session %p?\n", s); + } + ast_mutex_unlock(&sessionlock); +} + +static int get_input(struct skinnysession *s) +{ + int res; + int dlen = 0; + struct pollfd fds[1]; + + fds[0].fd = s->fd; + fds[0].events = POLLIN; + fds[0].revents = 0; + res = poll(fds, 1, (keep_alive * 1100)); /* If nothing has happen, client is dead */ + /* we add 10% to the keep_alive to deal */ + /* with network delays, etc */ + if (res < 0) { + if (errno != EINTR) { + ast_log(LOG_WARNING, "Select returned error: %s\n", strerror(errno)); + return res; + } + } else if (res == 0) { + if (skinnydebug) + ast_verbose("Skinny Client was lost, unregistering\n"); + skinny_unregister(NULL, s); + return -1; + } + + if (fds[0].revents) { + ast_mutex_lock(&s->lock); + memset(s->inbuf,0,sizeof(s->inbuf)); + res = read(s->fd, s->inbuf, 4); + if (res < 0) { + ast_log(LOG_WARNING, "read() returned error: %s\n", strerror(errno)); + + if (skinnydebug) + ast_verbose("Skinny Client was lost, unregistering\n"); + + skinny_unregister(NULL,s); + ast_mutex_unlock(&s->lock); + return res; + } else if (res != 4) { + ast_log(LOG_WARNING, "Skinny Client sent less data than expected. Expected 4 but got %d.\n", res); + ast_mutex_unlock(&s->lock); + + if (res == 0) { + if (skinnydebug) + ast_verbose("Skinny Client was lost, unregistering\n"); + skinny_unregister(NULL, s); + } + + return -1; + } + + dlen = letohl(*(int *)s->inbuf); + if (dlen < 4) { + ast_log(LOG_WARNING, "Skinny Client sent invalid data.\n"); + ast_mutex_unlock(&s->lock); + return -1; + } + if (dlen+8 > sizeof(s->inbuf)) { + dlen = sizeof(s->inbuf) - 8; + } + *(int *)s->inbuf = htolel(dlen); + + res = read(s->fd, s->inbuf+4, dlen+4); + ast_mutex_unlock(&s->lock); + if (res < 0) { + ast_log(LOG_WARNING, "read() returned error: %s\n", strerror(errno)); + return res; + } else if (res != (dlen+4)) { + ast_log(LOG_WARNING, "Skinny Client sent less data than expected.\n"); + return -1; + } + return res; + } + return 0; +} + +static struct skinny_req *skinny_req_parse(struct skinnysession *s) +{ + struct skinny_req *req; + + if (!(req = ast_calloc(1, SKINNY_MAX_PACKET))) + return NULL; + + ast_mutex_lock(&s->lock); + memcpy(req, s->inbuf, skinny_header_size); + memcpy(&req->data, s->inbuf+skinny_header_size, letohl(*(int*)(s->inbuf))-4); + + ast_mutex_unlock(&s->lock); + + if (letohl(req->e) < 0) { + ast_log(LOG_ERROR, "Event Message is NULL from socket %d, This is bad\n", s->fd); + ast_free(req); + return NULL; + } + + return req; +} + +static void *skinny_session(void *data) +{ + int res; + struct skinny_req *req; + struct skinnysession *s = data; + + ast_verb(3, "Starting Skinny session from %s\n", ast_inet_ntoa(s->sin.sin_addr)); + + for (;;) { + res = get_input(s); + if (res < 0) { + break; + } + + if (res > 0) + { + if (!(req = skinny_req_parse(s))) { + destroy_session(s); + return NULL; + } + + res = handle_message(req, s); + if (res < 0) { + destroy_session(s); + return NULL; + } + } + } + ast_log(LOG_NOTICE, "Skinny Session returned: %s\n", strerror(errno)); + + if (s) + destroy_session(s); + + return 0; +} + +static void *accept_thread(void *ignore) +{ + int as; + struct sockaddr_in sin; + socklen_t sinlen; + struct skinnysession *s; + struct protoent *p; + int arg = 1; + pthread_t tcp_thread; + + for (;;) { + sinlen = sizeof(sin); + as = accept(skinnysock, (struct sockaddr *)&sin, &sinlen); + if (as < 0) { + ast_log(LOG_NOTICE, "Accept returned -1: %s\n", strerror(errno)); + continue; + } + p = getprotobyname("tcp"); + if(p) { + if( setsockopt(as, p->p_proto, TCP_NODELAY, (char *)&arg, sizeof(arg) ) < 0 ) { + ast_log(LOG_WARNING, "Failed to set Skinny tcp connection to TCP_NODELAY mode: %s\n", strerror(errno)); + } + } + if (!(s = ast_calloc(1, sizeof(struct skinnysession)))) + continue; + + memcpy(&s->sin, &sin, sizeof(sin)); + ast_mutex_init(&s->lock); + s->fd = as; + ast_mutex_lock(&sessionlock); + s->next = sessions; + sessions = s; + ast_mutex_unlock(&sessionlock); + + if (ast_pthread_create_detached(&tcp_thread, NULL, skinny_session, s)) { + destroy_session(s); + } + } + if (skinnydebug) + ast_verbose("killing accept thread\n"); + close(as); + return 0; +} + +static void *do_monitor(void *data) +{ + int res; + + /* This thread monitors all the interfaces which are not yet in use + (and thus do not have a separate thread) indefinitely */ + /* From here on out, we die whenever asked */ + for(;;) { + pthread_testcancel(); + /* Wait for sched or io */ + res = ast_sched_wait(sched); + if ((res < 0) || (res > 1000)) { + res = 1000; + } + res = ast_io_wait(io, res); + ast_mutex_lock(&monlock); + if (res >= 0) { + ast_sched_runq(sched); + } + ast_mutex_unlock(&monlock); + } + /* Never reached */ + return NULL; + +} + +static int restart_monitor(void) +{ + /* If we're supposed to be stopped -- stay stopped */ + if (monitor_thread == AST_PTHREADT_STOP) + return 0; + + ast_mutex_lock(&monlock); + if (monitor_thread == pthread_self()) { + ast_mutex_unlock(&monlock); + ast_log(LOG_WARNING, "Cannot kill myself\n"); + return -1; + } + if (monitor_thread != AST_PTHREADT_NULL) { + /* Wake up the thread */ + pthread_kill(monitor_thread, SIGURG); + } else { + /* Start a new monitor */ + if (ast_pthread_create_background(&monitor_thread, NULL, do_monitor, NULL) < 0) { + ast_mutex_unlock(&monlock); + ast_log(LOG_ERROR, "Unable to start monitor thread.\n"); + return -1; + } + } + ast_mutex_unlock(&monlock); + return 0; +} + +static int skinny_devicestate(void *data) +{ + struct skinny_line *l; + char *tmp; + + tmp = ast_strdupa(data); + + l = find_line_by_name(tmp); + + return get_devicestate(l); +} + +static struct ast_channel *skinny_request(const char *type, int format, void *data, int *cause) +{ + int oldformat; + + struct skinny_line *l; + struct ast_channel *tmpc = NULL; + char tmp[256]; + char *dest = data; + + oldformat = format; + + if (!(format &= AST_FORMAT_AUDIO_MASK)) { + ast_log(LOG_NOTICE, "Asked to get a channel of unsupported format '%d'\n", format); + return NULL; + } + + ast_copy_string(tmp, dest, sizeof(tmp)); + if (ast_strlen_zero(tmp)) { + ast_log(LOG_NOTICE, "Skinny channels require a device\n"); + return NULL; + } + l = find_line_by_name(tmp); + if (!l) { + ast_log(LOG_NOTICE, "No available lines on: %s\n", dest); + return NULL; + } + ast_verb(3, "skinny_request(%s)\n", tmp); + tmpc = skinny_new(l, AST_STATE_DOWN); + if (!tmpc) { + ast_log(LOG_WARNING, "Unable to make channel for '%s'\n", tmp); + } + restart_monitor(); + return tmpc; +} + +static int reload_config(void) +{ + int on = 1; + struct ast_config *cfg; + struct ast_variable *v; + char *cat; + struct skinny_device *d; + int oldport = ntohs(bindaddr.sin_port); + char *stringp, *context, *oldregcontext; + char newcontexts[AST_MAX_CONTEXT], oldcontexts[AST_MAX_CONTEXT]; + struct ast_flags config_flags = { 0 }; + + if (gethostname(ourhost, sizeof(ourhost))) { + ast_log(LOG_WARNING, "Unable to get hostname, Skinny disabled\n"); + return 0; + } + cfg = ast_config_load(config, config_flags); + + /* We *must* have a config file otherwise stop immediately */ + if (!cfg) { + ast_log(LOG_NOTICE, "Unable to load config %s, Skinny disabled\n", config); + return -1; + } + memset(&bindaddr, 0, sizeof(bindaddr)); + memset(&default_prefs, 0, sizeof(default_prefs)); + + /* Initialize copy of current global_regcontext for later use in removing stale contexts */ + ast_copy_string(oldcontexts, regcontext, sizeof(oldcontexts)); + oldregcontext = oldcontexts; + + /* Copy the default jb config over global_jbconf */ + memcpy(&global_jbconf, &default_jbconf, sizeof(struct ast_jb_conf)); + + /* load the general section */ + v = ast_variable_browse(cfg, "general"); + while (v) { + /* handle jb conf */ + if (!ast_jb_read_conf(&global_jbconf, v->name, v->value)) { + v = v->next; + continue; + } + + /* Create the interface list */ + if (!strcasecmp(v->name, "bindaddr")) { + if (!(hp = ast_gethostbyname(v->value, &ahp))) { + ast_log(LOG_WARNING, "Invalid address: %s\n", v->value); + } else { + memcpy(&bindaddr.sin_addr, hp->h_addr, sizeof(bindaddr.sin_addr)); + } + } else if (!strcasecmp(v->name, "keepalive")) { + keep_alive = atoi(v->value); + } else if (!strcasecmp(v->name, "vmexten")) { + ast_copy_string(vmexten, v->value, sizeof(vmexten)); + } else if (!strcasecmp(v->name, "regcontext")) { + ast_copy_string(newcontexts, v->value, sizeof(newcontexts)); + stringp = newcontexts; + /* Let's remove any contexts that are no longer defined in regcontext */ + cleanup_stale_contexts(stringp, oldregcontext); + /* Create contexts if they don't exist already */ + while ((context = strsep(&stringp, "&"))) { + ast_copy_string(used_context, context, sizeof(used_context)); + if (!ast_context_find(context)) + ast_context_create(NULL, context, "Skinny"); + } + ast_copy_string(regcontext, v->value, sizeof(regcontext)); + } else if (!strcasecmp(v->name, "dateformat")) { + memcpy(date_format, v->value, sizeof(date_format)); + } else if (!strcasecmp(v->name, "tos")) { + if (ast_str2tos(v->value, &tos)) + ast_log(LOG_WARNING, "Invalid tos value at line %d, refer to QoS documentation\n", v->lineno); + } else if (!strcasecmp(v->name, "tos_audio")) { + if (ast_str2tos(v->value, &tos_audio)) + ast_log(LOG_WARNING, "Invalid tos_audio value at line %d, refer to QoS documentation\n", v->lineno); + } else if (!strcasecmp(v->name, "tos_video")) { + if (ast_str2tos(v->value, &tos_video)) + ast_log(LOG_WARNING, "Invalid tos_video value at line %d, refer to QoS documentation\n", v->lineno); + } else if (!strcasecmp(v->name, "cos")) { + if (ast_str2cos(v->value, &cos)) + ast_log(LOG_WARNING, "Invalid cos value at line %d, refer to QoS documentation\n", v->lineno); + } else if (!strcasecmp(v->name, "cos_audio")) { + if (ast_str2cos(v->value, &cos_audio)) + ast_log(LOG_WARNING, "Invalid cos_audio value at line %d, refer to QoS documentation\n", v->lineno); + } else if (!strcasecmp(v->name, "cos_video")) { + if (ast_str2cos(v->value, &cos_video)) + ast_log(LOG_WARNING, "Invalid cos_video value at line %d, refer to QoS documentation\n", v->lineno); + } else if (!strcasecmp(v->name, "allow")) { + ast_parse_allow_disallow(&default_prefs, &default_capability, v->value, 1); + } else if (!strcasecmp(v->name, "disallow")) { + ast_parse_allow_disallow(&default_prefs, &default_capability, v->value, 0); + } else if (!strcasecmp(v->name, "bindport")) { + if (sscanf(v->value, "%d", &ourport) == 1) { + bindaddr.sin_port = htons(ourport); + } else { + ast_log(LOG_WARNING, "Invalid bindport '%s' at line %d of %s\n", v->value, v->lineno, config); + } + } + v = v->next; + } + + if (ntohl(bindaddr.sin_addr.s_addr)) { + __ourip = bindaddr.sin_addr; + } else { + hp = ast_gethostbyname(ourhost, &ahp); + if (!hp) { + ast_log(LOG_WARNING, "Unable to get our IP address, Skinny disabled\n"); + ast_config_destroy(cfg); + return 0; + } + memcpy(&__ourip, hp->h_addr, sizeof(__ourip)); + } + if (!ntohs(bindaddr.sin_port)) { + bindaddr.sin_port = ntohs(DEFAULT_SKINNY_PORT); + } + bindaddr.sin_family = AF_INET; + + /* load the device sections */ + cat = ast_category_browse(cfg, NULL); + while(cat) { + if (!strcasecmp(cat, "general")) { + /* Nothing to do */ +#if 0 + } else if (!strncasecmp(cat, "paging-", 7)) { + p = build_paging_device(cat, ast_variable_browse(cfg, cat)); + if (p) { + } +#endif + } else { + d = build_device(cat, ast_variable_browse(cfg, cat)); + if (d) { + ast_verb(3, "Added device '%s'\n", d->name); + ast_mutex_lock(&devicelock); + d->next = devices; + devices = d; + ast_mutex_unlock(&devicelock); + } + } + cat = ast_category_browse(cfg, cat); + } + ast_mutex_lock(&netlock); + if ((skinnysock > -1) && (ntohs(bindaddr.sin_port) != oldport)) { + close(skinnysock); + skinnysock = -1; + } + if (skinnysock < 0) { + skinnysock = socket(AF_INET, SOCK_STREAM, 0); + if(setsockopt(skinnysock, SOL_SOCKET, SO_REUSEADDR, &on, sizeof(on)) == -1) { + ast_log(LOG_ERROR, "Set Socket Options failed: errno %d, %s\n", errno, strerror(errno)); + ast_config_destroy(cfg); + return 0; + } + if (skinnysock < 0) { + ast_log(LOG_WARNING, "Unable to create Skinny socket: %s\n", strerror(errno)); + } else { + if (bind(skinnysock, (struct sockaddr *)&bindaddr, sizeof(bindaddr)) < 0) { + ast_log(LOG_WARNING, "Failed to bind to %s:%d: %s\n", + ast_inet_ntoa(bindaddr.sin_addr), ntohs(bindaddr.sin_port), + strerror(errno)); + close(skinnysock); + skinnysock = -1; + ast_config_destroy(cfg); + return 0; + } + if (listen(skinnysock,DEFAULT_SKINNY_BACKLOG)) { + ast_log(LOG_WARNING, "Failed to start listening to %s:%d: %s\n", + ast_inet_ntoa(bindaddr.sin_addr), ntohs(bindaddr.sin_port), + strerror(errno)); + close(skinnysock); + skinnysock = -1; + ast_config_destroy(cfg); + return 0; + } + ast_verb(2, "Skinny listening on %s:%d\n", + ast_inet_ntoa(bindaddr.sin_addr), ntohs(bindaddr.sin_port)); + ast_netsock_set_qos(skinnysock, tos, cos, "Skinny"); + ast_pthread_create_background(&accept_t,NULL, accept_thread, NULL); + } + } + ast_mutex_unlock(&netlock); + ast_config_destroy(cfg); + return 1; +} + +static void delete_devices(void) +{ + struct skinny_device *d, *dlast; + struct skinny_line *l, *llast; + struct skinny_speeddial *sd, *sdlast; + struct skinny_addon *a, *alast; + + ast_mutex_lock(&devicelock); + + /* Delete all devices */ + for (d=devices;d;) { + /* Delete all lines for this device */ + for (l=d->lines;l;) { + llast = l; + l = l->next; + ast_mutex_destroy(&llast->lock); + ast_free(llast); + } + /* Delete all speeddials for this device */ + for (sd=d->speeddials;sd;) { + sdlast = sd; + sd = sd->next; + ast_mutex_destroy(&sdlast->lock); + ast_free(sdlast); + } + /* Delete all addons for this device */ + for (a=d->addons;a;) { + alast = a; + a = a->next; + ast_mutex_destroy(&alast->lock); + ast_free(alast); + } + dlast = d; + d = d->next; + ast_free(dlast); + } + devices=NULL; + ast_mutex_unlock(&devicelock); +} + +#if 0 +/* + * XXX This never worked properly anyways. + * Let's get rid of it, until we can fix it. + */ +static int reload(void) +{ + delete_devices(); + reload_config(); + restart_monitor(); + return 0; +} +#endif + +static int load_module(void) +{ + int res = 0; + + for (; res < (sizeof(soft_key_template_default) / sizeof(soft_key_template_default[0])); res++) { + soft_key_template_default[res].softKeyEvent = htolel(soft_key_template_default[res].softKeyEvent); + } + /* load and parse config */ + res = reload_config(); + if (res == -1) { + return AST_MODULE_LOAD_DECLINE; + } + + /* Make sure we can register our skinny channel type */ + if (ast_channel_register(&skinny_tech)) { + ast_log(LOG_ERROR, "Unable to register channel class 'Skinny'\n"); + return -1; + } + + ast_rtp_proto_register(&skinny_rtp); + ast_cli_register_multiple(cli_skinny, sizeof(cli_skinny) / sizeof(struct ast_cli_entry)); + sched = sched_context_create(); + if (!sched) { + ast_log(LOG_WARNING, "Unable to create schedule context\n"); + } + io = io_context_create(); + if (!io) { + ast_log(LOG_WARNING, "Unable to create I/O context\n"); + } + /* And start the monitor for the first time */ + restart_monitor(); + + return res; +} + +static int unload_module(void) +{ + struct skinnysession *s, *slast; + struct skinny_device *d; + struct skinny_line *l; + struct skinny_subchannel *sub; + struct ast_context *con; + + ast_mutex_lock(&sessionlock); + /* Destroy all the interfaces and free their memory */ + s = sessions; + while(s) { + slast = s; + s = s->next; + for (d = slast->device; d; d = d->next) { + for (l = d->lines; l; l = l->next) { + ast_mutex_lock(&l->lock); + for (sub = l->sub; sub; sub = sub->next) { + ast_mutex_lock(&sub->lock); + if (sub->owner) { + sub->alreadygone = 1; + ast_softhangup(sub->owner, AST_SOFTHANGUP_APPUNLOAD); + } + ast_mutex_unlock(&sub->lock); + } + ast_mutex_unlock(&l->lock); + } + } + if (slast->fd > -1) + close(slast->fd); + ast_mutex_destroy(&slast->lock); + ast_free(slast); + } + sessions = NULL; + ast_mutex_unlock(&sessionlock); + + delete_devices(); + + ast_mutex_lock(&monlock); + if ((monitor_thread != AST_PTHREADT_NULL) && (monitor_thread != AST_PTHREADT_STOP)) { + pthread_cancel(monitor_thread); + pthread_kill(monitor_thread, SIGURG); + pthread_join(monitor_thread, NULL); + } + monitor_thread = AST_PTHREADT_STOP; + ast_mutex_unlock(&monlock); + + ast_mutex_lock(&netlock); + if (accept_t && (accept_t != AST_PTHREADT_STOP)) { + pthread_cancel(accept_t); + pthread_kill(accept_t, SIGURG); + pthread_join(accept_t, NULL); + } + accept_t = AST_PTHREADT_STOP; + ast_mutex_unlock(&netlock); + + ast_rtp_proto_unregister(&skinny_rtp); + ast_channel_unregister(&skinny_tech); + ast_cli_unregister_multiple(cli_skinny, sizeof(cli_skinny) / sizeof(struct ast_cli_entry)); + + close(skinnysock); + if (sched) + sched_context_destroy(sched); + + con = ast_context_find(used_context); + if (con) + ast_context_destroy(con, "Skinny"); + + return 0; +} + +AST_MODULE_INFO(ASTERISK_GPL_KEY, AST_MODFLAG_DEFAULT, "Skinny Client Control Protocol (Skinny)", + .load = load_module, + .unload = unload_module, + ); |