From 0bcc396638d05e3b76ba8932aa373cce5dbd8579 Mon Sep 17 00:00:00 2001
From: Daniel Tiefnig <dtiefnig@sipwise.com>
Date: Thu, 24 Sep 2009 17:42:53 +0000
Subject: [PATCH] using prov-iface check functions for E.164 numbers

---
 lib/admin/Controller/subscriber.pm | 16 +++++++++++++---
 1 file changed, 13 insertions(+), 3 deletions(-)

diff --git a/lib/admin/Controller/subscriber.pm b/lib/admin/Controller/subscriber.pm
index ba54835..82a23fa 100644
--- a/lib/admin/Controller/subscriber.pm
+++ b/lib/admin/Controller/subscriber.pm
@@ -382,12 +382,22 @@ sub update_subscriber : Local {
         unless(length $cc and length $ac and length $sn) {
             $messages{number} = 'Client.Voip.MissingNumberPart';
         } else {
+            my $checkresult;
+            return unless $c->model('Provisioning')->call_prov( $c, 'voip', 'check_cc',
+                                                                $cc, \$checkresult
+                                                              );
             $messages{number_cc} = 'Client.Voip.MalformedCc'
-                unless $cc =~ /^[1-9][0-9]{0,2}$/;
+                unless $checkresult;
+            return unless $c->model('Provisioning')->call_prov( $c, 'voip', 'check_ac',
+                                                                $ac, \$checkresult
+                                                              );
             $messages{number_ac} = 'Client.Voip.MalformedAc'
-                unless $ac =~ /^[1-9][0-9]{0,4}$/;
+                unless $checkresult;
+            return unless $c->model('Provisioning')->call_prov( $c, 'voip', 'check_sn',
+                                                                $sn, \$checkresult
+                                                              );
             $messages{number_sn} = 'Client.Voip.MalformedSn'
-                unless $sn =~ /^[1-9][0-9]+$/;
+                unless $checkresult;
         }
     } else {
         $settings{cc} = undef;