// ------------------------------------------------------------------
// 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$
// ------------------------------------------------------------------
// Message lister.
// ------------------------------------------------------------------
#include <golded.h>
#include <gcharset.h>
#include <iostream>
#include <iomanip>
#if defined(__USE_ALLOCA__)
#include <malloc.h>
#endif
// ------------------------------------------------------------------
extern GMsg* reader_msg;
static int mlst_bysiz;
static int mlst_tosiz;
static int mlst_resiz;
static int fldadd1;
static int fldadd2;
// ------------------------------------------------------------------
const byte MLST_HIGH_FROM = 1;
const byte MLST_HIGH_TO = 2;
const byte MLST_HIGH_BOOK = 4;
const byte MLST_HIGH_MARK = 8;
const byte MLST_HIGH_UNREAD = 16;
const byte MLST_HIGH_UNSENT = 32;
// ------------------------------------------------------------------
inline void mlst_with_date(int with_date) {
if(with_date) {
mlst_bysiz = 19;
mlst_tosiz = 19;
mlst_resiz = 20;
}
else {
mlst_bysiz = 19+3;
mlst_tosiz = 19+3;
mlst_resiz = 20+4;
}
}
// ------------------------------------------------------------------
class GMsgList : public gwinpick
{
struct MLst
{
uint32_t msgno;
byte high;
char num[8];
char marks[3];
char by[sizeof(Name)+20];
char to[sizeof(Name)+20];
Subj re;
time32_t written;
time32_t arrived;
time32_t received;
char goldmark;
vattr colorby;
vattr colorto;
};
gwindow window;
GMsg msg;
MLst **mlst;
uint msgmark2;
void open(); // Called after window is opened
void close(); // Called after window is closed
void update_title();
void do_delayed();
void print_line(uint idx, uint pos, bool isbar);
bool handle_key(); // Handles keypress
void update_marks(MLst *ml);
void ReadMlst(int n);
public:
void Run();
GMsgList() {
memset(&msg, 0, sizeof(GMsg));
mlst = NULL;
maximum_index = AA->Msgn.Count()-1;
};
~GMsgList() {
ResetMsg(&msg);
if(mlst) {
for(uint i=0; i<= maximum_index; i++)
throw_xdelete(mlst[i]);
throw_free(mlst);
}
};
};
// ------------------------------------------------------------------
void GMsgList::open() {
window.openxy(ypos, xpos, ylen+2, xlen+2, btype, battr, wattr, sbattr);
update_title();
center(CFG->displistcursor);
}
// ------------------------------------------------------------------
void GMsgList::close() {
window.close();
}
// ------------------------------------------------------------------
void GMsgList::update_marks(MLst *ml) {
ml->high &= ~(MLST_HIGH_BOOK|MLST_HIGH_MARK);
strcpy(ml->marks, " ");
if(AA->bookmark == ml->msgno) {
ml->marks[0] = MMRK_BOOK;
ml->high |= MLST_HIGH_BOOK;
}
if(AA->Mark.Count()) {
if(AA->Mark.Find(ml->msgno)) {
ml->marks[1] = MMRK_MARK;
ml->high |= MLST_HIGH_MARK;
}
}
}
// ------------------------------------------------------------------
void GMsgList::ReadMlst(int n) {
MLst* ml = mlst[n];
if(ml != NULL)
return;
ml = mlst[n] = new MLst;
throw_new(ml);
ml->msgno = AA->Msgn.CvtReln(n + 1);
ml->high = 0;
update_marks(ml);
if(AA->Msglistfast()) {
AA->LoadHdr(&msg, ml->msgno);
}
else {
AA->LoadMsg(&msg, ml->msgno, CFG->dispmargin-(int)CFG->switches.get(disppagebar));
}
ml->goldmark = goldmark;
for(std::vector<Node>::iterator x = CFG->username.begin(); x != CFG->username.end(); x++) {
if(strieql(msg.By(), x->name)) {
ml->high |= MLST_HIGH_FROM;
msg.attr.fmu1();
}
if(strieql(msg.to, x->name)) {
ml->high |= MLST_HIGH_TO;
msg.attr.tou1();
}
}
if(strieql(msg.to, AA->Internetaddress())) {
ml->high |= MLST_HIGH_TO;
msg.attr.tou1();
}
// Highlight FROM if local
if(CFG->switches.get(displocalhigh) and msg.attr.loc())
ml->high |= MLST_HIGH_FROM;
// Highlight if unread
if((msg.timesread == 0) and CFG->switches.get(highlightunread))
ml->high |= MLST_HIGH_UNREAD;
// Highlight if unsent
if(msg.attr.uns() and not msg.attr.rcv() and not msg.attr.del())
ml->high |= MLST_HIGH_UNSENT;
ml->written = msg.written;
ml->arrived = msg.arrived;
ml->received = msg.received;
strxcpy(ml->by, msg.By(), ARRAYSIZE(ml->by));
strxcpy(ml->to, msg.To(), ARRAYSIZE(ml->to));
strxcpy(ml->re, msg.re, ARRAYSIZE(ml->re));
{ Addr zero;
ml->colorby = GetColorName(ml->by, msg.orig, DEFATTR);
ml->colorto = GetColorName(ml->to, AA->isnet() ? msg.dest : zero, DEFATTR);
}
}
// ------------------------------------------------------------------
void GMsgList::do_delayed() {
// Update header and statusline
if(AA->Msglistheader())
{
int disphdrlocation = CFG->disphdrlocation;
if ((CFG->disphdrlocation & 0xFFFF) == YES)
CFG->disphdrlocation = NO;
ReadMlst(index);
AA->LoadMsg(&msg, mlst[index]->msgno, CFG->dispmargin-(int)CFG->switches.get(disppagebar));
mlst[index]->goldmark = goldmark;
if(mlst[index]->high & MLST_HIGH_FROM)
msg.attr.fmu1();
if(mlst[index]->high & MLST_HIGH_TO)
msg.attr.tou1();
int mlstwh = whandle();
HeaderView->Use(AA, &msg);
HeaderView->Paint();
wactiv_(mlstwh);
CFG->disphdrlocation = disphdrlocation;
}
if(CFG->switches.get(msglistviewsubj)) {
ReadMlst(index);
wtitle(mlst[index]->re, TCENTER|TBOTTOM, tattr);
}
if(CFG->switches.get(msglistpagebar))
wscrollbar(W_VERT, maximum_index+1, maximum_index, index);
update_statuslinef(LNG->MsgLister, "ST_MSGLISTER", index+1, maximum_index+1, maximum_index-index);
}
// ------------------------------------------------------------------
void GMsgList::update_title() {
int bycol = 8;
int tocol = bycol + mlst_bysiz + 1 + fldadd1;
int recol = tocol + mlst_tosiz + 1 + fldadd1;
int dtcol = recol + mlst_resiz + 1 + fldadd2;
if(AA->Msglistwidesubj())
recol = tocol;
window.title(NULL, tattr, TCENTER);
window.message(CFG->switches.get(disprealmsgno) ? LNG->MsgReal : LNG->Msg, TP_BORD, 3, tattr);
window.message(LNG->FromL, TP_BORD, bycol, tattr);
if(not AA->Msglistwidesubj())
window.message(LNG->ToL, TP_BORD, tocol, tattr);
window.message(LNG->SubjL, TP_BORD, recol, tattr);
switch(AA->Msglistdate()) {
case MSGLISTDATE_WRITTEN: window.message(LNG->Written, TP_BORD, dtcol, tattr); break;
case MSGLISTDATE_ARRIVED: window.message(LNG->Arrived, TP_BORD, dtcol, tattr); break;
case MSGLISTDATE_RECEIVED: window.message(LNG->Received, TP_BORD, dtcol, tattr); break;
}
}
// ------------------------------------------------------------------
void GMsgList::print_line(uint idx, uint pos, bool isbar) {
int bycol = 7;
int tocol = bycol + mlst_bysiz + 1 + fldadd1;
int bysiz = mlst_bysiz + fldadd1;
int tosiz = mlst_tosiz + fldadd1;
int resiz = mlst_resiz + fldadd2;
ReadMlst(idx);
MLst* ml = mlst[idx];
update_marks(ml);
vattr wattr_, hattr_, mattr_;
if(isbar) {
wattr_ = sattr;
hattr_ = sattr;
mattr_ = sattr;
}
else if(ml->high & MLST_HIGH_UNSENT) {
wattr_ = C_MENUW_UNSENT;
hattr_ = C_MENUQ_UNSENTHIGH;
mattr_ = hattr;
}
else if(ml->high & MLST_HIGH_UNREAD) {
wattr_ = C_MENUW_UNREAD;
hattr_ = C_MENUQ_UNREADHIGH;
mattr_ = hattr;
}
else {
wattr_ = wattr;
hattr_ = hattr;
mattr_ = hattr;
}
char buf[256];
if(AA->Msglistwidesubj()) {
resiz += tosiz + 1;
tosiz = 0;
}
char nbuf[33], dbuf[20];
strcpy(dbuf, LNG->n_a);
time32_t dt = 0;
switch(AA->Msglistdate()) {
case MSGLISTDATE_WRITTEN: dt = ml->written; break;
case MSGLISTDATE_ARRIVED: dt = ml->arrived; break;
case MSGLISTDATE_RECEIVED: dt = ml->received; break;
}
if (dt)
{
struct tm tm; ggmtime(&tm, &dt);
strftimei(dbuf, 20, "%d %b %y", &tm);
}
if(AA->Msglistdate())
strsetsz(dbuf, 10);
else
*dbuf = NUL;
gsprintf(PRINTF_DECLARE_BUFFER(nbuf), "%5u", (CFG->switches.get(disprealmsgno) ? ml->msgno : AA->Msgn.ToReln(ml->msgno)));
gsprintf(PRINTF_DECLARE_BUFFER(buf), "%-5.5s%s%-*.*s %-*.*s%s%-*.*s %s",
nbuf, ml->marks,
bysiz, bysiz, ml->by,
tosiz, tosiz, ml->to,
(tosiz ? " " : ""),
resiz, resiz, ml->re,
dbuf
);
window.prints(pos, 0, wattr_, buf);
if (ml->high & (MLST_HIGH_BOOK|MLST_HIGH_MARK))
window.prints(pos, 5, mattr_, ml->marks);
if ((ml->high & MLST_HIGH_FROM) || (ml->colorby != DEFATTR))
{
vattr color = ((ml->colorby != DEFATTR) && !isbar) ? ml->colorby : hattr_;
window.printns(pos, bycol, color, ml->by, bysiz);
}
if (((ml->high & MLST_HIGH_TO) || (ml->colorto != DEFATTR)) &&
!AA->Msglistwidesubj())
{
vattr color = ((ml->colorto != DEFATTR) && !isbar) ? ml->colorto : hattr_;
window.printns(pos, tocol, color, ml->to, tosiz);
}
goldmark = ml->goldmark;
}
// ------------------------------------------------------------------
bool GMsgList::handle_key() {
gkey kk;
if(key < KK_Commands) {
// See if it's a listkey
kk = SearchKey(key, ListKey, ListKeys);
if(kk)
key = kk;
else {
// If not a listkey, see if it matches a readkey
if(not IsMacro(key, KT_M)) {
kk = SearchKey(key, ReadKey, ReadKeys);
if(kk)
key = kk;
}
}
}
ReadMlst(index);
switch(key) {
case KK_ListGotoPrev:
key = Key_Up;
default_handle_key();
break;
case KK_ListGotoNext:
key = Key_Dwn;
default_handle_key();
break;
case KK_ListGotoFirst:
key = Key_Home;
default_handle_key();
break;
case KK_ListGotoLast:
key = Key_End;
default_handle_key();
break;
case KK_ListAskExit:
{
GMenuQuit MenuQuit;
aborted = gkbd.quitall = make_bool(MenuQuit.Run());
if(gkbd.quitall) {
AA->bookmark = AA->Msgn.CvtReln(msgmark2);
return false;
}
}
break;
case KK_ListQuitNow:
gkbd.quitall = true;
///////////////// Drop Through
case KK_ListAbort:
aborted = true;
AA->bookmark = AA->Msgn.CvtReln(msgmark2);
///////////////// Drop Through
case KK_ListSelect:
return false;
case KK_ListMark:
{
uint32_t temp = AA->Mark.Find(mlst[index]->msgno);
if(not temp) {
AA->Mark.Add(mlst[index]->msgno);
update_marks(mlst[index]);
}
}
if(index < maximum_index)
cursor_down();
else
display_bar();
break;
case KK_ListUnmark:
{
uint32_t temp = AA->Mark.Find(mlst[index]->msgno);
if(temp) {
AA->Mark.DelReln(temp);
update_marks(mlst[index]);
}
}
if(index < maximum_index)
cursor_down();
else
display_bar();
break;
case KK_ListToggleMark:
{
uint32_t temp = AA->Mark.Find(mlst[index]->msgno);
if(temp) {
AA->Mark.DelReln(temp);
}
else {
AA->Mark.Add(mlst[index]->msgno);
}
update_marks(mlst[index]);
}
if(index < maximum_index)
cursor_down();
else
display_bar();
break;
case KK_ListToggleBookMark:
if(AA->bookmark == mlst[index]->msgno) {
mlst[index]->marks[0] = ' ';
AA->bookmark = 0;
mlst[index]->high &= ~MLST_HIGH_BOOK;
display_bar();
}
else {
long prevbm = AA->Msgn.ToReln(AA->bookmark-1);
long newbm = index;
AA->bookmark = mlst[index]->msgno;
mlst[index]->marks[0] = MMRK_BOOK;
mlst[index]->high |= MLST_HIGH_BOOK;
display_bar();
if(prevbm) {
if(in_range((long)position + prevbm - newbm, 0l, (long)maximum_position)) {
ReadMlst(prevbm);
mlst[prevbm]->marks[0] = ' ';
mlst[prevbm]->high &= ~MLST_HIGH_BOOK;
index = prevbm;
position += prevbm - newbm;
display_line();
index = newbm;
position -= prevbm - newbm;
}
}
}
break;
case KK_ListGotoBookMark:
if(AA->bookmark) {
long prevbm = AA->Msgn.ToReln(AA->bookmark-1);
long newbm = index;
index = prevbm;
AA->bookmark = mlst[newbm]->msgno;
if(in_range((long)position + prevbm - newbm, 0l, (long)maximum_position)) {
mlst[newbm]->marks[0] = MMRK_BOOK;
mlst[newbm]->high |= MLST_HIGH_BOOK;
index = newbm;
display_line();
index = prevbm;
ReadMlst(index);
mlst[index]->marks[0] = ' ';
mlst[index]->high &= ~MLST_HIGH_BOOK;
position += prevbm - newbm;
display_bar();
}
else
center(CFG->displistcursor);
}
else
SayBibi();
break;
case KK_ListMarkingOptions:
{
uint lrbak = AA->lastread();
AA->set_lastread(index + 1);
msg.msgno = AA->Msgn.CvtReln(AA->lastread());
MarkMsgs(&msg);
AA->set_lastread(lrbak);
update();
}
break;
case KK_ListDosShell:
DosShell();
break;
case KK_ListWideSubj:
if(not AA->Msglistwidesubj()) {
AA->ToggleMsglistwidesubj();
update_title();
update();
}
break;
case KK_ListNarrowSubj:
if(AA->Msglistwidesubj()) {
AA->ToggleMsglistwidesubj();
update_title();
update();
}
break;
case KK_ListToggleWideSubj:
AA->ToggleMsglistwidesubj();
update_title();
update();
break;
case KK_ListToggleDate:
AA->NextMsglistdate();
mlst_with_date(AA->Msglistdate());
update_title();
update();
break;
case KK_ReadMessageList:
center(CFG->displistcursor);
break;
case Key_Tick:
CheckTick(KK_ListQuitNow);
break;
case KK_ListUndefine:
break;
default:
if(not PlayMacro(key, KT_M)) {
if(gkbd.kbuf == NULL)
kbput(key);
switch(key) {
case KK_ListAbort:
case KK_ReadNewArea:
aborted = true;
}
return false;
}
}
return true;
}
// ------------------------------------------------------------------
void GMsgList::Run() {
if(maximum_index == 0) {
aborted = true;
return;
}
if(AA->Msgn.ToReln(reader_msg->msgno) != 0)
index = AA->Msgn.ToReln(reader_msg->msgno)-1;
else
index = 0;
minimum_index = 0;
msgmark2 = AA->Msgn.ToReln(AA->bookmark);
ypos = AA->Msglistheader() ? 6 : 1; // Window Starting Row
xpos = 0; // Window Starting Column
ylen = MAXROW-3-ypos; // Window Height
xlen = MAXCOL-2; // Window Width
btype = W_BMENU; // Window Border Type
battr = C_MENUB; // Window Border Color
wattr = C_MENUW; // Window Color
tattr = C_MENUT; // Window Title Color
sattr = C_MENUS; // Window Selection Bar Color
hattr = C_MENUQ; // Window Highlight Color
sbattr = C_MENUPB; // Window Scrollbar Color
title = LNG->ThreadlistTitle; // Window Title
helpcat = H_MessageBrowser; // Window Help Category
listwrap = CFG->switches.get(displistwrap);
if((AA->Msglistdate() == MSGLISTDATE_RECEIVED) and not AA->havereceivedstamp())
AA->SetMsglistdate(MSGLISTDATE_WRITTEN);
else if((AA->Msglistdate() == MSGLISTDATE_ARRIVED) and not AA->havearrivedstamp())
AA->SetMsglistdate(MSGLISTDATE_WRITTEN);
mlst_with_date(AA->Msglistdate());
fldadd1 = (MAXCOL-80)/3;
fldadd2 = (MAXCOL-80) - (fldadd1*2);
mlst = (MLst **)throw_malloc(sizeof(MLst *) * (maximum_index + 1));
for(uint i=0; i<= maximum_index; i++)
mlst[i] = NULL;
maximum_position = MinV((uint)maximum_index, (uint)ylen - 1);
run_picker();
if(not aborted) {
ReadMlst(index);
AA->set_lastread(AA->Msgn.ToReln(mlst[index]->msgno));
}
}
// ------------------------------------------------------------------
void MessageBrowse() {
if(AA->Msgn.Count()) {
GMsgList p;
_in_msglist = true;
p.Run();
_in_msglist = false;
if(AA->PMrk.Tags() == 0)
AA->isreadpm = false;
if(AA->Mark.Count() == 0)
AA->isreadmark = false;
if(gkbd.quitall)
QuitNow();
}
}
// ------------------------------------------------------------------
//#define MAX_LEVEL 20
// ------------------------------------------------------------------
void GThreadlist::open() {
window.openxy(ypos, xpos, ylen+2, xlen+2, btype, battr, LGREY_|_BLACK);
update_title();
center(CFG->displistcursor);
}
// ------------------------------------------------------------------
void GThreadlist::update_title() {
window.title(title, tattr);
window.message(CFG->switches.get(disprealmsgno) ? LNG->MsgReal : LNG->Msg, TP_BORD, 3, tattr);
switch(AA->Msglistdate()) {
case MSGLISTDATE_WRITTEN: window.message(LNG->Written, TP_BORD, xlen-9, tattr); break;
case MSGLISTDATE_ARRIVED: window.message(LNG->Arrived, TP_BORD, xlen-9, tattr); break;
case MSGLISTDATE_RECEIVED: window.message(LNG->Received, TP_BORD, xlen-9, tattr); break;
}
}
// ------------------------------------------------------------------
void GThreadlist::do_delayed() {
// Update header and statusline
if(AA->Msglistheader())
{
int disphdrlocation = CFG->disphdrlocation;
if ((CFG->disphdrlocation & 0xFFFF) == YES)
CFG->disphdrlocation = NO;
AA->LoadMsg(&msg, treeEntryList[index].msgno, CFG->dispmargin-(int)CFG->switches.get(disppagebar));
for(std::vector<Node>::iterator x = CFG->username.begin(); x != CFG->username.end(); x++) {
if(strieql(msg.By(), x->name)) {
msg.attr.fmu1();
}
if(strieql(msg.to, x->name)) {
msg.attr.tou1();
}
}
if(strieql(msg.to, AA->Internetaddress())) {
msg.attr.tou1();
}
int mlstwh = whandle();
HeaderView->Use(AA, &msg);
HeaderView->Paint();
wactiv_(mlstwh);
CFG->disphdrlocation = disphdrlocation;
}
if(CFG->switches.get(msglistviewsubj)) {
// Reload message if not sure that just reread
if(not AA->Msglistheader())
{
if (AA->Msglistfast())
{
AA->LoadHdr(&msg, treeEntryList[index].msgno);
}
else
{
AA->LoadMsg(&msg, treeEntryList[index].msgno, CFG->dispmargin - (int)CFG->switches.get(disppagebar));
}
}
wtitle(msg.re, TCENTER|TBOTTOM, tattr);
}
if(CFG->switches.get(msglistpagebar))
wscrollbar(W_VERT, maximum_index+1, maximum_index, index);
update_statuslinef(LNG->MsgLister, "ST_MSGLISTER", index+1, maximum_index+1, maximum_index-index);
}
// ------------------------------------------------------------------
void GThreadlist::close() {
window.close();
ResetMsg(&msg);
}
// ------------------------------------------------------------------
void GThreadlist::GenTree(int idx)
{
ThreadEntry &t = treeEntryList[idx];
if (t.entrytext.size())
return;
#ifdef KOI8
static char graph[4]="\206\204\201"; // Pseudographic chars KOI8-R
#else
static char graph_ibmpc[4]="\303\300\263"; // Pseudographic chars CP437, CP850, CP866
static char graph[4]="\0\0\0";
if(graph[0] == NUL)
{
int table = LoadCharset(NULL, NULL, 1);
const char *doscp = get_dos_charset(CFG->xlatlocalset);
if(doscp[0]) // console charset is known
{
int level = LoadCharset(doscp, CFG->xlatlocalset);
if(level!=-1)
XlatStr(graph, graph_ibmpc, level, CharTable);
else
strxcpy(graph, "+*|", ARRAYSIZE(graph)); // Default: plain ASCII7 chars
}
else
memcpy(graph, graph_ibmpc, sizeof(graph));
if(table == -1)
LoadCharset(CFG->xlatimport, CFG->xlatlocalset);
else
LoadCharset(CFG->xlatcharset[table].imp, CFG->xlatcharset[table].exp);
#if defined(__UNIX__) && !defined(__USE_NCURSES__)
gvid_boxcvt(graph);
#endif
}
#endif
if (t.level == 0)
{
t.entrytext = " ";
return;
}
t.entrytext.resize((t.level - 1)*2 + 3, ' ');
t.entrytext[(t.level - 1)*2 + 1] = (t.replynext) ? graph[0] : graph[1];
ThreadEntry te = t;
while (te.replyto)
{
te = treeEntryList[te.replytoindex];
if (te.level != 0)
{
if (te.replynext)
t.entrytext[(te.level - 1)*2 + 1] = graph[2];
}
}
}
// ------------------------------------------------------------------
void GThreadlist::print_line(uint idx, uint pos, bool isbar)
{
char buf[256];
ThreadEntry &t = treeEntryList[idx];
size_t tdlen = xlen - ((AA->Msglistdate() == MSGLISTDATE_NONE) ? 8 : 18);
if(AA->Msglistfast()) {
AA->LoadHdr(&msg, t.msgno);
}
else {
AA->LoadMsg(&msg, t.msgno, CFG->dispmargin-(int)CFG->switches.get(disppagebar));
}
vattr attrh, attrw;
if(msg.attr.uns() and not msg.attr.rcv() and not msg.attr.del()) {
attrw = C_MENUW_UNSENT;
attrh = C_MENUQ_UNSENTHIGH;
}
else if(CFG->switches.get(highlightunread) and (msg.timesread == 0)) {
attrh = C_MENUQ_UNREADHIGH;
attrw = C_MENUW_UNREAD;
}
else {
attrw = wattr;
attrh = hattr;
}
char marks[3] = " ";
if(AA->bookmark == t.msgno)
marks[0] = MMRK_BOOK;
if(AA->Mark.Count()) {
if(AA->Mark.Find(t.msgno))
marks[1] = MMRK_MARK;
}
gsprintf(PRINTF_DECLARE_BUFFER(buf), "%6u %*c", (CFG->switches.get(disprealmsgno) ? t.msgno : AA->Msgn.ToReln(t.msgno)), tdlen, ' ');
if(AA->Msglistdate() != MSGLISTDATE_NONE) {
char dbuf[11];
time32_t dt = 0;
memset(dbuf, ' ', 10);
dbuf[10] = NUL;
strncpy(dbuf, LNG->n_a, strlen(LNG->n_a));
switch(AA->Msglistdate()) {
case MSGLISTDATE_WRITTEN: dt = msg.written; break;
case MSGLISTDATE_ARRIVED: dt = msg.arrived; break;
case MSGLISTDATE_RECEIVED: dt = msg.received; break;
}
if (dt)
{
struct tm tm; ggmtime(&tm, &dt);
strftimei(dbuf, 20, "%d %b %y", &tm);
}
strcat(buf, dbuf);
}
strcat(buf, " ");
window.prints(pos, 0, isbar ? sattr : attrw, buf);
window.prints(pos, 6, isbar ? sattr : hattr, marks);
GenTree(idx);
const char* buf2 = treeEntryList[idx].entrytext.c_str();
size_t buf2len = strlen(buf2);
if (buf2len > h_offset)
{
strxcpy(buf, &buf2[h_offset], tdlen);
window.prints(pos, 8, isbar ? (sattr|ACSET) : (wattr|ACSET), buf);
}
vattr attr = attrw;
for(std::vector<Node>::iterator x = CFG->username.begin(); x != CFG->username.end(); x++)
if(strieql(msg.By(), x->name)) {
attr = attrh;
break;
}
if (!isbar)
attr = GetColorName(msg.By(), msg.orig, attr);
else if (CFG->replylinkfloat)
{
size_t bylen = strlen(msg.By());
if ((buf2len + bylen) > (tdlen - 1))
{
uint offset = (buf2len + bylen) - tdlen + 1;
offset = (offset/10 + 1)*10;
if (offset >= new_hoffset)
new_hoffset = offset;
else
{
while ((new_hoffset - offset) >= tdlen*2/3)
new_hoffset -= 10;
}
}
else
{
while (buf2len < new_hoffset)
new_hoffset -= 10;
}
attr = sattr;
}
size_t buflen = (buf2len > h_offset) ? strlen(&buf2[h_offset]) : 0;
if (buflen < tdlen)
{
if (CFG->replylinkfloat && (buf2len < h_offset))
{
size_t bylen = strlen(msg.By());
size_t pos = (bylen < (h_offset-buf2len)) ? bylen : h_offset-buf2len;
strxcpy(buf, &msg.By()[pos], tdlen);
}
else
strxcpy(buf, msg.By(), tdlen - buflen);
window.prints(pos, 8 + buflen, attr, buf);
}
}
// ------------------------------------------------------------------
void GThreadlist::recursive_build(uint32_t msgn, uint32_t rn, uint32_t level, uint32_t index)
{
uint32_t oldmsgno = msg.msgno;
if (AA->Msgn.ToReln(msgn) and AA->LoadHdr(&msg, msgn))
{
ThreadEntry t;
t.msgno = msgn;
t.replyto = msg.link.to();
t.reply1st = msg.link.first();
t.replynext = rn;
t.level = level++;
t.replytoindex = index;
if (!AA->Msgn.ToReln(t.replyto)) t.replyto = 0;
if (!AA->Msgn.ToReln(t.reply1st)) t.reply1st = 0;
if (!AA->Msgn.ToReln(t.replynext)) t.replynext = 0;
treeEntryList.push_back(t);
index = treeEntryList.size() - 1;
recursive_build(msg.link.first(), msg.link.list(0), level, index);
for (size_t n = 0, max = msg.link.list_max(); n < max; n++)
{
if (msg.link.list(n))
recursive_build(msg.link.list(n), msg.link.list(n+1), level, index);
}
AA->LoadHdr(&msg, oldmsgno);
}
}
// ------------------------------------------------------------------
void GThreadlist::BuildThreadIndex(dword msgn)
{
w_info(LNG->Wait);
AA->LoadHdr(&msg, msgn);
uint32_t msgno = msg.link.to();
uint32_t prevmsgno = msgn;
// Search backwards
while(AA->Msgn.ToReln(msgno))
{
if (not AA->LoadHdr(&msg, msgno))
{
msg.link.to_set(0);
msgno = prevmsgno;
AA->LoadHdr(&msg, msgno);
break;
}
prevmsgno = msgno;
msgno = msg.link.to();
}
if ((m_OldMsgno != prevmsgno) || (m_OldTags != AA->Msgn.Tags()) || (m_OldEchoId != AA->echoid()))
{
m_OldMsgno = prevmsgno;
m_OldTags = AA->Msgn.Tags();
m_OldEchoId = AA->echoid();
index = maximum_index = position = maximum_position = 0;
treeEntryList.clear();
recursive_build(msg.msgno, 0, 0, 0);
minimum_index = 0;
maximum_index = treeEntryList.size() - 1;
maximum_position = MinV((uint)treeEntryList.size() - 1, (uint) ylen - 1);
index = 0;
h_offset = 0;
new_hoffset = 0;
}
for (uint i = 0; i < treeEntryList.size(); i++)
{
if (treeEntryList[i].msgno == msgn)
{
index = i;
break;
}
}
w_info(NULL);
}
// ------------------------------------------------------------------
bool GThreadlist::NextThread(bool next) {
uint m = AA->Msgn.ToReln(reader_msg->msgno);
for(m = m ? m-1 : 0;
next ? m < AA->Msgn.Count() : m!=-1;
next ? m++ : m--) {
dword msgn = AA->Msgn[m];
bool found = false;
for (uint i = 0; i < treeEntryList.size(); i++)
{
if (treeEntryList[i].msgno == msgn)
{
found = true;
break;
}
}
if(not found) {
reader_msg->msgno = msgn;
AA->set_lastread(AA->Msgn.ToReln(msgn));
BuildThreadIndex(msgn);
return true;
}
}
return true;
}
// ------------------------------------------------------------------
bool GThreadlist::handle_key() {
gkey kk;
if(key < KK_Commands) {
key = key_tolower(key);
// See if it's a listkey
kk = SearchKey(key, ListKey, ListKeys);
if(kk)
key = kk;
else {
// If not a listkey, see if it matches a readkey
if(not IsMacro(key, KT_M)) {
kk = SearchKey(key, ReadKey, ReadKeys);
if(kk)
key = kk;
}
}
}
switch(key) {
case KK_ListGotoPrev:
case KK_ListGotoNext:
NextThread((key == KK_ListGotoNext));
if (!CFG->replylinkshowalways && (treeEntryList.size() <= 1))
return false;
center(CFG->displistcursor);
break;
case KK_ListGotoFirst:
key = Key_Home;
default_handle_key();
break;
case KK_ListGotoLast:
key = Key_End;
default_handle_key();
break;
case KK_ListAskExit:
{
GMenuQuit MenuQuit;
aborted = gkbd.quitall = make_bool(MenuQuit.Run());
if(gkbd.quitall)
return false;
}
break;
case KK_ListQuitNow:
gkbd.quitall = true;
///////////////// Drop Through
case KK_ListAbort:
aborted = true;
///////////////// Drop Through
case KK_ListSelect:
return false;
case KK_ListToggleMark:
{
uint32_t temp = AA->Mark.Find(treeEntryList[index].msgno);
if (temp)
{
AA->Mark.DelReln(temp);
}
else
{
AA->Mark.Add(treeEntryList[index].msgno);
}
if(index < maximum_index)
cursor_down();
else
display_bar();
break;
}
case KK_ListToggleBookMark:
if (AA->bookmark == treeEntryList[index].msgno)
{
AA->bookmark = 0;
display_bar();
}
else
{
AA->bookmark = treeEntryList[index].msgno;
update();
}
break;
case KK_ListDosShell:
DosShell();
break;
case KK_ListToggleDate:
AA->NextMsglistdate();
mlst_with_date(AA->Msglistdate());
update_title();
update();
break;
case Key_Tick:
CheckTick(KK_ListQuitNow);
break;
case KK_ListUndefine:
break;
default:
if(not PlayMacro(key, KT_M)) {
if(gkbd.kbuf == NULL)
kbput(key);
switch(key) {
case KK_ListAbort:
case KK_ReadNewArea:
aborted = true;
}
return false;
}
}
return true;
}
// ------------------------------------------------------------------
void GThreadlist::Run()
{
aborted = false;
ypos = AA->Msglistheader() ? 6 : 1; // Window Starting Row
xpos = 0; // Window Starting Column
ylen = MAXROW-3-ypos; // Window Height
xlen = MAXCOL-2; // Window Width
btype = W_BMENU; // Window Border Type
battr = C_MENUB; // Window Border Color
wattr = C_MENUW; // Window Color
tattr = C_MENUT; // Window Title Color
sattr = C_MENUS; // Window Selection Bar Color
hattr = C_MENUQ; // Window Highlight Color
sbattr = C_MENUPB; // Window Scrollbar Color
title = LNG->ThreadlistTitle; // Window Title
helpcat = H_ReplyThread; // Window Help Category
listwrap = CFG->switches.get(displistwrap);
BuildThreadIndex(reader_msg->msgno);
size_t size = treeEntryList.size();
if ((CFG->replylinkshowalways && (size > 0)) || (size > 1))
{
run_picker();
}
else
{
w_info(LNG->NoThreadlist);
waitkeyt(5000);
w_info(NULL);
aborted = true;
}
if (!aborted)
AA->set_lastread(AA->Msgn.ToReln(treeEntryList[index].msgno));
ResetMsg(&msg);
}
// ------------------------------------------------------------------
bool GThreadlist::GoNextUnread(bool reader)
{
if (reader)
BuildThreadIndex(reader_msg->msgno);
bool found = false;
size_t size = treeEntryList.size();
if (size > 1)
{
size_t idx;
for (idx = index + 1; idx < size; idx++)
{
ThreadEntry &t = treeEntryList[idx];
AA->LoadHdr(&msg, t.msgno);
if (msg.timesread == 0)
{
found = true;
break;
}
}
if (!found)
{
for (idx = 0; idx < index; idx++)
{
ThreadEntry &t = treeEntryList[idx];
AA->LoadHdr(&msg, t.msgno);
if (msg.timesread == 0)
{
found = true;
break;
}
}
}
if (found)
{
index = idx;
if (reader)
{
AA->set_lastread(AA->Msgn.ToReln(treeEntryList[idx].msgno));
}
}
}
ResetMsg(&msg);
return found;
}
// ------------------------------------------------------------------
GThreadlist *g_ThreadList = 0;
// ------------------------------------------------------------------
void MsgThreadlist()
{
if (!g_ThreadList)
g_ThreadList = new GThreadlist;
g_ThreadList->Run();
}
// ------------------------------------------------------------------
void GotoThNextUnread()
{
if (!g_ThreadList)
g_ThreadList = new GThreadlist;
w_info(LNG->Wait);
reader_direction = DIR_NEXT;
if (!g_ThreadList->GoNextUnread(true))
{
SayBibi();
reader_keyok = true;
}
w_info(NULL);
}
// ------------------------------------------------------------------