void
showmyclass()
{
struct brcinfo *brcinfo;
struct boardmem *bx;
char *ptr = "";
brcinfo = brc_readinfo(currentuser->userid);
if ((bx = getboard(brcinfo->myclass))) {
brc_initial(currentuser->userid, NULL);
if (!brc_board_read(bx->header.filename, bx->lastpost))
ptr = "<font color=red>";
printf
("<a href=home?B=%d target=f3 title='可以通过左侧工具栏--个人工具箱设置此处的版面'>%s%s%s</a> ",
getbnum(brcinfo->myclass), ptr,
brcinfo->myclasstitle[0] ? nohtml(brcinfo->
myclasstitle) :
nohtml(bx->header.title), ptr[0] ? "</font>" : "");
} else {
// no one will use my class now
/*
printf
("<a href=bbsmyclass target=f3 title='点击此处设定自己的同学录'>我的班级</a> ");
*/
}
}
static bool check_newpost(board_data_t *ptr)
{
ptr->unread = false;
ptr->total = (brdshm->bstatus[ptr->pos]).total;
if (!brc_initial(currentuser.userid, ptr->name)) {
ptr->unread = true;
} else {
if (brc_unread1((brdshm->bstatus[ptr->pos]).lastpost)) {
ptr->unread = true;
}
}
return ptr->unread;
}
static int choose_board_read(choose_t *cp)
{
choose_board_t *cbrd = cp->data;
board_data_t *ptr = cbrd->brds + cp->cur;
if (ptr->flag & BOARD_DIR_FLAG) {
int parent = cbrd->parent;
const char *prefix = cbrd->prefix;
bool recursive = cbrd->recursive;
bool goodbrd = cbrd->goodbrd;
int cur = cp->cur;
cbrd->parent = ptr->pos;
cbrd->prefix = NULL;
cbrd->recursive = true;
cbrd->goodbrd = (ptr->flag & BOARD_CUSTOM_FLAG) ? true : false;
choose_board(cbrd);
cbrd->parent = parent;
cbrd->prefix = prefix;
cbrd->recursive = recursive;
cbrd->goodbrd = goodbrd;
cp->cur = cur;
} else {
brc_initial(currentuser.userid, ptr->name);
changeboard(&currbp, currboard, ptr->name);
memcpy(currBM, ptr->BM, BM_LEN - 1);
char buf[STRLEN];
if (DEFINE(DEF_FIRSTNEW)) {
setbdir(buf, currboard);
int tmp = unread_position(buf, ptr);
int page = tmp - t_lines / 2;
getkeep(buf, page > 1 ? page : 1, tmp + 1);
}
board_read();
brc_zapbuf(cbrd->zapbuf + ptr->pos);
ptr->total = -1;
currBM[0] = '\0';
}
return FULLUPDATE;
}
int
bbsclear_main()
{
char board[80], start[80], buf[256];
html_header(1);
check_msg();
strsncpy(board, getparm("B"), 32);
if (!board[0])
strsncpy(board, getparm("board"), 32);
strsncpy(start, getparm("S"), 32);
if (!start[0])
strsncpy(start, getparm("start"), 32);
if (!getboard(board))
http_fatal("´íÎóµÄÌÖÂÛÇø");
changemode(READNEW);
brc_initial(currentuser.userid, board);
brc_clear();
brc_update(currentuser.userid);
sprintf(buf, "%s%s&S=%s", showByDefMode(), board, start);
refreshto(buf, 0);
http_quit();
return 0;
}
int unread_position(char *dirfile, board_data_t *ptr)
{
struct fileheader fh;
char filename[STRLEN];
int fd, offset, step, num;
num = ptr->total + 1;
if (ptr->unread && (fd = open (dirfile, O_RDWR))> 0) {
if (!brc_initial (currentuser.userid, ptr->name)) {
num = 1;
} else {
offset = (int) ((char *) &(fh.filename[0]) - (char *) &(fh));
num = ptr->total - 1;
step = 4;
while (num> 0) {
lseek (fd, (off_t) (offset + num * sizeof (fh)), SEEK_SET);
if (read (fd, filename, STRLEN) <= 0 || !brc_unread (filename))
break;
num -= step;
if (step < 32)
step += step / 2;
}
if (num < 0)
num = 0;
while (num < ptr->total) {
lseek (fd, (off_t) (offset + num * sizeof (fh)), SEEK_SET);
if (read (fd, filename, STRLEN) <= 0 || brc_unread (filename))
break;
num++;
}
}
close (fd);
}
if (num < 0)
num = 0;
return num;
}
int
more_web(char *fpath, int promptend)
{
char *ch;
char genbuf[41];
if (ch = strstr(fpath, "mailto:"))
{
if (!HAS_PERM(PERM_LOGINOK))
{
outmsg("[41m ±zªºÅv¤£¨¬µLªk¨Ï¥Îinternet mail... [m");
return 0;
}
if (!not_addr(&ch[7]) &&
getdata(b_lines - 1, 0, "[±H«H]¥DÃD¡G", genbuf, 40, DOECHO, 0))
{
do_send(&ch[7], genbuf);
}
else
{
outmsg("[41m ¦¬«H¤Hemail ©Î ¼ÐÃD ¦³»~... [m");
}
return 0;
}
#if 0
if (ch = strstr(fpath, "gopher://"))
{
ITEM item;
strcpy(item.X.G.server, &ch[9]);
strcpy(item.X.G.path, "1/");
item.X.G.port = 70;
gem(fpath, &item, 0);
return 0;
}
#endif
/* wildcat : ¤ä´©ª½±µ¶i¤J¬ÝªO */
if (ch = strstr(fpath, "board://"))
{
char bname[20], bpath[60], oldch[STRLEN];
struct stat st;
int mode0 = currutmp->mode;
int stat0 = currstat;
int pos;
boardheader *bhdr, *getbcache();
strcpy(oldch, ch);
strcpy(bname, strtok(oldch + 8, "#"));
setbpath(bpath, bname);
if ((*bname == '\0') || (stat(bpath, &st) == -1))
{
pressanykey(err_bid);
return RC_FULL;
}
if (bhdr = getbcache(bname))
{
if (Ben_Perm(bhdr) != 1)
{
pressanykey("§A¨S¦³¶i¤J¸ÓªOªºÅv");
return 0;
}
}
else
{
pressanykey("§A¨S¦³¶i¤J¸ÓªOªºÅv");
return 0;
}
/* shakalaca.000123: ¤ä´©¬Ý¬Y¤@½g */
if (ch = strstr(fpath, "#"))
{
fileheader fhdr;
pos = atoi(ch + 1);
setbdir(bpath, bname);
rec_get(bpath, &fhdr, sizeof(fileheader), pos);
setbfile(bpath, bname, fhdr.filename);
more(bpath, 0);
}
else
{
/* shakalaca.000124: ¸Ñ¨M "¥¼Åª" °ÝÃD.. */
brc_initial(bname);
Read();
}
currutmp->mode = mode0;
currstat = stat0;
return 0;
}
}
static void user_login() {
char ans[4], i;
char genbuf[200];
struct tm *ptime, *tmp;
time_t now;
int a;
/*** Heat:廣告詞
char *ADV[17] = {
"記得唷!! 5/12在台大二活地下室見~~~",
"你知道Ptt之夜是什麼嗎? 5/12號就要上演耶 快去問吧!",
"5/12 Ptt之夜即將引爆 能不去嗎? 在台大二活地下室咩",
"不來就落伍了 啥? 就Ptt之夜啊 很棒的晚會唷 時間:5/12",
"差點忘了提醒你 5/12我們有約 就台大二活地下室咩!!",
"Ptt是啥 想知嗎? 5/12在台大二活地下室告訴你唷",
"來來來....5/12快到台大二活地下室去拿獎品吧~~",
"去去去...到台大二活地下室去 就5/12麻 有粉多獎品耶",
"喂喂喂 怎還楞在這!!快呼朋引伴大鬧ptt",
"Ptt最佳豬腳 換你幹幹看 5/12來吧....*^_^*",
"幹什麼幹什麼?? 你怎麼不曉得啥是Ptt之夜..老土唷",
"累了嗎? 讓我們來為你來一段精采表演吧.. 5/12 Ptt之夜",
"世紀末最屁力的晚會 就在台大二活地下室 5/12不見不散 gogo",
"到底誰比較帥(美) 來比比吧 5/12Ptt之夜 一較高下",
"台大二活地下室 5/12 聽說會有一場很棒的晚會唷 Ptt之夜",
"台大二活地下室 5/12 你能不來嗎?粉多網友等著你耶",
"5/12 台大二活地下室 是各約網友見面的好地方呢",
};
char *ADV[] = {
"7/17 @LIVE 亂彈, 何欣穗 的 入場卷要送給 ptt 的愛用者!",
"欲知詳情請看 PttAct 板!!",
}; ***/
log_usies("ENTER", getenv("RFC931") /* fromhost */ );
setproctitle("%s: %s", margs, cuser.userid);
/* resolve all cache */
resolve_garbage(); /* get ptt cache */
resolve_fcache();
resolve_boards();
/* 初始化 uinfo、flag、mode */
setup_utmp(LOGIN);
mysrand(); /* 初始化: random number 增加user跟時間的差異 */
currmode = MODE_STARTED;
enter_uflag = cuser.uflag;
/* get local time */
time(&now);
ptime = localtime(&now);
tmp = localtime(&cuser.lastlogin);
if((a = utmpshm->number) > fcache->max_user) {
sem_init(FROMSEM_KEY, &fcache_semid);
sem_lock(SEM_ENTER, fcache_semid);
fcache->max_user = a;
fcache->max_time = now;
sem_lock(SEM_LEAVE, fcache_semid);
}
#ifdef INITIAL_SETUP
if(!getbnum(DEFAULT_BOARD)) {
strcpy(currboard, "尚未選定");
} else
#endif
{
brc_initial(DEFAULT_BOARD);
set_board();
}
/* 畫面處理開始 */
if(!(HAS_PERM(PERM_SYSOP) && HAS_PERM(PERM_DENYPOST)))
do_aloha("<<上站通知>> -- 我來啦！");
if(ptime->tm_mday == cuser.day && ptime->tm_mon + 1 == cuser.month) {
more("etc/Welcome_birth", NA);
currutmp->birth = 1;
} else {
more("etc/Welcome_login", NA);
// pressanykey();
// more("etc/CSIE_Week", NA);
currutmp->birth = 0;
}
if(cuser.userlevel) { /* not guest */
move(t_lines - 4, 0);
prints(" 歡迎您第 \033[1;33m%d\033[0;37m 度拜訪本站，"
"上次您是從 \033[1;33m%s\033[0;37m 連往本站，\n"
" 我記得那天是 \033[1;33m%s\033[0;37m。\n",
++cuser.numlogins, cuser.lasthost, Cdate(&cuser.lastlogin));
currutmp->mind=rand()%8; /* 初始心情 */
pressanykey();
if(currutmp->birth && tmp->tm_mday != ptime->tm_mday) {
more("etc/birth.post", YEA);
brc_initial("WhoAmI");
set_board();
do_post();
}
setuserfile(genbuf, str_badlogin);
if(more(genbuf, NA) != -1) {
getdata(b_lines - 1, 0, "您要刪除以上錯誤嘗試的記錄嗎(Y/N)?[Y]",
ans, 3, LCECHO);
if(*ans != 'n')
unlink(genbuf);
}
check_register();
strncpy(cuser.lasthost, fromhost, 16);
cuser.lasthost[15] = '\0';
restore_backup();
} else if(!strcmp(cuser.userid, STR_GUEST)) {
char *nick[13] = {
"椰子", "貝殼", "內衣", "寶特瓶", "翻車魚",
"樹葉", "浮萍", "鞋子", "潛水艇", "魔王",
"鐵罐", "考卷", "大美女"};
char *name[13] = {
"大王椰子", "鸚鵡螺", "比基尼", "可口可樂", "仰泳的魚",
"憶", "高岡屋", "AIR Jordon", "紅色十月號", "批踢踢",
"SASAYA椰奶", "鴨蛋", "布魯克鱈魚香絲"};
char *addr[13] = {
"天堂樂園", "大海", "綠島小夜曲", "美國", "綠色珊瑚礁",
"遠方", "原本海", "NIKE", "蘇聯", "男八618室",
"愛之味", "天上", "藍色珊瑚礁"};
i = login_start_time % 13;
sprintf(cuser.username, "海邊漂來的%s", nick[(int)i]);
sprintf(currutmp->username, cuser.username);
sprintf(cuser.realname, name[(int)i]);
sprintf(currutmp->realname, cuser.realname);
sprintf(cuser.address, addr[(int)i]);
cuser.sex = i % 8;
currutmp->pager = 2;
pressanykey();
} else
pressanykey();
if(!PERM_HIDE(currutmp))
cuser.lastlogin = login_start_time;
reload_money();
passwd_update(usernum, &cuser);
for(i = 0; i < NUMVIEWFILE; i++)
if((cuser.loginview >> i) & 1)
more(loginview_file[(int)i][0], YEA);
}
static void
user_login()
{
char genbuf [200];
struct tm *ptime, *tmp;
time_t now = time(0);
int a;
extern struct FROMCACHE *fcache;
extern int fcache_semid;
log_usies("ENTER", fromhost);
setproctitle("%s: %s", cuser.userid, fromhost);
/* ------------------------ */
/* 初始化 uinfo、flag、mode */
/* ------------------------ */
setup_utmp(LOGIN);
currmode = MODE_STARTED;
enter_uflag = cuser.uflag;
/* get local time */
tmp = localtime(&cuser.lastlogin);
update_data(); /* wildcat: update user data */
/* Ptt check 同時上線人數 */
resolve_fcache();
resolve_utmp();
if ((a = utmpshm->number) > fcache->max_user) {
sem_init(FROMSEM_KEY, &fcache_semid);
sem_lock(SEM_ENTER, fcache_semid);
fcache->max_user = a;
fcache->max_time = now;
sem_lock(SEM_LEAVE, fcache_semid);
}
#ifdef INITIAL_SETUP
if (getbnum(DEFAULT_BOARD) == 0) {
strcpy(currboard, "尚未選定");
} else
#endif
{
brc_initial(DEFAULT_BOARD);
set_board();
}
/* ------------ */
/* 畫面處理開始 */
/* ------------ */
if (!(HAS_PERM(PERM_SYSOP) && HAS_PERM(PERM_DENYPOST))) {
char buf [256];
time_t now;
time(&now);
sprintf(buf, "<<上站通知>> -- 我來囉！ - %s", Etime(&now));
do_aloha(buf);
}
time(&now);
ptime = localtime(&now);
#ifdef CAMERA
film_out(FILM_LOGIN, 0);
#else
more("etc/Welcome_login", NA);
#endif
#if 0
/* wildcat : 搬家通知用 */
if (belong(BBSHOME "/etc/oldip", fromhost)) {
more(BBSHOME "/etc/removal");
abort_bbs();
}
#endif
if ((cuser.day == ptime->tm_mday) && (cuser.month == (ptime->tm_mon + 1)))
currutmp->birth = 1;
else
currutmp->birth = 0;
if (cuser.userlevel) { /* not guest */
move(t_lines - 3, 0);
prints(" 歡迎您第 [1;33m%d[0;37m 度拜訪本站，\
上次您是從 [1;33m%s[0;37m 連往本站，\n\
我記得那天是 [1;33m%s[0;37m。\n",
++cuser.numlogins, cuser.lasthost,
Etime(&cuser.lastlogin));
pressanykey(NULL);
/* Ptt */
if (currutmp->birth == 1) {
#ifdef CAMERA
film_out(FILM_WEL_BIRTH, 0);
#else
more("etc/Welcome_birth", YEA);
#endif
brc_initial("Greeting");
set_board();
do_post();
}
sethomefile(genbuf, cuser.userid, str_badlogin);
if (more(genbuf, NA) != -1) {
if (getans2(b_lines, 0, "您要刪除以上錯誤嘗試的記錄嗎？", 0, 2, 'y') != 'n')
unlink(genbuf);
}
check_register();
strncpy(cuser.lasthost, fromhost, 24);
substitute_record(fn_passwd, &cuser, sizeof(cuser), usernum);
cuser.lasthost[23] = '\0';
restore_backup();
}
