X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=kernel%2Furp.c;h=d472c264c8a22d8eb05410b7b3f6131dddc25c9f;hb=4938d0c2e8f4e1eec397c2bfbbc7e23fd150c369;hp=ef3378c4b28e1138728b20242edb8ac411764f72;hpb=918a8257a2f64e0965abc4c48eea774949c19883;p=egate.git diff --git a/kernel/urp.c b/kernel/urp.c index ef3378c..d472c26 100644 --- a/kernel/urp.c +++ b/kernel/urp.c @@ -45,7 +45,13 @@ * Europagate, 1995 * * $Log: urp.c,v $ - * Revision 1.48 1996/02/12 10:04:57 adam + * Revision 1.50 1996/03/01 16:09:30 adam + * New setting: gw.msg.replyto that sets Reply-To in user response. + * + * Revision 1.49 1996/03/01 14:25:28 adam + * Email gateway obeys 'Reply-To:' in header. + * + * Revision 1.48 1996/02/12 10:04:57 adam * The gateway doesn't try to reconnect if it is already known that * it will fail (connect_fail flag introduced). * @@ -376,6 +382,8 @@ static int email_header (struct str_queue *sq, return 0; if (memcmp (line_buf, "From ", 5) == 0) sscanf (line_buf+4, "%s", from_str); + if (memcmp (line_buf, "Reply-To: ", 10) == 0) + sscanf (line_buf+10, "%s", from_str); if (memcmp (line_buf, "Subject: ", 9) == 0 && sscanf (line_buf+9, "%s", subject_str+1) == 1) strcpy (subject_str, line_buf+9); @@ -1164,6 +1172,7 @@ static int exec_command (const char *str, int *stop_flag) int urp_start (int continuation, struct str_queue *queue) { char subject_str[128]; + const char *cp; info.command_no = 0; info.reply_fname = NULL; @@ -1192,6 +1201,9 @@ int urp_start (int continuation, struct str_queue *queue) fprintf (reply_fd, "From: %s\n", gw_res_get (info.kernel_res, "gw.msg.from", "Email-Z39.50 gateway")); + cp = gw_res_get (info.kernel_res, "gw.msg.replyto", NULL); + if (cp) + fprintf (reply_fd, "Reply-To: %s\n", cp); fprintf (reply_fd, "Subject: "); if (*subject_str) fprintf (reply_fd, "Z39.50 Re: %s", subject_str);