1 |
unnilennium |
1.1 |
diff -Nur smeserver-qmHandle-1.4/root/usr/bin/qmHandle.altqmail smeserver-qmHandle-1.4/root/usr/bin/qmHandle |
2 |
|
|
--- smeserver-qmHandle-1.4/root/usr/bin/qmHandle.altqmail 2016-03-17 04:59:22.000000000 -0400 |
3 |
|
|
+++ smeserver-qmHandle-1.4/root/usr/bin/qmHandle 2017-07-10 15:07:43.728170805 -0400 |
4 |
|
|
@@ -20,6 +20,9 @@ |
5 |
|
|
my ($queue) = '/var/qmail/queue/'; |
6 |
|
|
my ($bigtodo) = (-d "${queue}todo/0") ? 0 : 1; # 1 means no big-todo |
7 |
|
|
|
8 |
|
|
+my ($altqueue) = '/var/service/altqmail/root/var/qmail/queue/'; |
9 |
|
|
+my ($altbigtodo) = (-d "${altqueue}todo/0") ? 0 : 1; # 1 means no big-todo |
10 |
|
|
+ |
11 |
|
|
##### |
12 |
|
|
# If your system has got automated command to start/stop qmail, then |
13 |
|
|
# enter them here. |
14 |
|
|
@@ -33,6 +36,9 @@ |
15 |
|
|
my ($stopqmail) = '/usr/bin/sv -v down qmail'; |
16 |
|
|
my ($startqmail) = '/usr/bin/sv -v up qmail'; |
17 |
|
|
|
18 |
|
|
+my ($stopaltqmail) = '/usr/bin/sv -v down altqmail'; |
19 |
|
|
+my ($startaltqmail) = '/usr/bin/sv -v up altqmail'; |
20 |
|
|
+ |
21 |
|
|
# While this is if you have a Debian GNU/Linux with its qmail package |
22 |
|
|
#my ($stopqmail) = '/etc/init.d/qmail stop'; |
23 |
|
|
#my ($startqmail) = '/etc/init.d/qmail start'; |
24 |
|
|
@@ -52,7 +58,8 @@ |
25 |
|
|
# Enter here the system command which returns qmail PID. The following |
26 |
|
|
# should work on most Unixes: |
27 |
|
|
#my ($pidcmd) = 'pidof qmail-send'; |
28 |
|
|
-my ($pidcmd) = '/sbin/pidof qmail-send'; |
29 |
|
|
+my ($pidcmd) = '/sbin/pidof /var/qmail/bin/qmail-send'; |
30 |
|
|
+my ($altpidcmd) = '/sbin/pidof /var/service/alqmail/root/var/qmail/bin/qmail-send'; |
31 |
|
|
|
32 |
|
|
#################### USER CONFIGURATION END #################### |
33 |
|
|
|
34 |
|
|
@@ -70,6 +77,7 @@ |
35 |
|
|
|
36 |
|
|
foreach my $arg (@ARGV) { |
37 |
|
|
SWITCH: { |
38 |
|
|
+ $arg eq '-X' and do { $queue=$altqueue; $bigtodo =$altbigtodo; $stopqmail=$stopaltqmail; $startqmail=$startaltqmail; $pidcmd=$altpidcmd; last SWITCH; }; |
39 |
|
|
$arg eq '-a' and do { push @actions, [\&SendMsgs]; last SWITCH; }; |
40 |
|
|
$arg eq '-l' and do { push @actions, [\&ListMsg, 'A']; last SWITCH; }; |
41 |
|
|
$arg eq '-L' and do { push @actions, [\&ListMsg, 'L']; last SWITCH; }; |
42 |
|
|
@@ -847,6 +855,7 @@ |
43 |
|
|
print " -c : display colored output\n"; |
44 |
|
|
print " -N : list message numbers only\n"; |
45 |
|
|
print " (to be used either with -l, -L or -R)\n"; |
46 |
|
|
+ print " -X : do the same but for smeserver-altqmail contrib\n"; |
47 |
|
|
print "\n"; |
48 |
|
|
print "You can view/delete multiple message i.e. -d123 -v456 -d567\n\n"; |
49 |
|
|
exit; |
50 |
|
|
|