diff options
Diffstat (limited to 'util/chkhbf.c')
| -rw-r--r-- | util/chkhbf.c | 161 |
1 files changed, 161 insertions, 0 deletions
diff --git a/util/chkhbf.c b/util/chkhbf.c new file mode 100644 index 00000000..e63c13fe --- /dev/null +++ b/util/chkhbf.c @@ -0,0 +1,161 @@ +/* $Id: shmctl.c 1484 2004-01-15 17:37:12Z in2 $ */ +#include "bbs.h" + +struct { + char userid[IDLEN + 1]; + time_t lastlogin, expire; +} explist[MAX_FRIEND]; +time_t now; + +void usage(void) +{ + fprintf(stderr, "通知隱板板主是否有板友過期/已經過期\n" + "usage: chkhbf [-a] [board name [board name]]\n"); +} + +int mailalertuid(int tuid) +{ + userinfo_t *uentp=NULL; + if(tuid>0 && (uentp = (userinfo_t *)search_ulist(tuid)) ) + uentp->mailalert=1; + return 0; +} + +char *CTIMEx(char *buf, time_t t) +{ + strcpy(buf, ctime(&t)); + buf[strlen(buf) - 1] = 0; + return buf; +} + +void informBM(char *userid, boardheader_t *bptr, int nEXP) +{ + int uid, i; + char filename[256], buf[64]; + fileheader_t mymail; + FILE *fp; + if( !(uid = getuser(userid)) ) + return; + sprintf(filename, BBSHOME "/home/%c/%s", userid[0], userid); + stampfile(filename, &mymail); + if( (fp = fopen(filename, "w")) == NULL ) + return; + + printf("brdname: %s, BM: %s\n", bptr->brdname, userid); + fprintf(fp, + "作者: 系統通知.\n" + "標題: 警告: 貴板板友即將過期/已經過期\n" + "時間: %s\n" + " %s 的板主您好: \n" + " 下列貴板板友即將過期或已經過期:\n" + "------------------------------------------------------------\n", + CTIMEx(buf, now), bptr->brdname); + for( i = 0 ; i < nEXP ; ++i ) + if( explist[i].expire == -1 ) + fprintf(fp, "%-15s 已經過期\n", explist[i].userid); + else + fprintf(fp, "%-15s 即將在 %s 過期\n", + explist[i].userid, CTIMEx(buf, explist[i].expire)); + fprintf(fp, + "------------------------------------------------------------\n" + "說明:\n" + " 為了節省系統資源, 系統將自動清除掉超過四個月未上站\n" + "的使用者. 此時若有某位您不認識的使用者恰好註冊了該帳號,\n" + "將會視為貴板板友而放行進入.\n" + " 建議您暫時將這些使用者自貴板的板友名單中移除.\n" + "\n" + " 這封信件是由程式自動發出, 請不要直接回覆這封信. 若\n" + "您有相關問題請麻煩至看板 SYSOP, 或是直接與看板總管聯繫. :)\n" + "\n" + BBSNAME "站長群敬上" + ); + fclose(fp); + + strcpy(mymail.title, "警告: 貴板板友即將過期/已經過期"); + strcpy(mymail.owner, "系統通知."); + sprintf(filename, BBSHOME "/home/%c/%s/.DIR", userid[0], userid); + mailalertuid(uid); + append_record(filename, &mymail, sizeof(mymail)); +} + +void chkhbf(boardheader_t *bptr) +{ + char fn[256], chkuser[256]; + int i, nEXP = 0; + FILE *fp; + sprintf(fn, "boards/%c/%s/visable", bptr->brdname[0], bptr->brdname); + if( (fp = fopen(fn, "rt")) == NULL ) + return; + while( fgets(chkuser, sizeof(chkuser), fp) != NULL ){ + for( i = 0 ; chkuser[i] != 0 && i < sizeof(chkuser) ; ++i ) + if( !isalnum(chkuser[i]) ){ + chkuser[i] = 0; + break; + } + if( !getuser(chkuser) || strcmp(chkuser, "guest") == 0 ){ + strcpy(explist[nEXP].userid, chkuser); + explist[nEXP].expire = -1; + ++nEXP; + } + else if( (xuser.lastlogin < now - 86400 * 90) && + !(xuser.userlevel & PERM_XEMPT) ){ + strcpy(explist[nEXP].userid, chkuser); + explist[nEXP].lastlogin = xuser.lastlogin; + explist[nEXP].expire = xuser.lastlogin + 86400 * 120; + ++nEXP; + } + } + fclose(fp); + if( nEXP ){ + char BM[IDLEN * 3 + 3], *p; + strlcpy(BM, bptr->BM, sizeof(BM)); + for( p = BM ; *p != 0 ; ++p ) + if( !isalpha(*p) && !isdigit(*p) ) + *p = ' '; + for( i = 0, p = strtok(BM, " ") ; p != NULL ; + ++i, p = strtok(NULL, " ") ) + informBM(p, bptr, nEXP); + } +} + +int main(int argc, char **argv) +{ + int ch, allboards = 0, i; + boardheader_t *bptr; + while( (ch = getopt(argc, argv, "ah")) != -1 ) + switch( ch ){ + case 'a': + allboards = 1; + break; + case 'h': + usage(); + return 0; + } + + chdir(BBSHOME); + attach_SHM(); + argc -= optind; + argv += optind; + now = time(NULL); + if( allboards ){ + for( i = 0 ; i < MAX_BOARD ; ++i ){ + bptr = &bcache[i]; + if( bptr->brdname[0] && + !(bptr->brdattr & (BRD_TOP | BRD_GROUPBOARD)) && + bptr->brdattr & BRD_HIDE ) + chkhbf(bptr); + } + } + else if( argc > 0 ){ + int bid; + for( i = 0 ; i < argc ; ++i ) + if( (bid = getbnum(argv[i])) != 0 ) // XXX: bid start 1 + chkhbf(getbcache(bid)); + else + fprintf(stderr, "%s not found\n", argv[i]); + } + else + usage(); + + return 0; +} |