1 |
# ============================================================================= |
## --------------------------------------------------------------------------- |
2 |
# |
## |
3 |
# dispatchmail |
## $Id$ |
4 |
# a simple mail filter done in perl with CPAN-module "Mail::Audit" |
## |
5 |
# |
## dispatchmail - A simple mail filter done in perl with CPAN-module "Mail::Audit" |
6 |
# ============================================================================= |
## |
7 |
# |
## --------------------------------------------------------------------------- |
8 |
# 2002-11-09, joko@netfrag.org |
## $Log$ |
9 |
# + recieveMail now can run globally (/etc/mail/smrsh!) |
## Revision 1.3 2003/02/10 04:13:44 joko |
10 |
# + $HOME is taken from $ENV{HOME} or $ENV{PWD} |
## + updated |
11 |
# + rules are taken from $HOME/Mail/.rules.pm |
## |
12 |
# + fallback mechanism(s) |
## Revision 1.2 2003/01/22 17:49:34 joko |
13 |
# + bugfixes |
## + ChangeLog.pod: updated documentation |
14 |
# |
## + mkDoc.bat: added script to automagically create text- and html-documentation |
15 |
# 2002-10-14, joko@netfrag.org |
## |
16 |
# + $LOGFILE is used now (recievemail.log) |
## Revision 1.3 2003/01/20 16:54:22 joko |
17 |
# + tracing (uses $LOGFILE) |
## + sub fromPackage: refactored from libp's 'getNewPerlObjFromPkgName' or s.th.l.th. |
18 |
# + checks delivery path for existance, |
## |
19 |
# changes $LOGFILE if needed |
## Revision 1.2 2002/12/27 16:05:42 joko |
20 |
# |
## + played with Devel::CallerItem and Devel::StackTrace |
21 |
# 2002-07-17, joko@netfrag.org |
## |
22 |
# + added filtering by target (destination-routing) |
## Revision 1.1 2002/12/13 21:46:29 joko |
23 |
# (looks in "to", "cc" and "bcc") |
## + initial check-in |
24 |
# |
## --------------------------------------------------------------------------- |
25 |
# 2001-12-05, joko@netfrag.org |
|
26 |
# + initial internal release |
|
27 |
# |
=pod |
28 |
# ============================================================================= |
|
29 |
|
=head1 ChangeLog - History |
30 |
|
|
31 |
|
=head4 2003-01-22, joko@netfrag.org |
32 |
|
|
33 |
|
o mail2thread.pl |
34 |
|
x now based on object-infrastructure from nfo/perl/libs |
35 |
|
x setup nfo/perl/libs at a common location - propose this for nfo-sysadmin-rfcs |
36 |
|
cd /data/libs |
37 |
|
export CVSROOT=/var/lib/cvs |
38 |
|
cvs checkout nfo/perl/libs |
39 |
|
x refactored recieveMail.pl |
40 |
|
x created: etc/ bin/ var/ doc/ |
41 |
|
x renamed to 'dispatchmail' |
42 |
|
cd /data/opt |
43 |
|
cvs checkout -d dispatchmail nfo/perl/scripts/dispatchmail |
44 |
|
cd dispatchmail |
45 |
|
./install |
46 |
|
x now using 'run_cmd' from org::netfrag::shortcuts |
47 |
|
x new: install-script (creates symbolic links to dispatchmail in /etc/mail/smrsh/ and /usr/local/bin/) |
48 |
|
x new: just put "|dispatchmail" into your "~/.forward"-file! |
49 |
|
x use file '.recievemailrc' to specify the location of the rules-file? |
50 |
|
now uses "$HOME/.recievemailrc.pm" directly! |
51 |
|
x refactored to Mail::Audit::Dispatch |
52 |
|
o implement Mail::Audit::Newsgate |
53 |
|
x perl -MCPAN -eshell |
54 |
|
x install Net::NNTP |
55 |
|
x install News::Article |
56 |
|
x add account to inn: 'collector' |
57 |
|
x add line to /etc/news/nnrp.access |
58 |
|
*:Read Post:collector:col5%:* |
59 |
|
x root@quepasa:/home# /etc/init.d/inn reload |
60 |
|
o TODO: implement Mail::Audit::Faxgate |
61 |
|
x checked in 'mail-handler' (by janosch) to bin/ - refactor from that! |
62 |
|
o better/automated setup (from cvs|package) |
63 |
|
(see steps needed in attachment....) |
64 |
|
o autocreate folders |
65 |
|
problem: |
66 |
|
loading rules from "/data/home/newscollector/Mail/.rules.pm" |
67 |
|
running "rules::dispatch" |
68 |
|
delivering to: /data/home/newscollector/Mail/Inbox |
69 |
|
deliver_to path "/data/home/newscollector/Mail/Inbox" doesn't exist |
70 |
|
defaulting to spool delivery (/var/spool/mail/) |
71 |
|
solution(s): |
72 |
|
---> add tip here: "do a 'touch Inbox' in this case? |
73 |
|
---> add feature here: just create the folder automagically, if "autocreateFolders = 1" in configuration!!! |
74 |
|
|
75 |
|
|
76 |
|
=head4 2002-11-09, joko@netfrag.org |
77 |
|
|
78 |
|
x recieveMail now can run globally (/etc/mail/smrsh!) |
79 |
|
x $HOME is taken from $ENV{HOME} or $ENV{PWD} |
80 |
|
x rules are taken from $HOME/Mail/.rules.pm |
81 |
|
x fallback mechanism(s) |
82 |
|
x bugfixes |
83 |
|
|
84 |
|
|
85 |
|
=head4 2002-10-14, joko@netfrag.org |
86 |
|
|
87 |
|
x $LOGFILE is used now (recievemail.log) |
88 |
|
x tracing (uses $LOGFILE) |
89 |
|
x checks delivery path for existance - changes $LOGFILE if needed |
90 |
|
|
91 |
|
|
92 |
|
=head4 2002-07-17, joko@netfrag.org |
93 |
|
|
94 |
|
x added filtering by target (destination-routing) - looks in "to", "cc" and "bcc" |
95 |
|
|
96 |
|
|
97 |
|
=head4 2001-12-05, joko@netfrag.org |
98 |
|
|
99 |
|
x initial internal release |
100 |
|
|
101 |
|
|
102 |
|
=cut |
103 |
|
|
104 |
|
1; |