/* $Id$ */ #include "bbs.h" #define WHEREAMI_LEVEL 16 static int recommend(int ent, fileheader_t * fhdr, const char *direct); static int do_add_recommend(const char *direct, fileheader_t *fhdr, int ent, const char *buf, int type); #ifdef ASSESS static char * const badpost_reason[] = { "廣告", "不當用辭", "人身攻擊" }; #endif /* TODO multi.money is a mess. * please help verify and finish these. */ /* modes to invalid multi.money */ #define INVALIDMONEY_MODES (FILE_ANONYMOUS | FILE_BOTTOM | FILE_DIGEST | FILE_BID) /* query money by fileheader pointer. * return <0 if money is not valid. */ int query_file_money(const fileheader_t *pfh) { fileheader_t hdr; if( (currmode & MODE_SELECT) && (pfh->multi.refer.flag) && (pfh->multi.refer.ref > 0)) // really? not sure, copied from other's code { char genbuf[MAXPATHLEN]; /* it is assumed that in MODE_SELECT, currboard is selected. */ setbfile(genbuf, currboard, ".DIR"); get_record(genbuf, &hdr, sizeof(hdr), pfh->multi.refer.ref); pfh = &hdr; } if(pfh->filemode & INVALIDMONEY_MODES || pfh->multi.money > MAX_POST_MONEY) return -1; return pfh->multi.money; } /* hack for listing modes */ enum { LISTMODE_DATE = 0, LISTMODE_MONEY, } LISTMODES; static char *listmode_desc[] = { "日 期", "價 格", }; static int currlistmode = LISTMODE_DATE; #define IS_LISTING_MONEY \ (currlistmode == LISTMODE_MONEY || \ ((currmode & MODE_SELECT) && (currsrmode & RS_MONEY))) void anticrosspost(void) { log_file("etc/illegal_money", LOG_CREAT | LOG_VF, ANSI_COLOR(1;33;46) "%s " ANSI_COLOR(37;45) "cross post 文章 " ANSI_COLOR(37) " %s" ANSI_RESET "\n", cuser.userid, ctime4(&now)); kick_all(cuser.userid); post_violatelaw(cuser.userid, "Ptt系統警察", "Cross-post", "罰單處份"); cuser.userlevel |= PERM_VIOLATELAW; cuser.vl_count++; mail_id(cuser.userid, "Cross-Post罰單", "etc/crosspost.txt", "Ptt警察部隊"); u_exit("Cross Post"); exit(0); } /* Heat CharlieL */ int save_violatelaw(void) { char buf[128], ok[3]; setutmpmode(VIOLATELAW); clear(); stand_title("繳罰單中心"); if (!(cuser.userlevel & PERM_VIOLATELAW)) { mouts(22, 0, ANSI_COLOR(1;31) "你無聊啊? 你又沒有被開罰單~~" ANSI_RESET); pressanykey(); return 0; } reload_money(); if (cuser.money < (int)cuser.vl_count * 1000) { snprintf(buf, sizeof(buf), ANSI_COLOR(1;31) "這是你第 %d 次違反本站法規" "必須繳出 %d $Ptt ,你只有 %d 元, 錢不夠啦!!" ANSI_RESET, (int)cuser.vl_count, (int)cuser.vl_count * 1000, cuser.money); mouts(22, 0, buf); pressanykey(); return 0; } move(5, 0); outs(ANSI_COLOR(1;37) "你知道嗎? 因為你的違法 " "已經造成很多人的不便" ANSI_RESET "\n"); outs(ANSI_COLOR(1;37) "你是否確定以後不會再犯了？" ANSI_RESET "\n"); if (!getdata(10, 0, "確定嗎？[Y/n]:", ok, sizeof(ok), LCECHO) || ok[0] == 'n' || ok[0] == 'N') { mouts(22, 0, ANSI_COLOR(1;31) "等你想通了再來吧!! " "我相信你不會知錯不改的~~~" ANSI_RESET); pressanykey(); return 0; } snprintf(buf, sizeof(buf), "這是你第 %d 次違法 必須繳出 %d $Ptt", cuser.vl_count, cuser.vl_count * 1000); mouts(11, 0, buf); if (!getdata(10, 0, "要付錢[Y/n]:", ok, sizeof(ok), LCECHO) || ok[0] == 'N' || ok[0] == 'n') { mouts(22, 0, ANSI_COLOR(1;31) " 嗯 存夠錢 再來吧!!!" ANSI_RESET); pressanykey(); return 0; } reload_money(); if (cuser.money < (int)cuser.vl_count * 1000) return 0; //Ptt:check one more time demoney(-1000 * cuser.vl_count); cuser.userlevel &= (~PERM_VIOLATELAW); passwd_update(usernum, &cuser); return 0; } /* * void make_blist() { CreateNameList(); apply_boards(g_board_names); } */ static time4_t *board_note_time = NULL; void set_board(void) { boardheader_t *bp; assert(0<=currbid-1 && currbid-1brdattr & BRD_HIDE) && !is_BM_cache(bp - bcache + 1) && hbflcheck((int)(bp - bcache) + 1, currutmp->uid) ) vmsg("進入未經授權看板"); board_note_time = &bp->bupdate; if(bp->BM[0] <= ' ') strcpy(currBM, "徵求中"); else { /* calculate with other title information */ int l = 0; snprintf(currBM, sizeof(currBM), "板主:%s", bp->BM); /* title has +7 leading symbols */ l += strlen(bp->title); if(l >= 7) l -= 7; else l = 0; l += 8 + strlen(currboard); /* trailing stuff */ l += strlen(bp->brdname); l = t_columns - l -strlen(currBM); #ifdef _DEBUG { char buf[MAXPATHLEN]; sprintf(buf, "title=%d, brdname=%d, currBM=%d, t_c=%d, l=%d", strlen(bp->title), strlen(bp->brdname), strlen(currBM), t_columns, l); vmsg(buf); } #endif if(l < 0 && ((l += strlen(currBM)) > 7)) { currBM[l] = 0; currBM[l-1] = currBM[l-2] = '.'; } } /* init basic perm, but post perm is checked on demand */ currmode = (currmode & (MODE_DIRTY | MODE_GROUPOP)) | MODE_STARTED; if (!HasUserPerm(PERM_NOCITIZEN) && (HasUserPerm(PERM_ALLBOARD) || is_BM_cache(currbid))) { currmode = currmode | MODE_BOARD | MODE_POST | MODE_POSTCHECKED; } } /* check post perm on demand, no double checks in current board */ int CheckPostPerm(void) { static time4_t last_chk_time = 0x0BAD0BB5; /* any magic number */ static int last_board_index = 0; /* for speed up */ int valid_index = 0; boardheader_t *bp = NULL; if (currmode & MODE_POSTCHECKED) { /* checked? let's check if perm reloaded */ if (last_board_index < 1 || last_board_index > SHM->Bnumber) { /* invalid board index, refetch. */ last_board_index = getbnum(currboard); valid_index = 1; } assert(0<=last_board_index-1 && last_board_index-1perm_reload != last_chk_time) currmode &= ~MODE_POSTCHECKED; } if (!(currmode & MODE_POSTCHECKED)) { if(!valid_index) { last_board_index = getbnum(currboard); assert(0<=last_board_index-1 && last_board_index-1perm_reload; currmode |= MODE_POSTCHECKED; // vmsg("reload board postperm"); if (haspostperm(currboard)) { currmode |= MODE_POST; return 1; } currmode &= ~MODE_POST; return 0; } return (currmode & MODE_POST); } static void readtitle(void) { boardheader_t *bp; char *brd_title; assert(0<=currbid-1 && currbid-1bvote != 2 && bp->bvote) brd_title = "本看板進行投票中"; else brd_title = bp->title + 7; showtitle(currBM, brd_title); outs("[←]離開 [→]閱\讀 [^P]發表文章 [b]備忘錄 [d]刪除 [z]精華區 [TAB]文摘 [h]說明\n"); prints(ANSI_COLOR(7) " 編號 %s 作 者 文 章 標 題", IS_LISTING_MONEY ? listmode_desc[LISTMODE_MONEY] : listmode_desc[currlistmode]); #ifdef USE_COOLDOWN if ( bp->brdattr & BRD_COOLDOWN && !((currmode & MODE_BOARD) || HasUserPerm(PERM_SYSOP))) outslr("", 44, ANSI_RESET, 0); else #endif { char buf[32]; assert(0<=currbid-1 && currbid-1bcache[currbid - 1].nuser); outslr("", 44, buf, -1); outs(ANSI_RESET); } } static void readdoent(int num, fileheader_t * ent) { int type; char *mark, *title, color, special = 0, isonline = 0, recom[8]; userinfo_t *uentp; type = brc_unread(ent->filename, brc_num, brc_list) ? '+' : ' '; if ((currmode & MODE_BOARD) && (ent->filemode & FILE_DIGEST)) type = (type == ' ') ? '*' : '#'; else if (currmode & MODE_BOARD || HasUserPerm(PERM_LOGINOK)) { if (ent->filemode & FILE_MARKED) { if(ent->filemode & FILE_SOLVED) type = '!'; else type = (type == ' ') ? 'm' : 'M'; } else if (TagNum && !Tagger(atoi(ent->filename + 2), 0, TAG_NIN)) type = 'D'; else if (ent->filemode & FILE_SOLVED) type = (type == ' ') ? 's': 'S'; } title = subject(ent->title); if (ent->filemode & FILE_VOTE) color = '2', mark = "ˇ"; else if (ent->filemode & FILE_BID) color = '6', mark = "＄"; else if (title == ent->title) color = '1', mark = "□"; else color = '3', mark = "R:"; /* 把過長的 title 砍掉。 前面約有 33 個字元。 */ { int l = t_columns - 34; /* 33+1, for trailing one more space */ unsigned char *p = (unsigned char*)title; /* strlen 順便做 safe print checking */ while (*p && l > 0) { /* 本來應該做 DBCS checking, 懶得寫了 */ if(*p < ' ') *p = ' '; p++, l--; } if (*p && l <= 0) strcpy((char*)p-3, " …"); } if (!strncmp(title, "[公告]", 6)) special = 1; #if 1 if (!strchr(ent->owner, '.') && !SHM->GV2.e.noonlineuser && (uentp = search_ulist_userid(ent->owner)) && isvisible(currutmp, uentp)) isonline = 1; #else if (!strchr(ent->owner, '.') && (uid = searchuser(ent->owner, NULL)) && !SHM->GV2.e.noonlineuser && (uentp = search_ulist(uid)) && isvisible(currutmp, uentp)) isonline = 1; #endif if(ent->recommend>99) strcpy(recom,"1m爆"); else if(ent->recommend>9) sprintf(recom,"3m%2d",ent->recommend); else if(ent->recommend>0) sprintf(recom,"2m%2d",ent->recommend); else if(ent->recommend<-99) sprintf(recom,"0mXX"); else if(ent->recommend<-10) sprintf(recom,"0mX%d",-ent->recommend); else strcpy(recom,"0m "); /* start printing */ if (ent->filemode & FILE_BOTTOM) outs(" " ANSI_COLOR(1;33) " ★ " ANSI_RESET); else /* recently we found that many boards have >10k articles, * so it's better to use 5+2 (2 for cursor marker) here. */ prints("%7d", num); prints(" %c\033[1;3%4.4s" ANSI_RESET, type, recom); if(IS_LISTING_MONEY) { int m = query_file_money(ent); if(m < 0) outs(" ---- "); else prints("%5d ", m); } else // LISTMODE_DATE { #ifdef COLORDATE prints(ANSI_COLOR(%d) "%-6s" ANSI_RESET, (ent->date[3] + ent->date[4]) % 7 + 31, ent->date); #else prints("%-6s", ent->date); #endif } // print author if(isonline) outs(ANSI_COLOR(1)); prints("%-13.12s", ent->owner); if(isonline) outs(ANSI_RESET); if (strncmp(currtitle, title, TTLEN)) prints("%s " ANSI_COLOR(1) "%.*s" ANSI_RESET "%s\n", mark, special ? 6 : 0, title, special ? title + 6 : title); else prints("\033[1;3%cm%s %s" ANSI_RESET "\n", color, mark, title); } int whereami(void) { boardheader_t *bh, *p[WHEREAMI_LEVEL]; int i, j; if (!currutmp->brc_id) return 0; move(1, 0); clrtobot(); bh = getbcache(currutmp->brc_id); p[0] = bh; for (i = 0; i+1 < WHEREAMI_LEVEL && p[i]->parent>1 && p[i]->parent < numboards; i++) p[i + 1] = getbcache(p[i]->parent); j = i; prints("我在哪?\n%-40.40s %.13s\n", p[j]->title + 7, p[j]->BM); for (j--; j >= 0; j--) prints("%*s %-13.13s %-37.37s %.13s\n", (i - j) * 2, "", p[j]->brdname, p[j]->title, p[j]->BM); pressanykey(); return FULLUPDATE; } static int do_select(void) { char bname[20]; char bpath[60]; boardheader_t *bh; struct stat st; int i; setutmpmode(SELECT); move(0, 0); clrtoeol(); CompleteBoard(MSG_SELECT_BOARD, bname); if (bname[0] == '\0' || !(i = getbnum(bname))) return FULLUPDATE; assert(0<=i-1 && i-1brdname, sizeof(bname)); brc_update(); currbid = i; setbpath(bpath, bname); if ((*bname == '\0') || (stat(bpath, &st) == -1)) { move(2, 0); clrtoeol(); outs(err_bid); return FULLUPDATE; } setutmpbid(currbid); brc_initial_board(bname); set_board(); setbdir(currdirect, currboard); move(1, 0); clrtoeol(); return NEWDIRECT; } /* ----------------------------------------------------- */ /* 改良 innbbsd 轉出信件、連線砍信之處理程序 */ /* ----------------------------------------------------- */ void outgo_post(const fileheader_t *fh, const char *board, const char *userid, const char *nickname) { FILE *foo; if ((foo = fopen("innd/out.bntp", "a"))) { fprintf(foo, "%s\t%s\t%s\t%s\t%s\n", board, fh->filename, userid, nickname, fh->title); fclose(foo); } } static void cancelpost(const fileheader_t *fh, int by_BM, char *newpath) { FILE *fin, *fout; char *ptr, *brd; fileheader_t postfile; char genbuf[200]; char nick[STRLEN], fn1[STRLEN]; int len = 42-strlen(currboard); struct tm *ptime = localtime4(&now); if(!fh->filename[0]) return; setbfile(fn1, currboard, fh->filename); if ((fin = fopen(fn1, "r"))) { brd = by_BM ? "deleted" : "junk"; setbpath(newpath, brd); stampfile(newpath, &postfile); memcpy(postfile.owner, fh->owner, IDLEN + TTLEN + 10); nick[0] = '\0'; while (fgets(genbuf, sizeof(genbuf), fin)) { if (!strncmp(genbuf, str_author1, LEN_AUTHOR1) || !strncmp(genbuf, str_author2, LEN_AUTHOR2)) { if ((ptr = strrchr(genbuf, ')'))) *ptr = '\0'; if ((ptr = (char *)strchr(genbuf, '('))) strlcpy(nick, ptr + 1, sizeof(nick)); break; } } if(!strncasecmp(postfile.title, str_reply, 3)) len=len+4; sprintf(postfile.title, "%-*.*s.%s板", len, len, fh->title, currboard); if ((fout = fopen("innd/cancel.bntp", "a"))) { fprintf(fout, "%s\t%s\t%s\t%s\t%s\n", currboard, fh->filename, cuser.userid, nick, fh->title); fclose(fout); } fclose(fin); log_file(fn1, LOG_CREAT | LOG_VF, "\n※ Deleted by: %s (%s) %d/%d", cuser.userid, fromhost, ptime->tm_mon + 1, ptime->tm_mday); Rename(fn1, newpath); setbdir(genbuf, brd); setbtotal(getbnum(brd)); append_record(genbuf, &postfile, sizeof(postfile)); } } /* ----------------------------------------------------- */ /* 發表、回應、編輯、轉錄文章 */ /* ----------------------------------------------------- */ void do_reply_title(int row, const char *title) { char genbuf[200]; char genbuf2[4]; if (strncasecmp(title, str_reply, 4)) snprintf(save_title, sizeof(save_title), "Re: %s", title); else strlcpy(save_title, title, sizeof(save_title)); save_title[TTLEN - 1] = '\0'; snprintf(genbuf, sizeof(genbuf), "採用原標題《%.60s》嗎?[Y] ", save_title); getdata(row, 0, genbuf, genbuf2, 4, LCECHO); if (genbuf2[0] == 'n' || genbuf2[0] == 'N') getdata(++row, 0, "標題：", save_title, TTLEN, DOECHO); } /* static void do_unanonymous_post(const char *fpath) { fileheader_t mhdr; char title[128]; char genbuf[200]; setbpath(genbuf, "UnAnonymous"); if (dashd(genbuf)) { stampfile(genbuf, &mhdr); unlink(genbuf); // XXX: Link should use BBSHOME/blah Link(fpath, genbuf); strlcpy(mhdr.owner, cuser.userid, sizeof(mhdr.owner)); strlcpy(mhdr.title, save_title, sizeof(mhdr.title)); mhdr.filemode = 0; setbdir(title, "UnAnonymous"); append_record(title, &mhdr, sizeof(mhdr)); } } */ void do_crosspost(const char *brd, fileheader_t *postfile, const char *fpath) { char genbuf[200]; int len = 42-strlen(currboard); fileheader_t fh; if(!strncasecmp(postfile->title, str_reply, 3)) len=len+4; setbpath(genbuf, brd); stampfile(genbuf, &fh); if(!strcmp(brd, "UnAnonymous")) strcpy(fh.owner, cuser.userid); else { strcpy(fh.owner, postfile->owner); fh.multi.money = postfile->multi.money; } strcpy(fh.date, postfile->date); sprintf(fh.title,"%-*.*s.%s板", len, len, postfile->title, currboard); unlink(genbuf); Copy((char *)fpath, genbuf); postfile->filemode = FILE_LOCAL; setbdir(genbuf, brd); if (append_record(genbuf, &fh, sizeof(fileheader_t)) != -1) { int bid = getbnum(brd); assert(0<=bid-1 && bid-1lastposttime[bid - 1] = now; touchbpostnum(bid, 1); } } static void setupbidinfo(bid_t *bidinfo) { char buf[256]; bidinfo->enddate = gettime(20, now+86400,"結束標案於"); do{ getdata_str(21, 0, "底價:", buf, 8, LCECHO, "1"); } while( (bidinfo->high = atoi(buf)) <= 0 ); do{ getdata_str(21, 20, "每標至少增加多少:", buf, 5, LCECHO, "1"); } while( (bidinfo->increment = atoi(buf)) <= 0 ); getdata(21,44, "直接購買價(可不設):",buf, 10, LCECHO); bidinfo->buyitnow = atoi(buf); getdata_str(22,0, "付款方式: 1.Ptt幣 2.郵局或銀行轉帳 3.支票或電匯 4.郵局貨到付款 [1]:", buf, 3, LCECHO,"1"); bidinfo->payby = (buf[0] - '1'); if( bidinfo->payby < 0 || bidinfo->payby > 3) bidinfo->payby = 0; getdata_str(23, 0, "運費(0:免運費或文中說明)[0]:", buf, 6, LCECHO, "0"); bidinfo->shipping = atoi(buf); if( bidinfo->shipping < 0 ) bidinfo->shipping = 0; } static void print_bidinfo(FILE *io, bid_t bidinfo) { char *payby[4]={"Ptt幣", "郵局或銀行轉帳", "支票或電匯", "郵局貨到付款"}; if(io){ if( !bidinfo.userid[0] ) fprintf(io, "起標價: %-20d\n", bidinfo.high); else fprintf(io, "目前最高價:%-20d出價者:%-16s\n", bidinfo.high, bidinfo.userid); fprintf(io, "付款方式: %-20s結束於:%-16s\n", payby[bidinfo.payby % 4], Cdate(& bidinfo.enddate)); if(bidinfo.buyitnow) fprintf(io, "直接購買價:%-20d", bidinfo.buyitnow); if(bidinfo.shipping) fprintf(io, "運費:%d", bidinfo.shipping); fprintf(io, "\n"); } else{ if(!bidinfo.userid[0]) prints("起標價: %-20d\n", bidinfo.high); else prints("目前最高價:%-20d出價者:%-16s\n", bidinfo.high, bidinfo.userid); prints("付款方式: %-20s結束於:%-16s\n", payby[bidinfo.payby % 4], Cdate(& bidinfo.enddate)); if(bidinfo.buyitnow) prints("直接購買價:%-20d", bidinfo.buyitnow); if(bidinfo.shipping) prints("運費:%d", bidinfo.shipping); outc('\n'); } } static int do_general(int isbid) { bid_t bidinfo; fileheader_t postfile; char fpath[80], buf[80]; int aborted, defanony, ifuseanony, i; char genbuf[200], *owner; char ctype[8][5] = {"問題", "建議", "討論", "心得", "閒聊", "請益", "公告", "情報"}; boardheader_t *bp; int islocal, posttype=-1; ifuseanony = 0; assert(0<=currbid-1 && currbid-1brdname, "PttForeign") == 0) #endif ) { vmsg("對不起，您目前無法在此發表文章！"); return READ_REDRAW; } #ifndef DEBUG if ( !((currmode & MODE_BOARD) || HasUserPerm(PERM_SYSOP)) && (cuser.firstlogin > (now - (time4_t)bcache[currbid - 1].post_limit_regtime * 2592000) || cuser.numlogins < ((unsigned int)(bcache[currbid - 1].post_limit_logins) * 10) || cuser.numposts < ((unsigned int)(bcache[currbid - 1].post_limit_posts) * 10)) ) { move(5, 10); vmsg("你不夠資深喔！"); return FULLUPDATE; } #ifdef USE_COOLDOWN if(check_cooldown(bp)) return READ_REDRAW; #endif #endif clear(); if(likely(!isbid)) setbfile(genbuf, currboard, FN_POST_NOTE); else setbfile(genbuf, currboard, FN_POST_BID); if (more(genbuf, NA) == -1) { if(!isbid) more("etc/" FN_POST_NOTE, NA); else more("etc/" FN_POST_BID, NA); } move(19, 0); prints("%s於【" ANSI_COLOR(33) " %s" ANSI_RESET " 】 " ANSI_COLOR(32) "%s" ANSI_RESET " 看板\n", isbid?"公開招標":"發表文章", currboard, bp->title + 7); if (unlikely(isbid)) { memset(&bidinfo,0,sizeof(bidinfo)); setupbidinfo(&bidinfo); postfile.multi.money=bidinfo.high; move(20,0); clrtobot(); } if (quote_file[0]) do_reply_title(20, currtitle); else { if (!isbid) { move(21,0); outs("種類："); for(i=0; i<8 && bp->posttype[i*4]; i++) strlcpy(ctype[i],bp->posttype+4*i,5); if(i==0) i=8; for(aborted=0; aborted= 0 && posttype < i) snprintf(save_title, sizeof(save_title), "[%s] ", ctype[posttype]); else { save_title[0] = '\0'; posttype=-1; } } getdata_buf(22, 0, "標題：", save_title, TTLEN, DOECHO); strip_ansi(save_title, save_title, STRIP_ALL); } if (save_title[0] == '\0') return FULLUPDATE; curredit &= ~EDIT_MAIL; curredit &= ~EDIT_ITEM; setutmpmode(POSTING); /* 未具備 Internet 權限者，只能在站內發表文章 */ /* 板主預設站內存檔 */ if (HasUserPerm(PERM_INTERNET) && !(bp->brdattr & BRD_LOCALSAVE)) local_article = 0; else local_article = 1; /* build filename */ setbpath(fpath, currboard); stampfile(fpath, &postfile); if(isbid) { FILE *fp; if( (fp = fopen(fpath, "w")) != NULL ){ print_bidinfo(fp, bidinfo); fclose(fp); } } else if(posttype!=-1 && ((1<posttype_f)) { setbnfile(genbuf, bp->brdname, "postsample", posttype); Copy(genbuf, fpath); } aborted = vedit(fpath, YEA, &islocal); if (aborted == -1) { unlink(fpath); pressanykey(); return FULLUPDATE; } /* set owner to Anonymous for Anonymous board */ #ifdef HAVE_ANONYMOUS /* Ptt and Jaky */ defanony = currbrdattr & BRD_DEFAULTANONYMOUS; if ((currbrdattr & BRD_ANONYMOUS) && ((strcmp(real_name, "r") && defanony) || (real_name[0] && !defanony)) ) { strcat(real_name, "."); owner = real_name; ifuseanony = 1; } else owner = cuser.userid; #else owner = cuser.userid; #endif /* 錢 */ if (aborted > MAX_POST_MONEY * 2) aborted = MAX_POST_MONEY; else aborted /= 2; if(ifuseanony) { postfile.filemode |= FILE_ANONYMOUS; postfile.multi.anon_uid = currutmp->uid; } else if(!isbid) { /* general article */ #ifdef USE_TEXTLEN struct stat st; if (stat(fpath, &st) != -1) { /* put original file (text) length. */ postfile.textlen = st.st_size; } #endif postfile.multi.money = aborted; } strlcpy(postfile.owner, owner, sizeof(postfile.owner)); strlcpy(postfile.title, save_title, sizeof(postfile.title)); if (islocal) /* local save */ postfile.filemode |= FILE_LOCAL; setbdir(buf, currboard); if(isbid) { sprintf(genbuf, "%s.bid", fpath); append_record(genbuf,(void*) &bidinfo, sizeof(bidinfo)); postfile.filemode |= FILE_BID ; } if (append_record(buf, &postfile, sizeof(postfile)) != -1) { setbtotal(currbid); if( currmode & MODE_SELECT ) append_record(currdirect, &postfile, sizeof(postfile)); if( !islocal && !(bp->brdattr & BRD_NOTRAN) ){ #ifdef HAVE_ANONYMOUS if( ifuseanony ) outgo_post(&postfile, currboard, owner, "Anonymous."); else #endif outgo_post(&postfile, currboard, cuser.userid, cuser.nickname); } brc_addlist(postfile.filename); if( !bp->level || (currbrdattr & BRD_POSTMASK)) { if (!(currbrdattr & BRD_HIDE) ) do_crosspost(ALLPOST, &postfile, fpath); else do_crosspost(ALLHIDPOST, &postfile, fpath); } outs("順利貼出佈告，"); #ifdef MAX_POST_MONEY if (aborted > MAX_POST_MONEY) aborted = MAX_POST_MONEY; #endif if (strcmp(currboard, "Test") && !ifuseanony) { prints("這是您的第 %d 篇文章。",++cuser.numposts); if(postfile.filemode&FILE_BID) outs("招標文章沒有稿酬。"); else if(currbrdattr&BRD_BAD) outs("違法改進中看板沒有稿酬。"); else { prints(" 稿酬 %d 銀。",aborted); demoney(aborted); } } else outs("測試信件不列入紀錄，敬請包涵。"); /* 回應到原作者信箱 */ if (curredit & EDIT_BOTH) { char *str, *msg = "回應至作者信箱"; if ((str = strchr(quote_user, '.'))) { if ( #ifndef USE_BSMTP bbs_sendmail(fpath, save_title, str + 1) #else bsmtp(fpath, save_title, str + 1) #endif < 0) msg = "作者無法收信"; } else { sethomepath(genbuf, quote_user); stampfile(genbuf, &postfile); unlink(genbuf); Copy(fpath, genbuf); strlcpy(postfile.owner, cuser.userid, sizeof(postfile.owner)); strlcpy(postfile.title, save_title, sizeof(postfile.title)); sethomedir(genbuf, quote_user); if (append_record(genbuf, &postfile, sizeof(postfile)) == -1) msg = err_uid; else sendalert(quote_user, ALERT_NEW_MAIL); } outs(msg); curredit ^= EDIT_BOTH; } if (currbrdattr & BRD_ANONYMOUS) do_crosspost("UnAnonymous", &postfile, fpath); #ifdef USE_COOLDOWN if(bp->nuser>30) { if (cooldowntimeof(usernum)brdattr & BRD_VOTEBOARD) return do_voteboard(0); else if (!(bp->brdattr & BRD_GROUPBOARD)) return do_general(0); return 0; } int do_post_vote(void) { return do_voteboard(1); } int do_post_openbid(void) { char ans[4]; boardheader_t *bp; assert(0<=currbid-1 && currbid-1brdattr & BRD_VOTEBOARD)) { getdata(b_lines - 1, 0, "確定要公開招標嗎？ [y/N] ", ans, sizeof(ans), LCECHO); if(ans[0] != 'y') return FULLUPDATE; return do_general(1); } return 0; } static void do_generalboardreply(/*const*/ fileheader_t * fhdr) { char genbuf[3]; assert(0<=currbid-1 && currbid-1 (now - (time4_t)bcache[currbid - 1].post_limit_regtime * 2592000) || cuser.numlogins < ((unsigned int)(bcache[currbid - 1].post_limit_logins) * 10) || cuser.numposts < ((unsigned int)(bcache[currbid - 1].post_limit_posts) * 10)) ) { getdata(b_lines - 1, 0, "▲ 回應至 (M)作者信箱 (Q)取消？[M] ", genbuf, sizeof(genbuf), LCECHO); switch (genbuf[0]) { case 'q': break; default: mail_reply(0, fhdr, 0); } } else { getdata(b_lines - 1, 0, "▲ 回應至 (F)看板 (M)作者信箱 (B)二者皆是 (Q)取消？[F] ", genbuf, sizeof(genbuf), LCECHO); switch (genbuf[0]) { case 'm': mail_reply(0, fhdr, 0); case 'q': break; case 'b': curredit = EDIT_BOTH; default: strlcpy(currtitle, fhdr->title, sizeof(currtitle)); strlcpy(quote_user, fhdr->owner, sizeof(quote_user)); do_post(); curredit &= ~EDIT_BOTH; } } *quote_file = 0; } int invalid_brdname(const char *brd) { register char ch, rv=0; ch = *brd++; if (!isalpha((int)ch)) rv = 2; while ((ch = *brd++)) { if (not_alnum(ch) && ch != '_' && ch != '-' && ch != '.') return (1|rv); } return rv; } static int b_call_in(int ent, const fileheader_t * fhdr, const char *direct) { userinfo_t *u = search_ulist(searchuser(fhdr->owner, NULL)); if (u) { int fri_stat; fri_stat = friend_stat(currutmp, u); if (isvisible_stat(currutmp, u, fri_stat) && call_in(u, fri_stat)) return FULLUPDATE; } return DONOTHING; } static int b_posttype(int ent, const fileheader_t * fhdr, const char *direct) { boardheader_t *bp; int i, aborted; char filepath[PATHLEN], genbuf[60], title[5], posttype_f, posttype[33]=""; if(!(currmode & MODE_BOARD)) return DONOTHING; assert(0<=currbid-1 && currbid-1posttype_f; for( i = 0 ; i < 8 ; ++i ){ move(2,0); outs("文章種類: "); strlcpy(genbuf, bp->posttype + i * 4, 5); sprintf(title, "%d.", i + 1); if( !getdata_buf(2, 11, title, genbuf, 5, DOECHO) ) break; sprintf(posttype + i * 4, "%-4.4s", genbuf); if( posttype_f & (1<brdname, "postsample", i); aborted = vedit(filepath, NA, NULL); if (aborted == -1) { clear(); posttype_f &= ~(1<posttype_f = posttype_f; strlcpy(bp->posttype, posttype, sizeof(bp->posttype)); /* 這邊應該要防race condition */ assert(0<=currbid-1 && currbid-1filemode &FILE_SOLVED) { if(fhdr->filemode & FILE_MARKED) { vmsg("很抱歉, 此文章已結案並標記, 不得回應."); return FULLUPDATE; } if(getkey("此篇文章已結案, 是否真的要回應?(y/N)")!='y') return FULLUPDATE; } assert(0<=currbid-1 && currbid-1brdname, fhdr->filename); if (bp->brdattr & BRD_VOTEBOARD || (fhdr->filemode & FILE_VOTE)) do_voteboardreply(fhdr); else do_generalboardreply(fhdr); *quote_file = 0; return FULLUPDATE; } static int reply_post(int ent, /*const*/ fileheader_t * fhdr, const char *direct) { return do_reply(fhdr); } static int edit_post(int ent, fileheader_t * fhdr, const char *direct) { char fpath[80]; char genbuf[200]; fileheader_t postfile; boardheader_t *bp = getbcache(currbid); struct stat oldstat, newstat; int isSysop = 0, recordTouched = 0; assert(0<=currbid-1 && currbid-1brdname, "Security") == 0) return DONOTHING; if (HasUserPerm(PERM_SYSOP)) isSysop = 1; else if ((bp->brdattr & BRD_VOTEBOARD) || (fhdr->filemode & FILE_VOTE) || !CheckPostPerm() || strcmp(fhdr->owner, cuser.userid) != EQUSTR || strcmp(cuser.userid, STR_GUEST) == EQUSTR) return DONOTHING; if( currmode & MODE_SELECT ) return DONOTHING; #ifdef SAFE_ARTICLE_DELETE if( fhdr->filename[0] == '.' ) return DONOTHING; #endif setutmpmode(REEDIT); setbpath(fpath, currboard); stampfile(fpath, &postfile); setdirpath(genbuf, direct, fhdr->filename); local_article = fhdr->filemode & FILE_LOCAL; #ifdef USE_TEXTLEN if(fhdr->textlen > 0) { /* TODO SYSOP may need some function to edit entire file. */ CopyN(genbuf, fpath, fhdr->textlen); } else #endif { Copy(genbuf, fpath); } strlcpy(save_title, fhdr->title, sizeof(save_title)); do { stat(genbuf, &oldstat); if (vedit(fpath, 0, NULL) == -1) break; stat(genbuf, &newstat); /* check textlen */ if(fhdr->textlen > 0) { int gotnewstat = -1; #ifdef USE_TEXTLEN /* TODO should we reload textlen info? * multiple editing will make textlen invalid. */ if(fhdr->textlen != newstat.st_size) { #ifdef DEBUG vmsg("textlen != st_size, append tail."); #endif gotnewstat = stat(fpath, &newstat); /* copy from old content. */ AppendTail(genbuf, fpath, fhdr->textlen); } else { gotnewstat = stat(fpath, &newstat); } #endif /* now update the record. */ if(gotnewstat != -1) fhdr->textlen = newstat.st_size; else fhdr->textlen = 0; recordTouched = 1; } else /* old flavor, no textlen info */ if (oldstat.st_mtime != newstat.st_mtime) { if (tolower(getans( "檔案已被別人修改過，要覆蓋\掉它嗎 [Y/n]？")) == 'n') { FILE *fp, *src; if(tolower(getans( "要把被修改過的文章附加在結尾並重新編輯嗎 [Y/n]？")) == 'n') break; /* merge new and old stuff */ fp = fopen(fpath, "at"); src = fopen(genbuf, "rt"); if(!fp) { vmsg("抱歉，檔案已損毀。"); if(src) fclose(src); return FULLUPDATE; } if(src) { int c = 0; struct tm *ptime; time4_t xt = (time4_t)newstat.st_mtime; fprintf(fp, MSG_SEPERATOR "\n"); fprintf(fp, "以下為被別人修改過的最新內容: "); ptime = localtime4(&xt); fprintf(fp, " (%02d/%02d %02d:%02d)\n", ptime->tm_mon + 1, ptime->tm_mday, ptime->tm_hour, ptime->tm_min); fprintf(fp, MSG_SEPERATOR "\n"); while ((c = fgetc(src)) >= 0) fputc(c, fp); fclose(src); } fclose(fp); continue; } } Rename(fpath, genbuf); if(strcmp(save_title, fhdr->title)){ // Ptt: here is the black hole problem // (try getindex) strcpy(fhdr->title, save_title); recordTouched = 1; } if(recordTouched) substitute_ref_record(direct, fhdr, ent); break; } while (1); /* should we do this when editing was aborted? */ unlink(fpath); return FULLUPDATE; } #define UPDATE_USEREC (currmode |= MODE_DIRTY) static int cross_post(int ent, fileheader_t * fhdr, const char *direct) { char xboard[20], fname[80], xfpath[80], xtitle[80]; char inputbuf[10], genbuf[200], genbuf2[4]; fileheader_t xfile; FILE *xptr; int author; boardheader_t *bp; if (!CheckPostPerm()) { vmsg("對不起，您目前無法轉錄文章！"); return FULLUPDATE; } move(2, 0); clrtoeol(); move(1, 0); assert(0<=currbid-1 && currbid-1brdattr & BRD_VOTEBOARD) ) return FULLUPDATE; CompleteBoard("轉錄本文章於看板：", xboard); if (*xboard == '\0') return FULLUPDATE; if (!haspostperm(xboard)) { vmsg("看板不存在或該看板禁止您發表文章！"); return FULLUPDATE; } /* 借用變數 */ ent = str_checksum(fhdr->title); author = getbnum(xboard); assert(0<=author-1 && author-1 MAX_CROSSNUM) anticrosspost(); } else { postrecord.times = 0; postrecord.last_bid = author; postrecord.checksum[0] = ent; } if ( !((currmode & MODE_BOARD) || HasUserPerm(PERM_SYSOP)) && (cuser.firstlogin > (now - (time4_t)bcache[author - 1].post_limit_regtime * 2592000) || cuser.numlogins < ((unsigned int)(bcache[author - 1].post_limit_logins) * 10) || cuser.numposts < ((unsigned int)(bcache[author - 1].post_limit_posts) * 10)) ) { vmsg("你不夠資深喔！"); return FULLUPDATE; } #ifdef USE_COOLDOWN if(check_cooldown(bp)) return FULLUPDATE; #endif ent = 1; author = 0; if (HasUserPerm(PERM_SYSOP) || !strcmp(fhdr->owner, cuser.userid)) { getdata(2, 0, "(1)原文轉載 (2)舊轉錄格式？[1] ", genbuf, 3, DOECHO); if (genbuf[0] != '2') { ent = 0; getdata(2, 0, "保留原作者名稱嗎?[Y] ", inputbuf, 3, DOECHO); if (inputbuf[0] != 'n' && inputbuf[0] != 'N') author = '1'; } } if (ent) snprintf(xtitle, sizeof(xtitle), "[轉錄]%.66s", fhdr->title); else strlcpy(xtitle, fhdr->title, sizeof(xtitle)); snprintf(genbuf, sizeof(genbuf), "採用原標題《%.60s》嗎?[Y] ", xtitle); getdata(2, 0, genbuf, genbuf2, 4, LCECHO); if (genbuf2[0] == 'n' || genbuf2[0] == 'N') { if (getdata_str(2, 0, "標題：", genbuf, TTLEN, DOECHO, xtitle)) strlcpy(xtitle, genbuf, sizeof(xtitle)); } getdata(2, 0, "(S)存檔 (L)站內 (Q)取消？[Q] ", genbuf, 3, LCECHO); if (genbuf[0] == 'l' || genbuf[0] == 's') { int currmode0 = currmode; const char *save_currboard; currmode = 0; setbpath(xfpath, xboard); stampfile(xfpath, &xfile); if (author) strlcpy(xfile.owner, fhdr->owner, sizeof(xfile.owner)); else strlcpy(xfile.owner, cuser.userid, sizeof(xfile.owner)); strlcpy(xfile.title, xtitle, sizeof(xfile.title)); if (genbuf[0] == 'l') { xfile.filemode = FILE_LOCAL; } setbfile(fname, currboard, fhdr->filename); xptr = fopen(xfpath, "w"); strlcpy(save_title, xfile.title, sizeof(save_title)); save_currboard = currboard; currboard = xboard; write_header(xptr, save_title); currboard = save_currboard; if ((bp->brdattr & BRD_HIDE) && (bp->brdattr & BRD_POSTMASK)) { /* invisible board */ fprintf(xptr, "※ [本文轉錄自某隱形看板]\n\n"); b_suckinfile_invis(xptr, fname, currboard); } else { /* public board */ fprintf(xptr, "※ [本文轉錄自 %s 看板]\n\n", currboard); b_suckinfile(xptr, fname); } addsignature(xptr, 0); fclose(xptr); #ifdef USE_AUTOCPLOG /* add cp log. bp is currboard now. */ if(bp->brdattr & BRD_CPLOG) { char buf[MAXPATHLEN], tail[STRLEN]; char bname[STRLEN] = ""; struct tm *ptime = localtime4(&now); int maxlength = 51 +2 - 6; int bid = getbnum(xboard); assert(0<=bid-1 && bid-1brdattr & BRD_HIDE) && (bp->brdattr & BRD_POSTMASK)) { /* mosaic it */ /* // mosaic method 1 char *pbname = bname; while(*pbname) *pbname++ = '?'; */ // mosaic method 2 strcpy(bname, "某隱形看板"); } else { sprintf(bname, "看板 %s", xboard); } maxlength -= (strlen(cuser.userid) + strlen(bname)); #ifdef GUESTRECOMMEND snprintf(tail, sizeof(tail), "%15s %02d/%02d", fromhost, ptime->tm_mon + 1, ptime->tm_mday); #else maxlength += (15 - 6); snprintf(tail, sizeof(tail), " %02d/%02d %02d:%02d", ptime->tm_mon + 1, ptime->tm_mday, ptime->tm_hour, ptime->tm_min); #endif snprintf(buf, sizeof(buf), // ANSI_COLOR(32) <- system will add green "※ " ANSI_COLOR(1;32) "%s" ANSI_COLOR(0;32) ":轉錄至" "%s" ANSI_RESET "%*s%s\n" , cuser.userid, bname, maxlength, "", tail); do_add_recommend(direct, fhdr, ent, buf, 2); } else #endif { int bid = getbnum(xboard); assert(0<=bid-1 && bid-1brdattr & BRD_NOTRAN)) outgo_post(&xfile, xboard, cuser.userid, cuser.nickname); #ifdef USE_COOLDOWN if(bp->nuser>30) { if (cooldowntimeof(usernum)owner[0] == '-') return READ_SKIP; STATINC(STAT_READPOST); setdirpath(genbuf, direct, fhdr->filename); more_result = more(genbuf, YEA); { int posttime=atoi(fhdr->filename+2); if(posttime>now-12*3600) STATINC(STAT_READPOST_12HR); else if(posttime>now-1*86400) STATINC(STAT_READPOST_1DAY); else if(posttime>now-3*86400) STATINC(STAT_READPOST_3DAY); else if(posttime>now-7*86400) STATINC(STAT_READPOST_7DAY); else STATINC(STAT_READPOST_OLD); } brc_addlist(fhdr->filename); strlcpy(currtitle, subject(fhdr->title), sizeof(currtitle)); switch(more_result) { case -1: clear(); vmsg("此文章無內容"); return FULLUPDATE; case 999: return do_reply(fhdr); case 998: recommend(ent, fhdr, direct); return FULLUPDATE; } if(more_result) return more_result; return FULLUPDATE; } int do_limitedit(int ent, fileheader_t * fhdr, const char *direct) { char genbuf[256], buf[256]; int temp; boardheader_t *bp = getbcache(currbid); assert(0<=currbid-1 && currbid-1filemode & FILE_VOTE) strcat(buf, " (C)本篇"); strcat(buf, "連署限制 (Q)取消？[Q]"); genbuf[0] = getans(buf); if (HasUserPerm(PERM_SYSOP) && genbuf[0] == 'a') { sprintf(genbuf, "%u", bp->post_limit_regtime); do { getdata_buf(b_lines - 1, 0, "註冊時間限制 (以'月'為單位，0~255)：", genbuf, 4, LCECHO); temp = atoi(genbuf); } while (temp < 0 || temp > 255); bp->post_limit_regtime = (unsigned char)temp; sprintf(genbuf, "%u", bp->post_limit_logins * 10); do { getdata_buf(b_lines - 1, 0, "上站次數下限 (0~2550)：", genbuf, 5, LCECHO); temp = atoi(genbuf); } while (temp < 0 || temp > 2550); bp->post_limit_logins = (unsigned char)(temp / 10); sprintf(genbuf, "%u", bp->post_limit_posts * 10); do { getdata_buf(b_lines - 1, 0, "文章篇數下限 (0~2550)：", genbuf, 5, LCECHO); temp = atoi(genbuf); } while (temp < 0 || temp > 2550); bp->post_limit_posts = (unsigned char)(temp / 10); assert(0<=currbid-1 && currbid-1brdname); vmsg("修改完成！"); return FULLUPDATE; } else if (genbuf[0] == 'b') { sprintf(genbuf, "%u", bp->vote_limit_regtime); do { getdata_buf(b_lines - 1, 0, "註冊時間限制 (以'月'為單位，0~255)：", genbuf, 4, LCECHO); temp = atoi(genbuf); } while (temp < 0 || temp > 255); bp->vote_limit_regtime = (unsigned char)temp; sprintf(genbuf, "%u", bp->vote_limit_logins * 10); do { getdata_buf(b_lines - 1, 0, "上站次數下限 (0~2550)：", genbuf, 5, LCECHO); temp = atoi(genbuf); } while (temp < 0 || temp > 2550); bp->vote_limit_logins = (unsigned char)(temp / 10); sprintf(genbuf, "%u", bp->vote_limit_posts * 10); do { getdata_buf(b_lines - 1, 0, "文章篇數下限 (0~2550)：", genbuf, 5, LCECHO); temp = atoi(genbuf); } while (temp < 0 || temp > 2550); bp->vote_limit_posts = (unsigned char)(temp / 10); assert(0<=currbid-1 && currbid-1brdname); vmsg("修改完成！"); return FULLUPDATE; } else if ((fhdr->filemode & FILE_VOTE) && genbuf[0] == 'c') { sprintf(genbuf, "%u", fhdr->multi.vote_limits.regtime); do { getdata_buf(b_lines - 1, 0, "註冊時間限制 (以'月'為單位，0~255)：", genbuf, 4, LCECHO); temp = atoi(genbuf); } while (temp < 0 || temp > 255); fhdr->multi.vote_limits.regtime = temp; sprintf(genbuf, "%u", (unsigned int)(fhdr->multi.vote_limits.logins) * 10); do { getdata_buf(b_lines - 1, 0, "上站次數下限 (0~2550)：", genbuf, 5, LCECHO); temp = atoi(genbuf); } while (temp < 0 || temp > 2550); temp /= 10; fhdr->multi.vote_limits.logins = (unsigned char)temp; sprintf(genbuf, "%u", (unsigned int)(fhdr->multi.vote_limits.posts) * 10); do { getdata_buf(b_lines - 1, 0, "文章篇數下限 (0~2550)：", genbuf, 5, LCECHO); temp = atoi(genbuf); } while (temp < 0 || temp > 2550); temp /= 10; fhdr->multi.vote_limits.posts = (unsigned char)temp; substitute_ref_record(direct, fhdr, ent); vmsg("修改完成！"); return FULLUPDATE; } vmsg("取消修改"); return FULLUPDATE; } /* ----------------------------------------------------- */ /* 採集精華區 */ /* ----------------------------------------------------- */ static int b_man(void) { char buf[PATHLEN]; setapath(buf, currboard); if ((currmode & MODE_BOARD) || HasUserPerm(PERM_SYSOP)) { char genbuf[128]; int fd; snprintf(genbuf, sizeof(genbuf), "%s/.rebuild", buf); if ((fd = open(genbuf, O_CREAT, 0640)) > 0) close(fd); } return a_menu(currboard, buf, HasUserPerm(PERM_ALLBOARD) ? 2 : (currmode & MODE_BOARD ? 1 : 0), NULL); } #ifndef NO_GAMBLE static int stop_gamble(void) { boardheader_t *bp = getbcache(currbid); char fn_ticket[128], fn_ticket_end[128]; assert(0<=currbid-1 && currbid-1endgamble || bp->endgamble > now) return 0; setbfile(fn_ticket, currboard, FN_TICKET); setbfile(fn_ticket_end, currboard, FN_TICKET_END); rename(fn_ticket, fn_ticket_end); if (bp->endgamble) { bp->endgamble = 0; assert(0<=currbid-1 && currbid-1brdattr & BRD_BAD ) { vmsg("違法看板禁止使用賭盤"); return 0; } setbfile(fn_ticket, currboard, FN_TICKET); setbfile(fn_ticket_end, currboard, FN_TICKET_END); setbfile(genbuf, currboard, FN_TICKET_LOCK); if (dashf(fn_ticket)) { getdata(b_lines - 1, 0, "已經有舉辦賭盤, " "是否要 [停止下注]?(N/y)：", yn, 3, LCECHO); if (yn[0] != 'y') return FULLUPDATE; rename(fn_ticket, fn_ticket_end); if (bp->endgamble) { bp->endgamble = 0; assert(0<=currbid-1 && currbid-1 MAX_CPULOAD/4) { vmsg("負荷過高 請於系統負荷低時開獎.."); return FULLUPDATE; } openticket(currbid); return FULLUPDATE; } else if (dashf(genbuf)) { vmsg(" 目前系統正在處理開獎事宜, 請結果出爐後再舉辦......."); return FULLUPDATE; } getdata(b_lines - 2, 0, "要舉辦賭盤 (N/y):", yn, 3, LCECHO); if (yn[0] != 'y') return FULLUPDATE; getdata(b_lines - 1, 0, "賭什麼? 請輸入主題 (輸入後編輯內容):", msg, 20, DOECHO); if (msg[0] == 0 || vedit(fn_ticket_end, NA, NULL) < 0) return FULLUPDATE; clear(); showtitle("舉辦賭盤", BBSNAME); setbfile(tmp, currboard, FN_TICKET_ITEMS ".tmp"); //sprintf(genbuf, "%s/" FN_TICKET_ITEMS, direct); if (!(fp = fopen(tmp, "w"))) return FULLUPDATE; do { getdata(2, 0, "輸入彩票價格 (價格:10-10000):", yn, 6, LCECHO); i = atoi(yn); } while (i < 10 || i > 10000); fprintf(fp, "%d\n", i); if (!getdata(3, 0, "設定自動封盤時間?(Y/n)", yn, 3, LCECHO) || yn[0] != 'n') { bp->endgamble = gettime(4, now, "封盤於"); assert(0<=currbid-1 && currbid-1endgamble ? "賭盤結束時間: " : "", bp->endgamble ? Cdate(&bp->endgamble) : "" ); strcat(msg, genbuf); outs("請依次輸入彩票名稱, 需提供2~8項. (未滿八項, 輸入直接按Enter)\n"); //outs(ANSI_COLOR(1;33) "注意輸入後無法修改！\n"); for( i = 0 ; i < 8 ; ++i ){ snprintf(yn, sizeof(yn), " %d)", i + 1); getdata(7 + i, 0, yn, genbuf, 9, DOECHO); if (!genbuf[0] && i > 1) break; fprintf(fp, "%s\n", genbuf); } fclose(fp); setbfile(genbuf, currboard, FN_TICKET_RECORD); unlink(genbuf); // Ptt: 防堵利用不同id同時舉辦賭場 setbfile(genbuf, currboard, FN_TICKET_USER); unlink(genbuf); // Ptt: 防堵利用不同id同時舉辦賭場 setbfile(genbuf, currboard, FN_TICKET_ITEMS); setbfile(tmp, currboard, FN_TICKET_ITEMS ".tmp"); if(!dashf(fn_ticket)) Rename(tmp, genbuf); snprintf(genbuf, sizeof(genbuf), "[公告] %s 板 開始賭博!", currboard); post_msg(currboard, genbuf, msg, cuser.userid); post_msg("Record", genbuf + 7, msg, "[馬路探子]"); /* Tim 控制CS, 以免正在玩的user把資料已經寫進來 */ rename(fn_ticket_end, fn_ticket); /* 設定完才把檔名改過來 */ vmsg("賭盤設定完成"); return FULLUPDATE; } #endif static int cite_post(int ent, const fileheader_t * fhdr, const char *direct) { char fpath[PATHLEN]; char title[TTLEN + 1]; setbfile(fpath, currboard, fhdr->filename); strlcpy(title, "◇ ", sizeof(title)); strlcpy(title + 3, fhdr->title, TTLEN - 3); title[TTLEN] = '\0'; a_copyitem(fpath, title, 0, 1); b_man(); return FULLUPDATE; } int edit_title(int ent, fileheader_t * fhdr, const char *direct) { char genbuf[200]; fileheader_t tmpfhdr = *fhdr; int dirty = 0; if (currmode & MODE_BOARD || !strcmp(cuser.userid, fhdr->owner)) { if (getdata(b_lines - 1, 0, "標題：", genbuf, TTLEN, DOECHO)) { strlcpy(tmpfhdr.title, genbuf, sizeof(tmpfhdr.title)); dirty++; } } if (HasUserPerm(PERM_SYSOP)) { if (getdata(b_lines - 1, 0, "作者：", genbuf, IDLEN + 2, DOECHO)) { strlcpy(tmpfhdr.owner, genbuf, sizeof(tmpfhdr.owner)); dirty++; } if (getdata(b_lines - 1, 0, "日期：", genbuf, 6, DOECHO)) { snprintf(tmpfhdr.date, sizeof(tmpfhdr.date), "%.5s", genbuf); dirty++; } } if (currmode & MODE_BOARD || !strcmp(cuser.userid, fhdr->owner)) { getdata(b_lines - 1, 0, "確定(Y/N)?[n] ", genbuf, 3, DOECHO); if ((genbuf[0] == 'y' || genbuf[0] == 'Y') && dirty) { *fhdr = tmpfhdr; substitute_ref_record(direct, fhdr, ent); } return FULLUPDATE; } return DONOTHING; } static int solve_post(int ent, fileheader_t * fhdr, const char *direct) { if ((currmode & MODE_BOARD)) { fhdr->filemode ^= FILE_SOLVED; substitute_ref_record(direct, fhdr, ent); return PART_REDRAW; } return DONOTHING; } static int recommend_cancel(int ent, fileheader_t * fhdr, const char *direct) { char yn[5]; if (!(currmode & MODE_BOARD)) return DONOTHING; getdata(b_lines - 1, 0, "確定要推薦歸零[y/N]? ", yn, 5, LCECHO); if (yn[0] != 'y') return FULLUPDATE; #ifdef ASSESS // to save resource if (fhdr->recommend > 9) inc_goodpost(fhdr->owner, -1 * (fhdr->recommend / 10)); #endif fhdr->recommend = 0; substitute_ref_record(direct, fhdr, ent); return FULLUPDATE; } static int do_add_recommend(const char *direct, fileheader_t *fhdr, int ent, const char *buf, int type) { char path[PATHLEN]; int update = 0; /* race here: 為了減少 system calls , 現在直接用當前的推文數 +1 寫入 .DIR 中. 造成 1.若該文檔名被換掉的話, 推文將寫至舊檔名中 (造成幽靈檔) 2.沒有重新讀一次, 所以推文數可能被少算 3.若推的時候前文被刪, 將加到後文的推文數 */ setdirpath(path, direct, fhdr->filename); if( log_file(path, 0, buf) == -1 ){ // 不 CREATE vmsg("推薦/競標失敗"); return -1; } /* This is a solution to avoid most racing (still some), but cost four * system calls. */ if(type == 0 && fhdr->recommend < 100 ) update = 1; else if(type == 1 && fhdr->recommend > -100) update = -1; if( update ){ int fd; //Ptt: update only necessary if( (fd = open(direct, O_RDWR)) < 0 ) return -1; if( lseek(fd, (sizeof(fileheader_t) * (ent - 1) + (char *)&fhdr->recommend - (char *)fhdr), SEEK_SET) >= 0 ){ // 如果 lseek 失敗就不會 write read(fd, &fhdr->recommend, sizeof(char)); fhdr->recommend += update; lseek(fd, -1, SEEK_CUR); write(fd, &fhdr->recommend, sizeof(char)); } close(fd); } return 0; } static int do_bid(int ent, fileheader_t * fhdr, const boardheader_t *bp, const char *direct, const struct tm *ptime) { char genbuf[200], fpath[PATHLEN],say[30],*money; bid_t bidinfo; int mymax, next; setdirpath(fpath, direct, fhdr->filename); strcat(fpath, ".bid"); get_record(fpath, &bidinfo, sizeof(bidinfo), 1); move(18,0); clrtobot(); prints("競標主題: %s\n", fhdr->title); print_bidinfo(0, bidinfo); money = bidinfo.payby ? " NT$ " : "Ptt$ "; if( now > bidinfo.enddate || bidinfo.high == bidinfo.buyitnow ){ outs("此競標已經結束,"); if( bidinfo.userid[0] ) { /*if(!payby && bidinfo.usermax!=-1) {以Ptt幣自動扣款 }*/ prints("恭喜 %s 以 %d 得標!", bidinfo.userid, bidinfo.high); #ifdef ASSESS if (!(bidinfo.flag & SALE_COMMENTED) && strcmp(bidinfo.userid, currutmp->userid) == 0){ char tmp = getans("您對於這次交易的評價如何? 1:佳 2:欠佳 3:普通[Q]"); if ('1' <= tmp && tmp <= '3'){ switch(tmp){ case 1: inc_goodsale(bidinfo.userid, 1); break; case 2: inc_badsale(bidinfo.userid, 1); break; } bidinfo.flag |= SALE_COMMENTED; substitute_record(fpath, &bidinfo, sizeof(bidinfo), 1); } } #endif } else outs("無人得標!"); pressanykey(); return FULLUPDATE; } if( bidinfo.userid[0] ){ prints("下次出價至少要:%s%d", money,bidinfo.high + bidinfo.increment); if( bidinfo.buyitnow ) prints(" (輸入 %d 等於以直接購買結束)",bidinfo.buyitnow); next = bidinfo.high + bidinfo.increment; } else{ prints("起標價: %d", bidinfo.high); next=bidinfo.high; } if( !strcmp(cuser.userid,bidinfo.userid) ){ outs("你是最高得標者!"); pressanykey(); return FULLUPDATE; } if( strcmp(cuser.userid, fhdr->owner) == 0 ){ vmsg("警告! 本人不能出價!"); getdata_str(23, 0, "是否要提早結標? (y/N)", genbuf, 3, LCECHO,"n"); if( genbuf[0] != 'y' ) return FULLUPDATE; snprintf(genbuf, sizeof(genbuf), ANSI_COLOR(1;31) "→ " ANSI_COLOR(33) "賣方%s提早結標" ANSI_RESET "%*s" "標%15s %02d/%02d\n", cuser.userid, (int)(45 - strlen(cuser.userid) - strlen(money)), " ", fromhost, ptime->tm_mon + 1, ptime->tm_mday); do_add_recommend(direct, fhdr, ent, genbuf, 0); bidinfo.enddate = now; substitute_record(fpath, &bidinfo, sizeof(bidinfo), 1); vmsg("提早結標完成"); return FULLUPDATE; } getdata_str(23, 0, "是否要下標? (y/N)", genbuf, 3, LCECHO,"n"); if( genbuf[0] != 'y' ) return FULLUPDATE; getdata(23, 0, "您的最高下標金額(0:取消):", genbuf, 10, LCECHO); mymax = atoi(genbuf); if( mymax <= 0 ){ vmsg("取消下標"); return FULLUPDATE; } getdata(23,0,"下標感言:",say,12,DOECHO); get_record(fpath, &bidinfo, sizeof(bidinfo), 1); if( bidinfo.buyitnow && mymax > bidinfo.buyitnow ) mymax = bidinfo.buyitnow; else if( !bidinfo.userid[0] ) next = bidinfo.high; else next = bidinfo.high + bidinfo.increment; if( mymax< next || (bidinfo.payby == 0 && cuser.money < mymax) ){ vmsg("標金不足搶標"); return FULLUPDATE; } snprintf(genbuf, sizeof(genbuf), ANSI_COLOR(1;31) "→ " ANSI_COLOR(33) "%s" ANSI_RESET ANSI_COLOR(33) ":%s" ANSI_RESET "%*s" "%s%-15d標%15s %02d/%02d\n", cuser.userid, say, (int)(31 - strlen(cuser.userid) - strlen(say)), " ", money, next, fromhost, ptime->tm_mon + 1, ptime->tm_mday); do_add_recommend(direct, fhdr, ent, genbuf, 0); if( next > bidinfo.usermax ){ bidinfo.usermax = mymax; bidinfo.high = next; strcpy(bidinfo.userid, cuser.userid); } else if( mymax > bidinfo.usermax ) { bidinfo.high = bidinfo.usermax + bidinfo.increment; if( bidinfo.high > mymax ) bidinfo.high = mymax; bidinfo.usermax = mymax; strcpy(bidinfo.userid, cuser.userid); snprintf(genbuf, sizeof(genbuf), ANSI_COLOR(1;31) "→ " ANSI_COLOR(33) "自動競標%s勝出" ANSI_RESET ANSI_COLOR(33) ANSI_RESET "%*s%s%-15d標 %02d/%02d\n", cuser.userid, (int)(20 - strlen(cuser.userid)), " ", money, bidinfo.high, ptime->tm_mon + 1, ptime->tm_mday); do_add_recommend(direct, fhdr, ent, genbuf, 0); } else { if( mymax + bidinfo.increment < bidinfo.usermax ) bidinfo.high = mymax + bidinfo.increment; else bidinfo.high=bidinfo.usermax; /*這邊怪怪的*/ snprintf(genbuf, sizeof(genbuf), ANSI_COLOR(1;31) "→ " ANSI_COLOR(33) "自動競標%s勝出" ANSI_RESET ANSI_COLOR(33) ANSI_RESET "%*s%s%-15d標 %02d/%02d\n", bidinfo.userid, (int)(20 - strlen(bidinfo.userid)), " ", money, bidinfo.high, ptime->tm_mon + 1, ptime->tm_mday); do_add_recommend(direct, fhdr, ent, genbuf, 0); } substitute_record(fpath, &bidinfo, sizeof(bidinfo), 1); vmsg("恭喜您! 以最高價搶標完成!"); return FULLUPDATE; } static int recommend(int ent, fileheader_t * fhdr, const char *direct) { struct tm *ptime = localtime4(&now); char buf[PATHLEN], msg[STRLEN]; #ifndef OLDRECOMMEND static const char *ctype[3] = { "推", "噓", "→" }; static const char *ctype_attr[3] = { ANSI_COLOR(1;33), ANSI_COLOR(1;31), ANSI_COLOR(1;37), }, *ctype_attr2[3] = { ANSI_COLOR(1;37), ANSI_COLOR(1;31), ANSI_COLOR(1;31), }, *ctype_long[3] = { "值得推薦", "給它噓聲", "只加→註解" }; #endif int type, maxlength; boardheader_t *bp; static time4_t lastrecommend = 0; static int lastrecommend_bid = -1; static char lastrecommend_fname[FNLEN] = ""; int isGuest = (strcmp(cuser.userid, STR_GUEST) == EQUSTR); int logIP = 0; assert(0<=currbid-1 && currbid-1brdattr & BRD_NORECOMMEND || ((fhdr->filemode & FILE_MARKED) && (fhdr->filemode & FILE_SOLVED))) { vmsg("抱歉, 禁止推薦或競標"); return FULLUPDATE; } if ( !CheckPostPerm() || bp->brdattr & BRD_VOTEBOARD || #ifndef GUESTRECOMMEND isGuest || #endif fhdr->filemode & FILE_VOTE) { vmsg("您權限不足, 無法推薦!"); return FULLUPDATE; } #ifdef SAFE_ARTICLE_DELETE if (fhdr->filename[0] == '.') { vmsg("本文已刪除"); return FULLUPDATE; } #endif if( fhdr->filemode & FILE_BID){ return do_bid(ent, fhdr, bp, direct, ptime); } if((currmode & MODE_BOARD) || HasUserPerm(PERM_SYSOP)) { /* I'm BM or SYSOP. */ } else if (bp->brdattr & BRD_NOFASTRECMD) { int d = (int)bp->fastrecommend_pause - (now - lastrecommend); if (d > 0) { vmsgf("本板禁止快速連續推文，請再等 %d 秒", d); return FULLUPDATE; } } #ifdef USE_COOLDOWN if(check_cooldown(bp)) return FULLUPDATE; #endif type = 0; move(b_lines, 0); clrtoeol(); if (fhdr->recommend == 0 && strcmp(cuser.userid, fhdr->owner) == 0) { // owner recomment first time type = 2; move(b_lines-1, 0); clrtoeol(); outs("本人推薦第一次, 使用 → 加註方式\n"); } #ifndef DEBUG else if (!(currmode & MODE_BOARD) && (now - lastrecommend) < ( #if 0 /* i'm not sure whether this is better or not */ (bp->brdattr & BRD_NOFASTRECMD) ? bp->fastrecommend_pause : #endif 90)) { // too close type = 2; move(b_lines-1, 0); clrtoeol(); outs("推薦時間太近, 使用 → 加註方式\n"); } #endif #ifndef OLDRECOMMEND else if (!(bp->brdattr & BRD_NOBOO)) { /* most people use recommendation just for one-line reply. * so we change default to (2)= comment only now. #define RECOMMEND_DEFAULT_VALUE (2) */ #define RECOMMEND_DEFAULT_VALUE (0) /* current user behavior */ outs(ANSI_COLOR(1) "您覺得這篇文章 "); prints("%s1.%s %s2.%s %s3.%s " ANSI_RESET "[%d]? ", ctype_attr[0], ctype_long[0], ctype_attr[1], ctype_long[1], ctype_attr[2], ctype_long[2], RECOMMEND_DEFAULT_VALUE+1); // poor BBS term has problem positioning with ANSI. move(b_lines, 55); type = igetch() - '1'; if(type < 0 || type > 2) type = RECOMMEND_DEFAULT_VALUE; move(b_lines, 0); clrtoeol(); } #endif if(type > 2 || type < 0) type = 0; maxlength = 78 - 3 /* lead */ - 6 /* date */ - 1 /* space */ - 6 /* time */; if (bp->brdattr & BRD_IPLOGRECMD || isGuest) { maxlength -= 15 /* IP */; logIP = 1; } #ifdef OLDRECOMMEND maxlength -= 2; /* '推' */ maxlength -= strlen(cuser.userid); sprintf(buf, "%s %s:", "→" , cuser.userid); #else maxlength -= strlen(cuser.userid); sprintf(buf, "%s %s:", ctype[type], cuser.userid); #endif if (!getdata(b_lines, 0, buf, msg, maxlength, DOECHO)) return FULLUPDATE; #if 0 scroll(); if(getans("確定要%s嗎? 請仔細考慮[y/N]: ", ctype[type]) != 'y') return FULLUPDATE; #else { char ans[3]; sprintf(buf+strlen(buf), ANSI_COLOR(7) "%-*s" ANSI_RESET " 確定[y/N]:", maxlength, msg); if(!getdata(b_lines, 0, buf, ans, sizeof(ans), LCECHO) || ans[0] != 'y') return FULLUPDATE; } #endif STATINC(STAT_RECOMMEND); { /* build tail first. */ char tail[STRLEN]; if(logIP) { snprintf(tail, sizeof(tail), "%15s %02d/%02d %02d:%02d", fromhost, ptime->tm_mon+1, ptime->tm_mday, ptime->tm_hour, ptime->tm_min); } else { snprintf(tail, sizeof(tail), " %02d/%02d %02d:%02d", ptime->tm_mon+1, ptime->tm_mday, ptime->tm_hour, ptime->tm_min); } #ifdef OLDRECOMMEND snprintf(buf, sizeof(buf), ANSI_COLOR(1;31) "→ " ANSI_COLOR(33) "%s" ANSI_RESET ANSI_COLOR(33) ":%-*s" ANSI_RESET "推%s\n", cuser.userid, maxlength, msg, tail); #else snprintf(buf, sizeof(buf), "%s%s " ANSI_COLOR(33) "%s" ANSI_RESET ANSI_COLOR(33) ":%-*s" ANSI_RESET "%s\n", ctype_attr2[type], ctype[type], cuser.userid, maxlength, msg, tail); #endif } do_add_recommend(direct, fhdr, ent, buf, type); #ifdef ASSESS /* 每 10 次推文 加一次 goodpost */ if (type ==0 && (fhdr->filemode & FILE_MARKED) && fhdr->recommend % 10 == 0) inc_goodpost(fhdr->owner, 1); #endif lastrecommend = now; assert(0<=currbid-1 && currbid-1filename, sizeof(lastrecommend_fname)); return FULLUPDATE; } static int mark_post(int ent, fileheader_t * fhdr, const char *direct) { char buf[STRLEN], fpath[STRLEN]; if (!(currmode & MODE_BOARD)) return DONOTHING; setbpath(fpath, currboard); sprintf(buf, "%s/%s", fpath, fhdr->filename); if( !(fhdr->filemode & FILE_MARKED) && /* 若目前還沒有 mark 才要 check */ access(buf, F_OK) < 0 ) return DONOTHING; fhdr->filemode ^= FILE_MARKED; #ifdef ASSESS if (!(fhdr->filemode & FILE_BID)){ if (fhdr->filemode & FILE_MARKED) { if (!(currbrdattr & BRD_BAD) && fhdr->recommend >= 10) inc_goodpost(fhdr->owner, fhdr->recommend / 10); } else if (fhdr->recommend > 9) inc_goodpost(fhdr->owner, -1 * (fhdr->recommend / 10)); } #endif substitute_ref_record(direct, fhdr, ent); return PART_REDRAW; } int del_range(int ent, const fileheader_t *fhdr, const char *direct) { char num1[8], num2[8]; int inum1, inum2; boardheader_t *bp = NULL; /* 有三種情況會進這裡, 信件, 看板, 精華區 */ if( !(direct[0] == 'h') ){ /* 信件不用 check */ assert(0<=currbid-1 && currbid-1brdname, "Security") == 0) return DONOTHING; } /* rocker.011018: 串接模式下還是不允許刪除比較好 */ if (currmode & MODE_SELECT) { vmsg("請先回到正常模式後再進行刪除..."); return FULLUPDATE; } if ((currstat != READING) || (currmode & MODE_BOARD)) { getdata(1, 0, "[設定刪除範圍] 起點：", num1, 6, DOECHO); inum1 = atoi(num1); if (inum1 <= 0) { vmsg("起點有誤"); return FULLUPDATE; } getdata(1, 28, "終點：", num2, 6, DOECHO); inum2 = atoi(num2); if (inum2 < inum1) { vmsg("終點有誤"); return FULLUPDATE; } getdata(1, 48, msg_sure_ny, num1, 3, LCECHO); if (*num1 == 'y') { outmsg("處理中,請稍後..."); refresh(); #ifdef SAFE_ARTICLE_DELETE if(bp && !(currmode & MODE_DIGEST) && bp->nuser > 30 ) safe_article_delete_range(direct, inum1, inum2); else delete_range(direct, inum1, inum2); #else delete_range(direct, inum1, inum2); #endif fixkeep(direct, inum1); if (currmode & MODE_BOARD) // Ptt:update cache setbtotal(currbid); else if(currstat == RMAIL) setupmailusage(); return DIRCHANGED; } return FULLUPDATE; } return DONOTHING; } static int del_post(int ent, fileheader_t * fhdr, char *direct) { char genbuf[100], newpath[PATHLEN]; int not_owned, tusernum; boardheader_t *bp; assert(0<=currbid-1 && currbid-1filemode & FILE_ANONYMOUS) /* When the file is anonymous posted, fhdr->multi.anon_uid is author. * see do_general() */ tusernum = fhdr->multi.anon_uid; else tusernum = searchuser(fhdr->owner, NULL); if (strcmp(bp->brdname, "Security") == 0) return DONOTHING; if ((fhdr->filemode & FILE_BOTTOM) || (fhdr->filemode & FILE_MARKED) || (fhdr->filemode & FILE_DIGEST) || (fhdr->owner[0] == '-')) return DONOTHING; not_owned = (tusernum == usernum ? 0: 1); if ((!(currmode & MODE_BOARD) && not_owned) || ((bp->brdattr & BRD_VOTEBOARD) && !HasUserPerm(PERM_SYSOP)) || !strcmp(cuser.userid, STR_GUEST)) return DONOTHING; getdata(1, 0, msg_del_ny, genbuf, 3, LCECHO); if (genbuf[0] == 'y') { if( #ifdef SAFE_ARTICLE_DELETE (bp->nuser > 30 && !(currmode & MODE_DIGEST) && !safe_article_delete(ent, fhdr, direct)) || #endif !delete_record(direct, sizeof(fileheader_t), ent) ) { cancelpost(fhdr, not_owned, newpath); #ifdef ASSESS #define SIZE sizeof(badpost_reason) / sizeof(char *) if (not_owned && tusernum > 0 && !(currmode & MODE_DIGEST)) { if (now - atoi(fhdr->filename + 2) > 7 * 24 * 60 * 60) /* post older than a week */ genbuf[0] = 'n'; else getdata(1, 40, "惡劣文章?(y/N)", genbuf, 3, LCECHO); if (genbuf[0]=='y') { int i; char *userid=getuserid(tusernum); int rpt_bid; move(b_lines - 2, 0); for (i = 0; i < SIZE; i++) prints("%d.%s ", i + 1, badpost_reason[i]); prints("%d.%s", i + 1, "其他"); getdata(b_lines - 1, 0, "請選擇[0:取消劣文]:", genbuf, 3, LCECHO); i = genbuf[0] - '1'; if (i >= 0 && i < SIZE) sprintf(genbuf,"劣文退回(%s)", badpost_reason[i]); else if(i==SIZE) { strcpy(genbuf,"劣文退回("); getdata_buf(b_lines, 0, "請輸入原因", genbuf+9, 50, DOECHO); strcat(genbuf,")"); } if(i>=0 && i <= SIZE) { strncat(genbuf, fhdr->title, 64-strlen(genbuf)); #ifdef USE_COOLDOWN add_cooldowntime(tusernum, 60); add_posttimes(tusernum, 15); //Ptt: 凍結 post for 1 hour #endif if (!(inc_badpost(userid, 1) % 5)){ userec_t xuser; post_violatelaw(userid, "Ptt 系統警察", "劣文累計 5 篇", "罰單一張"); mail_violatelaw(userid, "Ptt 系統警察", "劣文累計 5 篇", "罰單一張"); kick_all(userid); passwd_query(tusernum, &xuser); xuser.money = moneyof(tusernum); xuser.vl_count++; xuser.userlevel |= PERM_VIOLATELAW; passwd_update(tusernum, &xuser); } sendalert(userid, ALERT_PWD_BADPOST); mail_id(userid, genbuf, newpath, cuser.userid); #ifdef BAD_POST_RECORD rpt_bid = getbnum(BAD_POST_RECORD); if (rpt_bid > 0) { fileheader_t report_fh; char report_path[PATHLEN]; setbpath(report_path, BAD_POST_RECORD); stampfile(report_path, &report_fh); strcpy(report_fh.owner, "[Ptt警察局]"); snprintf(report_fh.title, sizeof(report_fh.title), "%s 板 %s 板主給予 %s 一篇劣文", currboard, cuser.userid, userid); Copy(newpath, report_path); setbdir(report_path, BAD_POST_RECORD); append_record(report_path, &report_fh, sizeof(report_fh)); touchbtotal(rpt_bid); } #endif /* defined(BAD_POST_RECORD) */ } } } #undef SIZE #endif setbtotal(currbid); if (fhdr->multi.money < 0 || fhdr->filemode & FILE_ANONYMOUS) fhdr->multi.money = 0; if (not_owned && tusernum && fhdr->multi.money > 0 && strcmp(currboard, "Test") && strcmp(currboard, ALLPOST)) { deumoney(tusernum, -fhdr->multi.money); #ifdef USE_COOLDOWN if (bp->brdattr & BRD_COOLDOWN) add_cooldowntime(tusernum, 15); #endif } if (!not_owned && strcmp(currboard, "Test") && strcmp(currboard, ALLPOST)) { if (cuser.numposts) cuser.numposts--; if (!(currmode & MODE_DIGEST && currmode & MODE_BOARD)){ demoney(-fhdr->multi.money); vmsgf("您的文章減為 %d 篇，支付清潔費 %d 銀", cuser.numposts, fhdr->multi.money); } } return DIRCHANGED; } } return FULLUPDATE; } static int // Ptt: 修石頭文 show_filename(int ent, const fileheader_t * fhdr, const char *direct) { if(!HasUserPerm(PERM_SYSOP)) return DONOTHING; vmsgf("檔案名稱: %s ", fhdr->filename); return PART_REDRAW; } static int view_postmoney(int ent, const fileheader_t * fhdr, const char *direct) { if(fhdr->filemode & FILE_ANONYMOUS) /* When the file is anonymous posted, fhdr->multi.anon_uid is author. * see do_general() */ vmsgf("匿名管理編號: %d (同一人號碼會一樣)", fhdr->multi.anon_uid + (int)currutmp->pid); else { int m = query_file_money(fhdr); if(m < 0) m = vmsgf("特殊文章，無價格記錄。"); else m = vmsgf("這一篇文章值 %d 銀", m); /* QQ: enable money listing mode */ if (m == 'Q') { currlistmode = (currlistmode == LISTMODE_MONEY) ? LISTMODE_DATE : LISTMODE_MONEY; vmsg((currlistmode == LISTMODE_MONEY) ? "開啟文章價格列表模式" : "停止列出文章價格"); } } return FULLUPDATE; } #ifdef OUTJOBSPOOL /* 看板備份 */ static int tar_addqueue(void) { char email[60], qfn[80], ans[2]; FILE *fp; char bakboard, bakman; clear(); showtitle("看板備份", BBSNAME); move(2, 0); if (!((currmode & MODE_BOARD) || HasUserPerm(PERM_SYSOP))) { move(5, 10); outs("妳要是板主或是站長才能醬醬啊 -.-\"\""); pressanykey(); return FULLUPDATE; } snprintf(qfn, sizeof(qfn), BBSHOME "/jobspool/tarqueue.%s", currboard); if (access(qfn, 0) == 0) { outs("已經排定行程, 稍後會進行備份"); pressanykey(); return FULLUPDATE; } if (!getdata(4, 0, "請輸入目的信箱：", email, sizeof(email), DOECHO)) return FULLUPDATE; /* check email -.-"" */ if (strstr(email, "@") == NULL || strstr(email, ".bbs@") != NULL) { move(6, 0); outs("您指定的信箱不正確! "); pressanykey(); return FULLUPDATE; } getdata(6, 0, "要備份看板內容嗎(Y/N)?[Y]", ans, sizeof(ans), LCECHO); bakboard = (ans[0] == 'n' || ans[0] == 'N') ? 0 : 1; getdata(7, 0, "要備份精華區內容嗎(Y/N)?[N]", ans, sizeof(ans), LCECHO); bakman = (ans[0] == 'y' || ans[0] == 'Y') ? 1 : 0; if (!bakboard && !bakman) { move(8, 0); outs("可是我們只能備份看板或精華區的耶 ^^\"\"\""); pressanykey(); return FULLUPDATE; } fp = fopen(qfn, "w"); fprintf(fp, "%s\n", cuser.userid); fprintf(fp, "%s\n", email); fprintf(fp, "%d,%d\n", bakboard, bakman); fclose(fp); move(10, 0); outs("系統已經將您的備份排入行程, \n"); outs("稍後將會在系統負荷較低的時候將資料寄給您~ :) "); pressanykey(); return FULLUPDATE; } #endif /* ----------------------------------------------------- */ /* 看板備忘錄、文摘、精華區 */ /* ----------------------------------------------------- */ int b_note_edit_bname(int bid) { char buf[PATHLEN]; int aborted; boardheader_t *fh = getbcache(bid); assert(0<=bid-1 && bid-1brdname, fn_notes); aborted = vedit(buf, NA, NULL); if (aborted == -1) { clear(); outs(msg_cancel); pressanykey(); } else { if (!getdata(2, 0, "設定有效期限天？(n/Y)", buf, 3, LCECHO) || buf[0] != 'n') fh->bupdate = gettime(3, fh->bupdate ? fh->bupdate : now, "有效日期至"); else fh->bupdate = 0; assert(0<=bid-1 && bid-1title + 7); if (!genbuf[0]) return 0; strip_ansi(genbuf, genbuf, STRIP_ALL); strlcpy(bp->title + 7, genbuf, sizeof(bp->title) - 7); assert(0<=currbid-1 && currbid-1filemode & FILE_BOTTOM ? "取消置底公告?(y/N)": "加入置底公告?(y/N)") != 'y' ) return READ_REDRAW; if(!(fhdr->filemode & FILE_BOTTOM) ){ sprintf(buf, "%s.bottom", direct); if(num >= 5){ vmsg("不得超過 5 篇重要公告 請精簡!"); return READ_REDRAW; } fhdr->filemode ^= FILE_BOTTOM; fhdr->multi.refer.flag = 1; fhdr->multi.refer.ref = ent; append_record(buf, fhdr, sizeof(fileheader_t)); } else{ fhdr->filemode ^= FILE_BOTTOM; num = delete_record(direct, sizeof(fileheader_t), ent); } assert(0<=currbid-1 && currbid-1filemode & FILE_DIGEST ? "取消看板文摘?(Y/n)" : "收入看板文摘?(Y/n)") == 'n') return READ_REDRAW; if (fhdr->filemode & FILE_DIGEST) { fhdr->filemode = (fhdr->filemode & ~FILE_DIGEST); if (!strcmp(currboard, "Note") || !strcmp(currboard, "PttBug") || !strcmp(currboard, "Artdsn") || !strcmp(currboard, "PttLaw")) { deumoney(searchuser(fhdr->owner, NULL), -1000); // TODO if searchuser() return 0 if (!(currmode & MODE_SELECT)) fhdr->multi.money -= 1000; else delta = -1000; } } else { fileheader_t digest; char *ptr, buf[PATHLEN]; memcpy(&digest, fhdr, sizeof(digest)); digest.filename[0] = 'G'; strlcpy(buf, direct, sizeof(buf)); ptr = strrchr(buf, '/'); assert(ptr); ptr++; ptr[0] = '\0'; snprintf(genbuf, sizeof(genbuf), "%s%s", buf, digest.filename); if (dashf(genbuf)) unlink(genbuf); digest.filemode = 0; snprintf(genbuf2, sizeof(genbuf2), "%s%s", buf, fhdr->filename); Copy(genbuf2, genbuf); strcpy(ptr, fn_mandex); append_record(buf, &digest, sizeof(digest)); #ifdef GLOBAL_DIGEST assert(0<=currbid-1 && currbid-1brdattr & BRD_HIDE)) { getdata(1, 0, "好文值得出版到全站文摘?(N/y)", genbuf2, 3, LCECHO); if(genbuf2[0] == 'y') do_crosspost(GLOBAL_DIGEST, &digest, genbuf); } #endif fhdr->filemode = (fhdr->filemode & ~FILE_MARKED) | FILE_DIGEST; if (!strcmp(currboard, "Note") || !strcmp(currboard, "PttBug") || !strcmp(currboard, "Artdsn") || !strcmp(currboard, "PttLaw")) { deumoney(searchuser(fhdr->owner, NULL), 1000); // TODO if searchuser() return 0 if (!(currmode & MODE_SELECT)) fhdr->multi.money += 1000; else delta = 1000; } } substitute_ref_record(direct, fhdr, ent); return FULLUPDATE; } static int b_help(void) { show_helpfile(fn_boardhelp); return FULLUPDATE; } static int b_config(void) { boardheader_t *bp=NULL; int touched = 0, finished = 0; bp = getbcache(currbid); while(!finished) { move(b_lines - 13, 0); clrtobot(); outs(MSG_SEPERATOR); prints("\n目前 %s 看板設定:\n", bp->brdname); prints(" 中文敘述: %s\n", bp->title); prints(" 板主名單: %s\n", (bp->BM[0] > ' ')? bp->BM : "(無)"); prints( " " ANSI_COLOR(1;36) "h" ANSI_RESET " - 公開狀態(是否隱形): %s " ANSI_RESET "\n", (bp->brdattr & BRD_HIDE) ? ANSI_COLOR(1)"隱形":"公開"); prints( " " ANSI_COLOR(1;36) "r" ANSI_RESET " - %s " ANSI_RESET "推薦文章\n", (bp->brdattr & BRD_NORECOMMEND) ? ANSI_COLOR(1)"不可":"可以"); #ifndef OLDRECOMMEND prints( " " ANSI_COLOR(1;36) "b" ANSI_RESET " - %s " ANSI_RESET "噓文\n", ((bp->brdattr & BRD_NORECOMMEND) || (bp->brdattr & BRD_NOBOO)) ? ANSI_COLOR(1)"不可":"可以"); #endif { int d = 0; if(bp->brdattr & BRD_NORECOMMEND) { d = -1; } else { if ((bp->brdattr & BRD_NOFASTRECMD) && (bp->fastrecommend_pause > 0)) d = bp->fastrecommend_pause; } prints( " " ANSI_COLOR(1;36) "f" ANSI_RESET " - %s " ANSI_RESET "快速連推文章", d != 0 ? ANSI_COLOR(1)"限制": "可以"); if(d > 0) prints(", 最低間隔時間: %d 秒", d); outs("\n"); } prints( " " ANSI_COLOR(1;36) "i" ANSI_RESET " - 推文時 %s" ANSI_RESET " 記錄來源 IP\n", (bp->brdattr & BRD_IPLOGRECMD) ? ANSI_COLOR(1)"要":"不用"); #ifdef USE_AUTOCPLOG prints( " " ANSI_COLOR(1;36) "x" ANSI_RESET " - 轉錄文章時 %s " ANSI_RESET "自動記錄\n", (bp->brdattr & BRD_CPLOG) ? ANSI_COLOR(1)"會" : "不會" ); #endif prints( " " ANSI_COLOR(1;36) "o" ANSI_RESET " - 若有轉信則發文時預設 %s " ANSI_RESET "\n", (bp->brdattr & BRD_LOCALSAVE) ? "站內存檔(不轉出)" : ANSI_COLOR(1)"站際存檔(轉出)" ); prints( " " ANSI_COLOR(1;36) "e" ANSI_RESET " - 發文權限: %s" ANSI_RESET " (站長才可設定此項)\n", (bp->brdattr & BRD_RESTRICTEDPOST) ? ANSI_COLOR(1)"只有板友才可發文" : "無特別設定" ); prints( " " ANSI_COLOR(1;36) "1" ANSI_RESET " - 未滿十八歲 " ANSI_COLOR(1) "%s" ANSI_RESET " 進入", (bp->brdattr & BRD_OVER18) ? "不可以" : "可以" ); if (!((currmode & MODE_BOARD) || HasUserPerm(PERM_SYSOP))) { vmsg("您對此板無管理權限"); return FULLUPDATE; } switch(tolower(getans("請輸入要改變的設定, 其它鍵結束: "))) { #ifdef USE_AUTOCPLOG case 'x': bp->brdattr ^= BRD_CPLOG; touched = 1; break; #endif case 'o': bp->brdattr ^= BRD_LOCALSAVE; touched = 1; break; case 'e': if(HasUserPerm(PERM_SYSOP)) { bp->brdattr ^= BRD_RESTRICTEDPOST; touched = 1; } else { vmsg("此項設定需要站長權限"); } break; case 'h': #ifndef BMCHS if (!HasUserPerm(PERM_SYSOP)) { vmsg("此項設定需要站長權限"); break; } #endif if(bp->brdattr & BRD_HIDE) { bp->brdattr &= ~BRD_HIDE; bp->brdattr &= ~BRD_POSTMASK; } else { bp->brdattr |= BRD_HIDE; bp->brdattr |= BRD_POSTMASK; } touched = 1; break; case 'r': bp->brdattr ^= BRD_NORECOMMEND; touched = 1; break; case 'i': bp->brdattr ^= BRD_IPLOGRECMD; touched = 1; break; case 'f': bp->brdattr &= ~BRD_NORECOMMEND; bp->brdattr ^= BRD_NOFASTRECMD; touched = 1; if(bp->brdattr & BRD_NOFASTRECMD) { char buf[8] = ""; if(bp->fastrecommend_pause > 0) sprintf(buf, "%d", bp->fastrecommend_pause); getdata_str(b_lines-1, 0, "請輸入連推時間限制(單位: 秒) [5~240]: ", buf, 4, ECHO, buf); if(buf[0] >= '0' && buf[0] <= '9') bp->fastrecommend_pause = atoi(buf); if( bp->fastrecommend_pause < 5 || bp->fastrecommend_pause > 240) { if(buf[0]) { vmsg("輸入時間無效，請使用 5~240 之間的數字。"); } bp->fastrecommend_pause = 0; bp->brdattr &= ~BRD_NOFASTRECMD; } } break; #ifndef OLDRECOMMEND case 'b': if(bp->brdattr & BRD_NORECOMMEND) bp->brdattr |= BRD_NOBOO; bp->brdattr ^= BRD_NOBOO; touched = 1; if (!(bp->brdattr & BRD_NOBOO)) bp->brdattr &= ~BRD_NORECOMMEND; break; #endif case '1': bp->brdattr ^= BRD_OVER18; touched = 1; break; default: finished = 1; break; } } if(touched) { assert(0<=currbid-1 && currbid-1brdattr & BRD_HIDE) && (bp->brdattr & BRD_POSTMASK))) { if (getans("目前看板隱形中, 要解除嗎(y/N)?") != 'y') return FULLUPDATE; bp->brdattr &= ~BRD_HIDE; bp->brdattr &= ~BRD_POSTMASK; outs("君心今傳眾人，無處不聞弦歌。\n"); board_hidden_status = 0; hbflreload(currbid); } else { if (getans("要設定看板為隱形嗎(y/N)?") != 'y') return FULLUPDATE; bp->brdattr |= BRD_HIDE; bp->brdattr |= BRD_POSTMASK; outs("君心今已掩抑，惟盼善自珍重。\n"); board_hidden_status = 1; } assert(0<=currbid-1 && currbid-1brdname); pressanykey(); return FULLUPDATE; } static int change_counting(void) { boardheader_t *bp; if (!((currmode & MODE_BOARD) || HasUserPerm(PERM_SYSOP))) return DONOTHING; bp = getbcache(currbid); if (!(bp->brdattr & BRD_HIDE && bp->brdattr & BRD_POSTMASK)) return FULLUPDATE; if (bp->brdattr & BRD_BMCOUNT) { if (getans("目前板列入十大排行, 要取消列入十大排行嘛(Y/N)?[N]") != 'y') return FULLUPDATE; bp->brdattr &= ~BRD_BMCOUNT; outs("你再灌水也不會有十大的呀。\n"); } else { if (getans("目前看板不列入十大排行, 要列入十大嘛(Y/N)?[N]") != 'y') return FULLUPDATE; bp->brdattr |= BRD_BMCOUNT; outs("快灌水衝十大第一吧。\n"); } assert(0<=currbid-1 && currbid-1brdattr & BRD_LOCALSAVE) { if (getans("目前板預設站內存檔, 要改變嘛(y/N)?") != 'y') return FULLUPDATE; bp->brdattr &= ~BRD_LOCALSAVE; outs("文章預設轉出，請有所節制。\n"); } else { if (getans("目前板預設站際存檔, 要改變嗎(y/N)?") != 'y') return FULLUPDATE; bp->brdattr |= BRD_LOCALSAVE; outs("文章預設不轉出，轉信要自行選擇喔。\n"); } substitute_record(fn_board, bp, sizeof(boardheader_t), currbid); pressanykey(); return FULLUPDATE; #endif } /** * 設定只有板友可 post 或全部人都可 post */ static int change_restrictedpost(void) { vmsg("此功\能已整合進大寫 I 看板設定，請按 I 設定。"); return FULLUPDATE; #if 0 boardheader_t *bp; if (!HasUserPerm(PERM_SYSOP)) return DONOTHING; bp = getbcache(currbid); if (bp->brdattr & BRD_RESTRICTEDPOST) { if (getans("目前只有板友可 post, 要開放嗎(y/N)?") != 'y') return FULLUPDATE; bp->brdattr &= ~BRD_RESTRICTEDPOST; outs("大家都可以 post 文章了。\n"); } else { if (getans("目前全部人都可 post, 要限制為只有板友可 post 嗎(y/N)?") != 'y') return FULLUPDATE; bp->brdattr |= BRD_RESTRICTEDPOST; outs("只剩板友可以 post 了。\n"); } substitute_record(fn_board, bp, sizeof(boardheader_t), currbid); pressanykey(); return FULLUPDATE; #endif } #ifdef USE_COOLDOWN int check_cooldown(boardheader_t *bp) { int diff = cooldowntimeof(usernum) - now; int i, limit[8] = {4000,1,2000,2,1000,3,30,10}; if(diff<0) SHM->cooldowntime[usernum - 1] &= 0xFFFFFFF0; else if( !((currmode & MODE_BOARD) || HasUserPerm(PERM_SYSOP))) { if( bp->brdattr & BRD_COOLDOWN ) { vmsgf("冷靜一下吧！ (限制 %d 分 %d 秒)", diff/60, diff%60); return 1; } else if(posttimesof(usernum)==0xf) { vmsgf("對不起，您被設劣文！ (限制 %d 分 %d 秒)", diff/60, diff%60); return 1; } #ifdef NO_WATER_POST else { for(i=0; i<4; i++) if(bp->nuser>limit[i*2] && posttimesof(usernum)>=limit[i*2+1]) { vmsgf("對不起，您的文章或推文太水囉！ (限制 %d 分 %d 秒)", diff/60, diff%60); return 1; } } #endif // NO_WATER_POST } return 0; } /** * 設定看板冷靜功能, 限制使用者發文時間 */ static int change_cooldown(void) { boardheader_t *bp = getbcache(currbid); if (!(HasUserPerm(PERM_SYSOP) || (HasUserPerm(PERM_SYSSUPERSUBOP) && GROUPOP()))) return DONOTHING; if (bp->brdattr & BRD_COOLDOWN) { if (getans("目前降溫中, 要開放嗎(y/N)?") != 'y') return FULLUPDATE; bp->brdattr &= ~BRD_COOLDOWN; outs("大家都可以 post 文章了。\n"); } else { if (getans("要限制 post 頻率, 降溫嗎(y/N)?") != 'y') return FULLUPDATE; bp->brdattr |= BRD_COOLDOWN; outs("開始冷靜。\n"); } assert(0<=currbid-1 && currbid-1mode; int stat0 = currstat, tmpbid = currutmp->brc_id; char buf[PATHLEN]; #ifdef LOG_BOARD time4_t usetime = now; #endif if ( !currboard[0] ) brc_initial_board(DEFAULT_BOARD); setutmpmode(READING); set_board(); if (board_note_time && board_visit_time < *board_note_time) { int mr; setbfile(buf, currboard, fn_notes); mr = more(buf, NA); if(mr == -1) *board_note_time=0; else if (mr != READ_NEXT) pressanykey(); } setutmpbid(currbid); setbdir(buf, currboard); curredit &= ~EDIT_MAIL; i_read(READING, buf, readtitle, readdoent, read_comms, currbid); currmode &= ~MODE_POSTCHECKED; #ifdef LOG_BOARD log_board(currboard, now - usetime); #endif brc_update(); setutmpbid(tmpbid); currutmp->mode = mode0; currstat = stat0; return 0; } void ReadSelect(void) { int mode0 = currutmp->mode; int stat0 = currstat; currstat = SELECT; if (do_select() == NEWDIRECT) Read(); setutmpbid(0); currutmp->mode = mode0; currstat = stat0; } #ifdef LOG_BOARD static void log_board(iconst char *mode, time4_t usetime) { if (usetime > 30) { log_file(FN_USEBOARD, LOG_CREAT | LOG_VF, "USE %-20.20s Stay: %5ld (%s) %s\n", mode, usetime, cuser.userid, ctime4(&now)); } } #endif int Select(void) { do_select(); return 0; } #ifdef HAVEMOBILE void mobile_message(const char *mobile, char *message) { bsmtp(fpath, title, rcpt); } #endif