rendered paste bodyglobals { USER_FWD=<TODO:FWD#>; USER_VOIPJET=<TODO:VOIPJET-ID>; USER_SIPPHONE=<TODO:SIPPHONE#>; USER_TELIAX=<TODO:TELIAX-USER>; USER_IAXTEL=<TODO:IAXTEL-USER>; POTS_CID="<TODO:YOUR-NAME>" <<TODO:YOUR-POTS-#>>; LOCAL_AREACODE=<TODO:AREACODE>; // 2002-2254 -- LAN softphones DEV_2005=SIP/2005; DEV_2073=SIP/2073; DEV_2077=SIP/2077; // 2300-2399 -- Analogue hardphones DEV_2300=SIP/2300; DEV_2301=SIP/2301; // 2400-2499 -- Digital hardphones // 25xx (Individuals) & 27xx (Groups) are time-specific // 2500-2599 -- Individuals DEV_2505=SIP/2300&SIP/2005; DEV_2507=SIP/2077&SIP/2073&SIP/2301; // 2700-2799 -- Groups DEV_2700=SIP/2077&SIP/2073&SIP/2005&SIP/2300&SIP/2301; EMERGENCY=<TODO:EMERGENCY#>;};macro replace(s, find, replacement) { // replace arg2 with arg3 in arg1; store result in arg4 // NOTE: ARG2 and ARG3 *must* be exactly one byte! Set(Repl_dst=); // clear any old value for (Repl_field=1; ${LEN(${Repl_dst})} < ${LEN(${s})}; Repl_field=${Repl_field} + 1) { Set(Repl_new=${CUT(s,${find},${Repl_field})}); Set(Repl_dst=${Repl_dst}${replacement}${Repl_new}); }; Repl_var=REPLACED; if ("${ARG4}" != "") Set(Repl_var=${ARG4}); Set(${Repl_var}=${Repl_dst:${LEN(${replacement})}});};macro prepcall_beginmonitor(context, exten) { // arg1 = outgoing, incoming, or autodial // arg2 = exten if ("${CALLFILENAME}" == "") { &replace(${CALLERID(num)},/,~,MyCIDNUM); &replace(${MyCIDNUM},_,~,MyCIDNUM); &replace(${exten},_,~,MyEXTEN); &replace(${CHANNEL},/,~,MyCHANNEL); &replace(${MyCHANNEL},_,~,MyCHANNEL); Set(CALLFILENAME=${TIMESTAMP}_${context}_${MyCIDNUM}_${MyEXTEN}_${MyCHANNEL}_${UNIQUEID}); MONITOR_EXEC=soxmix; Monitor(wav,${CALLFILENAME},m); } else NoOp(Already recording to ${CALLFILENAME}!);};macro prepcall(context, exten) { &prepcall_beginmonitor(${context},${exten}); SetMusicOnHold(default);};macro iterate(IteratorHandle) { ${IteratorHandle}=${CUT(Iterator_${IteratorHandle}||1)}; // this needs SetVar so dashes aren't treated as subtraction! SetVar(Iterator_${IteratorHandle}=${CUT(Iterator_${IteratorHandle}||2-)});};macro iterator(OptList, IteratorHandle) { // this needs SetVar so dashes aren't treated as subtraction! SetVar(Iterator_${IteratorHandle}=${OptList}); &iterate(${IteratorHandle});};macro route-fwd(exten, IsPOTS, Timeout, DialOpts) { SetCallerID(${USER_FWD}); SetCIDName(${USER_FWD}); if (${IsPOTS}) { Dial(IAX2/${FWD_NUM}@fwd/\*${exten},${Timeout},${DialOpts}); } else { Dial(IAX2/${USER_FWD}@fwd/${exten},${Timeout},${DialOpts}); };};macro route-iconnecthere(exten, IsPOTS, Timeout, DialOpts) { SetCallerID(${POTS_CID}); Dial(SIP/${exten}@iconnecthere,${Timeout},L1800000:300000${DialOpts});};macro route-voipmich(exten, IsPOTS, Timeout, DialOpts) { Dial(SIP/${exten}@voipmich,${Timeout},${DialOpts});};macro route-voipjet(exten, IsPOTS, Timeout, DialOpts) { Dial(IAX2/${USER_VOIPJET}@voipjet/${exten},${Timeout},L(1800000:300000)${DialOpts});};macro route-voxee(exten, IsPOTS, Timeout, DialOpts) { Dial(IAX2/voxee/${exten},${Timeout},L(1800000:300000)${DialOpts});};macro route-myphonecompany(exten, IsPOTS, Timeout, DialOpts) { Dial(SIP/${exten}@sipmedia,${Timeout},L(300000:60000)${DialOpts});};macro route-sipphone(exten, IsPOTS, Timeout, DialOpts) { // TODO: if IsPOTS, use POTS CID etc SetCallerID(${USER_SIPPHONE}); Dial(SIP/${exten}@sipphone,${Timeout},${DialOpts});};macro route-teliax(exten, IsPOTS, Timeout, DialOpts) { Dial(IAX2/${USER_TELIAX}@teliax/${exten},${Timeout},${DialOpts});};macro route-iaxtel(exten, IsPOTS, Timeout, DialOpts) { Dial(IAX2/${USER_IAXTEL}@iaxtel.com/${exten}@iaxtel,${Timeout},${DialOpts});};macro route-enum(exten) { // TODO // Perhaps based on http://www.voip-info.org/wiki/view/RFC+Compliant+ENUM+Macro // Note we should follow 'tel:' redirects only via a subsequent enum lookup DIALSTATUS=NoENUM};macro route-home-person(exten) { Dial(${DEV_${exten}},20,rt); switch(${DIALSTATUS}) { case BUSY: Voicemail(b${exten}@local); break; default: Voicemail(u${exten}@local); }; catch a { VoiceMailMain(${exten}); }; Hangup();};macro route-home-location(exten) { Dial(${DEV_${exten}},30,rt); Playback(vm-nobodyavail); Hangup();};macro route-home-conference(exten) { // TODO};macro route-home-service(exten) { switch(${exten}) { case 2900: // TODO: Name directory break; case 2901: NoOp(TODO remove this-- it exists only to make the fallthru work); case 2957: VoicemailMain(); Hangup(); break; case 2997: jump s@incoming; break; };};macro route-home(exten) { switch(${exten}) { pattern 2[0-4]XX: type=location; break; pattern 2[57]XX: type=person; break; pattern 28XX: type=conference; break; pattern 29XX: type=service; break; }; &route-home-${type}(${exten});};macro TryRoutes(TRY, exten, IsPOTS, Timeout, DialOpts) { for (&iterator(${TRY},A); "${A}" != ""; &iterate(A)) { NoOP(Trying route ${A}); &route-${A}(${exten},${IsPOTS},${Timeout},${DialOpts}); switch(${DIALSTATUS}) { case BUSY: Busy(); Hangup(); // is this needed? break; default: NoOP(not busy\, so trying next route...); break; }; }; Congested();};macro dial-tollfree(exten, TrueIsPOTS, Timeout, DialOpts) { &TryRoutes(enum-voipmich-fwd-sipphone,${exten},1,${Timeout},${DialOpts});};macro dial-national(exten, TrueIsPOTS, Timeout, DialOpts) { &TryRoutes(enum-voipjet-voxee,${exten},1,${Timeout},${DialOpts});};macro dial-localarea(exten, TrueIsPOTS, Timeout, DialOpts) { // Input numbers: 367-5340, 913-367-5340, and 1-913-367-5340 (w/o -s, of course) // Note: This wraps to dial-national and does *NOT* filter to ensure a number is local switch(${exten}) { pattern NXXXXXX: &dial-localarea(${LOCAL_AREACODE}${exten},1,${Timeout},${DialOpts}); break; pattern NXXNXXXXXX: &dial-localarea(1${exten},1,${Timeout},${DialOpts}); break; pattern 1NXXNXXXXXX: &dial-national(${exten},1,${Timeout},${DialOpts}); break; };};context ext-tollfree { _1800NXXXXXX => { SetCallerID(${POTS_CID}); &dial-tollfree(${EXTEN},1,,Tr); }; _1866NXXXXXX => { SetCallerID(${POTS_CID}); &dial-tollfree(${EXTEN},1,,Tr); }; _1877NXXXXXX => { SetCallerID(${POTS_CID}); &dial-tollfree(${EXTEN},1,,Tr); }; _1888NXXXXXX => { SetCallerID(${POTS_CID}); &dial-tollfree(${EXTEN},1,,Tr); }; _1899NXXXXXX => { SetCallerID(${POTS_CID}); &dial-tollfree(${EXTEN},1,,Tr); };};context ext-localarea { 911 => { SetCallerID(${POTS_CID}); &dial-localarea(${EMERGENCY},1,,Tr); }; _NXXXXXX => { SetCallerID(${POTS_CID}); &dial-localarea(${EXTEN},1,,Tr); }; _NXXNXXXXXX => { SetCallerID(${POTS_CID}); &dial-localarea(${EXTEN},1,,Tr); };};context ext-national { _1NXXNXXXXXX => { SetCallerID(${POTS_CID}); &dial-national(${EXTEN},1,,Tr); };};context ext-USpots { includes { ext-tollfree; ext-localarea; ext-national; };};context ext-global { // Teliax has cheap India & Israel // TODO};context ext-universal { // TODO};context ext-iaxtelPotsEmu { // Must be included *before* ext-national _1700NXXXXXX => &route-iaxtel(${EXTEN},0,,Tr);};context ext-sipphonePotsEmu { _1222. => &route-sipphone(${EXTEN},0,,Tr); // Conference _1747. => &route-sipphone(${EXTEN},0,,Tr); // SIPPhone};context ext-fwdPotsEmu { _1393. => &route-fwd(${EXTEN:4},0,,Tr); // FWD};context ext-potsAndEmu { includes { ext-USpots; ext-iaxtelPotsEmu; ext-sipphonePotsEmu; ext-fwdPotsEmu; };};context ext-home { _2[0-57-9]XX => &route-home(${EXTEN});};context ext-speeddial { 350 => &dial-national(<TODO:SPEEDDIAL#>,1,,Tr); 364 => &dial-national(<TODO:SPEEDDIAL#>,1,,Tr); 380 => { &dial-national(<TODO:SPEEDDIAL#TRY1>,1,,Tr); &dial-national(<TODO:SPEEDDIAL#TRY2>,1,,Tr); &dial-national(<TODO:SPEEDDIAL#TRY3>,1,,Tr); };};context home { _. => { &prepcall(home,${EXTEN}); SetCallerPres(allowed_passed_screen); jump ${EXTEN}@home-2; };};context home-2 { includes { ext-home; ext-speeddial; }; 911 => jump ${EXTEN}@ext-localarea; _1NXXNXXXXXX => jump ${EXTEN}@ext-potsAndEmu; _9. => jump ${EXTEN:1}@ext-potsAndEmu; 7 => { if (${CALLERIDNUM} = 2300) { jump 2301; } else { jump 2300; }; };};macro normalize_cid() { switch(${CALLERID(number)}) { pattern NXXNXXXXXX: CALLERID(number)=1${CALLERID(number)}; break; pattern 1NXXNXXXXXX: break; // Ideal match pattern +1NXXNXXXXXX: CALLERID(number)=${CALLERID(number):1}; break; };};macro determinecidname() { TXTCIDName(${CALLERID(number)}); if (${LEN(${TXTCIDName})} > 0) CALLERID(name)=${TXTCIDName};};context incoming-hangup { h => { NoOP(Hangup in incoming); Hangup(); };};context incoming-default { _. => { Ringing(); &normalize_cid(); &prepcall(incoming,${EXTEN}); Zapateller(nocallerid); PrivacyManager(); //&determinecidname(); NoOP(Caller ID is ${CALLERID(all)}); SetCallerPres(allowed_not_screened); jump 2700@ext-home; };};context incoming { includes { incoming-hangup; incoming-default; };};// TODO: dial by name directory & menu-invalid// TODO: autodial