Changeset 42

Show
Ignore:
Timestamp:
05/14/07 16:16:43 (2 years ago)
Author:
root
Message:

Support for patched valetparking

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved

  • trunk/op_server.pl

    r41 r42  
    28032803 
    28042804    $evento =~ s/UserEvent//g; 
    2805     if    ( $evento =~ /Newchannel/ )           { $evento = "newchannel"; } 
    2806     elsif ( $evento =~ /Newcallerid/ )          { $evento = "newcallerid"; } 
    2807     elsif ( $evento =~ /^Status$/ )             { $evento = "status"; } 
    2808     elsif ( $evento =~ /^StatusComplete/ )      { $evento = "statuscomplete"; } 
    2809     elsif ( $evento =~ /Newexten/ )             { $evento = "newexten"; } 
    2810     elsif ( $evento =~ /^ParkedCall$/ )         { $evento = "parkedcall"; } 
    2811     elsif ( $evento =~ /^UnParkedCall$/ )       { $evento = "unparkedcall"; } 
    2812     elsif ( $evento =~ /Newstate/ )             { $evento = "newstate"; } 
    2813     elsif ( $evento =~ /Hangup/ )               { $evento = "hangup"; } 
    2814     elsif ( $evento =~ /Rename/ )               { $evento = "rename"; } 
    2815     elsif ( $evento =~ /MessageWaiting/ )       { $evento = "voicemail"; } 
    2816     elsif ( $evento =~ /Regstatus/ )            { $evento = "regstatus"; } 
    2817     elsif ( $evento =~ /^Unlink/ )              { $evento = "unlink"; } 
    2818     elsif ( $evento =~ /QueueParams/ )          { $evento = "queueparams"; } 
    2819     elsif ( $evento =~ /PeerEntry/ )            { $evento = "peerentry"; } 
    2820     elsif ( $evento =~ /QueueEntry/ )           { $evento = "queueentry"; } 
    2821     elsif ( $evento =~ /^QueueMember$/ )        { $evento = "queuemember"; } 
    2822     elsif ( $evento =~ /^QueueMemberStatus$/ )  { $evento = "queuememberstatus"; } 
    2823     elsif ( $evento =~ /QueueMemberAdded/ )     { $evento = "queuememberadded"; } 
    2824     elsif ( $evento =~ /QueueMemberRemoved/ )   { $evento = "queuememberremoved"; } 
    2825     elsif ( $evento =~ /QueueMemberPaused/ )    { $evento = "queuememberpaused"; } 
    2826     elsif ( $evento =~ /QueueStatus$/ )         { $evento = "queuestatus"; } 
    2827     elsif ( $evento =~ /QueueStatusComplete/ )  { $evento = "queuestatuscomplete"; } 
    2828     elsif ( $evento =~ /^Link/ )                { $evento = "link"; } 
    2829     elsif ( $evento =~ /^Join/ )                { $evento = "join"; } 
    2830     elsif ( $evento =~ /^MeetmeJoin/ )          { $evento = "meetmejoin"; } 
    2831     elsif ( $evento =~ /^MeetmeLeave/ )         { $evento = "meetmeleave"; } 
    2832     elsif ( $evento =~ /^meetmemute/ )          { $evento = "meetmemute"; } 
    2833     elsif ( $evento =~ /^meetmeunmute/ )        { $evento = "meetmeunmute"; } 
    2834     elsif ( $evento =~ /^Agentlogin/ )          { $evento = "agentlogin"; } 
    2835     elsif ( $evento =~ /^RefreshQueue/ )        { $evento = "refreshqueue"; } 
    2836     elsif ( $evento =~ /^Timeout/ )             { $evento = "timeout"; } 
    2837     elsif ( $evento =~ /^AgentCalled/ )         { $evento = "agentcalled"; } 
    2838     elsif ( $evento =~ /^AgentConnect/ )        { $evento = "agentconnect"; } 
    2839     elsif ( $evento =~ /^AgentComplete/ )       { $evento = "agentcomplete"; } 
    2840     elsif ( $evento =~ /^Agentcallbacklogin/ )  { $evento = "agentcblogin"; } 
    2841     elsif ( $evento =~ /^Agentcallbacklogoff/ ) { $evento = "agentlogoff"; } 
    2842     elsif ( $evento =~ /^Agentlogoff/ )         { $evento = "agentlogoff"; } 
    2843     elsif ( $evento =~ /^IsMeetmeMember/ )      { $evento = "fakeismeetmemember"; } 
    2844     elsif ( $evento =~ /^PeerStatus/ )          { $evento = "peerstatus"; } 
    2845     elsif ( $evento =~ /^Leave/ )               { $evento = "leave"; } 
    2846     elsif ( $evento =~ /^FOP_Popup/i )          { $evento = "foppopup"; } 
    2847     elsif ( $evento =~ /^FOP_LedColor/i )       { $evento = "fopledcolor"; } 
    2848     elsif ( $evento =~ /^Dial/ )                { $evento = "dial"; } 
    2849     elsif ( $evento =~ /^ASTDB/ )               { $evento = "astdb"; } 
    2850     elsif ( $evento =~ /^DNDState/ )            { $evento = "zapdndstate"; } 
    2851     elsif ( $evento =~ /^ZapShowChannels$/ )    { $evento = "zapdndstate"; } 
    2852     elsif ( $evento =~ /^ExtensionStatus$/ )    { $evento = "extensionstatus"; } 
    2853     elsif ( $evento =~ /^OriginateSuccess$/ )   { $evento = "originatesuccess"; } 
    2854     elsif ( $evento =~ /^OriginateFailure$/ )   { $evento = "originatefailure"; } 
    2855     elsif ( $evento =~ /^ChannelReload$/ )      { $evento = "channelreload"; } 
     2805    if    ( $evento =~ /Newchannel/ )                  { $evento = "newchannel"; } 
     2806    elsif ( $evento =~ /Newcallerid/ )                 { $evento = "newcallerid"; } 
     2807    elsif ( $evento =~ /^Status$/ )                    { $evento = "status"; } 
     2808    elsif ( $evento =~ /^StatusComplete/ )             { $evento = "statuscomplete"; } 
     2809    elsif ( $evento =~ /Newexten/ )                    { $evento = "newexten"; } 
     2810    elsif ( $evento =~ /^ParkedCall$/ )                { $evento = "parkedcall"; } 
     2811    elsif ( $evento =~ /^UnParkedCall$/ )              { $evento = "unparkedcall"; } 
     2812    elsif ( $evento =~ /^virtualvaletparkedcall/i )    { $evento = "parkedcall"; } 
     2813    elsif ( $evento =~ /^virtualvaletunparkedcall$/i ) { $evento = "unparkedcall"; } 
     2814    elsif ( $evento =~ /Newstate/ )                    { $evento = "newstate"; } 
     2815    elsif ( $evento =~ /Hangup/ )                      { $evento = "hangup"; } 
     2816    elsif ( $evento =~ /Rename/ )                      { $evento = "rename"; } 
     2817    elsif ( $evento =~ /MessageWaiting/ )              { $evento = "voicemail"; } 
     2818    elsif ( $evento =~ /Regstatus/ )                   { $evento = "regstatus"; } 
     2819    elsif ( $evento =~ /^Unlink/ )                     { $evento = "unlink"; } 
     2820    elsif ( $evento =~ /QueueParams/ )                 { $evento = "queueparams"; } 
     2821    elsif ( $evento =~ /PeerEntry/ )                   { $evento = "peerentry"; } 
     2822    elsif ( $evento =~ /QueueEntry/ )                  { $evento = "queueentry"; } 
     2823    elsif ( $evento =~ /^QueueMember$/ )               { $evento = "queuemember"; } 
     2824    elsif ( $evento =~ /^QueueMemberStatus$/ )         { $evento = "queuememberstatus"; } 
     2825    elsif ( $evento =~ /QueueMemberAdded/ )            { $evento = "queuememberadded"; } 
     2826    elsif ( $evento =~ /QueueMemberRemoved/ )          { $evento = "queuememberremoved"; } 
     2827    elsif ( $evento =~ /QueueMemberPaused/ )           { $evento = "queuememberpaused"; } 
     2828    elsif ( $evento =~ /QueueStatus$/ )                { $evento = "queuestatus"; } 
     2829    elsif ( $evento =~ /QueueStatusComplete/ )         { $evento = "queuestatuscomplete"; } 
     2830    elsif ( $evento =~ /^Link/ )                       { $evento = "link"; } 
     2831    elsif ( $evento =~ /^Join/ )                       { $evento = "join"; } 
     2832    elsif ( $evento =~ /^MeetmeJoin/ )                 { $evento = "meetmejoin"; } 
     2833    elsif ( $evento =~ /^MeetmeLeave/ )                { $evento = "meetmeleave"; } 
     2834    elsif ( $evento =~ /^meetmemute/ )                 { $evento = "meetmemute"; } 
     2835    elsif ( $evento =~ /^meetmeunmute/ )               { $evento = "meetmeunmute"; } 
     2836    elsif ( $evento =~ /^Agentlogin/ )                 { $evento = "agentlogin"; } 
     2837    elsif ( $evento =~ /^RefreshQueue/ )               { $evento = "refreshqueue"; } 
     2838    elsif ( $evento =~ /^Timeout/ )                    { $evento = "timeout"; } 
     2839    elsif ( $evento =~ /^AgentCalled/ )                { $evento = "agentcalled"; } 
     2840    elsif ( $evento =~ /^AgentConnect/ )               { $evento = "agentconnect"; } 
     2841    elsif ( $evento =~ /^AgentComplete/ )              { $evento = "agentcomplete"; } 
     2842    elsif ( $evento =~ /^Agentcallbacklogin/ )         { $evento = "agentcblogin"; } 
     2843    elsif ( $evento =~ /^Agentcallbacklogoff/ )        { $evento = "agentlogoff"; } 
     2844    elsif ( $evento =~ /^Agentlogoff/ )                { $evento = "agentlogoff"; } 
     2845    elsif ( $evento =~ /^IsMeetmeMember/ )             { $evento = "fakeismeetmemember"; } 
     2846    elsif ( $evento =~ /^PeerStatus/ )                 { $evento = "peerstatus"; } 
     2847    elsif ( $evento =~ /^Leave/ )                      { $evento = "leave"; } 
     2848    elsif ( $evento =~ /^FOP_Popup/i )                 { $evento = "foppopup"; } 
     2849    elsif ( $evento =~ /^FOP_LedColor/i )              { $evento = "fopledcolor"; } 
     2850    elsif ( $evento =~ /^Dial/ )                       { $evento = "dial"; } 
     2851    elsif ( $evento =~ /^ASTDB/ )                      { $evento = "astdb"; } 
     2852    elsif ( $evento =~ /^DNDState/ )                   { $evento = "zapdndstate"; } 
     2853    elsif ( $evento =~ /^ZapShowChannels$/ )           { $evento = "zapdndstate"; } 
     2854    elsif ( $evento =~ /^ExtensionStatus$/ )           { $evento = "extensionstatus"; } 
     2855    elsif ( $evento =~ /^OriginateSuccess$/ )          { $evento = "originatesuccess"; } 
     2856    elsif ( $evento =~ /^OriginateFailure$/ )          { $evento = "originatefailure"; } 
     2857    elsif ( $evento =~ /^ChannelReload$/ )             { $evento = "channelreload"; } 
    28562858    else { log_debug( "$heading No event match ($evento)", 32 ); } 
    28572859 
    …… 
    48654867    } 
    48664868    elsif ( $evento eq "parkedcall" ) { 
    4867         $texto        = "&parked," . $hash_temporal{'Exten'} . "&"; 
     4869        my $parksl = ""; 
     4870        if ( defined( $hash_temporal{LotName} ) ) { 
     4871            $parksl = $hash_temporal{LotName} . "-" . $hash_temporal{Exten}; 
     4872        } 
     4873        else { 
     4874            $parksl = $hash_temporal{Exten}; 
     4875        } 
     4876        $texto        = "&parked," . $parksl . "&"; 
    48684877        $estado_final = "ocupado3"; 
    48694878        my ( $canal, undef ) = separate_session_from_channel( $hash_temporal{'Channel'} ); 
    …… 
    48714880        my $timeout  = ""; 
    48724881        my $unidchan = find_uniqueid( $hash_temporal{'Channel'}, $server ); 
    4873         $textid = $datos{$unidchan}{'Callerid'} 
    4874           if ( defined( $datos{$unidchan}{'Callerid'} ) ); 
    4875         $textid = $datos{$unidchan}{'CallerID'} 
    4876           if ( defined( $datos{$unidchan}{'CallerID'} ) ); 
    4877         $timeout = "(" . $hash_temporal{'Timeout'} . ")"; 
     4882        if ( defined( $hash_temporal{CallerID} ) ) { 
     4883            $textid = $hash_temporal{CallerID} . " " . $hash_temporal{CallerIDName}; 
     4884        } 
     4885        else { 
     4886            $textid = $datos{$unidchan}{Callerid} 
     4887              if ( defined( $datos{$unidchan}{Callerid} ) ); 
     4888            $textid = $datos{$unidchan}{CallerID} 
     4889              if ( defined( $datos{$unidchan}{CallerID} ) ); 
     4890        } 
     4891        $timeout = "(" . $hash_temporal{Timeout} . ")"; 
    48784892        $textid =~ s/\"//g; 
    48794893        $textid =~ s/\<//g; 
    48804894        $textid =~ s/\>//g; 
    48814895        push @return, "$canal|ocupado3|$texto|$unidchan|$canalid"; 
    4882         push @return, "PARK/$hash_temporal{'Exten'}|park|[$textid]$timeout|$hash_temporal{'Timeout'}-$server|$hash_temporal{'Channel'}"; 
    4883  
    4884         log_debug( "$heading pongo parked($server^$hash_temporal{'Channel'}) en $hash_temporal{'Exten'}", 64 ) if DEBUG; 
    4885         $parked{"$server^$hash_temporal{'Channel'}"} = $hash_temporal{'Exten'}; 
     4896        push @return, "PARK/$parksl|park|[$textid]$timeout|$hash_temporal{'Timeout'}-$server|$hash_temporal{'Channel'}"; 
     4897 
     4898        log_debug( "$heading pongo parked($server^$hash_temporal{'Channel'}) en $parksl", 64 ) if DEBUG; 
     4899        $parked{"$server^$hash_temporal{'Channel'}"} = $parksl; 
    48864900        $evento = "";    #NEW 
     4901        print "park PARK/$parksl|park|[$textid]$timeout|$hash_temporal{'Timeout'}-$server|$hash_temporal{'Channel'}\n"; 
    48874902    } 
    48884903    elsif ( $evento eq "newcallerid" ) {