История изменений [назад]

Удалось победить эту проблему. Во первых я указал в настройках шлюза Pulse Dial Mode Во вторых шлюзу не нравился fullname на русском языке, для исправления этого глюка можно использовать AGI скрипт на перле аля

exten => 305,1,AGI(translit.pl)                                                                                                                                
exten => 305,n,NoOp()                                                                                                                                          
exten => 305,n,Dial(SIP/osnk/305)                                                                                                                              
exten => 305,n,Hangup()

но пока я ограничился цифрами в

[307](users)
secret = 23sdsDFF_73
fullname = 307
cid_number = 307

Проблема решена =)

Удалось победить эту проблему. Во первых я указал в настройках шлюза Pulse Dial Mode Во вторых шлюзу не нравился fullname на русском языке, для исправления этого глюка можно использовать AGI скрипт на перле аля

exten => 305,1,AGI(translit.pl)                                                                                                                                
exten => 305,n,NoOp()                                                                                                                                          
exten => 305,n,Dial(SIP/osnk/305)                                                                                                                              
exten => 305,n,Hangup()

но пока я ограничился цифрами в

[307](users)
secret = 23sdsDFF_73
fullname = 307
cid_number = 307

Проблема решена =)

#!/usr/bin/perl

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");
#Encode::from_to($calleridname, "utf8", "cp1251");
my $tr = new Lingua::Translit("GOST 7.79 RUS");
my $calleridname = $tr->translit($calleridname);

$calleridname =~ s/ /_/g;
$AGI->exec('Set', "CALLERID(name)=\"$calleridname\"");

exit(0);

Удалось победить эту проблему. Во первых я указал в настройках шлюза Pulse Dial Mode Во вторых шлюзу не нравился fullname на русском языке, для исправления этого глюка можно использовать AGI скрипт на перле аля

exten => 305,1,AGI(translit.pl)                                                                                                                                
exten => 305,n,NoOp()                                                                                                                                          
exten => 305,n,Dial(SIP/osnk/305)                                                                                                                              
exten => 305,n,Hangup()

но пока я ограничился цифрами в

[307](users)
secret = 23sdsDFF_73
fullname = 307
cid_number = 307

Проблема решена =)

ps ps

translit.pl

cat /var/lib/asterisk/agi-bin/translit.pl

#!/usr/bin/perl

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");
#Encode::from_to($calleridname, "utf8", "cp1251");
my $tr = new Lingua::Translit("GOST 7.79 RUS");
my $calleridname = $tr->translit($calleridname);

$calleridname =~ s/ /_/g;
$AGI->exec('Set', "CALLERID(name)=\"$calleridname\"");

exit(0);

Удалось победить эту проблему. проблему проанализировав дамп пакетов со шлюза. Во первых я указал в настройках шлюза Pulse Dial Mode Во вторых шлюзу не нравился fullname на русском языке, для исправления этого глюка можно использовать AGI скрипт на перле аля

exten => 305,1,AGI(translit.pl)                                                                                                                                
exten => 305,n,NoOp()                                                                                                                                          
exten => 305,n,Dial(SIP/osnk/305)                                                                                                                              
exten => 305,n,Hangup()

но пока я ограничился цифрами в

[307](users)
secret = 23sdsDFF_73
fullname = 307
cid_number = 307

Проблема решена =)

ps

translit.pl

cat /var/lib/asterisk/agi-bin/translit.pl

#!/usr/bin/perl

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");
#Encode::from_to($calleridname, "utf8", "cp1251");
my $tr = new Lingua::Translit("GOST 7.79 RUS");
my $calleridname = $tr->translit($calleridname);

$calleridname =~ s/ /_/g;
$AGI->exec('Set', "CALLERID(name)=\"$calleridname\"");

exit(0);