summaryrefslogtreecommitdiffstats
path: root/mbbsd/assess.c
blob: 231ca71b5374f128709dcb5a5d8be4cdc8c03b8e (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
/* $Id$ */
#include "bbs.h"

#ifdef ASSESS

/* do (*num) + n, n is integer. */
inline static void inc(unsigned char *num, int n)
{
    if (n >= 0 && SALE_MAXVALUE - *num <= n)
    (*num) = SALE_MAXVALUE;
    else if (n < 0 && *num < -n)
    (*num) = 0;
    else
    (*num) += n;
}

#define modify_column(_attr) \
int inc_##_attr(const char *userid, int num) \
{ \
    userec_t xuser; \
    int uid = getuser(userid, &xuser);\
    if( uid > 0 ){ \
    inc(&xuser._attr, num); \
    passwd_update(uid, &xuser); \
    return xuser._attr; }\
    return 0;\
}

modify_column(goodpost); /* inc_goodpost */
modify_column(badpost);  /* inc_badpost */
modify_column(goodsale); /* inc_goodsale */
modify_column(badsale);  /* inc_badsale */

#if 0 //unused function
void set_assess(const char *userid, unsigned char num, int type)
{
    userec_t xuser;
    int uid = getuser(userid, &xuser);
    if(uid<=0) return;
    switch (type){
    case GOODPOST:
        xuser.goodpost = num;
        break;
    case BADPOST:
        xuser.badpost = num;
        break;
    case GOODSALE:
        xuser.goodsale = num;
        break;
    case BADSALE:
        xuser.badsale = num;
        break;
    }
    passwd_update(uid, &xuser);
}
#endif

// how long is AID? see read.c...
#ifndef AIDC_LEN
#define AIDC_LEN (20)
#endif // AIDC_LEN

#define MAXGP (100)

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"
     "\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(ANSI_COLOR(1;33)"確定全部輸入完成了嗎? "
            ANSI_RESET "[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("M文: %s\n", (fh.filemode & FILE_MARKED) ? "正確" : 
            ANSI_COLOR(1;31) "錯誤" 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欄空白按 ENTER");
    }
    vmsgf("%s 看板輸入完成。", bname);
    }
    if (newgp <= cuser.goodpost)
    {
    vmsg("確認優文數目低於已有優文數,不調整。");
    } else {
    if (newgp > MAXGP)
        newgp = MAXGP;
    log_filef("log/fixgoodpost.log", LOG_CREAT,
            "%s %s 自動修正優文數: 由 %d 變為 %d\n", Cdate(&now), cuser.userid,
        cuser.goodpost, newgp);
    cuser.goodpost = newgp;
    if ((currutmp) && (currutmp->alerts & ALERT_PWD_GOODPOST))
        currutmp->alerts &= ~ALERT_PWD_GOODPOST; // use my version
    // update passwd file here?
    passwd_update(usernum, &cuser);
    vmsgf("更新優文數目為%d。", newgp);
    }

    return 0;
}

#endif