TT#33113 Apply callee_in rewrite rules to fax csc number

To enable correct routing

Change-Id: Ie422b13804431a4d56766a3fc150f896b817d553

lib/NGCP/Panel/Utils/Fax.pm

@@ -10,6 +10,7 @@ use TryCatch;
 use IPC::System::Simple qw/capture/;
 use Data::Dumper;
 use Net::Ping;
+use URI::Escape qw(uri_unescape);
 
 sub send_fax {
     my (%args) = @_;
@@ -58,6 +59,26 @@ sub send_fax {
     } else {
         $number = $sender;
     }
+    {
+        my ($user, $domain) = split(/\@/, $args{destination});
+        $user =~ s/^sips?://;
+        $user = uri_unescape(NGCP::Panel::Utils::Subscriber::apply_rewrite(
+            c => $c, subscriber => $subscriber, number => $user, direction => 'callee_in'
+        ));
+
+        if ($user) {
+            if($domain && $domain ne $subscriber->domain->domain) {
+                $user = $user . '@' . $domain;
+            }
+            $c->log->debug('number normalization: caller_in apply_rewrite result for '.$args{destination}.', billing subscriber id '.$subscriber->id.': user='.$user.'.');
+
+            $args{destination} = $user;
+
+        } else {
+            $c->log->debug('number normalization: caller_in apply_rewrite result is empty for '.$args{destination}.', billing subscriber id '.$subscriber->id.'.');    
+        }
+    }
+
     $sendfax_args{caller} = $number;
     $sendfax_args{callee} = $args{destination};