int x_love() {
char buf1[200], save_title[TTLEN + 1];
char receiver[61], path[STRLEN] = "home/";
int x, y = 0, tline = 0, poem = 0;
FILE *fp, *fpo;
time_t timenow;
struct tm *gtime;
fileheader_t mhdr;
setutmpmode(LOVE);
time(&timenow);
gtime = localtime(&timenow);
sprintf(buf1,"%c/%s/love%d%d",
cuser.userid[0], cuser.userid,gtime->tm_sec,gtime->tm_min);
strcat(path,buf1);
move(1,0);
clrtobot();
outs("\n歡迎使用情書產生器 v0.00 版 \n");
outs("有何難以啟齒的話,交由系統幫你說吧.\n爸爸說 : 濫情不犯法.\n");
if(!getdata(7, 0, "收信人：", receiver, 60, DOECHO)) return 0;
if(receiver[0] && !(searchuser(receiver) &&
getdata(8, 0, "主 題：", save_title,
TTLEN, DOECHO))) {
move(10, 0);
outs("收信人或主題不正確, 情書無法傳遞. ");
pressanykey();
return 0;
}
fpo = fopen(path, "w");
fprintf(fpo, "\n");
if((fp = fopen(DATA, "r"))) {
while(fgets(buf1,100, fp)) {
switch(buf1[0]) {
case '#':
break;
case '@':
if(!strncmp(buf1, "@begin", 6) || !strncmp(buf1, "@end", 4))
tline=3;
else if(!strncmp(buf1,"@poem",5)) {
poem = 1;
tline = 1;
fprintf(fpo, "\n\n");
} else
tline=2;
break;
case '1':
case '2':
case '3':
case '4':
case '5':
case '6':
case '7':
case '8':
case '9':
sscanf(buf1,"%d",&x);
y = (rand() % (x - 1)) * tline;
break;
default:
if(!poem) {
if(y > 0)
y = y - 1;
else {
if(tline > 0) {
fprintf(fpo, "%s", buf1);
tline--;
}
}
} else {
if(buf1[0] == '$')
y--;
else if(y == 0)
fprintf(fpo,"%s",buf1);
}
}
}
fclose(fp);
fclose(fpo);
if(vedit(path, YEA, NULL) == -1) {
unlink(path);
clear();
outs("\n\n 放棄寄情書\n");
pressanykey();
return -2;
}
sethomepath(buf1, receiver);
stampfile(buf1, &mhdr);
Rename(path, buf1);
strncpy(mhdr.title, save_title, TTLEN);
strcpy(mhdr.owner, cuser.userid);
mhdr.savemode = '\0';
sethomedir(path, receiver );
if(append_record(path, &mhdr, sizeof(mhdr)) == -1)
return -1;
hold_mail(buf1, receiver);
return 1;
}
return 0;
}
static void textboxdel(textbox t)
{
EditorData p = getdata(t);
deleditordata(p);
}
static void editorundo(control m)
{
textbox t = getdata(m);
undotext(t);
}
static void lt(void)
{
getdata(0,0);
R.Treg = R.ALU.w.l;
}
static void menueditorsaveas(control m)
{
editor c = getdata(m);
editorsaveas(c);
}
static void dmov(void)
{
getdata(0,0);
M_WRTRAM((memaccess + 1),R.ALU.w.l);
}
static void lar_ar0(void)
{
getdata(0,0);
R.AR[0] = R.ALU.w.l;
}
int main(int argc, char *argv[])
{
pid_t traced_process;
struct user_regs_struct oldregs, regs;
long ins;
int len = 41;
long addr;
// 这段代码是hello.c 反汇编之后的代码
//
//(gdb) x/40bx main+3
// 0x80483ce <main+3>: 0xeb 0x15 0x5e 0xb8 0x04 0x00 0x00 0x00
// 0x80483d6 <main+11>: 0xbb 0x02 0x00 0x00 0x00 0x89 0xf1 0xba
// 0x80483de <main+19>: 0x0c 0x00 0x00 0x00 0xcd 0x80 0xcc 0xe8
// 0x80483e6 <forward+1>: 0xe6 0xff 0xff 0xff 0x48 0x65 0x6c 0x6c
// 0x80483ee <forward+9>: 0x6f 0x20 0x57 0x6f 0x72 0x6c 0x64 0x0a
// (gdb) quit
char insertcode[] =
"\xeb\x15\x5e\xb8\x04\x00"
"\x00\x00\xbb\x02\x00\x00\x00\x89\xf1\xba"
"\x0c\x00\x00\x00\xcd\x80\xcc\xe8\xe6\xff"
"\xff\xff\x48\x65\x6c\x6c\x6f\x20\x57\x6f"
"\x72\x6c\x64\x0a\x00";
char backup[len];
if(argc != 2) {
printf("Usage: %s <pid %s to be traced>\n", argv[0], argv[1]);
exit(1);
}
traced_process = atoi(argv[1]);
ins = ptrace(PTRACE_ATTACH, traced_process, NULL, NULL);
if (ins == -1)
{
err_sys("ptrace PTRACE_ATTACH");
}
wait(NULL);
ins = ptrace(PTRACE_GETREGS, traced_process, NULL, ®s);
if (ins == -1)
err_sys("ptrace PTRACE_GETREGS");
addr = freespaceaddr(traced_process);
printf("addr:%lx\n", addr);
getdata(traced_process, addr, backup, len);
putdata(traced_process, addr, insertcode, len);
memcpy(&oldregs, ®s, sizeof(regs));
// 执行的插入指令 放入eip
regs.eip = addr;
printf("The will set insertcode\n");
// 设置 eip寄存器，也就是指令寄存器
ins = ptrace(PTRACE_SETREGS, traced_process, NULL, ®s);
if (ins == -1)
err_sys("ptrace PTRACE_GETREGS");
printf("PTRACE_CONT---\n");
ins = ptrace(PTRACE_CONT, traced_process, NULL, NULL);
if (ins == -1)
err_sys("ptrace PTRACE_GETREGS");
wait(NULL);
printf("The process stopped, Putting back the original instructions\n");
// 恢复原来的指令寄存器
putdata(traced_process, addr, backup, len);
ins = ptrace(PTRACE_SETREGS, traced_process, NULL, &oldregs);
if (ins == -1)
err_sys("ptrace PTRACE_GETREGS");
printf("Letting it continue with original flow\n");
sleep(100); // 睡眠一会 可以观察子进程被停止
ins = ptrace(PTRACE_DETACH, traced_process, NULL, NULL);
if (ins == -1)
err_sys("ptrace PTRACE_GETREGS");
return 0;
}
/* Wake up configured address if it is not in current kernel
address. */
void
if_addr_wakeup (struct interface *ifp)
{
struct listnode *node;
struct connected *ifc;
struct prefix *p;
int ret;
for (node = listhead (ifp->connected); node; nextnode (node))
{
ifc = getdata (node);
p = ifc->address;
if (CHECK_FLAG (ifc->conf, ZEBRA_IFC_CONFIGURED)
&& ! CHECK_FLAG (ifc->conf, ZEBRA_IFC_REAL))
{
/* Address check. */
if (p->family == AF_INET)
{
if (! if_is_up (ifp))
{
if_set_flags (ifp, IFF_UP | IFF_RUNNING);
if_refresh (ifp);
}
ret = if_set_prefix (ifp, ifc);
if (ret < 0)
{
zlog_warn ("Can't set interface's address: %s",
safe_strerror(errno));
continue;
}
SET_FLAG (ifc->conf, ZEBRA_IFC_REAL);
zebra_interface_address_add_update (ifp, ifc);
if (if_is_operative(ifp))
connected_up_ipv4 (ifp, ifc);
}
#ifdef HAVE_IPV6
if (p->family == AF_INET6)
{
if (! if_is_up (ifp))
{
if_set_flags (ifp, IFF_UP | IFF_RUNNING);
if_refresh (ifp);
}
ret = if_prefix_add_ipv6 (ifp, ifc);
if (ret < 0)
{
zlog_warn ("Can't set interface's address: %s",
safe_strerror(errno));
continue;
}
SET_FLAG (ifc->conf, ZEBRA_IFC_REAL);
zebra_interface_address_add_update (ifp, ifc);
if (if_is_operative(ifp))
connected_up_ipv6 (ifp, ifc);
}
#endif /* HAVE_IPV6 */
}
}
}
static mnumber
callmathfunc(char *o)
{
MathFunc f;
char *a, *n;
static mnumber dummy;
n = a = dupstring(o);
while (*a != '(')
a++;
*a++ = '\0';
a[strlen(a) - 1] = '\0';
if ((f = getmathfunc(n, 1))) {
if (f->flags & MFF_STR) {
return f->sfunc(n, a, f->funcid);
} else {
int argc = 0;
mnumber *argv = NULL, *q, marg;
LinkList l = newlinklist();
LinkNode node;
if (f->flags & MFF_USERFUNC) {
/* first argument is function name: always use mathfunc */
addlinknode(l, n);
}
while (iblank(*a))
a++;
while (*a) {
if (*a) {
argc++;
if (f->flags & MFF_USERFUNC) {
/* need to pass strings */
char *str;
marg = mathevall(a, MPREC_ARG, &a);
if (marg.type & MN_FLOAT) {
/* convfloat is off the heap */
str = convfloat(marg.u.d, 0, 0, NULL);
} else {
char buf[BDIGBUFSIZE];
convbase(buf, marg.u.l, 10);
str = dupstring(buf);
}
addlinknode(l, str);
} else {
q = (mnumber *) zhalloc(sizeof(mnumber));
*q = mathevall(a, MPREC_ARG, &a);
addlinknode(l, q);
}
if (errflag || mtok != COMMA)
break;
}
}
if (*a && !errflag)
zerr("bad math expression: illegal character: %c", *a);
if (!errflag) {
if (argc >= f->minargs && (f->maxargs < 0 ||
argc <= f->maxargs)) {
if (f->flags & MFF_USERFUNC) {
char *shfnam = f->module ? f->module : n;
Shfunc shfunc = getshfunc(shfnam);
if (!shfunc)
zerr("no such function: %s", shfnam);
else {
doshfunc(shfunc, l, 1);
return lastmathval;
}
} else {
if (argc) {
q = argv =
(mnumber *)zhalloc(argc * sizeof(mnumber));
for (node = firstnode(l); node; incnode(node))
*q++ = *(mnumber *)getdata(node);
}
return f->nfunc(n, argc, argv, f->funcid);
}
} else
zerr("wrong number of arguments: %s", o);
}
}
} else {
zerr("unknown function: %s", n);
}
dummy.type = MN_INTEGER;
dummy.u.l = 0;
return dummy;
}
int
dark(int fd, user_info *uin, int t)
{
char x=0,y=0,turn=0,xx,yy,mark=0,color=-1;
char data[100],shown[2]={0,0},result=0,peace=0;
time_t rest,init=time(0);
int key,datac;
// screenline *screen; //for save the scre
data[0]=0;
start(uin);
add_io(fd, 0);
t=t?1:0;
if(!t) { /* 兩邊棋盤資料同步 */
for(yy=0; yy<8; yy++)
strncat(data, chess[yy], 4);
do {
datac=send(fd, data, strlen(data), 0);
} while(datac<0);
}
else {
do {
key=igetkey();
if (key == I_OTHERDATA) {
datac= recv(fd, data, sizeof(data), 0);
if(datac<=0) {add_io(0, 0); return;}
for(yy=0; yy<8; yy++)
strncpy(chess[yy], data+yy*4, 4);
}
} while(key != I_OTHERDATA);
}
move(18,0); clrtoeol();
do {
printtt(19, 56, "%s",t==turn?"自己":"對方");
refresh();
rest=time(0);
do {
if(t==turn) {
show_cursor(y, x, 1);
move(18, 0);
}
key=time(0)-init;
datac=ttt+rest-time(0);
if(datac<1 && turn==t) {
change_record(1);
add_io(0,0); bell();
pressanykey("時間到囉!!..這局輸囉.. :~(");
return 0;
}
else if(datac<1) {
change_record(0);
add_io(0,0); bell();
pressanykey("對方可能睡著啦~ so算你贏了!! ^^Y");
return 0;
}
move(22,34);
prints("%2d:%2d:%2d",key/3600,(key%3600)/60,key%60);
printtt(21,47,"4%d;1m %d:%2d",datac<30?1:4,datac/60,datac%60);
move(b_lines,0); clrtoeol();
prints("[45;37m 說明 [47;31m [←↑↓→/jikl][30m移動 [31m\
[Enter/Space][30m確定 [31m[w][30m傳訊 [31m[p][30m和棋 [31m[q]\
[30m投降 [31m[h][30mHelp [m");
refresh();
key=igetkey();
peace=0;
if(key==I_OTHERDATA) {
bell();
datac= recv(fd, data, sizeof(data), 0);
if(datac<=0) {add_io(0, 0); return;}
if(*data=='P') {
getdata(18, 0, "對方提出和棋的要求..答應和棋嗎?? (y/n) [n]", data, 4, LCECHO, 0);
move(18,0); clrtoeol();
do {
datac=send(fd, data, 1, 0);
} while(datac<0);
if(*data=='y') {
change_record(2);
add_io(0, 0);
pressanykey("雙方握手言和 :)");
return 0;
}
key=0;
}
else if(*data=='Q') {
change_record(0);
add_io(0, 0);
pressanykey("耶耶耶..對方投降了.. ^^Y");
return 0;
}
else {
yy=data[0]-1; xx=data[1]-1;
y=data[2]-1; x=data[3]-1;
if(darked(chess[y][x])) { /* 對方翻棋 */
if(color<0) {
color=nexturn(red(chess[y][x]));
show_color(color);
}
show_chess(y, x, chess[y][x], 0);
chess[y][x]--;
turn=nexturn(turn);
}
else {
if(chess[y][x])
result=show_eaten(chess[y][x],shown[t]++,0);
move_chess(y,x,yy,xx,&mark,&turn);
}
}
}
switch(key) {
case 'h':
{
extern screenline* big_picture;
screenline* screen0 = calloc(t_lines, sizeof(screenline));
memcpy(screen0, big_picture, t_lines * sizeof(screenline));
more("game/dark.help",YEA); //* 改成自己的路徑
memcpy(big_picture, screen0, t_lines * sizeof(screenline));
free(screen0);
redoscr();
}
break;
case 'w':
{
extern screenline* big_picture;
screenline* screen0 = calloc(2, sizeof(screenline));
memcpy(screen0, big_picture, 2 * sizeof(screenline));
my_write(uin->pid, "傳訊息: ");
memcpy(big_picture, screen0, 2 * sizeof(screenline));
free(screen0);
redoscr();
}
break;
case 'p':
if(t==turn) {
int keyy;
if(peace) break;
bell();
getdata(18, 0, "真的要和棋嗎?? (y/n) [n]", data, 4, LCECHO, 0);
move(18, 0); clrtoeol();
if(*data!='y') break;
prints("[33;1m詢問對手是否同意和棋..[5m請稍後... :)[m"); refresh();
peace=1;
do {
datac=send(fd, "P", 1, 0);
} while(datac<0);
do {
keyy=igetkey();
if(keyy==I_OTHERDATA) {
datac= recv(fd, data, sizeof(data), 0);
if(datac<=0) {add_io(0, 0); return 0;}
move(18, 0); clrtoeol();
if(*data=='y') {
change_record(2);
add_io(0, 0);
pressanykey("雙方握手言和 :)");
return 0;
}
else
pressanykey("對方不同意和棋.. :~");
}
} while (keyy!=I_OTHERDATA);
}
break;
case 'q':
if(t==turn) {
bell();
getdata(18, 0, "真的要投降嗎?? (y/n) [n]", data, 4, LCECHO, 0);
move(18,0); clrtoeol();
if(*data!='y') break;
do {
datac=send(fd, "Q", 1, 0);
} while(datac<0);
change_record(1);
add_io(0, 0);
pressanykey("啊啊啊..我不行了..投降~ ^^;");
return 0;
}
break;
default:
if(t!=turn) key=0;
break;
}
if(t!=turn) continue;
switch(key) {
case ' ':
case 13:
if(!mark && darked(chess[y][x])) { /* 翻棋 */
if(color<0) {
color=red(chess[y][x]);
show_color(color);
}
show_chess(y, x, chess[y][x], 0);
chess[y][x]--;
turn=nexturn(turn);
}
else if(mark) { /* 已 mark 的處理 */
if(!chess[y][x] && nexto(x-xx,y-yy)) /* 移動 */
move_chess(y,x,yy,xx,&mark,&turn);
else if(!mychess(y,x,color) && !darked(chess[y][x])) { /* 吃對方的棋子 */
if(nexto2(x-xx,y-yy) && mark==6) { /* mark 起來的棋子不在隔壁(炮) */
char i,tmp=0;
if(x==xx)
for(i=min(y,yy)+1; i<max(y,yy); i++)
tmp+=(chess[i][x]!=0);
else
for(i=min(x,xx)+1; i<max(x,xx); i++)
tmp+=(chess[y][i]!=0);
if(tmp==1 && chess[y][x]) {
result=show_eaten(chess[y][x],shown[nexturn(t)]++,1);
move_chess(y,x,yy,xx,&mark,&turn);
}
else cancel_mark(yy,xx,&mark,&key);
}
else { /* mark 起來的棋子在隔壁 */
if( nexto(x-xx,y-yy) &&
((mark==7 && rank(chess[y][x])==1) || /* 小兵立大功 */
( mark<=rank(chess[y][x]) &&
rank(chess[y][x])-mark!=6 )) ) { /* 將軍怕小兵 */
result=show_eaten(chess[y][x],shown[nexturn(t)]++,1);
move_chess(y,x,yy,xx,&mark,&turn);
}
else cancel_mark(yy,xx,&mark,&key);
}
}
else cancel_mark(yy,xx,&mark,&key); /* 不能移不能吃 */
}
/* mark 起來 */
else if(!mark && chess[y][x] && mychess(y,x,color)) { /* mark 起來 */
show_chess(y, x, chess[y][x], 1);
mark=rank(chess[y][x]);
xx=x; yy=y;
key=0;
}
else key=0;
break;
case 'u':
if(mark) cancel_mark(yy, xx, &mark, &key);
break;
case KEY_LEFT:
case 'j':
show_cursor(y, x, 0);
y=y==0?7:y-1;
break;
case KEY_RIGHT:
case 'l':
show_cursor(y, x, 0);
y=y==7?0:y+1;
break;
case KEY_UP:
case 'i':
show_cursor(y, x, 0);
x=x==0?3:x-1;
break;
case KEY_DOWN:
case 'k':
show_cursor(y, x, 0);
x=x==3?0:x+1;
break;
}
} while(key!=' ' && key!=13 && key!=I_OTHERDATA);
show_cursor(y, x, 0);
if(t==turn) continue; /* turn已經動過..so是相反的值 */
data[0]=yy+1; data[1]=xx+1;
data[2]=y+1; data[3]=x+1;
do {
datac=send(fd, data, 4, 0);
} while(datac<0);
} while(!result);
add_io(0, 0);
if(!turn)
{
FILE *fs;
init=time(0)-init;
if(fs=fopen("log/dark.log","a+")) //* 可改成自己想要的路徑
{
fprintf(fs,"%s win %s %d:%d\n",currutmp->userid,uin->userid,init/60,init%60);
fclose(fs);
}
}
change_record(1);
pressanykey("恭禧你%s了 ^^Y",t==turn?"輸":"贏");
}
int
m_brdf2( /* color a ray that hit a BRDF material */
OBJREC *m,
RAY *r
)
{
BRDFDAT nd;
COLOR ctmp;
FVECT vtmp;
double dtmp;
/* always a shadow */
if (r->crtype & SHADOW)
return(1);
/* check arguments */
if ((m->oargs.nsargs < (hasdata(m->otype)?4:2)) | (m->oargs.nfargs <
((m->otype==MAT_TFUNC)|(m->otype==MAT_TDATA)?6:4)))
objerror(m, USER, "bad # arguments");
/* check for back side */
if (r->rod < 0.0) {
if (!backvis) {
raytrans(r);
return(1);
}
raytexture(r, m->omod);
flipsurface(r); /* reorient if backvis */
} else
raytexture(r, m->omod);
nd.mp = m;
nd.pr = r;
/* get material color */
setcolor(nd.mcolor, m->oargs.farg[0],
m->oargs.farg[1],
m->oargs.farg[2]);
/* get specular component */
nd.rspec = m->oargs.farg[3];
/* compute transmittance */
if ((m->otype == MAT_TFUNC) | (m->otype == MAT_TDATA)) {
nd.trans = m->oargs.farg[4]*(1.0 - nd.rspec);
nd.tspec = nd.trans * m->oargs.farg[5];
dtmp = nd.trans - nd.tspec;
setcolor(nd.tdiff, dtmp, dtmp, dtmp);
} else {
nd.tspec = nd.trans = 0.0;
setcolor(nd.tdiff, 0.0, 0.0, 0.0);
}
/* compute reflectance */
dtmp = 1.0 - nd.trans - nd.rspec;
setcolor(nd.rdiff, dtmp, dtmp, dtmp);
nd.pdot = raynormal(nd.pnorm, r); /* perturb normal */
multcolor(nd.mcolor, r->pcol); /* modify material color */
multcolor(nd.rdiff, nd.mcolor);
multcolor(nd.tdiff, nd.mcolor);
/* load auxiliary files */
if (hasdata(m->otype)) {
nd.dp = getdata(m->oargs.sarg[1]);
getfunc(m, 2, 0, 0);
} else {
nd.dp = NULL;
getfunc(m, 1, 0, 0);
}
/* compute ambient */
if (nd.trans < 1.0-FTINY) {
copycolor(ctmp, nd.mcolor); /* modified by material color */
scalecolor(ctmp, 1.0-nd.trans);
multambient(ctmp, r, nd.pnorm);
addcolor(r->rcol, ctmp); /* add to returned color */
}
if (nd.trans > FTINY) { /* from other side */
flipsurface(r);
vtmp[0] = -nd.pnorm[0];
vtmp[1] = -nd.pnorm[1];
vtmp[2] = -nd.pnorm[2];
copycolor(ctmp, nd.mcolor);
scalecolor(ctmp, nd.trans);
multambient(ctmp, r, vtmp);
addcolor(r->rcol, ctmp);
flipsurface(r);
}
/* add direct component */
direct(r, dirbrdf, &nd);
return(1);
}
int
ospf_vl_set_params (struct ospf_vl_data *vl_data, struct vertex *v)
{
int changed = 0;
struct ospf_interface *voi;
struct listnode *node;
struct vertex_nexthop *nh;
int i;
struct router_lsa *rl;
voi = vl_data->vl_oi;
if (voi->output_cost != v->distance)
{
voi->output_cost = v->distance;
changed = 1;
}
for (node = listhead (v->nexthop); node; nextnode (node))
if ((nh = getdata (node)) != NULL)
{
vl_data->out_oi = (struct ospf_interface *) nh->oi;
if (!IPV4_ADDR_SAME(&voi->address->u.prefix4,
&vl_data->out_oi->address->u.prefix4))
changed = 1;
voi->address->u.prefix4 = vl_data->out_oi->address->u.prefix4;
voi->address->prefixlen = vl_data->out_oi->address->prefixlen;
break; /* We take the first interface. */
}
rl = (struct router_lsa *)v->lsa;
/* use SPF determined backlink index in struct vertex
* for virtual link destination address
*/
if (v->backlink >= 0)
{
if (!IPV4_ADDR_SAME (&vl_data->peer_addr,
&rl->link[v->backlink].link_data))
changed = 1;
vl_data->peer_addr = rl->link[v->backlink].link_data;
}
else
{
/* This is highly odd, there is no backlink index
* there should be due to the ospf_spf_has_link() check
* in SPF. Lets warn and try pick a link anyway.
*/
zlog_warn ("ospf_vl_set_params: No backlink for %s!",
vl_data->vl_oi->ifp->name);
for (i = 0; i < ntohs (rl->links); i++)
{
switch (rl->link[i].type)
{
case LSA_LINK_TYPE_VIRTUALLINK:
if (IS_DEBUG_OSPF_EVENT)
zlog_debug ("found back link through VL");
case LSA_LINK_TYPE_TRANSIT:
case LSA_LINK_TYPE_POINTOPOINT:
if (!IPV4_ADDR_SAME (&vl_data->peer_addr,
&rl->link[i].link_data))
changed = 1;
vl_data->peer_addr = rl->link[i].link_data;
if (IS_DEBUG_OSPF_EVENT)
zlog_debug ("ospf_vl_set_params: %s peer address is %s\n",
vl_data->vl_oi->ifp->name,
inet_ntoa(vl_data->peer_addr));
return changed;
}
}
}
if (IS_DEBUG_OSPF_EVENT)
zlog_debug ("ospf_vl_set_params: %s peer address is %s\n",
vl_data->vl_oi->ifp->name,
inet_ntoa(vl_data->peer_addr));
return changed;
}
/* Restore an interface to its pre UP state
Used from ism_interface_down only */
void
ospf_if_cleanup (struct ospf_interface *oi)
{
struct route_node *rn;
struct listnode *node;
struct ospf_neighbor *nbr;
/* oi->nbrs and oi->nbr_nbma should be deletete on InterafceDown event */
/* delete all static neighbors attached to this interface */
for (node = listhead (oi->nbr_nbma); node; )
{
struct ospf_nbr_nbma *nbr_nbma = getdata (node);
nextnode (node);
OSPF_POLL_TIMER_OFF (nbr_nbma->t_poll);
if (nbr_nbma->nbr)
{
nbr_nbma->nbr->nbr_nbma = NULL;
nbr_nbma->nbr = NULL;
}
nbr_nbma->oi = NULL;
listnode_delete (oi->nbr_nbma, nbr_nbma);
}
/* send Neighbor event KillNbr to all associated neighbors. */
for (rn = route_top (oi->nbrs); rn; rn = route_next (rn))
if ((nbr = rn->info) != NULL)
if (nbr != oi->nbr_self)
OSPF_NSM_EVENT_EXECUTE (nbr, NSM_KillNbr);
/* Cleanup Link State Acknowlegdment list. */
for (node = listhead (oi->ls_ack); node; nextnode (node))
ospf_lsa_unlock (node->data);
list_delete_all_node (oi->ls_ack);
oi->crypt_seqnum = 0;
/* Empty link state update queue */
ospf_ls_upd_queue_empty (oi);
/* Handle pseudo neighbor. */
ospf_nbr_delete (oi->nbr_self);
oi->nbr_self = ospf_nbr_new (oi);
oi->nbr_self->state = NSM_TwoWay;
oi->nbr_self->priority = OSPF_IF_PARAM (oi, priority);
switch (oi->area->external_routing)
{
case OSPF_AREA_DEFAULT:
SET_FLAG (oi->nbr_self->options, OSPF_OPTION_E);
break;
case OSPF_AREA_STUB:
UNSET_FLAG (oi->nbr_self->options, OSPF_OPTION_E);
break;
case OSPF_AREA_NSSA:
UNSET_FLAG (oi->nbr_self->options, OSPF_OPTION_E);
SET_FLAG (oi->nbr_self->options, OSPF_OPTION_NP);
break;
}
ospf_lsa_unlock (oi->network_lsa_self);
oi->network_lsa_self = NULL;
OSPF_TIMER_OFF (oi->t_network_lsa_self);
}
/**
* Telnet register interface.
*/
void new_register(void)
{
char userid[IDLEN + 1], passwd[PASSLEN], passbuf[PASSLEN], log[STRLEN];
const char *errmsg;
if (register_closed()) {
ansimore("NOREGISTER", NA);
pressreturn();
return;
}
ansimore("etc/register", NA);
#ifndef FDQUAN
//% if (!askyn("您是否同意本站Announce版精华区x-3目录所列站规?", false, false))
if (!askyn("\xc4\xfa\xca\xc7\xb7\xf1\xcd\xac\xd2\xe2\xb1\xbe\xd5\xbe""Announce\xb0\xe6\xbe\xab\xbb\xaa\xc7\xf8x-3\xc4\xbf\xc2\xbc\xcb\xf9\xc1\xd0\xd5\xbe\xb9\xe6?", false, false))
return;
#endif
int tried = 0;
prints("\n");
while (1) {
if (++tried >= MAX_NEW_TRIES) {
//% outs("\n拜拜，按太多下 <Enter> 了...\n");
outs("\n\xb0\xdd\xb0\xdd\xa3\xac\xb0\xb4\xcc\xab\xb6\xe0\xcf\xc2 <Enter> \xc1\xcb...\n");
screen_flush();
return;
}
//% getdata(0, 0, "请输入帐号名称 (Enter User ID, \"0\" to abort): ",
getdata(0, 0, "\xc7\xeb\xca\xe4\xc8\xeb\xd5\xca\xba\xc5\xc3\xfb\xb3\xc6 (Enter User ID, \"0\" to abort): ",
userid, sizeof(userid), DOECHO, YEA);
if (userid[0] == '0')
return;
errmsg = register_invalid_user_name(userid);
if (errmsg != NULL) {
outs(errmsg);
continue;
}
char path[HOMELEN];
sethomepath(path, userid);
if (dosearchuser(userid, ¤tuser, &usernum) || dashd(path)) {
//% outs("此帐号已经有人使用\n");
outs("\xb4\xcb\xd5\xca\xba\xc5\xd2\xd1\xbe\xad\xd3\xd0\xc8\xcb\xca\xb9\xd3\xc3\n");
continue;
}
#ifndef REG_CAPTCHA
break;
#else
char link[STRLEN], attempt[CAPTCHA_LEN + 1], answer[CAPTCHA_LEN + 1];
int lnum;
int pos = gen_captcha_link(link, sizeof(link), &lnum);
if (pos < 0)
return;
prints("http://"BBSHOST"/captcha/%d.gif\n", lnum);
//% getdata(0, 0, "请输入上图所包含的英文字母: ", attempt, sizeof(attempt),
getdata(0, 0, "\xc7\xeb\xca\xe4\xc8\xeb\xc9\xcf\xcd\xbc\xcb\xf9\xb0\xfc\xba\xac\xb5\xc4\xd3\xa2\xce\xc4\xd7\xd6\xc4\xb8: ", attempt, sizeof(attempt),
DOECHO, YEA);
unlink(link);
get_captcha_answer(pos, answer, sizeof(answer));
if (strcasecmp(answer, attempt) != 0) {
//% outs("验证码输入错误...\n");
outs("\xd1\xe9\xd6\xa4\xc2\xeb\xca\xe4\xc8\xeb\xb4\xed\xce\xf3...\n");
continue;
} else {
break;
}
#endif // REG_CAPTCHA
}
for (tried = 0; tried <= MAX_SET_PASSWD_TRIES; ++tried) {
passbuf[0] = '\0';
//% getdata(0, 0, "请设定您的密码 (Setup Password): ", passbuf,
getdata(0, 0, "\xc7\xeb\xc9\xe8\xb6\xa8\xc4\xfa\xb5\xc4\xc3\xdc\xc2\xeb (Setup Password): ", passbuf,
sizeof(passbuf), NOECHO, YEA);
errmsg = register_invalid_password(passbuf, userid);
if (errmsg) {
outs(errmsg);
continue;
}
strlcpy(passwd, passbuf, PASSLEN);
//% getdata(0, 0, "请再输入一次您的密码 (Confirm Password): ", passbuf,
getdata(0, 0, "\xc7\xeb\xd4\xd9\xca\xe4\xc8\xeb\xd2\xbb\xb4\xce\xc4\xfa\xb5\xc4\xc3\xdc\xc2\xeb (Confirm Password): ", passbuf,
PASSLEN, NOECHO, YEA);
if (strncmp(passbuf, passwd, PASSLEN) != 0) {
//% prints("密码输入错误, 请重新输入密码\n");
prints("\xc3\xdc\xc2\xeb\xca\xe4\xc8\xeb\xb4\xed\xce\xf3, \xc7\xeb\xd6\xd8\xd0\xc2\xca\xe4\xc8\xeb\xc3\xdc\xc2\xeb\n");
continue;
}
passwd[8] = '\0';
break;
}
if (tried > MAX_SET_PASSWD_TRIES)
return;
struct userec user;
init_userec(&user, userid, passwd, true);
strlcpy(user.lasthost, fromhost, sizeof(user.lasthost));
if (create_user(&user) < 0) {
outs("Failed to create user.\n");
return;
}
snprintf(log, sizeof(log), "new account from %s", fromhost);
report(log, currentuser.userid);
//% prints("请重新登录 %s 并填写注册信息\n", user.userid);
prints("\xc7\xeb\xd6\xd8\xd0\xc2\xb5\xc7\xc2\xbc %s \xb2\xa2\xcc\xee\xd0\xb4\xd7\xa2\xb2\xe1\xd0\xc5\xcf\xa2\n", user.userid);
pressanykey();
return;
}
/* Interface's information print out to vty interface. */
void
if_dump_vty (struct vty *vty, struct interface *ifp)
{
#ifdef HAVE_SOCKADDR_DL
struct sockaddr_dl *sdl;
#endif /* HAVE_SOCKADDR_DL */
struct connected *connected;
struct listnode *node;
vty_out (vty, "Interface %s is ", ifp->name);
if (if_is_up(ifp)) {
vty_out (vty, "up, line protocol ");
if (CHECK_FLAG(ifp->status, ZEBRA_INTERFACE_LINKDETECTION)) {
if (if_is_running(ifp))
vty_out (vty, "is up%s", VTY_NEWLINE);
else
vty_out (vty, "is down%s", VTY_NEWLINE);
} else {
vty_out (vty, "detection is disabled%s", VTY_NEWLINE);
}
} else {
vty_out (vty, "down%s", VTY_NEWLINE);
}
if (ifp->desc)
vty_out (vty, " Description: %s%s", ifp->desc,
VTY_NEWLINE);
if (ifp->ifindex <= 0)
{
vty_out(vty, " index %d pseudo interface%s", ifp->ifindex, VTY_NEWLINE);
return;
}
else if (! CHECK_FLAG (ifp->status, ZEBRA_INTERFACE_ACTIVE))
{
vty_out(vty, " index %d inactive interface%s",
ifp->ifindex,
VTY_NEWLINE);
return;
}
vty_out (vty, " index %d metric %d mtu %d ",
ifp->ifindex, ifp->metric, ifp->mtu);
if_flag_dump_vty (vty, ifp->flags);
#ifdef HAVE_IPV6
if (ifp->mtu6 != ifp->mtu)
vty_out (vty, "mtu6 %d ", ifp->mtu6);
#endif
vty_out (vty, "%s", VTY_NEWLINE);
/* Hardware address. */
#ifdef HAVE_SOCKADDR_DL
sdl = &ifp->sdl;
if (sdl != NULL && sdl->sdl_alen != 0)
{
int i;
u_char *ptr;
vty_out (vty, " HWaddr: ");
for (i = 0, ptr = (u_char *)LLADDR (sdl); i < sdl->sdl_alen; i++, ptr++)
vty_out (vty, "%s%02x", i == 0 ? "" : ":", *ptr);
vty_out (vty, "%s", VTY_NEWLINE);
}
#else
if (ifp->hw_addr_len != 0)
{
int i;
vty_out (vty, " HWaddr: ");
for (i = 0; i < ifp->hw_addr_len; i++)
vty_out (vty, "%s%02x", i == 0 ? "" : ":", ifp->hw_addr[i]);
vty_out (vty, "%s", VTY_NEWLINE);
}
#endif /* HAVE_SOCKADDR_DL */
/* Bandwidth in kbps */
if (ifp->bandwidth != 0)
{
vty_out(vty, " bandwidth %u kbps", ifp->bandwidth);
vty_out(vty, "%s", VTY_NEWLINE);
}
for (node = listhead (ifp->connected); node; nextnode (node))
{
connected = getdata (node);
if (CHECK_FLAG (connected->conf, ZEBRA_IFC_REAL))
connected_dump_vty (vty, connected);
}
#ifdef RTADV
nd_dump_vty (vty, ifp);
#endif /* RTADV */
#ifdef HAVE_PROC_NET_DEV
/* Statistics print out using proc file system. */
vty_out (vty, " input packets %lu, bytes %lu, dropped %lu,"
" multicast packets %lu%s",
ifp->stats.rx_packets, ifp->stats.rx_bytes,
ifp->stats.rx_dropped, ifp->stats.rx_multicast, VTY_NEWLINE);
vty_out (vty, " input errors %lu, length %lu, overrun %lu,"
" CRC %lu, frame %lu, fifo %lu, missed %lu%s",
ifp->stats.rx_errors, ifp->stats.rx_length_errors,
ifp->stats.rx_over_errors, ifp->stats.rx_crc_errors,
ifp->stats.rx_frame_errors, ifp->stats.rx_fifo_errors,
ifp->stats.rx_missed_errors, VTY_NEWLINE);
vty_out (vty, " output packets %lu, bytes %lu, dropped %lu%s",
ifp->stats.tx_packets, ifp->stats.tx_bytes,
ifp->stats.tx_dropped, VTY_NEWLINE);
vty_out (vty, " output errors %lu, aborted %lu, carrier %lu,"
" fifo %lu, heartbeat %lu, window %lu%s",
ifp->stats.tx_errors, ifp->stats.tx_aborted_errors,
ifp->stats.tx_carrier_errors, ifp->stats.tx_fifo_errors,
ifp->stats.tx_heartbeat_errors, ifp->stats.tx_window_errors,
VTY_NEWLINE);
vty_out (vty, " collisions %lu%s", ifp->stats.collisions, VTY_NEWLINE);
#endif /* HAVE_PROC_NET_DEV */
#ifdef HAVE_NET_RT_IFLIST
#if defined (__bsdi__) || defined (__NetBSD__)
/* Statistics print out using sysctl (). */
vty_out (vty, " input packets %qu, bytes %qu, dropped %qu,"
" multicast packets %qu%s",
ifp->stats.ifi_ipackets, ifp->stats.ifi_ibytes,
ifp->stats.ifi_iqdrops, ifp->stats.ifi_imcasts,
VTY_NEWLINE);
vty_out (vty, " input errors %qu%s",
ifp->stats.ifi_ierrors, VTY_NEWLINE);
vty_out (vty, " output packets %qu, bytes %qu, multicast packets %qu%s",
ifp->stats.ifi_opackets, ifp->stats.ifi_obytes,
ifp->stats.ifi_omcasts, VTY_NEWLINE);
vty_out (vty, " output errors %qu%s",
ifp->stats.ifi_oerrors, VTY_NEWLINE);
vty_out (vty, " collisions %qu%s",
ifp->stats.ifi_collisions, VTY_NEWLINE);
#else
/* Statistics print out using sysctl (). */
vty_out (vty, " input packets %lu, bytes %lu, dropped %lu,"
" multicast packets %lu%s",
ifp->stats.ifi_ipackets, ifp->stats.ifi_ibytes,
ifp->stats.ifi_iqdrops, ifp->stats.ifi_imcasts,
VTY_NEWLINE);
vty_out (vty, " input errors %lu%s",
ifp->stats.ifi_ierrors, VTY_NEWLINE);
vty_out (vty, " output packets %lu, bytes %lu, multicast packets %lu%s",
ifp->stats.ifi_opackets, ifp->stats.ifi_obytes,
ifp->stats.ifi_omcasts, VTY_NEWLINE);
vty_out (vty, " output errors %lu%s",
ifp->stats.ifi_oerrors, VTY_NEWLINE);
vty_out (vty, " collisions %lu%s",
ifp->stats.ifi_collisions, VTY_NEWLINE);
#endif /* __bsdi__ || __NetBSD__ */
#endif /* HAVE_NET_RT_IFLIST */
}
static void and(void)
{
getdata(0,0);
R.ACC.d &= R.ALU.d;
}
void handle_linux_client(char *hostname, char *clienttype, enum ostype_t os,
void *hinfo, char *sender, time_t timestamp,
char *clientdata)
{
char *timestr;
char *uptimestr;
char *clockstr;
char *msgcachestr;
char *whostr;
char *psstr;
char *topstr;
char *dfstr;
char *freestr;
char *msgsstr;
char *netstatstr;
char *vmstatstr;
char *ifstatstr;
char *portsstr;
char fromline[1024];
sprintf(fromline, "\nStatus message received from %s\n", sender);
splitmsg(clientdata);
timestr = getdata("date");
uptimestr = getdata("uptime");
clockstr = getdata("clock");
msgcachestr = getdata("msgcache");
whostr = getdata("who");
psstr = getdata("ps");
topstr = getdata("top");
dfstr = getdata("df");
freestr = getdata("free");
msgsstr = getdata("msgs");
netstatstr = getdata("netstat");
ifstatstr = getdata("ifstat");
vmstatstr = getdata("vmstat");
portsstr = getdata("ports");
unix_cpu_report(hostname, clienttype, os, hinfo, fromline, timestr, uptimestr, clockstr, msgcachestr,
whostr, 0, psstr, 0, topstr);
unix_disk_report(hostname, clienttype, os, hinfo, fromline, timestr, "Available", "Capacity", "Mounted", dfstr);
unix_procs_report(hostname, clienttype, os, hinfo, fromline, timestr, "CMD", NULL, psstr);
unix_ports_report(hostname, clienttype, os, hinfo, fromline, timestr, 3, 4, 5, portsstr);
msgs_report(hostname, clienttype, os, hinfo, fromline, timestr, msgsstr);
file_report(hostname, clienttype, os, hinfo, fromline, timestr);
linecount_report(hostname, clienttype, os, hinfo, fromline, timestr);
unix_netstat_report(hostname, clienttype, os, hinfo, fromline, timestr, netstatstr);
unix_ifstat_report(hostname, clienttype, os, hinfo, fromline, timestr, ifstatstr);
unix_vmstat_report(hostname, clienttype, os, hinfo, fromline, timestr, vmstatstr);
if (freestr) {
char *p;
long memphystotal, memphysused, memphysfree,
memactused, memactfree,
memswaptotal, memswapused, memswapfree;
memphystotal = memswaptotal = memphysused = memswapused = memactused = memactfree = -1;
p = strstr(freestr, "\nMem:");
if (p && (sscanf(p, "\nMem: %ld %ld %ld", &memphystotal, &memphysused, &memphysfree) == 3)) {
memphystotal /= 1024;
memphysused /= 1024;
memphysfree /= 1024;
}
p = strstr(freestr, "\nSwap:");
if (p && (sscanf(p, "\nSwap: %ld %ld %ld", &memswaptotal, &memswapused, &memswapfree) == 3)) {
memswaptotal /= 1024;
memswapused /= 1024;
memswapfree /= 1024;
}
p = strstr(freestr, "\n-/+ buffers/cache:");
if (p && (sscanf(p, "\n-/+ buffers/cache: %ld %ld", &memactused, &memactfree) == 2)) {
memactused /= 1024;
memactfree /= 1024;
}
unix_memory_report(hostname, clienttype, os, hinfo, fromline, timestr,
memphystotal, memphysused, memactused, memswaptotal, memswapused);
}
splitmsg_done();
}
static void lac_sh(void)
{
getdata((R.opcode.b.h & 0x0f),1);
R.ACC.d = R.ALU.d;
}
int b_notes_edit()
{
char buf[STRLEN], buf2[STRLEN];
char ans[4];
int aborted;
int notetype;
if (!chkBM(currbp, ¤tuser))
return 0;
clear();
move(0, 0);
prints("�趨��\n\n (1)һ�㱸��¼\n (2)���ܱ���¼\n");
prints(" (3)����ǰ��\n (4)�Ƿ�ǿ��ʹ��ǰ\n");
while (1) {
getdata(7, 0,"��ǰѡ��[1](0~4): ", ans, 2, DOECHO, YEA);
if (ans[0] == '0')
return FULLUPDATE;
if (ans[0] == '\0')
strcpy(ans, "1");
if (ans[0] >= '1' && ans[0] <= '4' )
break;
}
makevdir(currboard); //��������¼Ŀ¼
notetype = ans[0] - '0';
if (notetype == 2) {
setvfile(buf, currboard, "secnotes");
} else if (notetype == 3) {
setvfile(buf, currboard, "prefix");
} else if (notetype == 1) {
setvfile(buf, currboard, "notes");
} else if (notetype == 4 ) {
int pos;
struct boardheader fh;
pos = search_record(BOARDS, &fh, sizeof(fh), cmpbnames, currboard);
if (askyn("�Ƿ�ǿ��ʹ��ǰ��", (fh.flag & BOARD_PREFIX_FLAG)?YEA:NA,NA)) {
fh.flag |= BOARD_PREFIX_FLAG;
} else {
fh.flag &= ~BOARD_PREFIX_FLAG;
}
substitute_record(BOARDS, &fh, sizeof(fh), pos);
return FULLUPDATE;
}
sprintf(buf2, "(E)�༭ (D)ɾ�� %4s? [E]: ",
(notetype == 3)?"����ǰ��":(notetype == 1) ? "һ�㱸��¼" : "���ܱ���¼");
getdata(8, 0, buf2, ans, 2, DOECHO, YEA); //ѯ�ʱ༭����ɾ��
if (ans[0] == 'D' || ans[0] == 'd') { //ɾ������¼
move(9, 0);
sprintf(buf2, "���Ҫɾ��ô��");
if (askyn(buf2, NA, NA)) {
move(10, 0);
prints("�Ѿ�ɾ��...\n");
pressanykey();
unlink(buf);
aborted = 1;
} else
aborted = -1;
} else
aborted = vedit(buf, NA, YEA); //�༭����¼
if (aborted == -1) {
pressreturn();
} else {
if (notetype == 1)
setvfile(buf, currboard, "noterec");
else
setvfile(buf, currboard, "notespasswd");
unlink(buf);
}
return FULLUPDATE;
}
static void lar_ar1(void)
{
getdata(0,0);
R.AR[1] = R.ALU.w.l;
}
void handle_freebsd_client(char *hostname, char *clienttype, enum ostype_t os,
namelist_t *hinfo, char *sender, time_t timestamp,
char *clientdata)
{
char *timestr;
char *uptimestr;
char *clockstr;
char *msgcachestr;
char *whostr;
char *psstr;
char *topstr;
char *dfstr;
char *meminfostr;
char *swapinfostr;
char *msgsstr;
char *netstatstr;
char *ifstatstr;
char *portsstr;
char *vmstatstr;
char *p;
char fromline[1024];
sprintf(fromline, "\nStatus message received from %s\n", sender);
splitmsg(clientdata);
timestr = getdata("date");
uptimestr = getdata("uptime");
clockstr = getdata("clockstr");
msgcachestr = getdata("msgcache");
whostr = getdata("who");
psstr = getdata("ps");
topstr = getdata("top");
dfstr = getdata("df");
meminfostr = getdata("meminfo");
swapinfostr = getdata("swapinfo");
msgsstr = getdata("msgs");
netstatstr = getdata("netstat");
ifstatstr = getdata("ifstat");
portsstr = getdata("ports");
vmstatstr = getdata("vmstat");
unix_cpu_report(hostname, clienttype, os, hinfo, fromline, timestr, uptimestr, clockstr, msgcachestr, whostr, psstr, topstr);
unix_disk_report(hostname, clienttype, os, hinfo, fromline, timestr, "Avail", "Capacity", "Mounted", dfstr);
unix_procs_report(hostname, clienttype, os, hinfo, fromline, timestr, "COMMAND", NULL, psstr);
unix_ports_report(hostname, clienttype, os, hinfo, fromline, timestr, 3, 4, 5, portsstr);
msgs_report(hostname, clienttype, os, hinfo, fromline, timestr, msgsstr);
file_report(hostname, clienttype, os, hinfo, fromline, timestr);
linecount_report(hostname, clienttype, os, hinfo, fromline, timestr);
unix_netstat_report(hostname, clienttype, os, hinfo, fromline, timestr, netstatstr);
unix_ifstat_report(hostname, clienttype, os, hinfo, fromline, timestr, ifstatstr);
unix_vmstat_report(hostname, clienttype, os, hinfo, fromline, timestr, vmstatstr);
if (meminfostr && swapinfostr) {
unsigned long memphystotal, memphysfree, memphysused;
unsigned long memswaptotal, memswapfree, memswapused;
int found = 0;
memphystotal = memphysfree = memphysused = 0;
memswaptotal = memswapfree = memswapused = 0;
p = strstr(meminfostr, "Total:"); if (p) { memphystotal = atol(p+6); found++; }
p = strstr(meminfostr, "Free:"); if (p) { memphysfree = atol(p+5); found++; }
memphysused = memphystotal - memphysfree;
memswaptotal = memswapfree = memswapused = 0;
if (swapinfostr) {
found++;
p = strchr(swapinfostr, '\n'); /* Skip the header line */
while (p) {
long stot, sused, sfree;
char *bol;
bol = p+1;
p = strchr(bol, '\n'); if (p) *p = '\0';
if (sscanf(bol, "%*s %ld %ld %ld", &stot, &sused, &sfree) == 3) {
memswaptotal += stot;
memswapused += sused;
memswapfree += sfree;
}
if (p) *p = '\n';
}
memswaptotal /= 1024; memswapused /= 1024; memswapfree /= 1024;
}
if (found >= 2) {
unix_memory_report(hostname, clienttype, os, hinfo, fromline, timestr,
memphystotal, memphysused, -1, memswaptotal, memswapused);
}
}
}
static void mpy(void)
{
getdata(0,0);
R.Preg.d = (INT16)R.ALU.w.l * (INT16)R.Treg;
if (R.Preg.d == 0x40000000) R.Preg.d = 0xc0000000;
}
void tui_check_reg_mail(void)
{
//% char email[EMAIL_LEN] = "您的邮箱", file[HOMELEN], buf[RNDPASSLEN + 1];
char email[EMAIL_LEN] = "\xc4\xfa\xb5\xc4\xd3\xca\xcf\xe4", file[HOMELEN], buf[RNDPASSLEN + 1];
int i = 0;
sethomefile(file, currentuser.userid, REG_CODE_FILE);
if (!dashf(file)) {
screen_move(1, 0);
//% outs(" 请输入您的复旦邮箱([email protected]/alu.fudan.edu.cn)\n"
outs(" \xc7\xeb\xca\xe4\xc8\xeb\xc4\xfa\xb5\xc4\xb8\xb4\xb5\xa9\xd3\xca\xcf\xe4([email protected]/alu.fudan.edu.cn)\n"
//% " \033[1;32m本站采用复旦邮箱绑定认证，将发送认证码至您的复旦邮箱\033[m");
" \033[1;32m\xb1\xbe\xd5\xbe\xb2\xc9\xd3\xc3\xb8\xb4\xb5\xa9\xd3\xca\xcf\xe4\xb0\xf3\xb6\xa8\xc8\xcf\xd6\xa4\xa3\xac\xbd\xab\xb7\xa2\xcb\xcd\xc8\xcf\xd6\xa4\xc2\xeb\xd6\xc1\xc4\xfa\xb5\xc4\xb8\xb4\xb5\xa9\xd3\xca\xcf\xe4\033[m");
do {
getdata(3, 0, " E-Mail:> ", email, sizeof(email), DOECHO, YEA);
if (!valid_addr(email) || !register_domain_allowed(email)
|| !register_email_allowed(email)) {
//% prints(" 对不起, 该email地址无效, 请重新输入 \n");
prints(" \xb6\xd4\xb2\xbb\xc6\xf0, \xb8\xc3""email\xb5\xd8\xd6\xb7\xce\xde\xd0\xa7, \xc7\xeb\xd6\xd8\xd0\xc2\xca\xe4\xc8\xeb \n");
continue;
} else
break;
} while (1);
register_send_email(¤tuser, email);
}
screen_move_clear(4);
screen_move(5, 0);
//% prints(" \033[1;33m 认证码已发送到 %s ，请查收\033[m\n", email);
prints(" \033[1;33m \xc8\xcf\xd6\xa4\xc2\xeb\xd2\xd1\xb7\xa2\xcb\xcd\xb5\xbd %s \xa3\xac\xc7\xeb\xb2\xe9\xca\xd5\033[m\n", email);
screen_move(7, 0);
//% if (askyn(" 现在输入认证码么？", true, false)) {
if (askyn(" \xcf\xd6\xd4\xda\xca\xe4\xc8\xeb\xc8\xcf\xd6\xa4\xc2\xeb\xc3\xb4\xa3\xbf", true, false)) {
screen_move(9, 0);
//% outs("请输入注册确认信里, \"认证码\"来做为身份确认\n");
outs("\xc7\xeb\xca\xe4\xc8\xeb\xd7\xa2\xb2\xe1\xc8\xb7\xc8\xcf\xd0\xc5\xc0\xef, \"\xc8\xcf\xd6\xa4\xc2\xeb\"\xc0\xb4\xd7\xf6\xce\xaa\xc9\xed\xb7\xdd\xc8\xb7\xc8\xcf\n");
//% prints("一共是 %d 个字符, 大小写是有差别的, 请注意.\n", RNDPASSLEN);
prints("\xd2\xbb\xb9\xb2\xca\xc7 %d \xb8\xf6\xd7\xd6\xb7\xfb, \xb4\xf3\xd0\xa1\xd0\xb4\xca\xc7\xd3\xd0\xb2\xee\xb1\xf0\xb5\xc4, \xc7\xeb\xd7\xa2\xd2\xe2.\n", RNDPASSLEN);
//% outs("请注意, 请输入最新一封认证信中所包含的乱数密码！\n\n"
outs("\xc7\xeb\xd7\xa2\xd2\xe2, \xc7\xeb\xca\xe4\xc8\xeb\xd7\xee\xd0\xc2\xd2\xbb\xb7\xe2\xc8\xcf\xd6\xa4\xd0\xc5\xd6\xd0\xcb\xf9\xb0\xfc\xba\xac\xb5\xc4\xc2\xd2\xca\xfd\xc3\xdc\xc2\xeb\xa3\xa1\n\n"
//% "\033[1;31m提示：注册码输错 3次后系统将要求您重填需绑定的邮箱。\033[m\n");
"\033[1;31m\xcc\xe1\xca\xbe\xa3\xba\xd7\xa2\xb2\xe1\xc2\xeb\xca\xe4\xb4\xed 3\xb4\xce\xba\xf3\xcf\xb5\xcd\xb3\xbd\xab\xd2\xaa\xc7\xf3\xc4\xfa\xd6\xd8\xcc\xee\xd0\xe8\xb0\xf3\xb6\xa8\xb5\xc4\xd3\xca\xcf\xe4\xa1\xa3\033[m\n");
for (i = 0; i < 3; i++) {
screen_move(15, 0);
//% prints("您还有 %d 次机会\n", 3 - i);
prints("\xc4\xfa\xbb\xb9\xd3\xd0 %d \xb4\xce\xbb\xfa\xbb\xe1\n", 3 - i);
//% getdata(16, 0, "请输入认证码: ", buf, sizeof(buf), DOECHO, YEA);
getdata(16, 0, "\xc7\xeb\xca\xe4\xc8\xeb\xc8\xcf\xd6\xa4\xc2\xeb: ", buf, sizeof(buf), DOECHO, YEA);
if (register_activate_email(currentuser.userid, buf))
break;
}
}
if (i == 3) {
unlink(file);
//% prints("认证失败! 请重填邮箱。\n");
prints("\xc8\xcf\xd6\xa4\xca\xa7\xb0\xdc! \xc7\xeb\xd6\xd8\xcc\xee\xd3\xca\xcf\xe4\xa1\xa3\n");
sethomefile(file, currentuser.userid, ".regextra");
if (dashf(file))
unlink(file);
pressanykey();
} else {
//% prints("认证成功!\n");
prints("\xc8\xcf\xd6\xa4\xb3\xc9\xb9\xa6!\n");
sethomefile(file, currentuser.userid, ".regextra");
if (dashf(file)) {
//% prints("我们将暂时保留您的正常使用权限,如果核对您输入的个人信息有误将停止您的发文权限,\n");
prints("\xce\xd2\xc3\xc7\xbd\xab\xd4\xdd\xca\xb1\xb1\xa3\xc1\xf4\xc4\xfa\xb5\xc4\xd5\xfd\xb3\xa3\xca\xb9\xd3\xc3\xc8\xa8\xcf\xde,\xc8\xe7\xb9\xfb\xba\xcb\xb6\xd4\xc4\xfa\xca\xe4\xc8\xeb\xb5\xc4\xb8\xf6\xc8\xcb\xd0\xc5\xcf\xa2\xd3\xd0\xce\xf3\xbd\xab\xcd\xa3\xd6\xb9\xc4\xfa\xb5\xc4\xb7\xa2\xce\xc4\xc8\xa8\xcf\xde,\n");
//% prints("因此请确保您输入的是个人真实信息.\n");
prints("\xd2\xf2\xb4\xcb\xc7\xeb\xc8\xb7\xb1\xa3\xc4\xfa\xca\xe4\xc8\xeb\xb5\xc4\xca\xc7\xb8\xf6\xc8\xcb\xd5\xe6\xca\xb5\xd0\xc5\xcf\xa2.\n");
}
if (!HAS_PERM(PERM_REGISTER)) {
//% prints("请继续填写注册单。\n");
prints("\xc7\xeb\xbc\xcc\xd0\xf8\xcc\xee\xd0\xb4\xd7\xa2\xb2\xe1\xb5\xa5\xa1\xa3\n");
}
pressanykey();
}
}
static void menueditorsave(control m)
{
editor c = getdata(m);
editorsave(c);
show(c); /* steal focus back from tool button */
}
int fill_reg_form(void)
{
reginfo_t reg;
if (!strcmp("guest", currentuser.userid))
return 0;
set_user_status(ST_NEW);
screen_clear();
screen_move(2, 0);
screen_clrtobot();
if (currentuser.userlevel & PERM_REGISTER) {
//% prints("您已经完成本站的使用者注册手续, 欢迎加入本站的行列.");
prints("\xc4\xfa\xd2\xd1\xbe\xad\xcd\xea\xb3\xc9\xb1\xbe\xd5\xbe\xb5\xc4\xca\xb9\xd3\xc3\xd5\xdf\xd7\xa2\xb2\xe1\xca\xd6\xd0\xf8, \xbb\xb6\xd3\xad\xbc\xd3\xc8\xeb\xb1\xbe\xd5\xbe\xb5\xc4\xd0\xd0\xc1\xd0.");
pressreturn();
return 0;
}
if (is_reg_pending(currentuser.userid)) {
//% prints("站长尚未处理您的注册申请单, 您先到处看看吧.");
prints("\xd5\xbe\xb3\xa4\xc9\xd0\xce\xb4\xb4\xa6\xc0\xed\xc4\xfa\xb5\xc4\xd7\xa2\xb2\xe1\xc9\xea\xc7\xeb\xb5\xa5, \xc4\xfa\xcf\xc8\xb5\xbd\xb4\xa6\xbf\xb4\xbf\xb4\xb0\xc9.");
pressreturn();
return 0;
}
memset(®, 0, sizeof(reg));
strlcpy(reg.userid, currentuser.userid, sizeof(reg.userid));
strlcpy(reg.email, currentuser.email, sizeof(reg.email));
while (1) {
screen_move(3, 0);
clrtoeol();
//% prints("%s 您好, 请据实填写以下的资料:\n", currentuser.userid);
prints("%s \xc4\xfa\xba\xc3, \xc7\xeb\xbe\xdd\xca\xb5\xcc\xee\xd0\xb4\xd2\xd4\xcf\xc2\xb5\xc4\xd7\xca\xc1\xcf:\n", currentuser.userid);
do {
//% getfield(6, "请用中文", "真实姓名",
getfield(6, "\xc7\xeb\xd3\xc3\xd6\xd0\xce\xc4", "\xd5\xe6\xca\xb5\xd0\xd5\xc3\xfb",
reg.realname, sizeof(reg.realname));
} while (strlen(reg.realname) < 4);
do {
//% getfield(8, "学校系级或所在单位", "学校系级",
getfield(8, "\xd1\xa7\xd0\xa3\xcf\xb5\xbc\xb6\xbb\xf2\xcb\xf9\xd4\xda\xb5\xa5\xce\xbb", "\xd1\xa7\xd0\xa3\xcf\xb5\xbc\xb6",
reg.dept, sizeof(reg.dept));
} while (strlen(reg.dept) < 6);
do {
//% getfield(10, "包括寝室或门牌号码", "目前住址",
getfield(10, "\xb0\xfc\xc0\xa8\xc7\xde\xca\xd2\xbb\xf2\xc3\xc5\xc5\xc6\xba\xc5\xc2\xeb", "\xc4\xbf\xc7\xb0\xd7\xa1\xd6\xb7",
reg.addr, sizeof(reg.addr));
} while (strlen(reg.addr) < 10);
do {
//% getfield(12, "包括可联络时间", "联络电话",
getfield(12, "\xb0\xfc\xc0\xa8\xbf\xc9\xc1\xaa\xc2\xe7\xca\xb1\xbc\xe4", "\xc1\xaa\xc2\xe7\xb5\xe7\xbb\xb0",
reg.phone, sizeof(reg.phone));
} while (strlen(reg.phone) < 8);
//% getfield(14, "校友会或毕业学校", "校 友 会",
getfield(14, "\xd0\xa3\xd3\xd1\xbb\xe1\xbb\xf2\xb1\xcf\xd2\xb5\xd1\xa7\xd0\xa3", "\xd0\xa3 \xd3\xd1 \xbb\xe1",
reg.assoc, sizeof(reg.assoc));
char ans[3];
getdata(-1, 0,
//% "以上资料是否正确, 按 Q 放弃注册 (Y/N/Quit)? [Y]: ",
"\xd2\xd4\xc9\xcf\xd7\xca\xc1\xcf\xca\xc7\xb7\xf1\xd5\xfd\xc8\xb7, \xb0\xb4 Q \xb7\xc5\xc6\xfa\xd7\xa2\xb2\xe1 (Y/N/Quit)? [Y]: ",
ans, sizeof(ans), DOECHO, YEA);
if (ans[0] == 'Q' || ans[0] == 'q')
return 0;
if (ans[0] != 'N' && ans[0] != 'n')
break;
}
reg.regdate = time(NULL);
append_reg_list(®);
return 0;
}
static void menueditorclose(control m)
{
editor c = getdata(m);
editorclose(c);
}
void check_register_info(void)
{
struct userec *urec = ¤tuser;
FILE *fout;
char buf[192], buf2[STRLEN];
if (!(urec->userlevel & PERM_LOGIN)) {
urec->userlevel = 0;
return;
}
#ifdef NEWCOMERREPORT
if (urec->numlogins == 1) {
screen_clear();
file_temp_name(buf, sizeof(buf));
if ((fout = fopen(buf, "w")) != NULL) {
//% fprintf(fout, "大家好,\n\n");
fprintf(fout, "\xb4\xf3\xbc\xd2\xba\xc3,\n\n");
//% fprintf(fout, "我是 %s (%s), 来自 %s\n",
fprintf(fout, "\xce\xd2\xca\xc7 %s (%s), \xc0\xb4\xd7\xd4 %s\n",
currentuser.userid, urec->username, fromhost);
//% fprintf(fout, "今天%s初来此站报到, 请大家多多指教。\n",
fprintf(fout, "\xbd\xf1\xcc\xec%s\xb3\xf5\xc0\xb4\xb4\xcb\xd5\xbe\xb1\xa8\xb5\xbd, \xc7\xeb\xb4\xf3\xbc\xd2\xb6\xe0\xb6\xe0\xd6\xb8\xbd\xcc\xa1\xa3\n",
//% (urec->gender == 'M') ? "小弟" : "小女子");
(urec->gender == 'M') ? "\xd0\xa1\xb5\xdc" : "\xd0\xa1\xc5\xae\xd7\xd3");
screen_move(2, 0);
//% prints("非常欢迎 %s 光临本站，希望您能在本站找到属于自己的一片天空！\n\n", currentuser.userid);
prints("\xb7\xc7\xb3\xa3\xbb\xb6\xd3\xad %s \xb9\xe2\xc1\xd9\xb1\xbe\xd5\xbe\xa3\xac\xcf\xa3\xcd\xfb\xc4\xfa\xc4\xdc\xd4\xda\xb1\xbe\xd5\xbe\xd5\xd2\xb5\xbd\xca\xf4\xd3\xda\xd7\xd4\xbc\xba\xb5\xc4\xd2\xbb\xc6\xac\xcc\xec\xbf\xd5\xa3\xa1\n\n", currentuser.userid);
//% prints("请您作个简短的个人简介, 向本站其他使用者打个招呼\n");
prints("\xc7\xeb\xc4\xfa\xd7\xf7\xb8\xf6\xbc\xf2\xb6\xcc\xb5\xc4\xb8\xf6\xc8\xcb\xbc\xf2\xbd\xe9, \xcf\xf2\xb1\xbe\xd5\xbe\xc6\xe4\xcb\xfb\xca\xb9\xd3\xc3\xd5\xdf\xb4\xf2\xb8\xf6\xd5\xd0\xba\xf4\n");
//% prints("(简介最多三行, 写完可直接按 <Enter> 跳离)....");
prints("(\xbc\xf2\xbd\xe9\xd7\xee\xb6\xe0\xc8\xfd\xd0\xd0, \xd0\xb4\xcd\xea\xbf\xc9\xd6\xb1\xbd\xd3\xb0\xb4 <Enter> \xcc\xf8\xc0\xeb)....");
getdata(6, 0, ":", buf2, 75, DOECHO, YEA);
if (buf2[0] != '\0') {
//% fprintf(fout, "\n\n自我介绍:\n\n");
fprintf(fout, "\n\n\xd7\xd4\xce\xd2\xbd\xe9\xc9\xdc:\n\n");
fprintf(fout, "%s\n", buf2);
getdata(7, 0, ":", buf2, 75, DOECHO, YEA);
if (buf2[0] != '\0') {
fprintf(fout, "%s\n", buf2);
getdata(8, 0, ":", buf2, 75, DOECHO, YEA);
if (buf2[0] != '\0') {
fprintf(fout, "%s\n", buf2);
}
}
}
fclose(fout);
//% sprintf(buf2, "新手上路: %s", urec->username);
sprintf(buf2, "\xd0\xc2\xca\xd6\xc9\xcf\xc2\xb7: %s", urec->username);
Postfile(buf, "newcomers", buf2, 2);
unlink(buf);
}
pressanykey();
}
#endif
#ifndef FDQUAN
//检查邮箱
while (!HAS_PERM(PERM_BINDMAIL)) {
screen_clear();
if (HAS_PERM(PERM_REGISTER)) {
//% while (askyn("是否绑定复旦邮箱", NA, NA)== NA)
while (askyn("\xca\xc7\xb7\xf1\xb0\xf3\xb6\xa8\xb8\xb4\xb5\xa9\xd3\xca\xcf\xe4", NA, NA)== NA)
//add by eefree.06.7.20
{
//% if (askyn("是否填写校友信息", NA, NA) == NA) {
if (askyn("\xca\xc7\xb7\xf1\xcc\xee\xd0\xb4\xd0\xa3\xd3\xd1\xd0\xc5\xcf\xa2", NA, NA) == NA) {
screen_clear();
continue;
}
check_reg_extra();
return;
}
//add end.
}
tui_check_reg_mail();
}
#endif
screen_clear();
if (HAS_PERM(PERM_REGISTER))
return;
#ifndef AUTOGETPERM
if (check_register_ok()) {
#endif
set_safe_record();
urec->userlevel |= PERM_DEFAULT;
substitut_record(PASSFILE, urec, sizeof(struct userec), usernum);
return;
#ifndef AUTOGETPERM
}
#endif
if (!chkmail())
fill_reg_form();
}
static void editorcut(control m)
{
textbox t = getdata(m);
cuttext(t);
}
int main(int argc, char **argv) {
int i;
int linesold, colsold;
int graphlines = 0;
double delay = 0.5;
char key;
struct iface ifa;
WINDOW *title, *rxgraph, *txgraph, *stats;
bool colors = true;
bool siunits = false;
bool hidescale = false;
bool syncgraphmax = false;
bool fixedlines = false;
memset(&ifa, 0, sizeof ifa);
for (i = 1; i < argc; i++) {
if (!strcmp("-v", argv[i]))
eprintf("%s-%s\n", argv[0], VERSION);
else if (!strcmp("-C", argv[i]))
colors = false;
else if (!strcmp("-s", argv[i]))
siunits = true;
else if (!strcmp("-S", argv[i]))
hidescale = true;
else if (!strcmp("-m", argv[i]))
syncgraphmax = true;
else if (argv[i+1] == NULL || argv[i+1][0] == '-')
usage(argv);
else if (!strcmp("-d", argv[i]))
delay = estrtod(argv[++i]);
else if (!strcmp("-i", argv[i]))
strlcpy(ifa.ifname, argv[++i], IFNAMSIZ);
else if (!strcmp("-l", argv[i])) {
graphlines = estrtol(argv[++i]);
fixedlines = true;
}
}
if (ifa.ifname[0] == '\0')
detectiface(ifa.ifname);
initscr();
curs_set(0);
noecho();
keypad(stdscr, TRUE);
timeout(delay * 1000);
if (colors && has_colors()) {
start_color();
use_default_colors();
init_pair(1, COLOR_GREEN, -1);
init_pair(2, COLOR_RED, -1);
}
signal(SIGWINCH, sighandler);
ifa.rxs = ecalloc(COLS, sizeof(long));
ifa.txs = ecalloc(COLS, sizeof(long));
mvprintw(0, 0, "collecting data from %s for %.2f seconds\n", ifa.ifname, delay);
if (!fixedlines)
graphlines = (LINES-5)/2;
title = newwin(1, COLS, 0, 0);
rxgraph = newwin(graphlines, COLS, 1, 0);
txgraph = newwin(graphlines, COLS, graphlines+1, 0);
stats = newwin(LINES-(graphlines*2+1), COLS, graphlines*2+1, 0);
getdata(&ifa, delay, COLS);
while ((key = getch()) != 'q') {
if (key != ERR)
resize = 1;
getdata(&ifa, delay, COLS);
if (syncgraphmax)
ifa.rxmax = ifa.txmax = MAX(ifa.rxmax, ifa.txmax);
if (resize) {
linesold = LINES;
colsold = COLS;
endwin();
refresh();
if (COLS != colsold) {
arrayresize(&ifa.rxs, COLS, colsold);
arrayresize(&ifa.txs, COLS, colsold);
}
if (LINES != linesold && !fixedlines)
graphlines = (LINES-5)/2;
wresize(title, 1, COLS);
wresize(rxgraph, graphlines, COLS);
wresize(txgraph, graphlines, COLS);
wresize(stats, LINES-(graphlines*2+1), COLS);
mvwin(txgraph, graphlines+1, 0);
mvwin(stats, graphlines*2+1, 0);
resize = 0;
}
werase(title);
mvwprintw(title, 0, COLS/2-7, "interface: %s\n", ifa.ifname);
wnoutrefresh(title);
printgraphw(rxgraph, ifa.rxs, ifa.rxmax, siunits, graphlines, COLS, hidescale, COLOR_PAIR(1));
printgraphw(txgraph, ifa.txs, ifa.txmax, siunits, graphlines, COLS, hidescale, COLOR_PAIR(2));
printstatsw(stats, ifa, siunits, COLS);
doupdate();
}
delwin(title);
delwin(rxgraph);
delwin(txgraph);
delwin(stats);
endwin();
return EXIT_SUCCESS;
}
