Передача Calling Name из Asterisk в Panasonic TDA (QSIG)

Код: Выделить всё

static int add_callername_facility_ies(struct pri *pri, q931_call *c, int cpe) { int res = 0; int i = 0; unsigned char buffer[256]; unsigned char namelen = 0; struct rose_component *comp = NULL, *compstk[10]; int compsp = 0; int mymessage = 0; static unsigned char op_tag[] = { 0x2a, /* informationFollowing 42 */ 0x86, 0x48, 0xce, 0x15, 0x00, 0x04 }; if (!strlen(c->callername)) { return -1; } buffer[i++] = (ASN1_CONTEXT_SPECIFIC | Q932_PROTOCOL_EXTENSIONS); /* Interpretation component */ if (pri->switchtype == PRI_SWITCH_QSIG) { ASN1_ADD_SIMPLE(comp, COMP_TYPE_NFE, buffer, i); ASN1_PUSH(compstk, compsp, comp); ASN1_ADD_BYTECOMP(comp, (ASN1_CONTEXT_SPECIFIC | ASN1_TAG_0), buffer, i, 0); ASN1_ADD_BYTECOMP(comp, (ASN1_CONTEXT_SPECIFIC | ASN1_TAG_2), buffer, i, 0); ASN1_FIXUP(compstk, compsp, buffer, i); } ASN1_ADD_BYTECOMP(comp, COMP_TYPE_INTERPRETATION, buffer, i, 0); ASN1_ADD_SIMPLE(comp, COMP_TYPE_INVOKE, buffer, i); ASN1_PUSH(compstk, compsp, comp); /* Invoke ID */ ASN1_ADD_BYTECOMP(comp, ASN1_INTEGER, buffer, i, get_invokeid(pri)); /* Operation Tag */ res = asn1_string_encode(ASN1_OBJECTIDENTIFIER, &buffer[i], sizeof(buffer)-i, sizeof(op_tag), op_tag, sizeof(op_tag)); if (res < 0) return -1; i += res; ASN1_ADD_BYTECOMP(comp, ASN1_ENUMERATED, buffer, i, 0); ASN1_FIXUP(compstk, compsp, buffer, i); if (!cpe) { if (pri_call_apdu_queue(c, Q931_SETUP, buffer, i, NULL, NULL)) return -1; } /* Now the APDU that contains the information that needs sent. * We can reuse the buffer since the queue function doesn't * need it. */ i = 0; namelen = strlen(c->callername); if (namelen > 50) { namelen = 50; /* truncate the name */ } buffer[i++] = (ASN1_CONTEXT_SPECIFIC | Q932_PROTOCOL_EXTENSIONS); /* Interpretation component */ if (pri->switchtype == PRI_SWITCH_QSIG) { ASN1_ADD_SIMPLE(comp, COMP_TYPE_NFE, buffer, i); ASN1_PUSH(compstk, compsp, comp); ASN1_ADD_BYTECOMP(comp, (ASN1_CONTEXT_SPECIFIC | ASN1_TAG_0), buffer, i, 0); ASN1_ADD_BYTECOMP(comp, (ASN1_CONTEXT_SPECIFIC | ASN1_TAG_2), buffer, i, 0); ASN1_FIXUP(compstk, compsp, buffer, i); } ASN1_ADD_BYTECOMP(comp, COMP_TYPE_INTERPRETATION, buffer, i, 0); ASN1_ADD_SIMPLE(comp, COMP_TYPE_INVOKE, buffer, i); ASN1_PUSH(compstk, compsp, comp); /* Invoke ID */ ASN1_ADD_BYTECOMP(comp, ASN1_INTEGER, buffer, i, get_invokeid(pri)); /* Operation ID: Calling name */ ASN1_ADD_BYTECOMP(comp, ASN1_INTEGER, buffer, i, SS_CNID_CALLINGNAME); res = asn1_string_encode((ASN1_CONTEXT_SPECIFIC | ASN1_TAG_0), &buffer[i], sizeof(buffer)-i, 50, c->callername, namelen); if (res < 0) return -1; i += res; ASN1_FIXUP(compstk, compsp, buffer, i); if (cpe) mymessage = Q931_SETUP; else mymessage = Q931_FACILITY; if (pri_call_apdu_queue(c, mymessage, buffer, i, NULL, NULL)) return -1; return 0; } /* End Callername */

Код: Выделить всё

buffer[i++] = (ASN1_CONTEXT_SPECIFIC | Q932_PROTOCOL_EXTENSIONS); 

Код: Выделить всё

buffer[i++] = (ASN1_CONTEXT_SPECIFIC | 0x11); 

Код: Выделить всё

use Asterisk::AGI; use Encode; # use http://search.cpan.org/dist/Lingua-Translit/translit use Lingua::Translit; $AGI = new Asterisk::AGI; my %input = $AGI->ReadParse(); my $callerid = $input{'callerid'}; my $calleridname = $input{'calleridname'}; Encode::from_to($calleridname, "cp1251", "utf8"); my $tr = new Lingua::Translit("ISO 9"); my $calleridname = $tr->translit($calleridname); $calleridname =~ s/ /_/g; $AGI->exec('Set', "CALLERID(name)=\"$calleridname\""); exit(0); 

Код: Выделить всё

[DID_span_2] exten = _X.,1,Noop(${CALLERID(name)}) exten = _X.,n,AGI(calleridnamerecode.pl) exten = _X.,n,Noop(${CALLERID(name)})

Код: Выделить всё

my $tr = new Lingua::Translit("GOST 7.79 RUS");

Код: Выделить всё

# dpkg -l \*asterisk\* | grep ii ii asterisk 1:1.6.2.5-0ubuntu1.1 Open Source Private Branch Exchange (PBX) ii asterisk-config 1:1.6.2.5-0ubuntu1.1 Configuration files for Asterisk ii asterisk-sounds-main 1:1.6.2.5-0ubuntu1.1 Core Sound files for Asterisk (English) ii libasterisk-agi-perl 1.01-2 Collections of Perl modules to be used with # dpkg -l \*dahdi\* | grep ii ii dahdi 1:2.2.1-0ubuntu2 utilities for using the DAHDI kernel modules ii dahdi-dkms 1:2.2.1+dfsg-1ubuntu2 DAHDI telephony interface (dkms kernel drive ii dahdi-linux 1:2.2.1+dfsg-1ubuntu2 DAHDI telephony interface - Linux userspace ii dahdi-modules-2.6.24-24-server 1:2.1.0.4~dfsg-1.6981linvinus1+2.6.24-24.51 DAHDI modules for Linux (kernel 2.6.24-24-se ii dahdi-modules-2.6.32-24-generic-pae 1:2.2.1+dfsg-1ubuntu2+2.6.32-24.39 DAHDI modules for Linux (kernel 2.6.32-24-ge ii dahdi-source 1:2.2.1+dfsg-1ubuntu2 DAHDI telephony interface - source code for # dpkg -l \*libpri\* | grep ii ii libpri1.4 1.4.10.2-99linvinus1 Primary Rate ISDN specification library 

Код: Выделить всё

# Span 3: TE4/0/2 "T4XXP (PCI) Card 0 Span 2". span=2,2,0,ccs,hdb3 # termtype: te bchan=32-46,48-62 dchan=47 echocanceller=oslec,32-46,48-62 

Код: Выделить всё

[span_2] group = 2 context = DID_span_2 trunkname = Span 2 hasexten = no callerid = fullname usecallerid=yes hidecallerid=no hidecalleridname=no cidsignalling=bell callwaiting=yes usecallingpres=yes callwaitingcallerid=yes threewaycalling=yes transfer=yes canpark=yes cancallforward=yes callreturn=yes echocancel=yes echocancelwhenbridged=yes relaxdtmf=yes rxgain=0.0 txgain=0.0 pridialplan=private prilocaldialplan=unknown facilityenable=yes trunkstyle = digital ; GUI metadata switchtype = qsig signalling=pri_cpe dahdichan = 32-46,48-62 

Код: Выделить всё

 [globals] span_2 = DAHDI/g2 [DID_span_2] exten = _X.,1,Noop(${CALLERID(name)}) exten = _X.,n,AGI(calleridnamerecode.pl) exten = _X.,n,Noop(${CALLERID(name)}) exten = _X.,n,Goto(Default,${EXTEN:0},1) exten = _X.,n,hangup()