/* $Id: board.c,v 1.105 2003/03/27 05:53:09 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;
char *brc_buf_addr=brc_buf;
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_LINE 4
#define BRD_TAG 8
#define FAVNB ".favnb"
#define B_TOTAL(bptr) (SHM->total[(bptr)->bid - 1])
#define B_LASTPOSTTIME(bptr) (SHM->lastposttime[(bptr)->bid - 1])
#define B_BH(bptr) (&bcache[(bptr)->bid - 1])
typedef struct {
int bid;
unsigned char myattr;
} __attribute__ ((packed)) boardstat_t;
typedef struct {
short bid;
char attr;
time_t lastvisit;
} fav_board_t;
typedef struct {
#ifdef MEM_CHECK
int memcheck;
#endif
short nDatas;
short nAllocs;
char nLines;
fav_board_t b[0];
} fav_t;
static boardstat_t *nbrd = NULL;
char favchange = 0, choose_board_depth = 0;
fav_t *fav;
static short brdnum;
static char yank_flag = 1;
int cmpfav(const void *a, const void *b)
{
if( *(short *)a > ((fav_board_t *)b)->bid )
return 1;
else if( *(short *)a == ((fav_board_t *)b)->bid )
return 0;
return -1;
}
fav_board_t *getfav(short bid)
{
int i;
for(i = 0; i < fav->nDatas; i++)
if(fav->b[i].bid == bid)
break;
return i == fav->nDatas ? NULL : &fav->b[i];
}
char getfavattr(short bid)
{
fav_board_t *ptr = getfav(bid);
if( ptr == NULL )
return 0; // default here
else
return ptr->attr;
}
time_t getfavtime(short bid)
{
fav_board_t *ptr = getfav(bid);
if( ptr == NULL )
return login_start_time; // default here
else
return ptr->lastvisit;
}
void movefav(int old, int new)
{
int i, src = -1, des = -1;
fav_board_t tmp;
for(i = 0; i < fav->nDatas; i++){
if(nbrd[old].bid == fav->b[i].bid)
src = i;
if(nbrd[new].bid == fav->b[i].bid)
des = i;
}
if(src == -1 || des == -1)
return;
tmp = fav->b[src];
if(src < des){
for(i = src; i < des; i++)
fav->b[i] = fav->b[i + 1];
}
else{ // des < src
for(i = src; i > des; i--)
fav->b[i] = fav->b[i - 1];
}
fav->b[des] = tmp;
brdnum = -1;
}
void delfavline(int bid, int num)
{
int i;
movefav(num, --brdnum);
fav->nLines++;
fav->nDatas--;
for(i = 0; i < fav->nDatas; i++)
if(fav->b[i].bid < bid)
fav->b[i].bid++;
for(i = 0; i < brdnum; i++)
if(nbrd[i].bid < bid)
nbrd[i].bid++;
}
void setfav(short bid, char attr, char mode, time_t t)
{
/* mode: 0: 設成 off, 1: 設成 on, 2: 反相 */
fav_board_t *ptr = getfav(bid);
if( ptr != NULL ){
if( mode == 2 )
ptr->attr ^= attr;
else if( mode )
ptr->attr |= attr;
else
ptr->attr &= ~attr;
if( t )
ptr->lastvisit = t;
}
else{
int where;
if( fav->nDatas == fav->nAllocs ){
#ifdef DEBUG
vmsg("realloc fav");
#endif
fav = realloc(fav,
sizeof(fav_t) +
sizeof(fav_board_t) *
(16 + fav->nAllocs));
memset(&fav->b[fav->nDatas], 0, sizeof(fav_board_t) * 16);
fav->nAllocs += 16;
}
where = fav->nDatas;
if( attr & BRD_LINE ){
fav->b[where].bid = --(fav->nLines);
fav->b[where].attr = mode ? (BRD_LINE | BRD_FAV) : 0;
}
else{
fav->b[where].bid = bid ;
fav->b[where].attr = mode ? attr : 0;
}
fav->b[where].lastvisit = t ? t : login_start_time;
fav->nDatas++;
}
}
void imovefav(int old)
{
char buf[5];
int new;
getdata(b_lines - 1, 0, "請輸入新次序:", buf, sizeof(buf), DOECHO);
new = atoi(buf) - 1;
if (new < 0 || brdnum <= new){
vmsg("輸入範圍有誤!");
return;
}
movefav(old, new);
}
#define BRD_OLD 0
#define BRD_NEW 1
#define BRD_END 2
void updatenewfav(int mode)
{
/* mode: 0: don't write to fav 1: write to fav */
int i, fd;
char fname[80], *brd;
if(!(cuser.uflag2 & FAVNEW_FLAG))
return;
setuserfile(fname, FAVNB);
if( (fd = open(fname, O_RDWR, 0600)) != -1 ){
brd = (char *)malloc((numboards + 1) * sizeof(char));
read(fd, brd, (numboards + 1) * sizeof(char));
for(i = 0; i < numboards && brd[i] != BRD_END; i++){
if(brd[i] == BRD_NEW && Ben_Perm(&bcache[i])){
if(mode)
setfav(i + 1, BRD_FAV, 1, 0);
brd[i] = BRD_OLD;
}
}
if( i != numboards )
for(i-- ; i < numboards; i++){
if(Ben_Perm(&bcache[i])){
if(mode)
setfav(i + 1, BRD_FAV, 1, 0);
brd[i] = BRD_OLD;
}
else
brd[i] = BRD_NEW;
}
brd[i] = BRD_END;
lseek(fd, 0, SEEK_SET);
write(fd, brd, (numboards + 1 ) * sizeof(char));
free(brd);
close(fd);
}
}
void load_brdbuf(void)
{
static char firsttime = 1;
int fd, r, w;
char fname[80];
setuserfile(fname, ".fav3");
if( (fd = open(fname, O_RDONLY)) == -1 ){
// not found.
int i;
char favrec;
fav = (fav_t *)malloc(sizeof(fav_t) +
sizeof(fav_board_t) * 16);
fav->nDatas = 0;
fav->nAllocs = 16;
fav->nLines = 0;
favchange = 1;
setuserfile(fname, ".fav2");
if( (fd = open(fname, O_RDONLY)) != -1 ){
for( i = 1; i <= numboards; i++){
if(read(fd, &favrec, sizeof(char)) < 0)
break;
if( (favrec & BRD_FAV) )
setfav(i, BRD_FAV, 1, 0);
}
close(fd);
}
}
else{
short nDatas;
char nLines;
read(fd, &nDatas, sizeof(nDatas));
read(fd, &nLines, sizeof(nLines));
fav = (fav_t *)malloc(sizeof(fav_t) +
sizeof(fav_board_t) * (nDatas + 16));
fav->nDatas = nDatas;
fav->nAllocs = nDatas + 16;
fav->nLines = nLines;
read(fd, fav->b, sizeof(fav_board_t) * nDatas);
close(fd);
}
// check if fav is correct
for( r = w = 0 ; r < fav->nDatas ; ++r )
if( fav->b[r].attr & BRD_FAV ) // 須是 BRD_FAV
if( (fav->b[r].bid < 0) || // 分隔線
(fav->b[r].bid > 0 && // bid > 0 且該看板存在
bcache[fav->b[r].bid - 1].brdname[0]) )
fav->b[w++] = fav->b[r];
fav->nDatas = w;
updatenewfav(1);
#ifdef MEM_CHECK
fav->memcheck = MEM_CHECK;
#endif
firsttime = 0;
}
void
init_brdbuf()
{
brc_expire_time = login_start_time - 365 * 86400;
}
void
save_brdbuf(void)
{
int r, w, fd;
char fname[80];
if( !fav )
return;
/*
favchange is not implement yet
if( !favchange )
return;
*/
#ifdef MEM_CHECK
if( fav->memcheck != MEM_CHECK )
return;
#endif
for( r = w = 0 ; r < fav->nDatas ; ++r )
if( ( fav->b[r].attr & BRD_LINE ) ||
(fav->b[r].attr & BRD_FAV && bcache[fav->b[r].bid - 1].brdname[0]))
fav->b[w++] = fav->b[r];
fav->nDatas = w;
setuserfile(fname, ".fav3");
if( (fd = open(fname, O_WRONLY | O_CREAT, 0600)) != -1 ){
int i;
write(fd, &fav->nDatas, sizeof(short));
write(fd, &fav->nLines, sizeof(char));
for(i = 0; i < fav->nDatas; i++)
if(fav->b[i].attr & BRD_FAV)
write(fd, &fav->b[i], sizeof(fav_board_t));
close(fd);
}
free(fav);
fav = NULL;
}
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 (B_BH(ptr)->brdattr & BRD_GROUPBOARD)
return 0;
if (B_TOTAL(ptr) == 0)
setbtotal(ptr->bid);
if (B_TOTAL(ptr) == 0)
return 0;
ftime = B_LASTPOSTTIME(ptr);
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, B_BH(ptr)->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 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;
ptr = &nbrd[brdnum++];
//boardheader_t *bptr = &bcache[n];
//ptr->total = &(SHM->total[n]);
//ptr->lastposttime = &(SHM->lastposttime[n]);
ptr->bid = n + 1;
ptr->myattr = getfavattr(ptr->bid);
if ((B_BH(ptr)->brdattr & BRD_HIDE) && state == 1)
B_BH(ptr)->brdattr |= BRD_POSTMASK;
check_newpost(ptr);
return ptr;
}
static int
cmpboardfriends(const void *brd, const void *tmp)
{
return ((B_BH((boardstat_t*)tmp)->nuser) -
(B_BH((boardstat_t*)brd)->nuser));
}
static int
favcmpboardname(const void *brd, const void *tmp)
{
int b1 = ((fav_board_t *)brd)->bid;
int b2 = ((fav_board_t *)tmp)->bid;
if( b1 <= 0 || b2 <= 0 ) // 分隔線
return 1;
return strcasecmp(bcache[b1 - 1].brdname, bcache[b2 - 1].brdname);
}
static int
favcmpboardclass(const void *brd, const void *tmp)
{
int b1 = ((fav_board_t *)brd)->bid;
int b2 = ((fav_board_t *)tmp)->bid;
int cmp;
if( b1 <= 0 || b2 <= 0 ) // 分隔線
return 1;
cmp = strncasecmp(bcache[b1 - 1].title, bcache[b2 - 1].title, 4);
if( cmp )
return cmp;
else
return strcasecmp(bcache[b1 - 1].brdname, bcache[b2 - 1].brdname);
}
static void
load_boards(char *key)
{
boardheader_t *bptr = NULL;
int type = (cuser.uflag & BRDSORT_FLAG) ? 0 : 1;
int i, n;
int state;
#ifdef CRITICAL_MEMORY
boardstat_t *tmpnbrd;
#endif
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 (nbrd) {
free(nbrd);
nbrd = NULL;
}
if (class_bid <= 0) {
nbrd = (boardstat_t *) MALLOC(sizeof(boardstat_t) * numboards);
if( yank_flag == 0 ){ // fav mode
for( i = 0 ; i < fav->nDatas ; ++i ){
if( fav->b[i].attr & BRD_FAV ){
if( fav->b[i].attr & BRD_LINE )
addnewbrdstat(fav->b[i].bid - 1, BRD_LINE);
else{
bptr = &bcache[ fav->b[i].bid - 1 ];
if( (state = Ben_Perm(bptr)) )
addnewbrdstat(fav->b[i].bid - 1, state);
}
}
}
}
else{ // general case
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)) ||
(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));
#if 1
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 && !(getfavattr(n) & BRD_FAV)) ||
(key[0] && !strcasestr(bptr->title, key)))
continue;
addnewbrdstat(n, state);
}
#endif
}
#ifndef CRITICAL_MEMORY
nbrd = realloc(nbrd, sizeof(boardstat_t) * brdnum);
#else
tmpnbrd = (boardstat_t *) malloc(sizeof(boardstat_t) * brdnum);
memcpy(tmpnbrd, nbrd, sizeof(boardstat_t) * brdnum);
FREE(nbrd);
nbrd = tmpnbrd;
#endif
}
static int
search_board()
{
int num;
char genbuf[IDLEN + 2];
move(0, 0);
clrtoeol();
CreateNameList();
for (num = 0; num < brdnum; num++)
AddNameList(B_BH(&nbrd[num])->brdname);
namecomplete(MSG_SELECT_BOARD, genbuf);
FreeNameList();
toplev = NULL;
for (num = 0; num < brdnum; num++)
if (!strcasecmp(B_BH(&nbrd[num])->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 = B_TOTAL(ptr);
num = total + 1;
if ((ptr->myattr & BRD_UNREAD) && (fd = open(dirfile, O_RDWR)) > 0) {
if (!brc_initial(B_BH(ptr)->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;
char *color[8] = {"", "\033[32m",
"\033[33m", "\033[36m", "\033[34m", "\033[1m",
"\033[1;32m", "\033[1;33m"};
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(ptr->myattr & BRD_LINE){
prints("%5d ------------ ------------------------------------------", head);
continue;
}
if (class_bid == 1)
prints(" ");
if (!newflag) {
prints("%5d%c%s", head,
!(B_BH(ptr)->brdattr & BRD_HIDE) ? ' ' :
(B_BH(ptr)->brdattr & BRD_POSTMASK) ? ')' : '-',
(ptr->myattr & BRD_TAG) ? "D " :
(B_BH(ptr)->brdattr & BRD_GROUPBOARD) ? " " :
unread[ptr->myattr & BRD_UNREAD]);
} else {
if (newflag) {
if ((B_BH(ptr)->brdattr & BRD_GROUPBOARD))
prints(" ");
else
prints("%6d%s", (int)(B_TOTAL(ptr)),
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) &&
!(cuser.uflag2 & FAVNOHILIGHT))? "\033[1;36m" : "",
B_BH(ptr)->brdname,
color[(unsigned int)
(B_BH(ptr)->title[1] + B_BH(ptr)->title[2] +
B_BH(ptr)->title[3] + B_BH(ptr)->title[0]) & 07],
B_BH(ptr)->title, B_BH(ptr)->title + 5, B_BH(ptr)->title + 7);
if (B_BH(ptr)->brdattr & BRD_BAD)
prints(" X ");
else if (B_BH(ptr)->nuser >= 100)
prints("\033[1mHOT\033[m");
else if (B_BH(ptr)->nuser > 50)
prints("\033[1;31m%2d\033[m ", B_BH(ptr)->nuser);
else if (B_BH(ptr)->nuser > 10)
prints("\033[1;33m%2d\033[m ", B_BH(ptr)->nuser);
else if (B_BH(ptr)->nuser > 0)
prints("%2d ", B_BH(ptr)->nuser);
else
prints(" %c ", B_BH(ptr)->bvote ? 'V' : ' ');
prints("%.*s\033[K", t_columns - 67, B_BH(ptr)->BM);
} else {
prints("%-40.40s %.*s", B_BH(ptr)->title + 7,
t_columns - 67, B_BH(ptr)->BM);
}
}
clrtoeol();
}
}
}
static char *choosebrdhelp[] = {
"\0看板選單輔助說明",
"\01基本指令",
"(p)(↑)/(n)(↓)上一個看板 / 下一個看板",
"(P)(^B)(PgUp) 上一頁看板",
"(N)(^F)(PgDn) 下一頁看板",
"($)/(s)/(/) 最後一個看板 / 搜尋看板 / 以中文搜尋看板關鍵字",
"(數字) 跳至該項目",
"\01進階指令",
"(^W) 迷路了 我在哪裡",
"(r)(→)(Rtn) 進入多功\能閱\讀選單",
"(q)(←) 回到主選單",
"(y/Z) 我的最愛,訂閱\看板,所有看板/訂閱\新開看板",
"(L) 加入分隔線至我的最愛",
"(v/V) 通通看完/全部未讀",
"(S) 按照字母/分類排序",
"(t/^T/^A/^D) 標記看板/取消所有標記/ 將已標記者加入/移出我的最愛",
"(m/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
choose_board(int newflag)
{
static int num = 0;
boardstat_t *ptr;
int head = -1, ch = 0, currmodetmp, tmp, tmp1, bidtmp;
char keyword[13] = "";
setutmpmode(newflag ? READNEW : READBRD);
if( fav == NULL )
load_brdbuf();
++choose_board_depth;
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':
#if 1
ptr = &nbrd[num];
favchange = 1;
setfav(ptr->bid, BRD_TAG, 2, 0);
ptr->myattr ^= BRD_TAG;
head = 9999;
#endif
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>0 && 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':{
char input[4];
move(b_lines - 2, 0);
prints("重新排序看板 "
"\033[1;33m(注意, 這個動作會覆寫原來設定)\033[m \n");
getdata(b_lines - 1, 0,
"排序方式 (1)按照板名排序 (2)按照類別排序 ==> [0]取消 ",
input, sizeof(input), DOECHO);
if( input[0] == '1' ){
cuser.uflag |= BRDSORT_FLAG;
qsort(&fav->b, fav->nDatas, sizeof(fav_board_t),
favcmpboardname);
}
else if( input[0] == '2' ){
cuser.uflag &= ~BRDSORT_FLAG;
qsort(&fav->b, fav->nDatas, sizeof(fav_board_t),
favcmpboardclass);
}
}
brdnum = -1;
break;
case 'y':
yank_flag = (yank_flag + 1) % 2;
brdnum = -1;
break;
case Ctrl('D'):
#if 1
for (tmp = 0; tmp < fav->nDatas; tmp++) {
if (fav->b[tmp].attr & BRD_TAG) {
favchange = 1;
fav->b[tmp].attr &= ~BRD_FAV;
fav->b[tmp].attr &= ~BRD_TAG;
}
#endif
}
brdnum = -1;
break;
case Ctrl('A'):
#if 1
for (tmp = 0; tmp < fav->nDatas; tmp++) {
if (fav->b[tmp].attr & BRD_TAG) {
favchange = 1;
fav->b[tmp].attr |= BRD_FAV;
fav->b[tmp].attr &= ~BRD_TAG;
}
}
#endif
brdnum = -1;
break;
case Ctrl('T'):
#if 1
for (tmp = 0; tmp < fav->nDatas; tmp++)
fav->b[tmp].attr &= ~BRD_TAG;
favchange = 1;
brdnum = -1;
#endif
break;
case Ctrl('P'):
#if 1
if (class_bid != 0 &&
(HAS_PERM(PERM_SYSOP) || (currmode & MODE_MENU))) {
for (tmp = 0; tmp < fav->nDatas; tmp++) {
boardheader_t *bh = &bcache[tmp];
if (!(fav->b[tmp].attr & BRD_TAG) || bh->gid == class_bid)
continue;
favchange = 1;
fav->b[tmp].attr &= ~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;
}
#endif
break;
case 'L':
if (HAS_PERM(PERM_BASIC)) {
if(fav->nDatas > FAVMAX){
vmsg("你的最愛太多了啦 真花心");
break;
}
setfav(0, BRD_FAV | BRD_LINE, 1, 0);
movefav(brdnum++, num);
favchange = 1;
brdnum = -1;
head = 9999;
}
break;
case 'm':
if (HAS_PERM(PERM_BASIC)) {
if(nbrd[num].myattr & BRD_LINE){
delfavline(nbrd[num].bid, num);
}
else if(fav->nDatas > FAVMAX){
vmsg("你的最愛太多了啦 真花心");
break;
}
else{
setfav(nbrd[num].bid, BRD_FAV, 2, 0);
}
favchange = 1;
brdnum = -1;
head = 9999;
}
break;
case 'M':
if (HAS_PERM(PERM_BASIC)) {
imovefav(num);
favchange = 1;
head = 9999;
}
break;
case 'K':
if (HAS_PERM(PERM_BASIC)) {
char fname[80];
setuserfile(fname, ".fav3");
unlink(fname);
load_brdbuf();
brdnum = -1;
}
break;
case 'z':
vmsg("嘿嘿 這個功\能已經被我的最愛取代掉了喔!");
break;
case 'Z':
cuser.uflag2 ^= FAVNEW_FLAG;
if(cuser.uflag2 & FAVNEW_FLAG){
int fd;
char fname[80];
setuserfile(fname, FAVNB);
if( (fd = open(fname, O_RDONLY, 0600)) != -1 ){
close(fd);
updatenewfav(0);
}
else{
int i;
char stat;
if( (fd = open(fname, O_WRONLY | O_CREAT, 0600)) != -1 ){
for(i = 0; i < numboards; i++){
stat = Ben_Perm(&bcache[i]) ? BRD_OLD : BRD_NEW;
write(fd, &stat, sizeof(char));
}
stat = BRD_END;
write(fd, &stat, sizeof(char));
close(fd);
}
}
}
vmsg((cuser.uflag2 & FAVNEW_FLAG) ? "切換為訂閱\新看板模式" : "切換為正常模式");
break;
case 'v':
case 'V':
#if 1
ptr = &nbrd[num];
brc_initial(B_BH(ptr)->brdname);
if (ch == 'v') {
ptr->myattr &= ~BRD_UNREAD;
favchange = 1;
brc_list[0] = now;
setfav(ptr->bid, 0, 0, now);
} else {
favchange = 1;
brc_list[0] = 1;
setfav(ptr->bid, 0, 0, 1);
ptr->myattr |= BRD_UNREAD;
}
brc_num = brc_changed = 1;
brc_update();
show_brdlist(head, 0, newflag);
#endif
break;
case 's':
if ((tmp = search_board()) == -1) {
show_brdlist(head, 1, newflag);
break;
}
num = tmp;
break;
case 'E':
if (HAS_PERM(PERM_SYSOP) || (currmode & MODE_MENU)) {
ptr = &nbrd[num];
move(1, 1);
clrtobot();
m_mod_board(B_BH(ptr)->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->myattr & BRD_LINE)
break;
if (!(B_BH(ptr)->brdattr & BRD_GROUPBOARD)) { /* 非sub class */
if (!(B_BH(ptr)->brdattr & BRD_HIDE) ||
(B_BH(ptr)->brdattr & BRD_POSTMASK)) {
brc_initial(B_BH(ptr)->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 = getfavtime(ptr->bid);
Read();
check_newpost(ptr);
head = -1;
setutmpmode(newflag ? READNEW : READBRD);
} else {
setbfile(buf, B_BH(ptr)->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 (!(B_BH(ptr)->brdattr & BRD_TOP))
class_bid = ptr->bid;
else
class_bid = -1; /* 熱門群組用 */
if (!(currmode & MODE_MENU)) /* 如果還沒有小組長權限 */
set_menu_BM(B_BH(ptr)->BM);
if (now < B_BH(ptr)->bupdate) {
setbfile(buf, B_BH(ptr)->brdname, fn_notes);
if (more(buf, NA) != -1)
pressanykey();
}
tmp = currutmp->brc_id;
setutmpbid(ptr->bid);
free(nbrd);
nbrd = NULL;
if (yank_flag == 0 ) {
yank_flag = 1;
choose_board(0);
yank_flag = 0;
}
else
choose_board(0);
currmode = currmodetmp; /* 離開板板後就把權限拿掉喔 */
num = tmp1;
class_bid = bidtmp;
setutmpbid(tmp);
brdnum = -1;
}
}
}
} while (ch != 'q');
free(nbrd);
nbrd = NULL;
--choose_board_depth;
}
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; }
*/