- add 'good post auto recovery' tool

git-svn-id: http://opensvn.csie.org/pttbbs/trunk/pttbbs@3739 63ad8ddf-47c3-0310-b6dd-a9e9d9715204

2 files changed, 204 insertions, 0 deletions

diff --git a/mbbsd/assess.c b/mbbsd/assess.c
index abaa77fb..52b7043c 100644
--- a/mbbsd/assess.c
+++ b/mbbsd/assess.c
@@ -55,4 +55,206 @@ void set_assess(const char *userid, unsigned char num, int type)
 }
 #endif
 
+// how long is AID? see read.c...
+#ifndef AIDC_LEN
+#define AIDC_LEN (20)
+#endif // AIDC_LEN
+
+#define MAXGP (10)
+
+int 
+u_fixgoodpost(void)
+{
+    char endinput = 0, newgp = 0;
+    int bid;
+    char bname[IDLEN+1];
+    char xaidc[AIDC_LEN+1];
+
+    aidu_t gpaids[MAXGP+1];
+    int    gpbids[MAXGP+1];
+    int    cgps = 0;
+
+    clear();
+    stand_title("自動優文修正程式");
+    
+    outs("開始修正優文之前，有些功\課要麻煩您先查好：\n\n"
+	 "請先找到你所有的優文文章的看版與" AID_DISPLAYNAME "\n"
+	 AID_DISPLAYNAME "的查詢方法是在該篇文章前面按下大寫 Q 。\n"
+	 "查好後請把這些資料放在手邊，等下會請您輸入。\n\n");
+    outs("如果一切都準備好了，請按下 y 開始，或其它任意鍵跳出。\n\n");
+    if (getans("優文的資料都查好了嗎？") != 'y')
+    {
+	vmsg("跳出修正程式。");
+	return 0;
+    }
+    while (!endinput && newgp < MAXGP)
+    {
+	int y, x = 0;
+	boardheader_t *bh = NULL;
+
+	move(1, 0); clrtobot();
+	outs("請依序輸入優文資訊，全部完成後按 ENTER 即可停止。\n");
+
+	move(b_lines-2, 0); clrtobot();
+	prints("目前已確認優文數目: %d" ANSI_RESET "\n\n", newgp);
+
+	if (!getdata(5, 0, "請輸入優文文章所在看板名稱: ", 
+		    bname, sizeof(bname), DOECHO))
+	{
+	    move(5, 0); 
+	    if (getans("確定全部輸入完成了嗎？ [y/N]: ") != 'y')
+		continue;
+	    endinput = 1; break;
+	}
+	move (6, 0);
+	outs("確認看板... ");
+	if (bname[0] == '\0' || !(bid = getbnum(bname)))
+	{
+	    outs(ANSI_COLOR(1;31) "看板不存在！");
+	    vmsg("請重新輸入。");
+	    continue;
+	}
+	assert(0<=bid-1 && bid-1<MAX_BOARD);
+	bh = getbcache(bid);
+	strlcpy(bname, bh->brdname, sizeof(bname));
+	prints("已找到看板 --> %s\n", bname);
+	getyx(&y, &x);
+
+	// loop AID query
+	while (newgp < MAXGP)
+	{
+	    int n;
+	    int fd;
+	    char dirfile[PATHLEN];
+	    char *sp;
+	    aidu_t aidu = 0;
+	    fileheader_t fh;
+
+	    move(y, 0); clrtobot();
+	    move(b_lines-2, 0); clrtobot();
+	    prints("目前已確認優文數目: %d" ANSI_RESET "\n\n", newgp);
+
+	    if (getdata(y, 0, "請輸入" AID_DISPLAYNAME ": #",
+		    xaidc, AIDC_LEN, DOECHO) == 0)
+		break;
+
+	    sp = xaidc;
+	    while(*sp == ' ') sp ++;
+	    if(*sp == '#') sp ++;
+
+	    if((aidu = aidc2aidu(sp)) <= 0)
+	    {
+		outs(ANSI_COLOR(1;31) AID_DISPLAYNAME "格式不正確！");
+		vmsg("請重新輸入。");
+		continue;
+	    }
+
+	    // check repeated input of same board+AID.
+	    for (n = 0; n < cgps; n++)
+	    {
+		if (gpaids[n] == aidu && gpbids[n] == bid)
+		{
+		    vmsg("您已輸入過此優文了，請重新輸入。");
+		    aidu = 0;
+		    break;
+		}
+	    }
+
+	    if (aidu <= 0)
+		continue;
+	    
+	    // find aidu in board
+	    n = -1;
+	    // see read.c, search .bottom first.
+	    if (n < 0)
+	    {
+		outs("搜尋置底文章...");
+		setbfile(dirfile, bname, FN_DIR ".bottom");
+		n = search_aidu(dirfile, aidu);
+	    }
+	    if (n < 0) {
+		// search board
+		outs("未找到。\n搜尋看板文章..");
+		setbfile(dirfile, bname, FN_DIR);
+		n = search_aidu(dirfile, aidu);
+	    }
+	    if (n < 0)
+	    {
+		// search digest
+		outs("未找到。\n搜尋文摘..");
+		setbfile(dirfile, currboard, fn_mandex);
+		n = search_aidu(dirfile, aidu);
+	    } 
+	    if (n < 0) 
+	    {
+		// search failed...
+		outs("未找到\n" ANSI_COLOR(1;31) "找不到文章！");
+		vmsg("請確認後重新輸入。");
+		continue;
+	    }
+
+	    // found something
+	    fd = open(dirfile, O_RDONLY);
+	    if (fd < 0)
+	    {
+		outs(ANSI_COLOR(1;31) "系統錯誤。 請稍候再重試。\n");
+		vmsg("若持續發生請至" GLOBAL_BUGREPORT "報告。");
+		continue;
+	    }
+
+	    lseek(fd, n*sizeof(fileheader_t), SEEK_SET);
+	    memset(&fh, 0, sizeof(fh));
+	    read(fd, &fh, sizeof(fh));
+	    outs("\n開始核對資料...\n");
+	    n = 1;
+	    if (strcmp(fh.owner, cuser.userid) != 0)
+		n = 0;
+	    prints("作者: %s (%s)\n", fh.owner, n ? "正確" : 
+		    ANSI_COLOR(1;31) "錯誤" ANSI_RESET);
+	    if (!(fh.filemode & FILE_MARKED))
+		n = 0;
+	    prints("Ｍ文: %s\n", n ? "正確" : 
+		    ANSI_COLOR(1;3) "錯誤" ANSI_RESET);
+	    prints("推薦: %d\n", fh.recommend);
+	    close(fd);
+	    if (!n)
+	    {
+		vmsg("輸入的文章並非優文，請重新輸入。");
+		continue;
+	    }
+	    n = fh.recommend / 10;
+	    prints("計算優文數值: %+d\n", n);
+
+	    if (n > 0)
+	    {
+		// log new data
+		newgp += n;
+		gpaids[cgps] = aidu;
+		gpbids[cgps] = bid;
+		cgps ++;
+	    }
+
+	    clrtobot();
+
+
+	    vmsg("優文已確認。若要輸入其它看板的文章請在AID欄直接按空白。");
+	}
+	vmsgf("%s 看板輸入完成。", bname);
+    }
+    if (newgp <= cuser.goodpost)
+    {
+	vmsg("確認優文數目低於已有優文數，不調整。");
+    } else {
+	log_filef("log/fixgoodpost.log", LOG_CREAT,
+	        "%s %s 自動修正優文數: 由 %d 變為 %d\n", Cdate(&now), cuser.userid,
+		cuser.goodpost, newgp);
+	cuser.goodpost = newgp;
+	// update passwd file here?
+	passwd_update(usernum, &cuser);
+	vmsgf("更新優文數目為%d。", newgp);
+    }
+
+    return 0;
+}
+
 #endif
diff --git a/mbbsd/menu.c b/mbbsd/menu.c
index 8b11439d..0fe12f0f 100644
--- a/mbbsd/menu.c
+++ b/mbbsd/menu.c
@@ -455,6 +455,7 @@ int u_customize()
     return 0;
 }
 
+int u_fixgoodpost(void); // assess.c
 /* User menu */
 static const commands_t userlist[] = {
     {u_customize, PERM_LOGINOK,     "UUCustomize    個人化設定"},
@@ -471,6 +472,7 @@ static const commands_t userlist[] = {
     {u_register, MENU_UNREGONLY,    "RRegister      填寫《註冊申請單》"},
 #ifdef ASSESS
     {u_cancelbadpost, PERM_LOGINOK, "BBye BadPost   申請刪除劣文"},
+    {u_fixgoodpost, PERM_LOGINOK,   "FFix GoodPost  修復優文"},
 #endif // ASSESS
     {u_list, PERM_SYSOP,            "XUsers         列出註冊名單"},
 #ifdef MERGEBBS