From 65a7666c8558b856b4eb683bd74fe98fc0b395fe Mon Sep 17 00:00:00 2001
From: Andreas Granig <agranig@sipwise.com>
Date: Thu, 23 Feb 2012 17:10:08 +0000
Subject: [PATCH] Implement adding a permanent location entry.

---
 lib/admin/Controller/subscriber.pm | 36 ++++++++++++++++++++++++++++++
 root/tt/subscriber_detail.tt       | 22 +++++++++++++-----
 2 files changed, 52 insertions(+), 6 deletions(-)

diff --git a/lib/admin/Controller/subscriber.pm b/lib/admin/Controller/subscriber.pm
index 789006c..b6724a8 100644
--- a/lib/admin/Controller/subscriber.pm
+++ b/lib/admin/Controller/subscriber.pm
@@ -558,6 +558,42 @@ sub expire : Local {
     {
         $c->session->{messages}{contmsg} = 'Server.Voip.RemovedRegisteredContact';
         $c->response->redirect("/subscriber/detail?subscriber_id=$subscriber_id#activeregs");
+	return;
+    }
+
+    $c->response->redirect("/subscriber/detail?subscriber_id=$subscriber_id");
+}
+
+sub add_permanent_contact : Local {
+    my ( $self, $c ) = @_;
+
+    my $subscriber;
+
+    my $subscriber_id = $c->request->params->{subscriber_id};
+    my $contact = $c->request->params->{contact};
+
+    unless($contact =~ /^sip\:[a-zA-Z0-9\-\_\.\!\~\*\'\(\)\%]+\@[a-zA-Z0-9\-\.\[\]\:]+(\:\d{1,5})?$/) {
+        $c->session->{messages}{conterr} = 'Client.Syntax.MalformedUri';
+        $c->response->redirect("/subscriber/detail?subscriber_id=$subscriber_id#activeregs");
+        return;
+    }
+
+    return unless $c->model('Provisioning')->call_prov( $c, 'voip', 'get_subscriber_by_id',
+                                                        { subscriber_id => $subscriber_id },
+                                                        \$subscriber
+                                                      );
+
+    if($c->model('Provisioning')->call_prov( $c, 'voip', 'add_subscriber_registered_device',
+                                             { username => $$subscriber{username},
+                                               domain   => $$subscriber{domain},
+                                               contact  => $contact,
+                                             },
+                                             undef
+                                           ))
+    {
+        $c->session->{messages}{contmsg} = 'Server.Voip.AddedRegisteredContact';
+        $c->response->redirect("/subscriber/detail?subscriber_id=$subscriber_id#activeregs");
+	return;
     }
 
     $c->response->redirect("/subscriber/detail?subscriber_id=$subscriber_id");
diff --git a/root/tt/subscriber_detail.tt b/root/tt/subscriber_detail.tt
index b5181c9..e7fbebb 100644
--- a/root/tt/subscriber_detail.tt
+++ b/root/tt/subscriber_detail.tt
@@ -237,10 +237,11 @@
         <h3 id="activeregs">Active Device Registrations</h3>
 
         [% IF messages.contmsg %]<div class="success">[% messages.contmsg %]</div>[% END %]
+        [% IF messages.conterr %]<div class="error">[% messages.conterr %]</div>[% END %]
 
+        <ul class="cleanlist">
         [% IF subscriber.registered_contacts.0 %]
           [% FOREACH regcon = subscriber.registered_contacts %]
-            <ul class="cleanlist">
               <li class="ui-state-default ui-state-quad">
                 <div class="span-5">User Agent:</div>
                 <div class="span-11 last"> [% regcon.user_agent %]</div>
@@ -249,16 +250,25 @@
                 <div class="span-5">NAT</div>
                 <div class="span-11 last">[% IF regcon.nat %]yes[% ELSE %]no[% END %]</div>
                 <div class="span-5">Expires</div>
-                <div class="span-4">[% regcon.expires %]</div>
-                <div class="span-7 last"><a href="expire?subscriber_id=[% subscriber.subscriber_id %]&amp;contact_id=[% regcon.id %]"><span class="button-delete">Expire Now</span></a></div>
+                <div class="span-7">[% regcon.expires %]</div>
+                <div class="span-1 last"><a href="expire?subscriber_id=[% subscriber.subscriber_id %]&amp;contact_id=[% regcon.id %]"><span class="button-delete">Expire Now</span></a></div>
               </li>
-            </ul><br clear="all" /><br clear="all" />
           [% END %]
         [% ELSE %]
-          <ul class="cleanlist">
             <li class="ui-state-default"><div>None</div></li>
-          </ul>
         [% END %]
+        [% UNLESS Catalyst.session.admin.read_only %]
+            <li class="ui-state-default">
+              <form method="post" action="add_permanent_contact">
+                <input type="hidden" name="subscriber_id" value="[% subscriber.subscriber_id %]"/>
+                <div class="span-4">Add permanent Contact:</div>
+                <div class="span-1"><span class="ui-icon ui-icon-help help" title="Inserts a permanent registration entry. Use this if your SIP Client doesn't have the capabilities to register. Required input is a full SIP URI in form <i>sip:user@ip:port</i>"></span></div>
+                <div class="span-7"><input type="text" size="35" name="contact" value="" title="Full SIP URI in form sip:user@ip:port" /></div>
+                <div class="span-1 last"><button class="button-add">Add</button></div>
+              </form>
+            </li>
+        [% END %]
+        </ul>
 
         <div class="hspace-20"></div>
         <h3 id="activeregs">Active Peer Registration</h3>