--- opensrs-client-3.0.0.orig/etc/OpenSRS.conf +++ opensrs-client-3.0.0/etc/OpenSRS.conf @@ -25,10 +25,10 @@ $SHOW_REGISTER = 0; $F_SHOW_CC_FIELDS = 1; -$PATH_SOURCE = ""; # e.g., "/home/username/opensrs" -$PATH_LOG = "$PATH_SOURCE/var/logs"; -$PATH_LIB = "$PATH_SOURCE/lib"; -$PATH_TEMPLATES = "$PATH_SOURCE/templates"; +$PATH_SOURCE = "/usr"; # e.g., "/home/username/opensrs" +$PATH_LOG = "/var/log/opensrs"; +$PATH_LIB = "/usr/share/opensrs"; +$PATH_TEMPLATES = "/usr/share/opensrs/templates"; %RACESETTINGS = ( DATAFILE => "$PATH_LIB/RACE/CharlintK.storage", MAPFILE => "$PATH_LIB/RACE/MapData-03.txt", @@ -56,9 +56,9 @@ IDN_ENCODING_TYPE => 'UTF-8', HTTP_ENCODING => 'UTF-8', IDN_CONVERSION_TOOL_LINK => '', # link to Punycode.cgi - + connection_type => 'CBC', # CBC, HTTPS - crypt_type => '', # Blowfish, DES, or Blowfish_PP (slow!). ONLY important + crypt_type => 'Blowfish', # Blowfish, DES, or Blowfish_PP (slow!). ONLY important # if connection type is CBC # regular expression that lists the domains serviced by OpenSRS @@ -242,9 +242,9 @@ # MAIL_TYPE => "smtp", #### define this if you set $MAIL_TYPE = 'sendmail' - #MAILPROG => '/usr/sbin/sendmail -t -oi -oem', + MAILPROG => '/usr/sbin/sendmail -t -oi -oem', # path and args for sendmail - MAILPROG => "cat >>mail.log",#for test system + #MAILPROG => "cat >>mail.log",#for test system #### recommended option for servers on win32 platform #### define these values if you set $MAIL_TYPE = 'smtp' --- opensrs-client-3.0.0.orig/cgi/reg_email.cgi +++ opensrs-client-3.0.0/cgi/reg_email.cgi @@ -35,14 +35,13 @@ # XXX NOTE XXX Update this configuration file BEGIN { # first "do" the major config file - $path_to_config = ""; + $path_to_config = "/etc"; do "$path_to_config/OpenSRS.conf"; # now load up the config for Email services do "$path_to_config/Email.conf"; } use strict; -use lib $PATH_LIB; use CGI ':cgi-lib'; use HTML::Template; use Data::Dumper; --- opensrs-client-3.0.0.orig/cgi/verify_install.cgi +++ opensrs-client-3.0.0/cgi/verify_install.cgi @@ -34,11 +34,10 @@ if ($ENV{OSRS_CLIENT_ETC}){ do "$ENV{OSRS_CLIENT_ETC}/OpenSRS.conf"; } else { - do "/OpenSRS.conf"; + do "/etc/OpenSRS.conf"; } } -use lib $PATH_LIB; use Config; use IO::Socket; --- opensrs-client-3.0.0.orig/debian/rules +++ opensrs-client-3.0.0/debian/rules @@ -0,0 +1,76 @@ +#!/usr/bin/make -f +# -*- Makefile -*- + +# Make sure perl is defined (allow overriding from the command line +PERL ?= /usr/bin/perl + +# Set our build directory +b := $(shell pwd)/debian/libopensrs-perl + +arrange: arrange-stamp +arrange-stamp: install + dh_testdir + touch arrange-stamp + +binary: binary-stamp +binary-stamp: binary-indep binary-arch + dh_testdir + touch binary-stamp + +binary-arch: binary-arch-stamp +binary-arch-stamp: arrange + dh_testdir + touch binary-arch-stamp + +binary-indep: binary-indep-stamp +binary-indep-stamp: arrange + dh_testdir + dh_testroot + dh_installdocs + dh_installchangelogs ChangeLog + dh_installexamples + dh_fixperms + dh_installdeb + dh_perl + dh_strip + dh_shlibdeps + dh_link + dh_compress + dh_gencontrol + dh_builddeb + touch binary-indep-stamp + +build: build-stamp +build-stamp: config + dh_testdir + touch build-stamp + +clean: + dh_testdir + dh_testroot + dh_clean arrange-stamp binary-stamp binary-arch-stamp binary-indep-stamp build-stamp config-stamp install-stamp + +config: config-stamp +config-stamp: + dh_testdir + touch config-stamp + +install: install-stamp +install-stamp: build + dh_testdir + install -d $(b)/etc + install -d $(b)/usr/share/perl5/Core + install -d $(b)/usr/share/perl5/OpenSRS + install -d $(b)/usr/share/opensrs/RACE + cp etc/OpenSRS.conf $(b)/etc + cp lib/OPS.pm $(b)/usr/share/perl5 + cp lib/XML_Codec.pm $(b)/usr/share/perl5 + cp -r lib/Core/* $(b)/usr/share/perl5/Core + cp -r lib/OpenSRS/* $(b)/usr/share/perl5/OpenSRS + cp lib/CHARLINT.pm $(b)/usr/share/perl5 + cp lib/NAMEPREP.pm $(b)/usr/share/perl5 + cp lib/RACE.pm $(b)/usr/share/perl5 + cp -r lib/RACE $(b)/usr/share/opensrs/RACE/ + touch install-stamp + +.PHONY: binary binary-arch binary-indep clean --- opensrs-client-3.0.0.orig/debian/watch +++ opensrs-client-3.0.0/debian/watch @@ -0,0 +1,4 @@ +# format version number, currently 3; this line is compulsory! +version=3 + +http://opensrs.com/resources/opensrs/clientcode/opensrs-client-(.*).tgz --- opensrs-client-3.0.0.orig/debian/changelog +++ opensrs-client-3.0.0/debian/changelog @@ -0,0 +1,47 @@ +opensrs-client (3.0.0-1) unstable; urgency=low + + * New upstream release. + * Acknowledge NMUs. + * Expand package description. (Closes: #414433) + * Bump debhelper compat level to 7. + * Add Homepage field to debian/control. + * Add watch file. + * Add missing dependency on libdata-structure-util-perl. + * Bump Standards-Version to 3.8.3.0 + + -- Jonathan McDowell Sat, 26 Dec 2009 13:06:21 +0000 + +opensrs-client (2.9.5-1.2) unstable; urgency=low + + * Non-maintainer upload. + * Use Digest::MD5 instead of deprecated (now removed) MD5 module; patch + by Ansgar Burchardt. (Closes: #539010) + * Move debhelper to build-dep from build-dep-indep, since it is needed + by "clean". + + -- Stefano Zacchiroli Sat, 26 Dec 2009 09:48:58 +0100 + +opensrs-client (2.9.5-1.1) unstable; urgency=low + + * Non-maintainer upload. + * debian/rules: fixed bashisms. (Closes: #459113) + + -- Miguel Angel Ruiz Manzano Thu, 24 Jan 2008 17:43:44 -0300 + +opensrs-client (2.9.5-1) unstable; urgency=low + + * New upstream release. + + -- Jonathan McDowell Thu, 06 Apr 2006 13:49:05 +0100 + +opensrs-client (2.9.2-2) unstable; urgency=low + + * Correct copyright file details. + + -- Jonathan McDowell Sun, 13 Nov 2005 20:47:36 +0000 + +opensrs-client (2.9.2-1) unstable; urgency=low + + * Initial Debianization. (Closes: #146456) + + -- Jonathan McDowell Thu, 10 Nov 2005 16:12:33 +0000 --- opensrs-client-3.0.0.orig/debian/compat +++ opensrs-client-3.0.0/debian/compat @@ -0,0 +1 @@ +7 --- opensrs-client-3.0.0.orig/debian/copyright +++ opensrs-client-3.0.0/debian/copyright @@ -0,0 +1,28 @@ +This is Debian GNU/Linux's prepackaged version of opensrs-client. + +This package was put together by Jonathan McDowell . +The library was downloaded from https://rrc.tucows.com/ + +The only change for the Debian package was the addition of the debian/ +file and the patching of the config file location. + +Upstream Authors: Tucows/OpenSRS + +Copyright 1999-2005 TUCOWS.com Inc. + +This program is free software; you can redistribute it and/or +modify it under the terms of the GNU Lesser General Public +License as published by the Free Software Foundation; either +version 2.1 of the License, or (at your option) any later version. + +This program is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of +MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU +Lesser General Public License for more details. + +You should have received a copy of the GNU Lesser General Public +License along with this program; if not, write to the Free Software +Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA. + +On Debian systems, the complete text of the GNU Lesser General Public +License, version 2.1, can be found in /usr/share/common-licenses/LGPL-2.1 --- opensrs-client-3.0.0.orig/debian/control +++ opensrs-client-3.0.0/debian/control @@ -0,0 +1,22 @@ +Source: opensrs-client +Maintainer: Jonathan McDowell +Priority: optional +Section: perl +Standards-Version: 3.8.3.0 +Build-Depends: debhelper (>= 7) +Build-Depends-Indep: perl (>= 5.6.0-16) +Homepage: http://opensrs.com/resources/opensrs/clientcode/ + +Package: libopensrs-perl +Architecture: all +Priority: optional +Section: perl +Depends: ${perl:Depends},libhtml-template-perl,libunicode-map-perl,libunicode-string-perl,libxml-parser-perl,libdate-manip-perl,libcrypt-blowfish-perl,libcrypt-cbc-perl,libdate-pcalc-perl,liblocale-codes-perl,libnet-libidn-perl,libdate-calc-perl,libdata-structure-util-perl +Description: OpenSRS Perl toolkit + OpenSRS is the wholesale reseller services group of Tucows. This is their + Perl API toolkit, providing the ability to sell, provision and support + OpenSRS services which include Email, Domain Names, SSL Certificates and + Personal Names. + . + You need a to be signed up as an OpenSRS reseller for this package to be + useful to you. --- opensrs-client-3.0.0.orig/lib/CBC.pm +++ opensrs-client-3.0.0/lib/CBC.pm @@ -1,6 +1,6 @@ package Crypt::CBC; -use MD5; +use Digest::MD5 'md5'; use Carp; use strict; use vars qw($VERSION); @@ -31,9 +31,9 @@ # the real key is computed from the first N bytes of the # MD5 hash of the provided key. - my $material = MD5->hash($key); + my $material = md5($key); while (length($material) < $ks + $bs) { - $material .= MD5->hash($material); + $material .= md5($material); } # Original implementation of SSLEay used part of the key for the IV