回精華區
作者guessi.bbs@bbs.wretch.cc (沒) 看板: plan
標題[功能] 查詢使用者上站來源
時間無名小站 (2006/06/07 Wed 15:40:30) Updated: 2006/06/07
Admin選單新增查詢使用者上站來源 :p

:/src/maple/menu.c

+  "bin/admutil.so:a_show_from", PERM_ALLREG, - M_SYSTEM,
+  "ShowFrom   ◤ 來源顯示 ◢",

:/src/so/admutil.c 新增

int
a_show_from()
{
  ACCT acct;
  char fpath[64], tmp[64], last[4], cmd[128];

  if (vans("是否查詢(Y/N)?[N] ") != 'y')
    return XEASY; /* 預設不查詢 */

  if (acct_get(msg_uid, &acct) > 0)
  {
    usr_fpath(fpath, acct.userid, FN_LOG);

    sprintf(cmd, "查詢使用者 %-13s上站來源", acct.userid);
    alog("查詢來源", cmd);

    if (vget(b_lines, 0, "欲查詢最後幾筆資料(顯示全部請按Enter鍵繼續) ",
      last, 4, DOECHO))
    {
      sprintf(tmp, "tmp/showfrom.%s", acct.userid);
      sprintf(cmd, "cat %s | tail -%s > %s", fpath, last, tmp);
      system(cmd);
      more(tmp, NULL);
      unlink(tmp);
    }
    else
      more(fpath, NULL);
  }
  return 0;
}

--
夫兵者不祥之器物或惡之故有道者不處君子居則貴左用兵則貴右兵者不祥之器非君子
之器不得已而用之恬淡為上勝而不美而美之者是樂殺人夫樂殺人者則不可得志於天下
矣吉事尚左凶事尚右偏將軍居左上將軍居右言以喪禮處之殺人之眾以哀悲泣之戰勝以
喪禮處之道常無名樸雖小天下莫能臣侯王若能守之萬物將自賓天地相合以降甘露民莫
之令而自均始制有名名亦既有夫亦將知止知止 61-231-202-81.dynamic.hinet.net
精華選讀←離開[主題上]主題下(k)上篇(j)下篇S/a搜尋 G串列 TAB精華 ↑↓捲 Pg/Space翻