This repository has been archived on 2024-04-08. You can view files and clone it, but cannot push or open issues or pull requests.
deb-goldedplus/golded3/gehdrs.cpp

244 lines
7.3 KiB
C++
Raw Normal View History

2000-02-25 11:04:07 +00:00
// ------------------------------------------------------------------
// GoldED+
// Copyright (C) 1990-1999 Odinn Sorensen
// Copyright (C) 1999-2000 Alexander S. Aganichev
// ------------------------------------------------------------------
// This program 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 of the
// License, or (at your option) any later version.
//
// This program 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.
//
// You should have received a copy of the GNU General Public License
// along with this program; if not, write to the Free Software
// Foundation, Inc., 59 Temple Place, Suite 330, Boston,
// MA 02111-1307 USA
// ------------------------------------------------------------------
// $Id$
// ------------------------------------------------------------------
// Header display.
// ------------------------------------------------------------------
#ifdef OLD_STYLE_HEADER
2000-02-25 11:04:07 +00:00
#include <golded.h>
// ------------------------------------------------------------------
static char* strconv(char* str) {
2000-02-25 11:04:07 +00:00
char* s=str;
char* p = str;
while(*str) {
2000-12-24 19:47:06 +00:00
if(iscntrl(*str) and (*str != '\n') and (*str != '\r')) // Control codes
2000-02-25 11:04:07 +00:00
*p++ = '.';
else
*p++ = *str;
str++;
}
return(s);
}
// ------------------------------------------------------------------
void DispHeader(GMsg* msg, bool prn, FILE* fp, int width) {
int namewidth = CFG->disphdrnodeset.pos - CFG->disphdrnameset.pos;
int nodewidth = CFG->disphdrdateset.pos - CFG->disphdrnodeset.pos;
int datewidth = width - CFG->disphdrdateset.pos;
char headerline[200];
memset(headerline, '=', width);
2000-02-25 11:04:07 +00:00
headerline[width] = NUL;
INam whofrom;
if(*msg->ifrom and *msg->realby)
sprintf(whofrom, "%s <%s>", msg->realby, msg->iorig);
else if(*msg->ifrom and *msg->iorig)
strcpy(whofrom, msg->iorig);
else
strcpy(whofrom, msg->By());
strsetsz(whofrom, (AA->isinternet() or *msg->ifrom) ? (namewidth+nodewidth) : namewidth);
INam whoto;
if(*msg->ito and *msg->realto)
sprintf(whoto, "%s <%s>", msg->realto, msg->idest);
else if(*msg->ito and *msg->idest)
strcpy(whoto, msg->idest);
else
strcpy(whoto, msg->To());
strsetsz(whoto, (AA->isinternet() or *msg->ito) ? (namewidth+nodewidth) : namewidth);
// Generate top line fields
char buf[256];
char buf1[200];
char buf2[200];
2000-02-25 11:04:07 +00:00
strtrim(strcpy(buf, AA->desc()));
if((CFG->dispareano == ALWAYS) or (CFG->dispareano and AA->board()))
sprintf(buf1, " [%u] %s ", AA->board(), buf);
2000-02-25 11:04:07 +00:00
else
sprintf(buf1, " %s ", buf);
strtrim(buf1);
strcat(buf1, " (" /*)*/);
2000-02-25 11:04:07 +00:00
if(AA->isinternet())
strcpy(buf, AA->Internetaddress());
else
AA->Aka().addr.make_string(buf);
strcat(buf1, buf);
strcat(buf1, /*(*/ ") ");
2000-02-25 11:04:07 +00:00
if(msg->areakludgeid)
sprintf(buf2, " %s (%s) ", AA->echoid(), msg->areakludgeid);
2000-02-25 11:04:07 +00:00
else
sprintf(buf2, " %s ", AA->echoid());
// Write the total header to a file
strcpy(stpcpy(buf, headerline), prn ? NL : "\n");
strncpy(buf+1, buf1, strlen(buf1));
strncpy(buf+width-strlen(buf2)-1, buf2, strlen(buf2));
strconv(buf);
fwrite(buf, strlen(buf), 1, fp);
2000-02-25 11:04:07 +00:00
// Generate message attributes string
2001-03-03 13:16:14 +00:00
MakeAttrStr(buf2, sizeof(buf2), &msg->attr);
int len2 = strlen(buf2);
2000-02-25 11:04:07 +00:00
if(len2 > width-CFG->disphdrnodeset.pos) {
len2 = width-CFG->disphdrnodeset.pos;
strsetsz(buf2, len2);
2000-02-25 11:04:07 +00:00
}
// Generate message number and reply links string
char* ptr = buf1;
2000-02-25 11:04:07 +00:00
int list_max = msg->link.list_max();
ulong* replies = (ulong*)throw_calloc(list_max+1, sizeof(ulong));
ulong replyto, replynext;
if(CFG->switches.get(disprealmsgno)) {
ptr += sprintf(ptr, " %-5.5s: #%lu [%u]", LNG->Msg, msg->msgno, AA->Msgn.Count()+(msg->attr.nwm() ? 1 : 0));
replyto = msg->link.to();
replies[0] = msg->link.first();
replynext = msg->link.next();
for(int replyn=1; replyn<list_max+1; replyn++)
replies[replyn] = msg->link.list(replyn-1);
}
else {
uint active = AA->Msgn.Count() + (msg->attr.nwm() ? 1 : 0);
ptr += sprintf(ptr, " %-5.5s: %u %s %u", LNG->Msg, msg->attr.nwm() ? active : AA->Msgn.ToReln(msg->msgno), LNG->of, active);
replyto = AA->Msgn.ToReln(msg->link.to());
replies[0] = AA->Msgn.ToReln(msg->link.first());
replynext = AA->Msgn.ToReln(msg->link.next());
for(int replyn=1; replyn<list_max+1; replyn++)
replies[replyn] = AA->Msgn.ToReln(msg->link.list(replyn-1));
}
if(replyto)
ptr += sprintf(ptr, " -%lu", replyto);
for(int replyn=0,plus=0; replyn<list_max+1; replyn++)
if(replies[replyn])
ptr += sprintf(ptr, " %s%lu", (plus++?"":"+"), replies[replyn]);
if(replynext)
sprintf(ptr, " *%lu", replynext);
int len1 = strlen(buf1)-8;
2000-02-25 11:04:07 +00:00
if((CFG->disphdrnameset.pos + len1) > CFG->disphdrnodeset.pos) {
if(8 + len1 + len2 > width) {
strsetsz(buf1, width-len2-1);
strtrim(buf1);
2000-02-25 11:04:07 +00:00
}
strcat(buf1, " ");
strcat(buf1, buf2);
*buf2 = NUL;
2000-02-25 11:04:07 +00:00
}
else {
strsetsz(buf1, namewidth+8);
strcat(buf1, buf2);
*buf2 = NUL;
2000-02-25 11:04:07 +00:00
}
strsetsz(buf1, width);
2000-02-25 11:04:07 +00:00
throw_free(replies);
// Write message info
strcpy(stpcpy(buf, buf1), buf2);
strtrim(buf);
strcat(buf, prn ? NL : "\n");
strconv(buf);
fwrite(buf, strlen(buf), 1, fp);
2000-02-25 11:04:07 +00:00
// Generate orig node data
if(msg->orig.net)
msg->orig.make_string(buf1);
2000-02-25 11:04:07 +00:00
else
*buf1 = NUL;
strsetsz(buf1, nodewidth);
2000-02-25 11:04:07 +00:00
if(msg->written)
strftimei(buf2, CFG->disphdrdateset.len, LNG->DateTimeFmt, ggmtime(&msg->written));
strsetsz(buf2, datewidth);
// write from line
sprintf(buf, "%s%s%s%s",
LNG->From, whofrom,
((not (*msg->ifrom and (*msg->realby or *msg->iorig))) and not AA->isinternet()) ? buf1 : "",
buf2
);
strtrim(buf);
strcat(buf, prn ? NL : "\n");
strconv(buf);
fwrite(buf, strlen(buf), 1, fp);
2000-02-25 11:04:07 +00:00
// Generate dest node data
if(msg->dest.net and AA->isnet()) {
msg->dest.make_string(buf2);
2000-02-25 11:04:07 +00:00
if(msg->odest.net) {
if(msg->odest.net != msg->dest.net or msg->odest.node != msg->dest.node) {
sprintf(buf, " %s %u/%u", LNG->Via, msg->odest.net, msg->odest.node);
strcat(buf2, buf);
2000-02-25 11:04:07 +00:00
}
}
}
else
*buf2 = NUL;
strsetsz(buf2, nodewidth);
2000-02-25 11:04:07 +00:00
if(msg->arrived)
strftimei(buf2, CFG->disphdrdateset.len, LNG->DateTimeFmt, ggmtime(&msg->arrived));
strsetsz(buf2, datewidth);
2000-02-25 11:04:07 +00:00
// write to line
2000-02-25 11:04:07 +00:00
sprintf(buf, "%s%s%s%s", LNG->To, whoto,
((not (*msg->ito and (*msg->realto or *msg->idest))) and not AA->isinternet()) ? buf2 : "",
buf2
2000-02-25 11:04:07 +00:00
);
strtrim(buf);
strcat(buf, prn ? NL : "\n");
strconv(buf);
2000-02-25 11:04:07 +00:00
fwrite(buf, strlen(buf), 1, fp);
// Generate subjectline
strcpy(buf2, (msg->attr.att() or msg->attr.frq() or msg->attr.urq()) ? LNG->File : LNG->Subj);
strxcpy(buf1, msg->re, sizeof(buf1));
strsetsz(buf1, width-strlen(buf2));
// write subject line
strcpy(stpcpy(buf, buf2), buf1);
2000-02-25 11:04:07 +00:00
strtrim(buf);
strcat(buf, prn ? NL : "\n");
strconv(buf);
2000-02-25 11:04:07 +00:00
fwrite(buf, strlen(buf), 1, fp);
2003-03-26 16:05:36 +00:00
// write bottom line
2000-02-25 11:04:07 +00:00
strcpy(stpcpy(buf, headerline), prn ? NL : "\n");
strconv(buf);
2003-03-26 16:05:36 +00:00
fwrite(buf, strlen(buf), 1, fp);
2000-02-25 11:04:07 +00:00
}
// ------------------------------------------------------------------
#endif