9aec2b31b5
from regular mail. Rejection mails furthermore have the prefix "BOUNCE <listaddress>:", mails that need approval have the prefix "APROVE <listaddress>:". - When a mail is rejected due to ACL, the mail body will tell you whether the global acl file or the list's local acl file hit. - If a file "lists/<listname>/header" exists, it contents will be added to the headers of the article posted to the list. Be careful not to have blank lines in there, as this will screw the whole message up. - When generating the index of available mailing lists, the list type will now be typeset in brackets, e.g.: "(public mailing list)". - The index will no longer contain tabs in the mail body.
207 lines
6.4 KiB
C
207 lines
6.4 KiB
C
/*
|
|
$Source$
|
|
$Revision$
|
|
|
|
Copyright (C) 2000 by CyberSolutions GmbH, Germany.
|
|
|
|
This file is part of OpenPetidomo.
|
|
|
|
OpenPetidomo is free software; you can redistribute it and/or modify
|
|
it under the terms of the GNU General Public License as published by
|
|
the Free Software Foundation; either version 2, or (at your option)
|
|
any later version.
|
|
|
|
OpenPetidomo is distributed in the hope that it will be useful, but
|
|
WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
General Public License for more details.
|
|
*/
|
|
|
|
#include "libtext/text.h"
|
|
#include "petidomo.h"
|
|
|
|
int
|
|
SendHelp(struct Mail * MailStruct,
|
|
const char * param1,
|
|
const char * param2,
|
|
const char * defaultlist)
|
|
{
|
|
const struct PD_Config * MasterConfig;
|
|
const struct List_Config * ListConfig = NULL;
|
|
FILE * fh;
|
|
char * originator;
|
|
char * p;
|
|
char envelope[1024];
|
|
char * buffer;
|
|
|
|
/* Find out who is who and what to send. */
|
|
|
|
MasterConfig = getMasterConfig();
|
|
if (defaultlist != NULL) {
|
|
ListConfig = getListConfig(defaultlist);
|
|
sprintf(envelope, "%s-owner@%s", defaultlist, ListConfig->fqdn);
|
|
}
|
|
else
|
|
sprintf(envelope, "petidomo-manager@%s", MasterConfig->fqdn);
|
|
originator = (MailStruct->Reply_To) ? MailStruct->Reply_To : MailStruct->From;
|
|
if (param1 != NULL) {
|
|
if (isValidListName(param1) == TRUE) {
|
|
|
|
/* Send list's description back. */
|
|
|
|
ListConfig = getListConfig(param1);
|
|
sprintf(envelope, "%s-owner@%s", param1, MasterConfig->fqdn);
|
|
fh = vOpenMailer(envelope, originator, NULL);
|
|
if (fh == NULL) {
|
|
syslog(LOG_ERR, "Failed to send mail to \"%s\" regarding this request.",
|
|
originator);
|
|
return -1;
|
|
}
|
|
fprintf(fh, "From: %s-request@%s (Petidomo Mailing List Server)\n",
|
|
param1, ListConfig->fqdn);
|
|
fprintf(fh, "To: %s\n", originator);
|
|
fprintf(fh, "Subject: Petidomo: Your request \"help %s\"\n", param1);
|
|
if (MailStruct->Message_Id != NULL)
|
|
fprintf(fh, "In-Reply-To: %s\n", MailStruct->Message_Id);
|
|
fprintf(fh, "Precedence: junk\n");
|
|
fprintf(fh, "Sender: %s\n", envelope);
|
|
fprintf(fh, "\n");
|
|
fprintf(fh, "Description of list \"%s\":\n\n", param1);
|
|
buffer = text_easy_sprintf("lists/%s/description", param1);
|
|
p = loadfile(buffer);
|
|
if (p != NULL) {
|
|
fprintf(fh, "%s\n", p);
|
|
free(p);
|
|
}
|
|
else {
|
|
syslog(LOG_NOTICE, "List \"%s\" doesn't have a description.", param1);
|
|
fprintf(fh, "No description available.\n");
|
|
}
|
|
CloseMailer(fh);
|
|
}
|
|
else {
|
|
|
|
/* List does not exist, I am afraid. */
|
|
|
|
fh = vOpenMailer(envelope, originator, NULL);
|
|
if (fh == NULL) {
|
|
syslog(LOG_ERR, "Failed to send mail to \"%s\" regarding this request.",
|
|
originator);
|
|
return -1;
|
|
}
|
|
if (defaultlist != NULL)
|
|
fprintf(fh, "From: %s-request@%s (Petidomo Mailing List Server)\n",
|
|
defaultlist, ListConfig->fqdn);
|
|
else
|
|
fprintf(fh, "From: petidomo@%s (Petidomo Mailing List Server)\n",
|
|
MasterConfig->fqdn);
|
|
fprintf(fh, "To: %s\n", originator);
|
|
fprintf(fh, "Subject: Petidomo: Your request \"help %s\"\n", param1);
|
|
if (MailStruct->Message_Id != NULL)
|
|
fprintf(fh, "In-Reply-To: %s\n", MailStruct->Message_Id);
|
|
fprintf(fh, "Precedence: junk\n");
|
|
fprintf(fh, "Sender: %s\n", envelope);
|
|
fprintf(fh, "\n");
|
|
buffer = text_easy_sprintf(
|
|
"There is no mailing list \"%s\" on this machine, I am afraid. Please check " \
|
|
"whether you spelled the name of the list correctly, or whether you have been " \
|
|
"sending this request to the wrong address.\n\nYou can receive a list of all " \
|
|
"mailing lists available here by sending the command \"INDEX\" to the " \
|
|
"mailing list server.", param1);
|
|
text_wordwrap(buffer, 75);
|
|
fprintf(fh, "%s\n", buffer);
|
|
CloseMailer(fh);
|
|
}
|
|
}
|
|
else {
|
|
|
|
/* Send help text to the originator. */
|
|
|
|
fh = vOpenMailer(envelope, originator, NULL);
|
|
if (fh == NULL) {
|
|
syslog(LOG_ERR, "Failed to send mail to \"%s\" regarding this request.",
|
|
originator);
|
|
return -1;
|
|
}
|
|
if (defaultlist != NULL)
|
|
fprintf(fh, "From: %s-request@%s (Petidomo Mailing List Server)\n",
|
|
defaultlist, ListConfig->fqdn);
|
|
else
|
|
fprintf(fh, "From: petidomo@%s (Petidomo Mailing List Server)\n",
|
|
MasterConfig->fqdn);
|
|
fprintf(fh, "To: %s\n", originator);
|
|
fprintf(fh, "Subject: Petidomo: Your request \"help\"\n");
|
|
if (MailStruct->Message_Id != NULL)
|
|
fprintf(fh, "In-Reply-To: %s\n", MailStruct->Message_Id);
|
|
fprintf(fh, "Precedence: junk\n");
|
|
fprintf(fh, "Sender: %s\n", envelope);
|
|
fprintf(fh, "\n");
|
|
p = loadfile("etc/help");
|
|
if (p != NULL) {
|
|
fprintf(fh, "%s\n", p);
|
|
free(p);
|
|
}
|
|
else {
|
|
syslog(LOG_ERR, "There is no help file for Petidomo!");
|
|
fprintf(fh, "No help text available.\n");
|
|
}
|
|
CloseMailer(fh);
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
int
|
|
Indecipherable(struct Mail * MailStruct, const char * defaultlist)
|
|
{
|
|
const struct PD_Config * MasterConfig;
|
|
const struct List_Config * ListConfig = NULL;
|
|
FILE * fh;
|
|
char * replyto;
|
|
char * p;
|
|
char envelope[1024];
|
|
|
|
/* Find out who is who and what to send. */
|
|
|
|
MasterConfig = getMasterConfig();
|
|
if (defaultlist != NULL) {
|
|
ListConfig = getListConfig(defaultlist);
|
|
sprintf(envelope, "%s-owner@%s", defaultlist, ListConfig->fqdn);
|
|
}
|
|
else
|
|
sprintf(envelope, "petidomo-manager@%s", MasterConfig->fqdn);
|
|
replyto = (MailStruct->Reply_To) ? MailStruct->Reply_To : MailStruct->From;
|
|
|
|
/* Send the help file out. */
|
|
|
|
fh = vOpenMailer(envelope, replyto, NULL);
|
|
if (fh == NULL) {
|
|
syslog(LOG_ERR, "Failed to send mail to \"%s\" regarding this request.", replyto);
|
|
return -1;
|
|
}
|
|
if (defaultlist != NULL)
|
|
fprintf(fh, "From: %s-request@%s (Petidomo Mailing List Server)\n",
|
|
defaultlist, ListConfig->fqdn);
|
|
else
|
|
fprintf(fh, "From: petidomo@%s (Petidomo Mailing List Server)\n",
|
|
MasterConfig->fqdn);
|
|
fprintf(fh, "To: %s\n", replyto);
|
|
fprintf(fh, "Subject: Petidomo: Your request \"indecipherable\"\n");
|
|
if (MailStruct->Message_Id != NULL)
|
|
fprintf(fh, "In-Reply-To: %s\n", MailStruct->Message_Id);
|
|
fprintf(fh, "Precedence: junk\n");
|
|
fprintf(fh, "Sender: %s\n", envelope);
|
|
fprintf(fh, "\n");
|
|
p = loadfile("etc/help");
|
|
if (p != NULL) {
|
|
fprintf(fh, "%s\n", p);
|
|
free(p);
|
|
}
|
|
else {
|
|
syslog(LOG_ERR, "There is no help file for Petidomo!");
|
|
fprintf(fh, "No help text available.\n");
|
|
}
|
|
CloseMailer(fh);
|
|
return 0;
|
|
}
|