Changeset 445 for branches/stable/cgi-bin/MyIPDB.pm

Timestamp:

07/26/10 17:00:00 (14 years ago)

Author:

Kris Deugau

Message:

/branches/stable

Bring /branches/stable up to date with /trunk. See #13.

Location:

branches/stable

Files:

• . (modified) (2 props)
• cgi-bin/MyIPDB.pm (modified) (2 diffs)

branches/stable

@@ -1 +1 @@
 local.css
+*.tar.gz

@@ -1 +1 @@
 local.css
+*.tar.gz

branches/stable/cgi-bin/MyIPDB.pm

@@ -8 +8 @@
 # Last update by $Author$
 ###
-# Copyright (C) 2004-2006 - Kris Deugau
+# Copyright (C) 2004-2010 - Kris Deugau
+
+# don't remove!  required for GNU/FHS-ish install from tarball
+##uselib##
 
 use IPDB 2.0 qw(:ALL);
+
+
+# DSN, user, and password for database.  These **MUST** be set.
+my $dbname = 'ipdb';
+my $dbuser = 'ipdb';
+my $dbpass = 'ipdbpwd';
+# DB host is optional.
+my $dbhost = 'ipdb-db';
+
+# Set some globals declared in IPDB.pm.  Most of these only affect mailNotify().
+# Note that while you *can* leave these at defaults, it's probably a Really Bad Idea.
+#$IPDB::org_name = "Bob's Big Bonaza";
+#$IPDB::smtphost = '127.0.0.1';
+#$IPDB::domain = 'bob.com';
+#$IPDB::defcustid = '5554242';
+# Globals for db2rwhois.pl
+#$IPDB::rwhoisDataPath = '/usr/local/rwhoisd/etc/rwhoisd';
+#$IPDB::org_street = '123 4th Street';
+#$IPDB::org_city = 'Anytown';
+#$IPDB::org_prov_state = 'ON';
+#$IPDB::org_pocode = 'H0H 0H0';
+#$IPDB::org_country = 'CA';
+#$IPDB::org_phone = '000-555-1234';
+# note: following may also just be a bare email address
+#$IPDB::org_techhandle = 'ISP-ARIN-HANDLE';
+#$IPDB::org_email = 'noc@example.com';
+#$IPDB::hostmaster = 'dns@example.com';
+
+# Logging destination.  Defaults to local2.  See your local syslog docs for valid facilities.
+# Note that the value here should have the LOG_ prefix removed, and convert to lower-case.
+# local0 through local7 and user make the most sense.
+#$IPDB::syslog_facility = 'daemon';
+
 
 ## connectDB_My()
@@ -16 +52 @@
 # Takes no arguments, returns whatever IPDB::connectDB returns.
 sub connectDB_My {
-  return connectDB("ipdb", "ipdb", "ipdbpwd");
+  return connectDB($dbname, $dbuser, $dbpass, $dbhost);
 } # end connectDB_My()
 

@@ -1 +1 @@
 local.css
+*.tar.gz