[Ipcop-svn] SF.net SVN: ipcop:[7680] ipcop/trunk

[owes]

Revision: 7680
          http://sourceforge.net/p/ipcop/svn/7680
Author:   owes
Date:     2014-10-28 13:06:25 +0000 (Tue, 28 Oct 2014)
Log Message:
-----------
Add spdns.de dynamic DNS hoster

Modified Paths:
--------------
    ipcop/trunk/src/libs/ddns-lib.pl
    ipcop/trunk/src/scripts/setddns.pl
    ipcop/trunk/updates/2.1.6/ROOTFILES.i486-2.1.6
    ipcop/trunk/updates/2.1.6/information.xml

Modified: ipcop/trunk/src/libs/ddns-lib.pl
===================================================================
--- ipcop/trunk/src/libs/ddns-lib.pl    2014-10-28 13:04:19 UTC (rev 7679)
+++ ipcop/trunk/src/libs/ddns-lib.pl    2014-10-28 13:06:25 UTC (rev 7680)
@@ -100,6 +100,9 @@
     {LOGIN => 1, HOSTNAME => 0, DOMAIN => 0, PASSWORD => 1, LBNAME => '', HELP 
=> ''};
 $DDNS::va{'sitelutions.com'} =
     {LOGIN => 1, HOSTNAME => 1, DOMAIN => 0, PASSWORD => 1, LBNAME => '', HELP 
=> 'Put record-id in hostname field'};
+# Help is hard-coded in German for now
+$DDNS::va{'spdns.de'} =
+    {LOGIN => 1, HOSTNAME => 1, DOMAIN => 1, PASSWORD => 1, LBNAME => '', HELP 
=> 'Hostname ohne Domain'};
 $DDNS::va{'strato.com'} =
     {LOGIN => 1, HOSTNAME => 0, DOMAIN => 1, PASSWORD => 1, LBNAME => '', HELP 
=> ''};
 $DDNS::va{'tiggerswelt.net'} =

Modified: ipcop/trunk/src/scripts/setddns.pl
===================================================================
--- ipcop/trunk/src/scripts/setddns.pl  2014-10-28 13:04:19 UTC (rev 7679)
+++ ipcop/trunk/src/scripts/setddns.pl  2014-10-28 13:06:25 UTC (rev 7680)
@@ -835,6 +835,35 @@
         }
     }
 
+    # spdns.de
+    elsif ($settings{'SERVICE'} eq 'spdns') {
+ 
+        my ($out, $response) = Net::SSLeay::get_https(
+            'update.spdns.de', 443,
+            
"/nic/update?hostname=$settings{'HOSTNAME'}.$settings{'DOMAIN'}&myip=$ip",
+            Net::SSLeay::make_headers(
+                'User-Agent'    => 'Ipcop',
+                'Authorization' => 'Basic ' . 
encode_base64("$settings{'LOGIN'}:$settings{'PASSWORD'}")
+            )
+        );
+ 
+        #Valid responses from service are:
+        # status=good  status=nochg
+        if ($response =~ m%HTTP/1\.. 200 OK%) {
+            if ($out !~ m/(good|nochg)/) {
+                $out =~ s/\n/ /g;
+                &General::log("Dynamic DNS ip-update for 
$settings{'HOSTNAME'}.$settings{'DOMAIN'} : failure ($out)");
+            }
+            else {
+                &General::log("Dynamic DNS ip-update for 
$settings{'HOSTNAME'}.$settings{'DOMAIN'} : success");
+                $success++;
+            }
+        }
+        else {
+            &General::log("Dynamic DNS ip-update for 
$settings{'HOSTNAME'}.$settings{'DOMAIN'} : failure (could not connect to 
server)");
+        }
+    }
+
     # strato
     elsif ($settings{'SERVICE'} eq 'strato') {
 

Modified: ipcop/trunk/updates/2.1.6/ROOTFILES.i486-2.1.6
===================================================================
--- ipcop/trunk/updates/2.1.6/ROOTFILES.i486-2.1.6      2014-10-28 13:04:19 UTC 
(rev 7679)
+++ ipcop/trunk/updates/2.1.6/ROOTFILES.i486-2.1.6      2014-10-28 13:06:25 UTC 
(rev 7680)
@@ -13,11 +13,13 @@
 /home/httpd/cgi-bin/vpnca.cgi
 /home/httpd/vhost81/cgi-bin/chpasswd.cgi
 /usr/lib/ipcop/DataAccess.pl
+/usr/lib/ipcop/ddns-lib.pl
 /usr/local/bin/disk-partition.sh
 /usr/local/bin/makesquidconf.pl
 /usr/local/bin/puzzleFwRules.pl
 /usr/local/bin/restarthttpd
 /usr/local/bin/restartsyslogd
+/usr/local/bin/setddns.pl
 /usr/local/bin/setreservedports.pl
 /usr/local/sbin/flashfinal.sh
 /usr/local/sbin/setup

Modified: ipcop/trunk/updates/2.1.6/information.xml
===================================================================
--- ipcop/trunk/updates/2.1.6/information.xml   2014-10-28 13:04:19 UTC (rev 
7679)
+++ ipcop/trunk/updates/2.1.6/information.xml   2014-10-28 13:06:25 UTC (rev 
7680)
@@ -1,8 +1,8 @@
 <ipcop>
     <update>
         <version>2.1.6</version>
-        <releasedate>2014-09-dd</releasedate>
-        <size>0</size>
+        <releasedate>2014-10-28</releasedate>
+        <size>20806</size>
         <isoimages>yes</isoimages>
         <description>Language updates.&lt;br /&gt;
         Patch bash for CVE-2014-6271, 6277, 6278, 7169, 7186, 7187, openssl 
for CVE-2010-5298.&lt;br /&gt;

This was sent by the SourceForge.net collaborative development platform, the 
world's largest Open Source development site.


------------------------------------------------------------------------------
_______________________________________________
Ipcop-svn mailing list
Ipcop-svn@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/ipcop-svn