summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJeremy Davis <jeremyd@freeside.biz>2014-06-20 13:36:34 -0400
committerJeremy Davis <jeremyd@freeside.biz>2014-06-20 13:36:34 -0400
commita1e109664e34feb4e8dd10a771d26f01743140ee (patch)
tree5abc155d113b7952f9eb2500958a17d7d3aa16ef
parentc93e10d1ea0304bea31416c31706a92998fa0159 (diff)
28898 Change to cisco format
-rw-r--r--FS/FS/cdr/cisco.pm17
1 files changed, 12 insertions, 5 deletions
diff --git a/FS/FS/cdr/cisco.pm b/FS/FS/cdr/cisco.pm
index ebb2d0055..f9b9befbc 100644
--- a/FS/FS/cdr/cisco.pm
+++ b/FS/FS/cdr/cisco.pm
@@ -29,7 +29,7 @@ use Date::Parse;
skip(3), #origNodeId
#origSpan
#origIpAddr
- 'src', #callingPartyNumber
+ 'src', #callingPartyNumber
skip(20), #callingPartyUnicodeLoginUserID
#origCause_location
#origCause_value
@@ -50,7 +50,10 @@ use Date::Parse;
#destNodeId
#destSpan
#destIpAddr
- 'dst', #originalCalledPartyNumber
+ sub { my ($cdr, $dst) = @_;
+ $dst =~ s/\#//;
+ $cdr->set('dst', $dst);
+ }, #originalCalledPartyNumber
skip(17), #finalCalledPartyNumber
#finalCalledPartyUnicodeLoginUserID
#destCause_location
@@ -77,7 +80,7 @@ use Date::Parse;
#finalCalledPartyNumberPartition
#lastRedirectDnPartition
'billsec', #duration
- skip(48), #origDeviceName
+ skip(22), #origDeviceName
#destDeviceName
#origCallTerminationOnBehalfOf
#destCallTerminationOnBehalfOf
@@ -99,8 +102,12 @@ use Date::Parse;
#origMediaCap_Bandwidth
#destMediaCap_Bandwidth
#authorizationCodeValue
- #outpulsedCallingPartyNumber
- #outpulsedCalledPartyNumber
+ sub { my ($cdr, $number) = @_;
+ if ($number){
+ $cdr->set('src',$number);
+ }
+ }, #outpulsedCallingPartyNumber
+ skip(23), #outpulsedCalledPartyNumber
#origIpv4v6Addr
#destIpv4v6Addr
#origVideoCap_Codec_Channel2