masqmail-0.2

view src/fail_msg.c @ 147:cb42157b3520

find changesets by author, revision, files, or words in the commit message
improved the Makefile (check diff for details)
author meillo@marmaro.de
date Thu, 08 Jul 2010 00:26:55 +0200
parents 26e34ae9a3e3
children
line source
1 /* MasqMail
2 Copyright (C) 2000-2001 Oliver Kurth
3 *
4 * This program is free software; you can redistribute it and/or modify
5 * it under the terms of the GNU General Public License as published by
6 * the Free Software Foundation; either version 2 of the License, or
7 * (at your option) any later version.
8 *
9 * This program is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 * GNU General Public License for more details.
13 *
14 * You should have received a copy of the GNU General Public License
15 * along with this program; if not, write to the Free Software
16 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
17 */
18
19 #include <sys/wait.h>
20
21 #include "masqmail.h"
22 #include "peopen.h"
23 #include "readsock.h"
24
25 gboolean
26 fail_msg(message * msg, gchar * template, GList * failed_rcpts, gchar * err_fmt, va_list args)
27 {
28 gboolean ok = FALSE;
29 address *ret_path = NULL;
30
31 /* do not bounce bounces, send to postmaster instead */
32 if (msg->return_path->local_part[0] == '\0') {
33 GList *node;
34
35 ret_path = create_address_qualified("postmaster", TRUE, conf.host_name);
36 foreach(failed_rcpts, node) {
37 address *addr = (address *) (node->data);
38 if (addr_isequal_parent(addr, ret_path)) {
39 logwrite(LOG_ALERT, "%s == %s: postmaster address failed\n", msg->uid, addr_string(ret_path));
40 return FALSE;
41 }
42 }
43 } else
44 ret_path = copy_address(msg->return_path);
45
46 DEBUG(1) debugf("sending failure notice to %s.\n", addr_string(ret_path));
47
48 if (template) {
49 FILE *file;
50 GList *var_table = var_table_conf(var_table_msg(NULL, msg));
51 gchar *err_msg = g_strdup_vprintf(err_fmt, args);
52
53 var_table = g_list_prepend(var_table, create_pair_string("err_msg", err_msg));
54 g_free(err_msg);
55
56 if ((file = fopen(template, "r"))) {
57 FILE *out;
58 gchar *cmd;
59 pid_t pid;
60
61 // cmd = g_strdup_printf(SBINDIR"/masqmail -oi -f \"<>\" %s@%s",
62 // ret_path->local_part, ret_path->domain);
63 cmd = g_strdup_printf(SBINDIR "/masqmail -oi -f <> %s@%s", ret_path->local_part, ret_path->domain);
64 if ((out = peidopen(cmd, "w", environ, &pid, conf.mail_uid, conf.mail_gid))) {
65 gchar fmt[256], line[256];
66 int status, ret;
67
68 while ((ret = read_sockline(file, fmt, 256, 0, 0)) > 0) {
69 if (fmt[0] == '@') {
70 GList *node;
71 if (strncmp(fmt, "@failed_rcpts", 13) == 0) {
72 foreach(failed_rcpts, node) {
73 address *rcpt = (address *) (node->data);
74 fprintf(out, "\t%s\n", addr_string(rcpt));
75 }
76 } else if (strncmp(fmt, "@msg_headers", 12) == 0) {
77 foreach(msg->hdr_list, node) {
78 header *hdr = (header *) (node->data);
79 fputs(hdr->header, out);
80 }
81 } else if (strncmp(fmt, "@msg_body", 9) == 0) {
82 /* we may have to read the data at this point and remember if we did */
83 gboolean flag = (msg->data_list == NULL);
84 if (flag) {
85 if (!spool_read_data(msg)) {
86 logwrite(LOG_ALERT, "could not open data spool file %s\n", msg->uid);
87 }
88 }
89 foreach(msg->data_list, node) {
90 gchar *line = (gchar *) (node->data);
91 fputs(line, out);
92 }
93 if (flag)
94 msg_free_data(msg);
95 }
96 } else {
97 expand(var_table, fmt, line, 256);
98 fputs(line, out);
99 }
100 }
101
102 fclose(out);
103 waitpid(pid, &status, 0);
104 if ((WEXITSTATUS(status) != EXIT_SUCCESS) || WIFSIGNALED(status)) {
105 if (WEXITSTATUS(status) != EXIT_SUCCESS)
106 logwrite(LOG_WARNING, "child returned %d\n", WEXITSTATUS(status));
107 if (WIFSIGNALED(status))
108 logwrite(LOG_WARNING, "child got signal: %d\n", WTERMSIG(status));
109 } else
110 ok = TRUE;
111 } else {
112 logwrite(LOG_ERR, "peopen failed: %s\n", strerror(errno));
113 }
114 g_free(cmd);
115 fclose(file);
116 } else
117 logwrite(LOG_ALERT, "could not open failure message template %s: %s\n", conf.errmsg_file, strerror(errno));
118
119 destroy_table(var_table);
120 }
121
122 destroy_address(ret_path);
123
124 return ok;
125 }
126
127 /*
128 ival : |--|--|----|--------|--------|
129 warned: |-------W-------------W------
130 result: |nnnyyyynnnnyyyyyyyyyynnnnnnn
131 */
132
133 static gboolean
134 warn_msg_is_due(message * msg)
135 {
136 time_t now = time(NULL);
137 gint dummy;
138
139 GList *node;
140 for (node = g_list_last(conf.warn_intervals); node; node = g_list_previous(node)) {
141 gchar *str_ival = (gchar *) (node->data);
142 gint ival = time_interval(str_ival, &dummy);
143 if (ival >= 0) {
144 DEBUG(5) debugf("ival = %d\n", ival);
145 DEBUG(5) debugf("now - msg->received_time = %d\n", now - msg->received_time);
146 if ((now - msg->received_time) > ival) {
147 if (msg->warned_time != 0) {
148 if ((msg->warned_time - msg->received_time) < ival)
149 return TRUE;
150 } else
151 return TRUE;
152 }
153 } else
154 logwrite(LOG_WARNING, "invalid time interval: %s\n", str_ival);
155 }
156 return FALSE;
157 }
158
159 gboolean
160 warn_msg(message * msg, gchar * template, GList * defered_rcpts, gchar * err_fmt, va_list args)
161 {
162 time_t now = time(NULL);
163
164 if (warn_msg_is_due(msg)) {
165 if (fail_msg(msg, template, defered_rcpts, err_fmt, args)) {
166 msg->warned_time = now;
167 return TRUE;
168 } else
169 return FALSE;
170 }
171 return TRUE;
172 }