/* 使用者管理 */
int
m_user(void)
{
userec_t xuser;
int id;
char genbuf[200];
vs_hdr("使用者設定");
usercomplete(msg_uid, genbuf);
if (*genbuf) {
move(2, 0);
if ((id = getuser(genbuf, &xuser))) {
user_display(&xuser, 1);
if( HasUserPerm(PERM_ACCOUNTS) )
uinfo_query(xuser.userid, 1, id);
else
pressanykey();
} else {
outs(err_uid);
clrtoeol();
pressanykey();
}
}
return 0;
}
/* user main function, called by AppFramework after FogCloud connected.
*/
OSStatus user_main( mico_Context_t * const mico_context )
{
user_log_trace();
OSStatus err = kUnknownErr;
/* init user modules (pins && sensor init)*/
err = user_modules_init();
require_noerr_action( err, exit, user_log("ERROR: user_modules_init err=%d.", err) );
/* recovery user settings from flash && set initail state of user modules */
//err = user_settings_recovery(mico_context, &g_user_context);
//require_noerr_action( err, exit, user_log("ERROR: user_settings_recovery err=%d.", err) );
#if (MICO_CLOUD_TYPE != CLOUD_DISABLED)
/* start properties notify task */
err = mico_start_properties_notify(mico_context, service_table,
MICO_PROPERTIES_NOTIFY_INTERVAL_MS,
STACK_SIZE_NOTIFY_THREAD);
require_noerr_action( err, exit, user_log("ERROR: mico_start_properties_notify err = %d.", err) );
#endif
while(1){
/* user thread running state */
user_display(&g_user_context);
user_test(&g_user_context);
/* check every 1 seconds */
mico_thread_msleep(1000);
/* save user settings into flash */
//err = user_settings_update(mico_context, &g_user_context);
//require_noerr_action( err, exit, user_log("ERROR: user_settings_update err=%d.", err) );
}
exit:
user_log("ERROR: user_main exit with err=%d", err);
return err;
}
int
Goodbye()
{
extern void movie();
char genbuf[200];
/*
woju
*/
char ans[4];
setuserfile(genbuf, fn_writelog);
if (more(genbuf, NA) != -1) {
/* MH */
/* Àˬd¤ô²y°O¿ý®e¶q, ÁקK¦³¤H¡u¤Ù¿n¡v¤j¶q¤ô²y */
struct stat st;
int writelog_limit;
if (HAS_PERM(PERM_BM))
writelog_limit = MH_WRITELOGLIMIT_BM;
else if (HAS_PERM(PERM_LOGINOK))
writelog_limit = MH_WRITELOGLIMIT_LOGINOK;
else
writelog_limit = MH_WRITELOGLIMIT_BASIC;
do
{
char buf[80];
setuserfile(buf, fn_writelog);
stat(buf, &st);
if(!HAVE_PERM(PERM_SYSOP) && !HAVE_PERM(PERM_MAILLIMIT) && st.st_size / 1024 > writelog_limit)
{
my_outmsg_row("[1;41;37m±zªº¤ô²y°O¿ý¤w¶W¹L©w®e¶q¡AµLªk¿ï¾Ü¡u«O¯d¡v[0m", b_lines - 2);
getdata(b_lines - 1, 0, "²M°£(C) ²¾¦Ü³Æ§Ñ¿ý(M) (C/M)?[M]",
ans, 3, LCECHO, 0);
}
else
{
getdata(b_lines - 1, 0, "²M°£(C) ²¾¦Ü³Æ§Ñ¿ý(M) «O¯d(R) (C/M/R)?[R]",
ans, 3, LCECHO, 0);
}
if (*ans == 'm') {
fileheader mymail;
char title[128], buf[80];
sethomepath(buf, cuser.userid);
stampfile(buf, &mymail);
mymail.savemode = 'H'; /* hold-mail flag */
mymail.filemode = FILE_READ;
strcpy(mymail.owner, "[³Æ.§Ñ.¿ý]");
strcpy(mymail.title, "¼ö½u[37;41m°O¿ý[m");
if(mh_memoforward(cuser.userid, genbuf, &mymail, sizeof(mymail)))
{
sethomedir(title, cuser.userid);
append_record(title, &mymail, sizeof(mymail));
/* MH: ³Æ§Ñ¿ý¥[¤W§@ªÌ¼ÐÃDµ¥¸ê°T...¤£µM¦b'x'Âà±H©Î¬Obuildirªº®ÉÔ
·|Äê±¼ */
#if 1
{
FILE *src, *dst;
char buf2[200];
time_t now;
if((src = fopen(genbuf, "r")) == NULL)
{
sprintf(buf2, "errno: %d, genbuf:%s", errno, genbuf);
log_usies("MH ", buf2);
}
if((dst = fopen(buf, "w")) == NULL)
{
sprintf(buf2, "errno: %d, buf:%s", errno, buf);
log_usies("MH ", buf2);
fclose(src);
}
now = time(NULL);
sprintf(buf2, "§@ªÌ: %s\n¼ÐÃD: %s\n®É¶¡: %s\n", mymail.owner, mymail.title, ctime(&now));
fputs(buf2, dst);
while(fgets(buf2, 199, src) != NULL)
fputs(buf2, dst);
fclose(src);
fclose(dst);
unlink(genbuf);
}
#else
Rename(genbuf, buf);
#endif
}
}
else if (*ans == 'c') {
char buf[80];
setuserfile(buf, fn_writelog);
unlink(buf);
}
} while(!HAVE_PERM(PERM_SYSOP) && !HAVE_PERM(PERM_MAILLIMIT) && st.st_size / 1024 > writelog_limit && *ans != 'm' && *ans != 'c');
clear();
move(0, 0);
prints("[1;44;33m °ª¶¯¤¤¾Ç-¬õ¼Ó¿v¹Ú [m");
movie(0);
}
/* */
getdata(b_lines - 1, 0, "±z½T©wnÂ÷¶}¡i " BOARDNAME " ¡j¶Ü(Y/N)¡H[N] ",
genbuf, 3, LCECHO, 0);
if (*genbuf != 'y')
return 0;
movie(999);
if (cuser.userlevel)
{
getdata(b_lines - 1, 0, "(G)ÀH·¦Ó³u (M)¦«¹Ú¯¸ªø (N)¦X§@ªÀªº¨¥½×¼s³õ¡H[G] ",
genbuf, 3, LCECHO, 0);
if (genbuf[0] == 'm')
mail_sysop();
else if (genbuf[0] == 'n')
note();
}
save_userrc();
#if 0
save_mailmsg();
#endif
clear();
prints("[1;36m¿Ë·Rªº [33m%s(%s)[36m¡A§O§Ñ¤F¦A«×¥úÁ{[45;33m"
" %s [40;36m¡I\n¥H¤U¬O±z¦b¯¸¤ºªºµù¥U¸ê®Æ:[0m\n",
cuser.userid, cuser.username, BoardName);
user_display(&cuser, 0);
if (currmode)
u_exit("EXIT ");
pressanykey();
sleep(1);
reset_tty();
exit(0);
}
static int
search_key_user(const char *passwdfile, int mode)
{
userec_t user;
int ch;
int unum = 0;
FILE *fp1 = fopen(passwdfile, "r");
char friendfile[PATHLEN]="", key[22], *keymatch;
int keytype = 0;
int isCurrentPwd;
assert(fp1);
isCurrentPwd = (strcmp(passwdfile, FN_PASSWD) == 0);
clear();
if (!mode)
{
getdata(0, 0, "請輸入id :", key, sizeof(key), DOECHO);
} else {
// improved search
vs_hdr("關鍵字搜尋");
outs("搜尋欄位: [0]全部 1.ID 2.姓名 3.暱稱 4.地址 5.Mail 6.IP 7.職業 8.認證\n");
getdata(2, 0, "要搜尋哪種資料？", key, 2, NUMECHO);
if (isascii(key[0]) && isdigit(key[0]))
keytype = key[0] - '0';
if (keytype < 0 || keytype > 8)
keytype = 0;
getdata(3, 0, "請輸入關鍵字: ", key, sizeof(key), DOECHO);
}
if(!key[0]) {
fclose(fp1);
return 0;
}
vs_hdr(key);
// <= or < ? I'm not sure...
while ((fread(&user, sizeof(user), 1, fp1)) > 0 && unum++ < MAX_USERS) {
// skip empty records
if (!user.userid[0])
continue;
if (!(unum & 0xFF)) {
vs_hdr(key);
prints("第 [%d] 筆資料\n", unum);
refresh();
}
// XXX 這裡會取舊資料，要小心 PWD 的 upgrade
if (!upgrade_passwd(&user))
continue;
keymatch = NULL;
if (!mode)
{
// only verify id
if (!strcasecmp(user.userid, key))
keymatch = user.userid;
} else {
// search by keytype
if ((!keytype || keytype == 1) &&
DBCS_strcasestr(user.userid, key))
keymatch = user.userid;
else if ((!keytype || keytype == 2) &&
DBCS_strcasestr(user.realname, key))
keymatch = user.realname;
else if ((!keytype || keytype == 3) &&
DBCS_strcasestr(user.nickname, key))
keymatch = user.nickname;
else if ((!keytype || keytype == 4) &&
DBCS_strcasestr(user.address, key))
keymatch = user.address;
else if ((!keytype || keytype == 5) &&
strcasestr(user.email, key)) // not DBCS.
keymatch = user.email;
else if ((!keytype || keytype == 6) &&
strcasestr(user.lasthost, key)) // not DBCS.
keymatch = user.lasthost;
else if ((!keytype || keytype == 7) &&
DBCS_strcasestr(user.career, key))
keymatch = user.career;
else if ((!keytype || keytype == 8) &&
DBCS_strcasestr(user.justify, key))
keymatch = user.justify;
}
if(keymatch) {
vs_hdr(key);
prints("第 [%d] 筆資料\n", unum);
refresh();
user_display(&user, 1);
// user_display does not have linefeed in tail.
if (isCurrentPwd && HasUserPerm(PERM_ACCOUNTS))
uinfo_query(user.userid, 1, unum);
else
outs("\n");
// XXX don't trust 'user' variable after here
// because uinfo_query may have changed it.
outs(ANSI_COLOR(44) " 空白鍵" \
ANSI_COLOR(37) ":搜尋下一個 " \
ANSI_COLOR(33)" Q" ANSI_COLOR(37)": 離開");
outs(mode ?
" A: add to namelist " ANSI_RESET " " :
" S: 取用備份資料 " ANSI_RESET " ");
while (1) {
while ((ch = vkey()) == 0)
;
if (ch == 'a' || ch=='A' )
{
if(!friendfile[0])
{
friend_special();
setfriendfile(friendfile, FRIEND_SPECIAL);
}
friend_add(user.userid, FRIEND_SPECIAL, keymatch);
break;
}
if (ch == ' ')
break;
if (ch == 'q' || ch == 'Q') {
fclose(fp1);
return 0;
}
if (ch == 's' && !mode) {
if (retrieve_backup(&user) >= 0) {
fclose(fp1);
vmsg("已成功\取用備份資料。");
return 0;
} else {
vmsg("錯誤: 取用備份資料失敗。");
}
}
}
}
