diff options
Diffstat (limited to 'mbbsd')
| -rw-r--r-- | mbbsd/Makefile | 6 | ||||
| -rw-r--r-- | mbbsd/menu.c | 3 | ||||
| -rw-r--r-- | mbbsd/merge.c | 128 |
3 files changed, 137 insertions, 0 deletions
diff --git a/mbbsd/Makefile b/mbbsd/Makefile index 1a078380..c60550f3 100644 --- a/mbbsd/Makefile +++ b/mbbsd/Makefile @@ -7,6 +7,7 @@ CFLAGS+= -DBLOG LDFLAGS+= -L/usr/local/lib/mysql -lmysqlclient .endif + PROG= mbbsd OBJS= admin.o announce.o args.o assess.o bbs.o board.o cache.o cal.o card.o\ chat.o chc.o chicken.o convert.o dark.o edit.o fav.o friend.o gamble.o\ @@ -15,6 +16,11 @@ OBJS= admin.o announce.o args.o assess.o bbs.o board.o cache.o cal.o card.o\ register.o screen.o stuff.o talk.o term.o topsong.o user.o brc.o\ vice.o vote.o xyz.o voteboard.o syspost.o var.o passwd.o calendar.o +.if defined(MERGEBBS) +CFLAGS+= -DMERGEBBS +OBJS+= merge.o +.endif + .SUFFIXES: .c .o .c.o: ../include/var.h $(CCACHE) $(CC) $(CFLAGS) -c $*.c diff --git a/mbbsd/menu.c b/mbbsd/menu.c index b1c45f4b..71b63718 100644 --- a/mbbsd/menu.c +++ b/mbbsd/menu.c @@ -393,6 +393,9 @@ const static commands_t userlist[] = { #endif {u_register, PERM_BASIC, "RRegister 填寫《註冊申請單》"}, {u_list, PERM_SYSOP, "UUsers 列出註冊名單"}, +#ifdef MERGEBBS + {m_fpg, PERM_LOGINOK, "FFPG import 花園變身術"}, +#endif {NULL, 0, NULL} }; diff --git a/mbbsd/merge.c b/mbbsd/merge.c new file mode 100644 index 00000000..5494e3df --- /dev/null +++ b/mbbsd/merge.c @@ -0,0 +1,128 @@ +/* $Id: merge.c 2060 2004-06-11 17:18:06Z Ptt $ */ +#define _XOPEN_SOURCE +#define _ISOC99_SOURCE +/* this is a interface provided when we merge BBS */ +#include "bbs.h" +#include "fpg.h" + +int +m_fpg() +{ + char genbuf[256], buf[1024], userid[25], passbuf[24]; + int count=0, i; + FILE *fp; + ACCT man; + time_t d; + + clear(); + move(1,0); + + outs( + "此功\能是專門給各位資深花園使用者,\n" + "把自己的變為資深Ptt使用者,讓花園的使用者享有平等安全的環境.\n" + "直接按[Enter]離開.\n\n" + "特別叮嚀: \n" + " 為了帳號安全,您只有連續三次密碼錯誤的機會,請小心輸入.\n" + " 連續三次錯誤您的變身功\能就會被開罰單並直接通知站長.\n" + " 請不要在變身過程中不正常斷線, 刻意斷線變半獸人站長不負責唷."); + + if(search_ulistn(usernum,2)) + {vmsg("請不要multi-login時使用, 以免變身失敗"); return 0;} + do + { + if(!getdata(8,0, "請小心輸入小魚的ID [英文大小寫要完全正確]:", userid, 20, + DOECHO)) return 0; + if(bad_user_id(userid)) continue; + sprintf(genbuf, "/home/bbs/fpg/home/%c/%s.ACT",userid[0], userid); + if(!(fp=fopen(genbuf, "r"))) + { + vmsg("查無此人或已經匯入過..請注意大小寫 "); + continue; + } + count = fread(&man, sizeof(man), 1, fp); + fclose(fp); + }while(!count); + count = 0; + do{ + getdata(9,0, "請小心輸入您在小魚的密碼:", passbuf, sizeof(passbuf), + NOECHO); + if(++count>=3) + { + cuser.userlevel |= PERM_VIOLATELAW; + cuser.vl_count++; + passwd_update(usernum, &cuser); + post_violatelaw(cuser.userid, "[PTT警察]", "測試小魚帳號錯誤三次", + "違法觀察"); + mail_violatelaw(cuser.userid, "[PTT警察]", "測試小魚帳號錯誤三次", + "違法觀察"); + + return 0; + } + } while(!checkpasswd(man.passwd, passbuf)); + if(!dashf(genbuf)) // avoid multi-login + { + vmsg("查無此人或已經匯入過..請注意大小寫 "); + return 0; + } + sprintf(buf,"%s.done",genbuf); + rename(genbuf,buf); + move(10,0); + reload_money(); + + prints("您的花園幣有 %d 換算成 Ptt 幣為 %d (匯率 155:1), 匯入後共有 %d\n", + man.money, man.money/155, cuser.money + man.money/155); + demoney(man.money/155); + + cuser.exmailbox += man.mailk; + prints("您的花園信相有 %d , 匯入後共有 %d\n", + man.mailk, cuser.exmailbox ); + + if(cuser.firstlogin>man.firstlogin) d = man.firstlogin; + else d = cuser.firstlogin; + prints("花園註冊日期 %s 與此帳號 %s 比 將取 %s", + Cdate(&man.firstlogin), Cdate(&cuser.firstlogin), + Cdate(&d) ); + cuser.firstlogin = d; + + if(cuser.numlogins < man.numlogins) i = man.numlogins; + else i = cuser.numlogins; + + prints("花園進站次數 %d 與此帳號 %d 比 將取 %d", man.numlogins, + cuser.numlogins, i); + cuser.numlogins = i; + + if(cuser.numposts < man.numposts ) i = man.numposts; + else i = cuser.numposts; + prints("花園文章次數 %d 與此帳號 %d 比 將取 %d", man.numposts,cuser.numposts, + i); + cuser.numposts = i; + while(search_ulistn(usernum,2)) + {vmsg("請將重覆上站其他線關閉! 再繼續");} + passwd_update(usernum, &cuser); + sethomeman(genbuf, cuser.userid); + mkdir(genbuf, 0600); + sprintf(buf, "cd home/bbs/fpg/tmp; tar zxvf ../home/%c/%s.tgz" + "cd home/bbs/home/%c; mv %s ../../../..;" + "cd ../../../../%s; ", + userid[0], userid, userid[0], userid, userid); + i = 0; + if (getans("是否匯入個人信箱以及信箱精華區? (Y/n)")!='n') + { + sprintf(genbuf, + "mv M.* /home/bbs/home/%c/%s;" + "mv man/* /home/bbs/home/%c/%s/man;", cuser.userid[0], cuser.userid, + cuser.userid[0], cuser.userid); + strcat(buf,genbuf); + i++; + } + if (getans("是否匯入好友名單? (會覆蓋\現有設定, ID可能是不同人)? (y/N)")=='y') + { + sprintf(genbuf,"mv overrides /home/bbs/home/%c/%s; ", + cuser.userid[0], cuser.userid); + strcat(buf, genbuf); + i++; + } + if(i) system(buf); + vmsg("恭喜您完成帳號變身.."); + return 0; +} |