source: trunk/cgi-bin/MyIPDB.pm@ 416

Last change on this file since 416 was 416, checked in by Kris Deugau, 16 years ago

/trunk

Update mailNotify to use new table notify to decide who to spam
with notices on various events. See #2.

  • existing notification calls updated. Still need to move calls into IPDB.pm's subs
  • IPDB.pm and MyIPDB.pm updated with new semiglobal vars for org name, SMTP host, domain. Will add others as needed so MyIPDB.pm can be moved to /etc/ipdb/ (see #17).

Internal allocation types will need to be rearranged somewhat to
make full use of the flexibility possible. See #20.
  • Property svn:keywords set to Date Rev Author
File size: 776 bytes
Line 
1# ipdb/cgi-bin/MyIPDB.pm
2# Contains site-specific functions for IPDB
3# May override some functions from IPDB.pm, wraps others
4###
5# SVN revision info
6# $Date: 2010-05-18 22:08:12 +0000 (Tue, 18 May 2010) $
7# SVN revision $Rev: 416 $
8# Last update by $Author: kdeugau $
9###
10# Copyright (C) 2004-2006 - Kris Deugau
11
12use IPDB 2.0 qw(:ALL);
13
14## connectDB_My()
15# Wrapper for IPDB::connectDB
16# Takes no arguments, returns whatever IPDB::connectDB returns.
17sub connectDB_My {
18 return connectDB("ipdb", "ipdb", "ipdbpwd");
19} # end connectDB_My()
20
21# Set some globals declared in IPDB.pm. Most of these only affect mailNotify().
22# Note that while you *can* leave these at defaults, it's probably a Really Bad Idea.
23#$IPDB::orgname = "Bob's Big Bonaza";
24#$IPDB::smtphost = '127.0.0.1';
25#$IPDB::domain = 'bob.com';
26
27# Keep Perl from complaining.
281;
Note: See TracBrowser for help on using the repository browser.