pollutri
/
res_levis_API
1
0
Vork 0
Code Kwesties 0 Pull-aanvragen 0 Publicaties 0 Wiki Activiteit
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
5 Commits
1 Branch
203 MiB
 
 
 
 
Tree: 1141c5ca64
Branches Labels
${ item.name }
Maak branch ${ searchTerm }
van '1141c5ca64'
${ noResults }
res_levis_API/scheduler.pl

231 regels
11 KiB
Ruw Blame Geschiedenis 

  1. #!/usr/bin/perl

  2. #

  3. 

  4. require '/usr/local/majormin/libUTILSgeneral.pl';

  5. require '/usr/local/majormin/web-lib.pl';

  6. 

  7. 

  8. #require '/usr/local/bin/ast/voice.pl';

  9. 

  10. ### MAIN ###

  11. scheduler();

  12. ### END MAIN ###

  13. 

  14. sub scheduler {

  15.     # scheduler attivo

  16.     # importo i records contenenti le chiamate in run

  17.     @calls = &getRecordsXML("/opt/api_project_python/runningCalls.xml", "call");

  18.     # if (!@calls){

  19.     #     # non appena finiscono le chiamate in coda, stoppa la ricorsione 

  20.     #     return;

  21.     # };

  22.     # controllo lo stato del device, se libero effettuo la telefonata, se occupato richiama scheduler.

  23.     do {

  24.         

  25.         if ($calls[0]{'status'} eq "setup"){

  26.             $hw_id = $calls[0]{'hw_id'};

  27.             $device_state = &device_state($hw_id);

  28.             if ($device_state eq "Free"){

  29. 

  30.                 `(cd /data/service/voip.majornet/ivr;/usr/local/bin/sox_wav2gsm)`;

  31.                 `rm $calls[0]{'tmpdir'}.wav`;

  32.                 # imposto un timeout nel caso in cui asterisk abbia problemi, o ci sia un problema imprevisto che 

  33.                 # possa causare un loop (Timeout non più necessario, la chiamata ad asterisk è implementata in modo asincrono)

  34.                 # $timeout=600;

  35.                 # eval {

  36.                 #     local $SIG{ALRM} = sub { die "alarm\n" }; # NB: \n required

  37.                 #     alarm $timeout;

  38.                     # prendo il primo record e provo ad effettuare la chiamata

  39.                 my $stringToVoicePl = "voicegateway|".$calls[0]{'from'}."|".$calls[0]{'call_id'}."|".$calls[0]{'ntel'}."|".$calls[0]{'ackid'}."|".$calls[0]{'text_message'}."|".$calls[0]{'retry_message'}."|".$calls[0]{'timeout'}."|".$calls[0]{'retry'}."|".$calls[0]{'notification_send'}."|".$calls[0]{'notification_to'}."|digiovine@afasystems.it|$calls[0]{'tmpdir'}|";

  40.                 my $callToVoicePl = `/usr/bin/perl /usr/local/bin/ast/voice.pl "$stringToVoicePl" &`;

  41.                 #     alarm 0;

  42.                 # };

  43.                 # if ($@) {

  44.                 #     die unless $@ eq "alarm\n";   # propagate unexpected errors

  45.                     

  46.                 # else {

  47.                 #     # didn't

  48.                 # }

  49.             }

  50. 

  51.             # if ($callToVoicePl eq "Success"){

  52.             #     $calls[0]{'status'} = "Success"

  53.             # }

  54.             # elsif ($callToVoicePl eq "Timeout"){

  55.             #     $calls[0]{'status'} = "Timeout"

  56.             # }

  57.             # else{

  58.             #     $calls[0]{'status'} = "Aborted"

  59.             # }

  60.             # cancelliamo il record contenente la chiamata attuale dal file delle chiamate in run

  61.             #&deleteRecordXML("./runningCalls.xml", "call_id", $calls[0]{'call_id'});

  62.             

  63.             # &addRecordXML(\%hash_call, "/opt/api_project_python/terminatedCalls.xml", "/opt/api_project_python/terminatedCallsTmpl.xml", "call");

  64.             

  65.         }

  66.         if ($calls[0]{'status'} eq "active"){

  67.             

  68.             ($sec,$min) = localtime();

  69.             $time_now = ($min*60)+$sec;

  70.             $time_delta = $time_now - $calls[0]{'last_action'};

  71.             

  72. 

  73.             # my $filename = 'report.txt';

  74.             # open(my $fh, '>', $filename) or die "Could not open file '$filename' $!";

  75.             # print $fh "time now: ".$time_now." time delta: ".$time_delta."\nlast_action: ".$calls[0]{'last_action'};

  76.             # close $fh;

  77.         

  78. 

  79.             # if ($time_delta < 120){

  80.             #     &deleteRecordXML("/opt/api_project_python/runningCalls.xml", "call_id", $hash_call{'call_id'});  

  81.             #     &addRecordXML(\%hash_call, "/opt/api_project_python/runningCalls.xml", "/opt/api_project_python/runningCallsTmpl.xml", "call");          

  82.             # }

  83.             if ($time_delta > 120) {

  84.                 

  85.                 my %hash_call;

  86.                 $hash_call{'mode'}= $calls[0]{'mode'};

  87.                 $hash_call{'from'}= $calls[0]{'from'};

  88.                 $hash_call{'call_id'}= $calls[0]{'call_id'};

  89.                 $hash_call{'ntel'}=$calls[0]{'ntel'};

  90.                 $hash_call{'ackid'}=$calls[0]{'ackid'};

  91.                 $hash_call{'text_message'}=$calls[0]{'text_message'};

  92.                 $hash_call{'retry_message'}=$calls[0]{'retry_message'};

  93.                 $hash_call{'timeout'}=$calls[0]{'timeout'};

  94.                 $hash_call{'retry'}=$calls[0]{'retry'};

  95.                 $hash_call{'notification_send'}=$calls[0]{'notification_send'};

  96.                 $hash_call{'notification_to'}=$calls[0]{'notification_to'};

  97.                 $hash_call{'notification_bcc'}=$calls[0]{'notification_bcc'};

  98.                 $hash_call{'tmpdir'}=$calls[0]{'tmpdir'};

  99.                 $hash_call{'status'}=$calls[0]{'status'};

  100.                 $hash_call{'fromemail'}=$calls[0]{'fromemail'};

  101.                 $hash_call{'first_action'}=$calls[0]{'first_action'};

  102.                 $hash_call{'last_action'}=$calls[0]{'last_action'};

  103.                 $hash_call{'status'} = "interrupted call";

  104. 

  105.                 `rm $calls[0]{'tmpdir'}.gsm`;

  106.                 &deleteRecordXML("/opt/api_project_python/runningCalls.xml", "call_id", $hash_call{'call_id'});  

  107.                 &addRecordXML(\%hash_call, "/opt/api_project_python/terminatedCalls.xml", "/opt/api_project_python/terminatedCallsTmpl.xml", "call");          

  108.             }

  109.             elsif ($time_delta < 0){

  110.                 my %hash_call;

  111.                 $hash_call{'mode'}= $calls[0]{'mode'};

  112.                 $hash_call{'from'}= $calls[0]{'from'};

  113.                 $hash_call{'call_id'}= $calls[0]{'call_id'};

  114.                 $hash_call{'ntel'}=$calls[0]{'ntel'};

  115.                 $hash_call{'ackid'}=$calls[0]{'ackid'};

  116.                 $hash_call{'text_message'}=$calls[0]{'text_message'};

  117.                 $hash_call{'retry_message'}=$calls[0]{'retry_message'};

  118.                 $hash_call{'timeout'}=$calls[0]{'timeout'};

  119.                 $hash_call{'retry'}=$calls[0]{'retry'};

  120.                 $hash_call{'notification_send'}=$calls[0]{'notification_send'};

  121.                 $hash_call{'notification_to'}=$calls[0]{'notification_to'};

  122.                 $hash_call{'notification_bcc'}=$calls[0]{'notification_bcc'};

  123.                 $hash_call{'tmpdir'}=$calls[0]{'tmpdir'};

  124.                 $hash_call{'status'}=$calls[0]{'status'};

  125.                 $hash_call{'fromemail'}=$calls[0]{'fromemail'};

  126.                 $hash_call{'first_action'}=$calls[0]{'first_action'};

  127.                 $hash_call{'last_action'}=$calls[0]{'last_action'};

  128.                 $hash_call{'status'} = "interrupted call";

  129. 

  130.                 `rm $calls[0]{'tmpdir'}.gsm`;

  131.                 &deleteRecordXML("/opt/api_project_python/runningCalls.xml", "call_id", $hash_call{'call_id'});  

  132.                 &addRecordXML(\%hash_call, "/opt/api_project_python/terminatedCalls.xml", "/opt/api_project_python/terminatedCallsTmpl.xml", "call");          

  133.             

  134.             }

  135.         }

  136.         if ($calls[0]{'status'} eq "not answered"){

  137.             my %hash_call;

  138.             $hash_call{'mode'}= $calls[0]{'mode'};

  139.             $hash_call{'from'}= $calls[0]{'from'};

  140.             $hash_call{'call_id'}= $calls[0]{'call_id'};

  141.             $hash_call{'ntel'}=$calls[0]{'ntel'};

  142.             $hash_call{'ackid'}=$calls[0]{'ackid'};

  143.             $hash_call{'text_message'}=$calls[0]{'text_message'};

  144.             $hash_call{'retry_message'}=$calls[0]{'retry_message'};

  145.             $hash_call{'timeout'}=$calls[0]{'timeout'};

  146.             $hash_call{'retry'}=$calls[0]{'retry'};

  147.             $hash_call{'notification_send'}=$calls[0]{'notification_send'};

  148.             $hash_call{'notification_to'}=$calls[0]{'notification_to'};

  149.             $hash_call{'notification_bcc'}=$calls[0]{'notification_bcc'};

  150.             $hash_call{'tmpdir'}=$calls[0]{'tmpdir'};

  151.             $hash_call{'status'}=$calls[0]{'status'};

  152.             $hash_call{'fromemail'}=$calls[0]{'fromemail'};

  153.             $hash_call{'first_action'}=$calls[0]{'first_action'};

  154.             $hash_call{'last_action'}=$calls[0]{'last_action'};

  155. 

  156.             `rm $calls[0]{'tmpdir'}.gsm`;

  157.             &deleteRecordXML("/opt/api_project_python/runningCalls.xml", "call_id", $hash_call{'call_id'});  

  158.             &addRecordXML(\%hash_call, "/opt/api_project_python/terminatedCalls.xml", "/opt/api_project_python/terminatedCallsTmpl.xml", "call");          

  159.         }

  160.         if ($calls[0]{'status'} eq "correct_code"){

  161.             my %hash_call;

  162.             $hash_call{'mode'}= $calls[0]{'mode'};

  163.             $hash_call{'from'}= $calls[0]{'from'};

  164.             $hash_call{'call_id'}= $calls[0]{'call_id'};

  165.             $hash_call{'ntel'}=$calls[0]{'ntel'};

  166.             $hash_call{'ackid'}=$calls[0]{'ackid'};

  167.             $hash_call{'text_message'}=$calls[0]{'text_message'};

  168.             $hash_call{'retry_message'}=$calls[0]{'retry_message'};

  169.             $hash_call{'timeout'}=$calls[0]{'timeout'};

  170.             $hash_call{'retry'}=$calls[0]{'retry'};

  171.             $hash_call{'notification_send'}=$calls[0]{'notification_send'};

  172.             $hash_call{'notification_to'}=$calls[0]{'notification_to'};

  173.             $hash_call{'notification_bcc'}=$calls[0]{'notification_bcc'};

  174.             $hash_call{'tmpdir'}=$calls[0]{'tmpdir'};

  175.             $hash_call{'status'}=$calls[0]{'status'};

  176.             $hash_call{'fromemail'}=$calls[0]{'fromemail'};

  177.             $hash_call{'first_action'}=$calls[0]{'first_action'};

  178.             $hash_call{'last_action'}=$calls[0]{'last_action'};

  179.             

  180.             `rm $calls[0]{'tmpdir'}.gsm`;

  181.             &deleteRecordXML("/opt/api_project_python/runningCalls.xml", "call_id", $hash_call{'call_id'});  

  182.             &addRecordXML(\%hash_call, "/opt/api_project_python/terminatedCalls.xml", "/opt/api_project_python/terminatedCallsTmpl.xml", "call");          

  183.         }

  184.         if ($calls[0]{'status'} eq "wrong_code"){

  185.             my %hash_call;

  186.             $hash_call{'mode'}= $calls[0]{'mode'};

  187.             $hash_call{'from'}= $calls[0]{'from'};

  188.             $hash_call{'call_id'}= $calls[0]{'call_id'};

  189.             $hash_call{'ntel'}=$calls[0]{'ntel'};

  190.             $hash_call{'ackid'}=$calls[0]{'ackid'};

  191.             $hash_call{'text_message'}=$calls[0]{'text_message'};

  192.             $hash_call{'retry_message'}=$calls[0]{'retry_message'};

  193.             $hash_call{'timeout'}=$calls[0]{'timeout'};

  194.             $hash_call{'retry'}=$calls[0]{'retry'};

  195.             $hash_call{'notification_send'}=$calls[0]{'notification_send'};

  196.             $hash_call{'notification_to'}=$calls[0]{'notification_to'};

  197.             $hash_call{'notification_bcc'}=$calls[0]{'notification_bcc'};

  198.             $hash_call{'tmpdir'}=$calls[0]{'tmpdir'};

  199.             $hash_call{'status'}=$calls[0]{'status'};

  200.             $hash_call{'fromemail'}=$calls[0]{'fromemail'};

  201.             $hash_call{'first_action'}=$calls[0]{'first_action'};

  202.             $hash_call{'last_action'}=$calls[0]{'last_action'};

  203.             

  204.             `rm $calls[0]{'tmpdir'}.gsm`;

  205.             &deleteRecordXML("/opt/api_project_python/runningCalls.xml", "call_id", $hash_call{'call_id'});  

  206.             &addRecordXML(\%hash_call, "/opt/api_project_python/terminatedCalls.xml", "/opt/api_project_python/terminatedCallsTmpl.xml", "call");          

  207.         }

  208.         sleep(10);

  209.         

  210.         @calls = &getRecordsXML("/opt/api_project_python/runningCalls.xml", "call");

  211.         $lenght = @calls;

  212.     } while ($lenght);

  213. }

  214. 

  215. sub device_state{

  216.     

  217.     $hw_id = shift;

  218.     $device = `asterisk -rx "dongle show device state $hw_id"`;

  219.     my @device = split /\n/, $device;

  220.     my @device = split/: /, $device[2];

  221.     $device_state = $device[1];

  222.     chomp($device_state);

  223. 

  224.     return $device_state;

  225. }

  226. 

  227. 

  228.     # my $filename = 'report.txt';

  229.     # open(my $fh, '>', $filename) or die "Could not open file '$filename' $!";

  230.     # print $fh $hw_id."\n";

  231.     # close $fh;