![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to answer.cpp CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [Synchronet] / sbbs / sbbs3|
Return to answer.cpp CVS log | Up to [Synchronet] / sbbs / sbbs3 |
1.1 root 1: /* answer.cpp */
2:
3: /* Synchronet answer "caller" function */
4:
5: /* $Id: answer.cpp,v 1.7 2000/12/11 23:21:11 rswindell Exp $ */
6:
7: /****************************************************************************
8: * @format.tab-size 4 (Plain Text/Source Code File Header) *
9: * @format.use-tabs true (see http://www.synchro.net/ptsc_hdr.html) *
10: * *
11: * Copyright 2000 Rob Swindell - http://www.synchro.net/copyright.html *
12: * *
13: * This program is free software; you can redistribute it and/or *
14: * modify it under the terms of the GNU General Public License *
15: * as published by the Free Software Foundation; either version 2 *
16: * of the License, or (at your option) any later version. *
17: * See the GNU General Public License for more details: gpl.txt or *
18: * http://www.fsf.org/copyleft/gpl.html *
19: * *
20: * Anonymous FTP access to the most recent released source is available at *
21: * ftp://vert.synchro.net, ftp://cvs.synchro.net and ftp://ftp.synchro.net *
22: * *
23: * Anonymous CVS access to the development source and modification history *
24: * is available at cvs.synchro.net:/cvsroot/sbbs, example: *
25: * cvs -d :pserver:[email protected]:/cvsroot/sbbs login *
26: * (just hit return, no password is necessary) *
27: * cvs -d :pserver:[email protected]:/cvsroot/sbbs checkout src *
28: * *
29: * For Synchronet coding style and modification guidelines, see *
30: * http://www.synchro.net/source.html *
31: * *
32: * You are encouraged to submit any modifications (preferably in Unix diff *
33: * format) via e-mail to [email protected] *
34: * *
35: * Note: If this box doesn't appear square, then you need to fix your tabs. *
36: ****************************************************************************/
37:
38: #include "sbbs.h"
39: #include "telnet.h"
40:
41: bool sbbs_t::answer()
42: {
43: char str[256],str2[256],c;
44: char tmp[512];
45: int i,l,in;
46: struct tm * tm;
47: struct in_addr addr;
48:
49: useron.number=0;
50: answertime=logontime=starttime=now=time(NULL);
51: /* Caller ID is IP address */
52: addr.s_addr=client_addr;
53: strcpy(cid,inet_ntoa(addr));
54:
55: tm=localtime(&now);
56: if(tm==NULL)
57: return(false);
58:
59: sprintf(str,"%02d:%02d%c %s %s %02d %u Node %3u"
60: ,tm->tm_hour>12 ? tm->tm_hour-12 : tm->tm_hour==0 ? 12 : tm->tm_hour
61: ,tm->tm_min,tm->tm_hour>=12 ? 'p' : 'a',wday[tm->tm_wday]
62: ,mon[tm->tm_mon],tm->tm_mday,tm->tm_year+1900,cfg.node_num);
63: logline("@ ",str);
64:
65: sprintf(str,"%s %s [%s]", connection, client_name, cid);
66: logline("@+:",str);
67:
68: online=ON_REMOTE;
69:
70: rlogin_name[0]=0;
71: if(sys_status&SS_RLOGIN) {
72: mswait(1000); /* Give input_thread time to start */
73: if(incom()==0) {
74: for(i=0;i<LEN_ALIAS;i++) {
75: in=incom();
76: if(in==0 || in==NOINP)
77: break;
78: str[i]=in;
79: }
80: str[i]=0;
81: for(i=0;i<LEN_ALIAS;i++) {
82: in=incom();
83: if(in==0 || in==NOINP)
84: break;
85: str2[i]=in;
86: }
87: str2[i]=0;
88: lprintf("Node %d RLogin: '%s' / '%s'",cfg.node_num,str,str2);
89: strcpy(rlogin_name
90: ,cfg.startup->options&BBS_OPT_USE_2ND_RLOGIN ? str2 : str);
91: useron.number=userdatdupe(0, U_ALIAS, LEN_ALIAS, rlogin_name, 0);
92: if(useron.number)
93: getuserdat(&cfg,&useron);
94: }
95: }
96: if(rlogin_name[0]==0)
97: sys_status&=~SS_RLOGIN;
98:
99: /* Detect terminal type */
100: mswait(200);
101: rioctl(IOFI); /* flush input buffer */
102: putcom( "\r\n" /* locate cursor at column 1 */
103: "\x1b[99B" /* locate cursor as far down as possible */
104: "\x1b[6n" /* Get cursor position */
105: "\x1b[!_" /* RIP? */
106: "\x1b[0t_" /* WIP? */
107: "\x1b[0m_" /* "Normal" colors */
108: "\x1b[2J" /* clear screen */
109: "\x1b[H" /* home cursor */
110: "\xC" /* clear screen (in case not ANSI) */
111: "\r" /* Move cursor left (in case previous char printed) */
112: );
113: i=l=0;
114: tos=1;
115: strcpy(str,VERSION_NOTICE);
116: strcat(str,COPYRIGHT_NOTICE);
117: center(str);
118: while(i++<50 && l<sizeof(str)-1) { /* wait up to 5 seconds for response */
119: c=(incom()&0x7f);
120: if(!c) {
121: mswait(100);
122: continue;
123: }
124: i=0;
125: if(l==0 && c!=ESC) // response must begin with escape char
126: continue;
127: str[l++]=c;
128: if(c=='R') { /* break immediately if response */
129: mswait(100);
130: break;
131: }
132: }
133:
134: if(rioctl(RXBC)) /* wait a bit for extra RIP reply chars */
135: mswait(500);
136:
137: while((c=(incom()&0x7f))!=0 && l<sizeof(str)-1)
138: str[l++]=c;
139: str[l]=0;
140:
141: if(l) {
142: if(str[0]==ESC && str[1]=='[') {
143: autoterm|=(ANSI|COLOR);
144: rows=((str[2]&0xf)*10)+(str[3]&0xf);
145: if(rows<10 || rows>99) rows=24; }
146: truncsp(str);
147: if(strstr(str,"RIPSCRIP")) {
148: logline("@R",strstr(str,"RIPSCRIP"));
149: autoterm|=(RIP|COLOR|ANSI); }
150: else if(strstr(str,"DC-TERM")
151: && toupper(*(strstr(str,"DC-TERM")+12))=='W') {
152: logline("@W",strstr(str,"DC-TERM"));
153: autoterm|=(WIP|COLOR|ANSI); } }
154: rioctl(IOFI); /* flush left-over or late response chars */
155:
156: if(!autoterm && str[0]) {
157: lputs("Terminal Auto-detect failed, Response: ");
158: str2[0]=0;
159: for(i=0;str[i];i++) {
160: if(str[i]>=' ' && str[i]<='~')
161: sprintf(tmp,"%c", str[i]);
162: else
163: sprintf(tmp,"<%02X>", (uchar)str[i]);
164: strcat(str2,tmp);
165: }
166: lputs(str2);
167: }
168:
169: if(!(sys_status&SS_RLOGIN)) {
170: /* Disable Telnet Terminal Echo */
171: sprintf(str,"%c%c%c",TELNET_IAC,TELNET_WILL,TELNET_ECHO);
172: putcom(str,3);
173: /* Will supress Go Ahead */
174: sprintf(str,"%c%c%c",TELNET_IAC,TELNET_WILL,TELNET_SUP_GA);
175: putcom(str,3);
176: }
177:
178: /* AutoLogon via IP or Caller ID here */
179: if(!useron.number && !(sys_status&SS_RLOGIN)
180: && cfg.startup->options&BBS_OPT_AUTO_LOGON && cid[0]) {
181: useron.number=userdatdupe(0, U_NOTE, LEN_NOTE, cid, 0);
182: if(useron.number) {
183: getuserdat(&cfg, &useron);
184: if(!(useron.misc&AUTOLOGON) || !(useron.exempt&FLAG('V')))
185: useron.number=0;
186: }
187: }
188:
189: if(!online)
190: return(false);
191:
192: useron.misc&=~(ANSI|COLOR|RIP|WIP);
193: useron.misc|=autoterm;
194: sprintf(useron.comp, "%.*s", sizeof(useron.comp)-1, client_name);
195:
196: if(!useron.number && sys_status&SS_RLOGIN) {
197: CRLF;
198: newuser();
199: }
200:
201: if(!useron.number) { /* manual/regular logon */
202:
203: /* Display ANSWER screen */
204: sprintf(str,"%sanswer",cfg.text_dir);
205: sprintf(tmp,"%s.%s",str,autoterm&WIP ? "wip":"rip");
206: sprintf(str2,"%s.ans",str);
207: if(autoterm&(RIP|WIP) && fexist(tmp))
208: strcat(str,autoterm&WIP ? ".wip":".rip");
209: else if(autoterm&ANSI && fexist(str2))
210: strcat(str,".ans");
211: else
212: strcat(str,".asc");
213: rioctl(IOSM|PAUSE);
214: sys_status|=SS_PAUSEON;
215: printfile(str,P_NOABORT);
216: sys_status&=~SS_PAUSEON;
217: exec_bin(cfg.login_mod,&main_csi);
218: } else /* auto logon here */
219: if(logon()==false)
220: return(false);
221:
222:
223: if(!useron.number)
224: hangup();
225: if(!online)
226: return(false);
227:
228: /* Save the IP to the user's note */
229: if(cid[0]) {
230: sprintf(useron.note, "%.*s", sizeof(useron.note)-1, cid);
231: putuserrec(&cfg,useron.number,U_NOTE,LEN_NOTE,useron.note);
232: }
233:
234: /* Save host name to the user's computer description */
235: if(client_name[0]) {
236: sprintf(useron.comp, "%.*s", sizeof(useron.comp)-1, client_name);
237: putuserrec(&cfg,useron.number,U_COMP,LEN_COMP,useron.comp);
238: }
239:
240: if(!(sys_status&SS_USERON)) {
241: errormsg(WHERE,ERR_CHK,"User not logged on",0);
242: hangup();
243: return(false); }
244:
245: return(true);
246: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.