/* $Id: board.c,v 1.55 2002/08/20 14:40:34 in2 Exp $ */
#include "bbs.h"
#define BRC_STRLEN 15 /* Length of board name */
#define BRC_MAXSIZE 24576
#define BRC_ITEMSIZE (BRC_STRLEN + 1 + BRC_MAXNUM * sizeof( int ))
#define BRC_MAXNUM 80
static char *
brc_getrecord(char *ptr, char *name, int *pnum, int *list)
{
int num;
char *tmp;
strncpy(name, ptr, BRC_STRLEN);
ptr += BRC_STRLEN;
num = (*ptr++) & 0xff;
tmp = ptr + num * sizeof(int);
if (num > BRC_MAXNUM)
num = BRC_MAXNUM;
*pnum = num;
memcpy(list, ptr, num * sizeof(int));
return tmp;
}
static time_t brc_expire_time;
static char *
brc_putrecord(char *ptr, char *name, int num, int *list)
{
if (num > 0 && list[0] > brc_expire_time) {
if (num > BRC_MAXNUM)
num = BRC_MAXNUM;
while (num > 1 && list[num - 1] < brc_expire_time)
num--;
strncpy(ptr, name, BRC_STRLEN);
ptr += BRC_STRLEN;
*ptr++ = num;
memcpy(ptr, list, num * sizeof(int));
ptr += num * sizeof(int);
}
return ptr;
}
static int brc_changed = 0;
static char brc_buf[BRC_MAXSIZE];
static char brc_name[BRC_STRLEN];
static char *fn_boardrc = ".boardrc";
static int brc_size;
void
brc_update()
{
if (brc_changed && cuser.userlevel) {
char dirfile[STRLEN], *ptr;
char tmp_buf[BRC_MAXSIZE - BRC_ITEMSIZE], *tmp;
char tmp_name[BRC_STRLEN];
int tmp_list[BRC_MAXNUM], tmp_num;
int fd, tmp_size;
ptr = brc_buf;
if (brc_num > 0)
ptr = brc_putrecord(ptr, brc_name, brc_num, brc_list);
setuserfile(dirfile, fn_boardrc);
if ((fd = open(dirfile, O_RDONLY)) != -1) {
tmp_size = read(fd, tmp_buf, sizeof(tmp_buf));
close(fd);
} else {
tmp_size = 0;
}
tmp = tmp_buf;
while (tmp < &tmp_buf[tmp_size] && (*tmp >= ' ' && *tmp <= 'z')) {
tmp = brc_getrecord(tmp, tmp_name, &tmp_num, tmp_list);
if (strncmp(tmp_name, currboard, BRC_STRLEN))
ptr = brc_putrecord(ptr, tmp_name, tmp_num, tmp_list);
}
brc_size = (int)(ptr - brc_buf);
if ((fd = open(dirfile, O_WRONLY | O_CREAT, 0644)) != -1) {
ftruncate(fd, 0);
write(fd, brc_buf, brc_size);
close(fd);
}
brc_changed = 0;
}
}
static void
read_brc_buf()
{
char dirfile[STRLEN];
int fd;
if (brc_buf[0] == '\0') {
setuserfile(dirfile, fn_boardrc);
if ((fd = open(dirfile, O_RDONLY)) != -1) {
brc_size = read(fd, brc_buf, sizeof(brc_buf));
close(fd);
} else {
brc_size = 0;
}
}
}
int
brc_initial(char *boardname)
{
char *ptr;
if (strcmp(currboard, boardname) == 0) {
return brc_num;
}
brc_update();
strlcpy(currboard, boardname, sizeof(currboard));
currbid = getbnum(currboard);
currbrdattr = bcache[currbid - 1].brdattr;
read_brc_buf();
ptr = brc_buf;
while (ptr < &brc_buf[brc_size] && (*ptr >= ' ' && *ptr <= 'z')) {
ptr = brc_getrecord(ptr, brc_name, &brc_num, brc_list);
if (strncmp(brc_name, currboard, BRC_STRLEN) == 0)
return brc_num;
}
strncpy(brc_name, boardname, BRC_STRLEN);
brc_num = brc_list[0] = 1;
return 0;
}
void
brc_addlist(char *fname)
{
int ftime, n, i;
if (!cuser.userlevel)
return;
ftime = atoi(&fname[2]);
if (ftime <= brc_expire_time
/* || fname[0] != 'M' || fname[1] != '.' */ ) {
return;
}
if (brc_num <= 0) {
brc_list[brc_num++] = ftime;
brc_changed = 1;
return;
}
if ((brc_num == 1) && (ftime < brc_list[0]))
return;
for (n = 0; n < brc_num; n++) {
if (ftime == brc_list[n]) {
return;
} else if (ftime > brc_list[n]) {
if (brc_num < BRC_MAXNUM)
brc_num++;
for (i = brc_num - 1; --i >= n; brc_list[i + 1] = brc_list[i]);
brc_list[n] = ftime;
brc_changed = 1;
return;
}
}
if (brc_num < BRC_MAXNUM) {
brc_list[brc_num++] = ftime;
brc_changed = 1;
}
}
static int
brc_unread_time(time_t ftime, int bnum, int *blist)
{
int n;
if (ftime <= brc_expire_time)
return 0;
if (brc_num <= 0)
return 1;
for (n = 0; n < bnum; n++) {
if (ftime > blist[n])
return 1;
else if (ftime == blist[n])
return 0;
}
return 0;
}
int
brc_unread(char *fname, int bnum, int *blist)
{
int ftime, n;
ftime = atoi(&fname[2]);
if (ftime <= brc_expire_time)
return 0;
if (brc_num <= 0)
return 1;
for (n = 0; n < bnum; n++) {
if (ftime > blist[n])
return 1;
else if (ftime == blist[n])
return 0;
}
return 0;
}
#define BRD_UNREAD 1
#define BRD_FAV 2
#define BRD_ZAP 4
#define BRD_TAG 8
typedef struct {
int bid, *total;
time_t *lastposttime;
boardheader_t *bh;
unsigned int myattr;
} boardstat_t;
static int *zapbuf = NULL, *favbuf;
static short nuseboards = 0;
static boardstat_t *nbrd = NULL;
#define STR_BBSRC ".bbsrc"
#define STR_FAV ".fav"
void
init_brdbuf()
{
register int n, size;
char fname[60];
/* MAXBOARDS ==> 至多看得見 32 個新板 */
n = numboards + 32;
size = n * sizeof(int);
zapbuf = (int *)malloc(size);
favbuf = (int *)malloc(size + sizeof(int));
favbuf[0] = 0x5c4d3e; /* for check memory */
++favbuf;
memset(favbuf, 0, size);
while (n)
zapbuf[--n] = login_start_time;
setuserfile(fname, STR_BBSRC);
if ((n = open(fname, O_RDONLY, 0600)) != -1) {
read(n, zapbuf, size);
close(n);
}
setuserfile(fname, STR_FAV);
if ((n = open(fname, O_RDONLY, 0600)) != -1) {
read(n, favbuf, size);
close(n);
}
for (n = 0; n < numboards; n++)
favbuf[n] &= ~BRD_TAG;
brc_expire_time = login_start_time - 365 * 86400;
}
void
save_brdbuf()
{
int fd, size;
char fname[60];
static char reentrant = 0;
if ( reentrant )
return;
reentrant = 1;
if (!zapbuf)
return;
setuserfile(fname, STR_BBSRC);
if ((fd = open(fname, O_WRONLY | O_CREAT, 0600)) != -1) {
size = numboards * sizeof(int);
write(fd, zapbuf, size);
close(fd);
}
if (favbuf[-1] != 0x5c4d3e) {
FILE *fp = fopen(BBSHOME "/log/memorybad", "a");
fprintf(fp, "%s %s %d\n", cuser.userid, Cdatelite(&now), favbuf[-1]);
fclose(fp);
return;
}
setuserfile(fname, STR_FAV);
if ((fd = open(fname, O_WRONLY | O_CREAT, 0600)) != -1) {
size = numboards * sizeof(int);
write(fd, favbuf, size);
close(fd);
}
}
int
Ben_Perm(boardheader_t * bptr)
{
register int level, brdattr;
register char *ptr;
level = bptr->level;
brdattr = bptr->brdattr;
if (HAS_PERM(PERM_SYSOP))
return 1;
ptr = bptr->BM;
if (is_BM(ptr))
return 1;
/* 祕密看板:核對首席板主的好友名單 */
if (brdattr & BRD_HIDE) { /* 隱藏 */
if (hbflcheck((int)(bptr - bcache) + 1, currutmp->uid)) {
if (brdattr & BRD_POSTMASK)
return 0;
else
return 2;
} else
return 1;
}
/* 限制閱讀權限 */
if (level && !(brdattr & BRD_POSTMASK) && !HAS_PERM(level))
return 0;
return 1;
}
#if 0
static int
have_author(char *brdname)
{
char dirname[100];
snprintf(dirname, sizeof(dirname),
"正在搜尋作者[33m%s[m 看板:[1;33m%s[0m.....",
currauthor, brdname);
move(b_lines, 0);
clrtoeol();
outs(dirname);
refresh();
setbdir(dirname, brdname);
str_lower(currowner, currauthor);
return search_rec(dirname, cmpfowner);
}
#endif
static int
check_newpost(boardstat_t * ptr)
{ /* Ptt 改 */
int tbrc_list[BRC_MAXNUM], tbrc_num;
char bname[BRC_STRLEN];
char *po;
time_t ftime;
ptr->myattr &= ~BRD_UNREAD;
if (ptr->bh->brdattr & BRD_GROUPBOARD)
return 0;
if (*(ptr->total) == 0)
setbtotal(ptr->bid);
if (*(ptr->total) == 0)
return 0;
ftime = *(ptr->lastposttime);
read_brc_buf();
po = brc_buf;
while (po < &brc_buf[brc_size] && (*po >= ' ' && *po <= 'z')) {
po = brc_getrecord(po, bname, &tbrc_num, tbrc_list);
if (strncmp(bname, ptr->bh->brdname, BRC_STRLEN) == 0) {
if (brc_unread_time(ftime, tbrc_num, tbrc_list)) {
ptr->myattr |= BRD_UNREAD;
}
return 1;
}
}
ptr->myattr |= BRD_UNREAD;
return 1;
}
static int brdnum;
static int yank_flag = 1;
static void
load_uidofgid(const int gid, const int type)
{
boardheader_t *bptr, *currbptr;
int n, childcount = 0;
currbptr = &bcache[gid - 1];
for (n = 0; n < numboards; ++n) {
bptr = SHM->bsorted[type][n];
if (bptr->brdname[0] == '\0')
continue;
if (bptr->gid == gid) {
if (currbptr == &bcache[gid - 1])
currbptr->firstchild[type] = bptr;
else {
currbptr->next[type] = bptr;
currbptr->parent = &bcache[gid - 1];
}
childcount++;
currbptr = bptr;
}
}
bcache[gid - 1].childcount = childcount;
if (currbptr == &bcache[gid - 1])
currbptr->firstchild[type] = (boardheader_t *) ~ 0;
else
currbptr->next[type] = (boardheader_t *) ~ 0;
}
static boardstat_t *
addnewbrdstat(int n, int state)
{
boardstat_t *ptr = &nbrd[brdnum++];
boardheader_t *bptr = &bcache[n];
if( brdnum >= nuseboards )
vmsg("memory error");
ptr->total = &(SHM->total[n]);
ptr->lastposttime = &(SHM->lastposttime[n]);
ptr->bid = n + 1;
ptr->myattr = 0;
ptr->myattr = (favbuf[n] & ~BRD_ZAP);
if (zapbuf[n] == 0)
ptr->myattr |= BRD_ZAP;
ptr->bh = bptr;
if ((bptr->brdattr & BRD_HIDE) && state == 1)
bptr->brdattr |= BRD_POSTMASK;
check_newpost(ptr);
return ptr;
}
static int
cmpboardfriends(const void *brd, const void *tmp)
{
return ((boardstat_t *) tmp)->bh->nuser - ((boardstat_t *) brd)->bh->nuser;
}
static void
load_boards(char *key)
{
boardheader_t *bptr = NULL;
int type = cuser.uflag & BRDSORT_FLAG ? 1 : 0;
register int i, n;
register int state;
if (class_bid > 0) {
bptr = &bcache[class_bid - 1];
if (bptr->firstchild[type] == NULL || bptr->childcount <= 0)
load_uidofgid(class_bid, type);
}
brdnum = 0;
if (class_bid <= 0) {
if( nuseboards == 0 ){
nuseboards = 10; /* 多 malloc 十個版 */
for (i = 0; i < numboards; i++) {
if ((bptr = SHM->bsorted[type][i]) == NULL)
continue;
n = (int)(bptr - bcache);
if (!bptr->brdname[0] || bptr->brdattr & BRD_GROUPBOARD ||
!((state = Ben_Perm(bptr)) || (currmode & MODE_MENU)) ||
(yank_flag == 0 && !(favbuf[n] & BRD_FAV)) ||
(yank_flag == 1 && !zapbuf[n]) ||
(key[0] && !strcasestr(bptr->title, key)) ||
(class_bid == -1 && bptr->nuser < 5))
++nuseboards;
}
}
nbrd = (boardstat_t *) malloc(sizeof(boardstat_t) * nuseboards);
for (i = 0; i < numboards; i++) {
if ((bptr = SHM->bsorted[type][i]) == NULL)
continue;
n = (int)(bptr - bcache);
if (!bptr->brdname[0] || bptr->brdattr & BRD_GROUPBOARD ||
!((state = Ben_Perm(bptr)) || (currmode & MODE_MENU)) ||
(yank_flag == 0 && !(favbuf[n] & BRD_FAV)) ||
(yank_flag == 1 && !zapbuf[n]) ||
(key[0] && !strcasestr(bptr->title, key)) ||
(class_bid == -1 && bptr->nuser < 5))
continue;
addnewbrdstat(n, state);
if (class_bid == -1)
qsort(nbrd, brdnum, sizeof(boardstat_t), cmpboardfriends);
}
} else {
nbrd = (boardstat_t *) malloc(bptr->childcount * sizeof(boardstat_t));
for (bptr = bptr->firstchild[type]; bptr != (boardheader_t *) ~ 0;
bptr = bptr->next[type]) {
n = (int)(bptr - bcache);
if (!((state = Ben_Perm(bptr)) || (currmode & MODE_MENU))
|| (yank_flag == 0 && !(favbuf[n] & BRD_FAV))
|| (yank_flag == 1 && !zapbuf[n]) ||
(key[0] && !strcasestr(bptr->title, key)))
continue;
addnewbrdstat(n, state);
}
}
}
static int
search_board()
{
int num;
char genbuf[IDLEN + 2];
move(0, 0);
clrtoeol();
CreateNameList();
for (num = 0; num < brdnum; num++)
AddNameList(nbrd[num].bh->brdname);
namecomplete(MSG_SELECT_BOARD, genbuf);
for (num = 0; num < brdnum; num++)
if (!strcasecmp(nbrd[num].bh->brdname, genbuf))
return num;
return -1;
}
static int
unread_position(char *dirfile, boardstat_t * ptr)
{
fileheader_t fh;
char fname[FNLEN];
register int num, fd, step, total;
total = *(ptr->total);
num = total + 1;
if ((ptr->myattr & BRD_UNREAD) && (fd = open(dirfile, O_RDWR)) > 0) {
if (!brc_initial(ptr->bh->brdname)) {
num = 1;
} else {
num = total - 1;
step = 4;
while (num > 0) {
lseek(fd, (off_t) (num * sizeof(fh)), SEEK_SET);
if (read(fd, fname, FNLEN) <= 0 ||
!brc_unread(fname, brc_num, brc_list))
break;
num -= step;
if (step < 32)
step += step >> 1;
}
if (num < 0)
num = 0;
while (num < total) {
lseek(fd, (off_t) (num * sizeof(fh)), SEEK_SET);
if (read(fd, fname, FNLEN) <= 0 ||
brc_unread(fname, brc_num, brc_list))
break;
num++;
}
}
close(fd);
}
if (num < 0)
num = 0;
return num;
}
static void
brdlist_foot()
{
prints("\033[34;46m 選擇看板 \033[31;47m (c)\033[30m新文章模式 "
"\033[31m(v/V)\033[30m標記已讀/未讀 \033[31m(y)\033[30m篩選%s"
" \033[31m(z)\033[30m切換選擇 \033[m",
yank_flag == 0 ? "最愛" : yank_flag == 1 ? "部份" : "全部");
}
static void
show_brdlist(int head, int clsflag, int newflag)
{
int myrow = 2;
if (class_bid == 1) {
currstat = CLASS;
myrow = 6;
showtitle("分類看板", BBSName);
movie(0);
move(1, 0);
outs(
" "
"◣ ╭—\033[33m●\n"
" ╬— \033[m "
"◢█\033[47m⊙\033[40m██◣╤\n"
" \033[44m ︿︿︿︿︿︿︿︿ "
"\033[33m║\033[m\033[44m ◣◢███▼▼▼║ \033[m\n"
" \033[44m "
"\033[33m \033[m\033[44m ◤◥███▲▲▲ ║\033[m\n"
" ︿︿︿︿︿︿︿︿ \033[33m"
"│\033[m ◥████◤ ║\n"
" \033[33m╫"
"——\033[m ◤ —+\033[m");
} else if (clsflag) {
showtitle("看板列表", BBSName);
prints("[←]主選單 [→]閱\讀 [↑↓]選擇 [y]載入 [S]排序 [/]搜尋 "
"[TAB]文摘‧看板 [h]求助\n"
"\033[7m%-20s 類別 轉信%-31s人氣 板 主 \033[m",
newflag ? "總數 未讀 看 板" : " 編號 看 板",
" 中 文 敘 述");
move(b_lines, 0);
brdlist_foot();
}
if (brdnum > 0) {
boardstat_t *ptr;
static char *color[8] = {"", "\033[32m",
"\033[33m", "\033[36m", "\033[34m", "\033[1m",
"\033[1;32m", "\033[1;33m"};
static char *unread[2] = {"\33[37m \033[m", "\033[1;31mˇ\033[m"};
while (++myrow < b_lines) {
move(myrow, 0);
clrtoeol();
if (head < brdnum) {
ptr = &nbrd[head++];
if (class_bid == 1)
prints(" ");
if (!newflag) {
prints("%5d%c%s", head,
!(ptr->bh->brdattr & BRD_HIDE) ? ' ' :
(ptr->bh->brdattr & BRD_POSTMASK) ? ')' : '-',
(ptr->myattr & BRD_TAG) ? "D " :
(ptr->myattr & BRD_ZAP) ? "- " :
(ptr->bh->brdattr & BRD_GROUPBOARD) ? " " :
unread[ptr->myattr & BRD_UNREAD]);
} else if (ptr->myattr & BRD_ZAP) {
ptr->myattr &= ~BRD_UNREAD;
prints(" ﹣ ﹣");
} else {
if (newflag) {
if ((ptr->bh->brdattr & BRD_GROUPBOARD))
prints(" ");
else
prints("%6d%s", (int)(*(ptr->total)),
unread[ptr->myattr & BRD_UNREAD]);
}
}
if (class_bid != 1) {
prints("%s%-13s\033[m%s%5.5s\033[0;37m%2.2s\033[m"
"%-34.34s",
(ptr->myattr & BRD_FAV) ? "\033[1;36m" : "",
ptr->bh->brdname,
color[(unsigned int)
(ptr->bh->title[1] + ptr->bh->title[2] +
ptr->bh->title[3] + ptr->bh->title[0]) & 07],
ptr->bh->title, ptr->bh->title + 5, ptr->bh->title + 7);
if (ptr->bh->brdattr & BRD_BAD)
prints(" X ");
else if (ptr->bh->nuser >= 100)
prints("\033[1mHOT\033[m");
else if (ptr->bh->nuser > 50)
prints("\033[1;31m%2d\033[m ", ptr->bh->nuser);
else if (ptr->bh->nuser > 10)
prints("\033[1;33m%2d\033[m ", ptr->bh->nuser);
else if (ptr->bh->nuser > 0)
prints("%2d ", ptr->bh->nuser);
else
prints(" %c ", ptr->bh->bvote ? 'V' : ' ');
prints("%.13s", ptr->bh->BM);
refresh();
} else {
prints("%-40.40s %.13s", ptr->bh->title + 7, ptr->bh->BM);
}
}
clrtoeol();
}
}
}
static char *choosebrdhelp[] = {
"\0看板選單輔助說明",
"\01基本指令",
"(p)(↑)/(n)(↓)上一個看板 / 下一個看板",
"(P)(^B)(PgUp) 上一頁看板",
"(N)(^F)(PgDn) 下一頁看板",
"($)/(s)/(/) 最後一個看板 / 搜尋看板 / 以中文搜尋看板關鍵字",
"(數字) 跳至該項目",
"\01進階指令",
"(^W) 迷路了 我在哪裡",
"(r)(→)(Rtn) 進入多功\能閱\讀選單",
"(q)(←) 回到主選單",
"(z)(Z) 訂閱\/反訂閱\看板 訂閱\/反訂閱\所有看板",
"(y) 我的最愛/訂閱\看板/出所有看板",
"(v/V) 通通看完/全部未讀",
"(S) 按照字母/分類排序",
"(t/^T/^A/^D) 標記看板/取消所有標記/已標記的加入我的最愛/取消我的最愛",
"(m) 把看板加入我的最愛",
"\01小組長指令",
"(E/W/B) 設定看板/設定小組備忘/開新看板",
"(^P) 移動已標記看板到此分類",
NULL
};
static void
set_menu_BM(char *BM)
{
if (HAS_PERM(PERM_ALLBOARD) || is_BM(BM)) {
currmode |= MODE_MENU;
cuser.userlevel |= PERM_SYSSUBOP;
}
}
static char *privateboard =
"\n\n\n\n 對不起 此板目前只准看板好友進入 請先向板主申請入境許\可";
static void
dozap(int num)
{
boardstat_t *ptr;
ptr = &nbrd[num];
ptr->myattr ^= BRD_ZAP;
if (ptr->bh->brdattr & BRD_NOZAP)
ptr->myattr &= ~BRD_ZAP;
if (!(ptr->myattr & BRD_ZAP))
check_newpost(ptr);
zapbuf[ptr->bid - 1] = (ptr->myattr & BRD_ZAP ? 0 : login_start_time);
}
static void
choose_board(int newflag)
{
static int num = 0;
boardstat_t *ptr;
int head = -1, ch = 0, currmodetmp, tmp, tmp1, bidtmp;
char keyword[13] = "";
#if HAVE_SEARCH_ALL
char genbuf[200];
#endif
setutmpmode(newflag ? READNEW : READBRD);
brdnum = 0;
if (!cuser.userlevel) /* guest yank all boards */
yank_flag = 2;
do {
if (brdnum <= 0) {
load_boards(keyword);
if (brdnum <= 0) {
if (keyword[0] != 0) {
mprints(b_lines - 1, 0, "沒有任何看板標題有此關鍵字 "
"(板主應注意看板標題命名)");
pressanykey();
keyword[0] = 0;
brdnum = -1;
continue;
}
if (yank_flag < 2) {
brdnum = -1;
yank_flag++;
continue;
}
if (HAS_PERM(PERM_SYSOP) || (currmode & MODE_MENU)) {
if (m_newbrd(0) == -1)
break;
brdnum = -1;
continue;
} else
break;
}
head = -1;
}
if (num < 0)
num = 0;
else if (num >= brdnum)
num = brdnum - 1;
if (head < 0) {
if (newflag) {
tmp = num;
while (num < brdnum) {
ptr = &nbrd[num];
if (ptr->myattr & BRD_UNREAD)
break;
num++;
}
if (num >= brdnum)
num = tmp;
}
head = (num / p_lines) * p_lines;
show_brdlist(head, 1, newflag);
} else if (num < head || num >= head + p_lines) {
head = (num / p_lines) * p_lines;
show_brdlist(head, 0, newflag);
}
if (class_bid == 1)
ch = cursor_key(7 + num - head, 10);
else
ch = cursor_key(3 + num - head, 0);
switch (ch) {
case Ctrl('W'):
whereami(0, NULL, NULL);
head = -1;
break;
case 'e':
case KEY_LEFT:
case EOF:
ch = 'q';
case 'q':
if (keyword[0]) {
keyword[0] = 0;
brdnum = -1;
ch = ' ';
}
break;
case 'c':
show_brdlist(head, 1, newflag ^= 1);
break;
case KEY_PGUP:
case 'P':
case 'b':
case Ctrl('B'):
if (num) {
num -= p_lines;
break;
}
case KEY_END:
case '$':
num = brdnum - 1;
break;
case ' ':
case KEY_PGDN:
case 'N':
case Ctrl('F'):
if (num == brdnum - 1)
num = 0;
else
num += p_lines;
break;
case Ctrl('C'):
cal();
show_brdlist(head, 1, newflag);
break;
case Ctrl('I'):
t_idle();
show_brdlist(head, 1, newflag);
break;
case KEY_UP:
case 'p':
case 'k':
if (num-- <= 0)
num = brdnum - 1;
break;
case 't':
ptr = &nbrd[num];
ptr->myattr ^= BRD_TAG;
favbuf[ptr->bid - 1] = ptr->myattr;
head = 9999;
case KEY_DOWN:
case 'n':
case 'j':
if (++num < brdnum)
break;
case '0':
case KEY_HOME:
num = 0;
break;
case '1':
case '2':
case '3':
case '4':
case '5':
case '6':
case '7':
case '8':
case '9':
if ((tmp = search_num(ch, brdnum)) >= 0)
num = tmp;
brdlist_foot();
break;
case 'F':
case 'f':
if (class_bid && HAS_PERM(PERM_SYSOP)) {
bcache[class_bid - 1].firstchild[cuser.uflag & BRDSORT_FLAG ? 1 : 0]
= NULL;
brdnum = -1;
}
break;
case 'h':
show_help(choosebrdhelp);
show_brdlist(head, 1, newflag);
break;
case '/':
getdata_buf(b_lines - 1, 0, "請輸入看板中文關鍵字:",
keyword, sizeof(keyword), DOECHO);
brdnum = -1;
break;
case 'S':
cuser.uflag ^= BRDSORT_FLAG;
brdnum = -1;
break;
case 'y':
nuseboards = 0; /* to recount malloc size for nbrd */
if (class_bid == 0)
yank_flag = (yank_flag + 1) % 3;
else
yank_flag = yank_flag % 2 + 1;
brdnum = -1;
break;
case Ctrl('D'):
for (tmp = 0; tmp < numboards; tmp++) {
if (favbuf[tmp] & BRD_TAG) {
favbuf[tmp] &= ~BRD_FAV;
favbuf[tmp] &= ~BRD_TAG;
}
}
brdnum = -1;
break;
case Ctrl('A'):
for (tmp = 0; tmp < numboards; tmp++) {
if (favbuf[tmp] & BRD_TAG) {
favbuf[tmp] |= BRD_FAV;
favbuf[tmp] &= ~BRD_TAG;
}
}
brdnum = -1;
break;
case Ctrl('T'):
for (tmp = 0; tmp < numboards; tmp++)
favbuf[tmp] &= ~BRD_TAG;
brdnum = -1;
break;
case Ctrl('P'):
if (class_bid != 0 &&
(HAS_PERM(PERM_SYSOP) || (currmode & MODE_MENU))) {
for (tmp = 0; tmp < numboards; tmp++) {
boardheader_t *bh = &bcache[tmp];
if (!(favbuf[tmp] & BRD_TAG) || bh->gid == class_bid)
continue;
favbuf[tmp] &= ~BRD_TAG;
if (bh->gid != class_bid) {
bh->gid = class_bid;
substitute_record(FN_BOARD, bh,
sizeof(boardheader_t), tmp + 1);
reset_board(tmp + 1);
log_usies("SetBoardGID", bh->brdname);
}
}
brdnum = -1;
}
break;
case 'm':
if (HAS_PERM(PERM_BASIC)) {
ptr = &nbrd[num];
ptr->myattr ^= BRD_FAV;
favbuf[ptr->bid - 1] = ptr->myattr;
head = 9999;
nuseboards = 0; /* to recount malloc size for nbrd */
}
break;
case 'z':
if (HAS_PERM(PERM_BASIC)) {
dozap(num);
head = 9999;
nuseboards = 0; /* to recount malloc size for nbrd */
}
break;
case 'Z': /* Ptt */
if (HAS_PERM(PERM_BASIC)) {
for (tmp = 0; tmp < brdnum; tmp++) {
dozap(tmp);
}
head = 9999;
nuseboards = 0; /* to recount malloc size for nbrd */
}
break;
case 'v':
case 'V':
ptr = &nbrd[num];
brc_initial(ptr->bh->brdname);
if (ch == 'v') {
ptr->myattr &= ~BRD_UNREAD;
zapbuf[ptr->bid - 1] = brc_list[0] = now;
} else {
zapbuf[ptr->bid - 1] = brc_list[0] = 1;
ptr->myattr |= BRD_UNREAD;
}
brc_num = brc_changed = 1;
brc_update();
show_brdlist(head, 0, newflag);
break;
case 's':
if ((tmp = search_board()) == -1) {
show_brdlist(head, 1, newflag);
break;
}
num = tmp;
case 'E':
if (HAS_PERM(PERM_SYSOP) || (currmode & MODE_MENU)) {
ptr = &nbrd[num];
move(1, 1);
clrtobot();
m_mod_board(ptr->bh->brdname);
brdnum = -1;
}
break;
case 'R':
if (HAS_PERM(PERM_SYSOP) || (currmode & MODE_MENU)) {
m_newbrd(1);
brdnum = -1;
}
break;
case 'B':
if (HAS_PERM(PERM_SYSOP) || (currmode & MODE_MENU)) {
m_newbrd(0);
brdnum = -1;
}
break;
case 'W':
if (class_bid > 0 &&
(HAS_PERM(PERM_SYSOP) || (currmode & MODE_MENU))) {
char buf[128];
setbpath(buf, bcache[class_bid - 1].brdname);
mkdir(buf, 0755); /* Ptt:開群組目錄 */
b_note_edit_bname(class_bid);
brdnum = -1;
}
break;
case KEY_RIGHT:
case '\n':
case '\r':
case 'r':
{
char buf[STRLEN];
ptr = &nbrd[num];
if (!(ptr->bh->brdattr & BRD_GROUPBOARD)) { /* 非sub class */
if (!(ptr->bh->brdattr & BRD_HIDE) ||
(ptr->bh->brdattr & BRD_POSTMASK)) {
brc_initial(ptr->bh->brdname);
if (newflag) {
setbdir(buf, currboard);
tmp = unread_position(buf, ptr);
head = tmp - t_lines / 2;
getkeep(buf, head > 1 ? head : 1, tmp + 1);
}
board_visit_time = zapbuf[ptr->bid - 1];
if (!(ptr->myattr & BRD_ZAP))
zapbuf[ptr->bid - 1] = now;
Read();
check_newpost(ptr);
head = -1;
setutmpmode(newflag ? READNEW : READBRD);
} else {
setbfile(buf, ptr->bh->brdname, FN_APPLICATION);
if (more(buf, YEA) == -1) {
move(1, 0);
clrtobot();
outs(privateboard);
pressanykey();
}
head = -1;
}
} else { /* sub class */
move(12, 1);
bidtmp = class_bid;
currmodetmp = currmode;
tmp1 = num;
num = 0;
if (!(ptr->bh->brdattr & BRD_TOP))
class_bid = ptr->bid;
else
class_bid = -1; /* 熱門群組用 */
if (!(currmode & MODE_MENU)) /* 如果還沒有小組長權限 */
set_menu_BM(ptr->bh->BM);
if (now < ptr->bh->bupdate) {
setbfile(buf, ptr->bh->brdname, fn_notes);
if (more(buf, NA) != -1)
pressanykey();
}
tmp = currutmp->brc_id;
setutmpbid(ptr->bid);
free(nbrd);
choose_board(0);
currmode = currmodetmp; /* 離開板板後就把權限拿掉喔 */
num = tmp1;
class_bid = bidtmp;
setutmpbid(tmp);
brdnum = -1;
}
}
}
} while (ch != 'q');
free(nbrd);
if( yank_flag != 0 )
nuseboards = 0;
}
int
root_board()
{
class_bid = 1;
yank_flag = 1;
choose_board(0);
return 0;
}
int
Boards()
{
class_bid = 0;
yank_flag = 0;
choose_board(0);
return 0;
}
int
New()
{
int mode0 = currutmp->mode;
int stat0 = currstat;
class_bid = 0;
choose_board(1);
currutmp->mode = mode0;
currstat = stat0;
return 0;
}
/*
* int v_favorite(){ char fname[256]; char inbuf[2048]; FILE* fp; int nGroup;
* char* strtmp;
*
* setuserfile(fname,str_favorite);
*
* if (!(fp=fopen(fname,"r"))) return -1; move(0,0); clrtobot();
* fgets(inbuf,sizeof(inbuf),fp); nGroup=atoi(inbuf);
*
* currutmp->nGroup=0; currutmp->ninRoot=0;
*
* while(nGroup!=currutmp->nGroup+1){ fgets(inbuf,sizeof(inbuf),fp);
* prints("%s\n",strtmp=strtok(inbuf," \n"));
* strcpy(currutmp->gfavorite[currutmp->nGroup++],strtmp);
* while((strtmp=strtok(NULL, " \n"))){ prints(" %s
* %d\n",strtmp,getbnum(strtmp)); } currutmp->nGroup++; }
* prints("+++%d+++\n",currutmp->nGroup);
*
* fgets(inbuf,sizeof(inbuf),fp);
*
* for(strtmp=strtok(inbuf, " \n");strtmp;strtmp=strtok(NULL, " \n")){ if
* (strtmp[0]!='#') prints("*** %s %d\n",strtmp, getbnum(strtmp)); else
* prints("*** %s %d\n",strtmp+1, -1); currutmp->ninRoot++; }
*
* fclose(fp); pressanykey(); return 0; }
*/