masqmail

annotate src/fail_msg.c @ 216:84bf7a6b6ccd

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