diff options
Diffstat (limited to 'web/attachments/393797-mq-d')
-rw-r--r-- | web/attachments/393797-mq-d | 54 |
1 files changed, 54 insertions, 0 deletions
diff --git a/web/attachments/393797-mq-d b/web/attachments/393797-mq-d new file mode 100644 index 0000000..2bc96c1 --- /dev/null +++ b/web/attachments/393797-mq-d | |||
@@ -0,0 +1,54 @@ | |||
1 | --- check_mailq.pl 2010-11-19 10:09:30.871245273 -0500 | ||
2 | +++ /home/jwm/check_mailq 2010-11-19 10:13:33.060816778 -0500 | ||
3 | @@ -130,7 +130,26 @@ | ||
4 | ##/var/spool/mqueue/qF/df is empty | ||
5 | ## Total Requests: 1 | ||
6 | |||
7 | - | ||
8 | +# separate submission/transport queues, empty | ||
9 | +## MSP Queue status... | ||
10 | +## /var/spool/mqueue-client is empty | ||
11 | +## Total requests: 0 | ||
12 | +## MTA Queue status... | ||
13 | +## /var/spool/mqueue is empty | ||
14 | +## Total requests: 0 | ||
15 | +# separate submission/transport queues: 1 | ||
16 | +## MSP Queue status... | ||
17 | +## /var/spool/mqueue-client (1 request) | ||
18 | +## -----Q-ID----- --Size-- -----Q-Time----- ------------Sender/Recipient----------- | ||
19 | +## oAJEfhdW014123 5 Fri Nov 19 14:41 jwm | ||
20 | +## (Deferred: Connection refused by [127.0.0.1]) | ||
21 | +## root | ||
22 | +## Total requests: 1 | ||
23 | +## MTA Queue status... | ||
24 | +## /var/spool/mqueue is empty | ||
25 | +## Total requests: 0 | ||
26 | + | ||
27 | + my $this_msg_q = 0; | ||
28 | while (<MAILQ>) { | ||
29 | |||
30 | # match email addr on queue listing | ||
31 | @@ -170,13 +189,18 @@ | ||
32 | # | ||
33 | # single queue: first line | ||
34 | # multi queue: one for each queue. overwrite on multi queue below | ||
35 | - $msg_q = $1 ; | ||
36 | + $this_msg_q = $1 ; | ||
37 | + $msg_q += $1 ; | ||
38 | } | ||
39 | } elsif (/^\s+Total\sRequests:\s(\d+)$/i) { | ||
40 | - print "$utils::PATH_TO_MAILQ = $_ \n" if $verbose ; | ||
41 | - # | ||
42 | - # multi queue: last line | ||
43 | - $msg_q = $1 ; | ||
44 | + if ($this_msg_q) { | ||
45 | + $this_msg_q = 0 ; | ||
46 | + } else { | ||
47 | + print "$utils::PATH_TO_MAILQ = $_ \n" if $verbose ; | ||
48 | + # | ||
49 | + # multi queue: last line | ||
50 | + $msg_q += $1 ; | ||
51 | + } | ||
52 | } | ||
53 | |||
54 | } | ||