#include #include "windows.h" #include "ChatBot.h" //#include #include #include "IniReader.h" using namespace Upp; void ChatBotClass::checksendlog() { vector::iterator it; time_t timenow=time(NULL); for(it = sendlog.begin(); it != sendlog.end(); it++) { MStruct msg; msg=*it; if ((timenow-msg.timestamp)>3) { printf("resend: (%s)(%i)\n",msg.message.print(),msg.timestamp); resendcheck=0; MString k; k=msg.message.print(); k+="(R)"; say(k.print()); resendcheck=1; sendlog.erase(it); return; } } } void ChatBotClass::addtosendlog (MString message) { if (message.beginswith("/")) return; MStruct msg; msg.nick=""; msg.message=message; msg.timestamp=time(NULL); sendlog.push_back(msg); // printf("addtosend (%s)(%i)\n",message.print(),msg.timestamp); } void ChatBotClass::delfromsendlog (MString message) { // printf("delfr:(%s)\n",message.print()); vector::iterator it; int counter=0; message.erase(" "); message.erase("_"); message.erase("*"); // printf("chx:[(%s)]\n",message.print()); for(it = sendlog.begin(); it != sendlog.end(); it++) { MStruct msg; msg=*it; MString k; k=msg.message.print(); k.erase("‏"); k.erase("‎"); k.erase("⇒"); // k.erase("⇑"); // k.erase("⇓"); k.replace(""","\""); k.replace("ß","ß"); k.replace("<","<"); k.replace(">",">"); k.replace("é","e"); k.replace("á","a"); k.replace("í","i"); k.replace("ó","o"); k.replace("ú","u"); k.replace("ä","ä"); k.replace("ü","ü"); k.replace("ö","ö"); k.replace("Ä","ä"); //wg. umlaute werden mit lowercase ncht in klein buchstaben verwandelt k.replace("Ü","ü"); k.replace("Ö","ö"); k.erase("+"); k.erase(" "); k.erase("_"); k.erase("*"); // printf("chs:[(%s)]\n",k.print()); if (k==message) { // printf("delfromsendlog: (%s)(%i)\n",message.print(),msg.timestamp); sendlog.erase(it); return; } } } void ChatBotClass::addtomessagelog(MString sender, MString message) { MStruct msg; msg.nick=sender; msg.message=message; msg.timestamp=time(NULL); messagelog.push_back(msg); MString zielnick; MString zielstring; int zc=1;int sc=1; int firsttimestamp;int lasttimestamp;int lasttimestamp2; vector::iterator it; int counter=0; for(it = messagelog.begin(); it != messagelog.end(); it++) { MStruct o; o=*it; if (counter==0) {zielnick=o.nick;zielstring=o.message;firsttimestamp=o.timestamp;} if (counter!=0) if (o.nick==zielnick) {zc++;lasttimestamp=o.timestamp;} if (counter!=0) if (o.nick==zielnick&&o.message==zielstring) {sc++;lasttimestamp2=o.timestamp;} // printf("%s %i\n",o.nick.print(),o.timestamp); counter++; } if (zc>3) if ((lasttimestamp-firsttimestamp)<2) {addtosperrlist(zielnick);messagelog.clear();} if (sc>3) if ((lasttimestamp2-firsttimestamp)<7) {addtosperrlist(zielnick);messagelog.clear();} if (messagelog.size()>4) messagelog.erase(messagelog.begin()); } bool ChatBotClass::onsperrliste(MString nick) { vector::iterator it; for(it = sperrnicks.begin(); it != sperrnicks.end(); it++) { MString o; o=*it; // printf("%s %s\n",nick.print(),o.print()); if (o==nick) return(1); } return(0); } void ChatBotClass::addtosperrlist(MString nick) { if (nick!="Wenlok") { FILE *fd; if (NULL == (fd = fopen (".\\sperrliste.ini", "a+"))) printf("error: can't open file sperrliste.ini\n"); fprintf (fd, "%s\n",nick.print()); fclose(fd); sperrnicks.push_back(nick); cout<::iterator it; for(it = sperrnicks.begin(); it != sperrnicks.end(); it++) { MString o; o=*it; // cout<pixels + (xoff+x)*3 + y*surface->pitch); g = *((unsigned char*)surface->pixels + (xoff+x)*3 + y*surface->pitch + 1); b = *((unsigned char*)surface->pixels + (xoff+x)*3 + y*surface->pitch + 2); bool first = ret&0x40000000; ret<<=1; ret |= first; ret^=(r < 128 && g < 128 && b < 128)?1:0; if (r < 128 && g < 128 && b < 128) printf("x"); else printf("."); } printf("\n"); } return ret; } */ int ChatBotClass::LadeDatei(char *datei,char *speichername) { printf("Lade Datei: %s\n",datei); SOCKET passSocket; WORD sockVersion; WSADATA wsaData; int nret; sockVersion = MAKEWORD(1, 1); WSAStartup(sockVersion, &wsaData); LPHOSTENT hostEntry; // hostEntry = gethostbyname("chatcity.de"); // Specifying the server by its name; if (!anonymize) hostEntry = gethostbyname("213.203.200.84"); else hostEntry = gethostbyname("http://www.waythru.com/index.php?q=213.203.200.84"); // another option is gethostbyaddr() if (!hostEntry) { nret = WSAGetLastError(); ReportError(nret, "gethostbyname()"); // Report the error as before WSACleanup(); return NETWORK_ERROR; } passSocket = socket(AF_INET, // Go over TCP/IP SOCK_STREAM, // This is a stream-oriented socket IPPROTO_TCP); // Use TCP rather than UDP if (passSocket == INVALID_SOCKET) { nret = WSAGetLastError(); ReportError(nret, "socket()"); WSACleanup(); return NETWORK_ERROR; } SOCKADDR_IN serverInfo; serverInfo.sin_family = AF_INET; serverInfo.sin_addr = *((LPIN_ADDR)*hostEntry->h_addr_list); // See the explanation in the tutorial serverInfo.sin_port = htons(80); // Change to network-byte order and nret = connect(passSocket, (LPSOCKADDR)&serverInfo, sizeof(struct sockaddr)); if (nret == SOCKET_ERROR) { nret = WSAGetLastError(); ReportError(nret, "connect()"); WSACleanup(); return NETWORK_ERROR; } // Send/receive, then cleanup: char s[2000]; strcpy(s,"GET /securitycode/index.php?0.42204000+1194905347 HTTP/1.1\r\n"); strcat(s,"User-Agent: Opera/9.10 (Windows NT 5.1; U; en)\r\n"); strcat(s,"Host: chats.kunden.abacho.net\r\n"); strcat(s,"Accept: text/html, application/xml;q=0.9, application/xhtml+xml, image/png, image/jpeg, image/gif, image/x-xbitmap, */*;q=0.1\r\n"); strcat(s,"Accept-Language: de-DE,de;q=0.9,en;q=0.8\r\n"); strcat(s,"Accept-Charset: iso-8859-1, utf-8, utf-16, *;q=0.1\r\n"); strcat(s,"Accept-Encoding: deflate, gzip, x-gzip, identity, *;q=0\r\n"); strcat(s,"Referer: http://home.chatcity.de/registrierung/\r\n"); strcat(s,"Connection: Keep-Alive, TE\r\n"); strcat(s,"TE: deflate, gzip, chunked, identity, trailers\r\n"); strcat(s,"\r\n"); int nReadAmount=send(passSocket,s,strlen(s),0); FILE *fd2; fd2 = fopen (speichername, "w"); MString x; char pBuffer[1024]; int y; /* y=recv(passSocket,pBuffer,1024,0) { fprintf (fd2,pBuffer); printf("[%i][]\n",y); Sleep(100); // x+=pBuffer; } */ /* int v=1; while(v!=15) { for (int i=0;i<6048;i++) pBuffer[i]=0; recv(passSocket,pBuffer,1024,0); x+=pBuffer; v++; printf("%s\n",x.print()); printf("%i, %i\n",v,x.strlength()); } */ /* FILE *fd2; fd2 = fopen (speichername, "w"); fprintf (fd2,x.print()); */ fclose(fd2); closesocket(passSocket); } /* ChatBotClass::ChatBotClass() { autokicknicksonsperrlist=0; autoaddtosperrlistonspaming=0; anonymize=0; leseeigenenschrieb=1; beepmyname=1; rawtext=0; floodpref1=""; floodpref2=""; seconds1=time(NULL); readsperrliste(); readschlussel(); resendcheck=1; } */ void ChatBotClass::Write2Log(char *name,char *text) { time_t rawtime; time ( &rawtime ); FILE *fd2; fd2 = fopen (name, "a+"); // fprintf (fd2,ctime (&rawtime)); fprintf (fd2,text); fprintf (fd2,"\n"); fclose(fd2); } /* ChatBotClass::~ChatBotClass() { } */ void ChatBotClass::webpage() { if (errorcode) return; char *name; FILE *fd2; MString p; name=(char*)malloc(255); sprintf(name,"channel.htm"); if (NULL == (fd2 = fopen (name, "w"))) { printf ("Can't open it ejecting!\n"); } else { printf ("file erzeugt\n"); } fprintf (fd2, "\n %i\n",Nicknum); fprintf (fd2, ""); printf("ok\n"); for (int i=0;i"); else fprintf (fd2, ""); fprintf (fd2,"\n",Nicks[i].print(),Nicks[i].print()); } fprintf (fd2, "

name: %s

"); fprintf (fd2, "\n"); fclose (fd2); printf ("lade hoch\n"); /* netbuf *nControl; FtpInit (); FtpConnect ("web7.webmailer.de", &nControl); FtpLogin ("www.ph2.net", "abulafia", nControl); // FtpChdir("Fragen", nControl); FtpPut (name, name, FTPLIB_ASCII, nControl); FtpQuit (nControl); printf ("hochgeladen\n"); */ } int ChatBotClass::login(const char *name, char *pwd, char *chan) { Write2Log("connectionlog.txt","Login\n"); isinsep=0; peopleinsep=0; seconds1=time(NULL); aktivechannel=chan; UserName=name; Passwort=pwd; GetIDandSID(); GetChatOut(); } int ChatBotClass::login() { peopleinsep=0; isinsep=0; GetIDandSID(); GetChatOut(); } void ChatBotClass::Exit() { WSACleanup(); } void ChatBotClass::ReportError(int errorCodex, const char *whichFunc) { Write2Log("connectionlog.txt","Error:\n"); sendlog.clear(); printf("sendlog cleared\n"); char errorMsg[92]; ZeroMemory(errorMsg, 92); // automatically NULL-terminate the string sprintf(errorMsg, "SOCKETERROR: Call to %s returned error %d!", (char *)whichFunc, errorCodex); Write2Log("connectionlog.txt",errorMsg); ErrorMsg=errorMsg; errorcode=errorCodex; } void ChatBotClass::readHTMLout(void (*pfi)(MString Text)) { if (errorcode) return; char pBuffer[6048]; MString Sender[40]; MString message[40]; MString col[40]; int flag[40]; MString packet; for (int i=0;i<6048;i++) pBuffer[i]=0; int len=recv(sendHTMLSocket,pBuffer,6048,0); for (int i=0;((pBuffer!=""));i++) packet.concat(pBuffer[i]); } struct list_entry { int sock; struct list_entry *next; }; struct list_type { struct list_entry *data; unsigned count; }; void ChatBotClass::readchatline2(void (*pfi)(int fl, String col, String Sender, String Message)) { printf("inreadchat\n"); printf("inreadchat\n"); if (errorcode) return; printf("inreadchat\n"); char pBuffer[8000]; String Sender[40]; String message[40]; String col[40]; int flag[40]; MString packet; for (int i=0;i<40;i++) { col[i]="000000"; } for (int i=0;i<8000;i++) pBuffer[i]=0; unsigned long a[1]; a[1]=1; int e = ioctlsocket(sendSocket, FIONBIO, a); if (e == -1) { errorcode=1; printf("ioctlsocket failed\n"); } int len = recv(sendSocket,pBuffer,8000,0); if (len<0) {checksendlog();return;} if (len==0) { errorcode=1; printf("len=0\n"); ReportError(999, "Zerolengthreturn"); } for (int i=0;((pBuffer[i]!=(int)0));i++) packet.concat(pBuffer[i]); printf("RAW[%s]\n",packet.print()); int mc=0; if (packet.includes("Du bist eine gewisse Zeit des Chats verwiesen worden!")) { errorcode=1;ReportError(1000, "Du bist eine gewisse Zeit des Chats verwiesen worden"); } packet.erase(" $\"ID-Card$ "); packet.erase(" $\"ID-Card$ "); packet.erase(" $\"ID-Card$ "); packet.erase(" $\"ID-Card$ "); packet.erase(" $\"ID-Card$ "); packet.erase(" $\"ID-Card$ "); packet.erase(""); packet.preconcat("
"); if (rawtext) { col[0]="000000";flag[0]=0;message[0]=packet.print();Sender[0]="RAW"; mc+=1;} if ((!packet.includes("***newpage***"))) { packet.replace("é","e"); packet.replace("á","a"); packet.replace("í","i"); packet.replace("ó","o"); packet.replace("ú","u"); packet.replace("ä","ä"); packet.replace("ü","ü"); packet.replace("ö","ö"); packet.replace("Ä","ä"); //wg. umlaute werden mit lowercase ncht in klein buchstaben verwandelt packet.replace("Ü","ü"); packet.replace("Ö","ö"); packet.erase(" "); packet.replace("
",""); packet.replace("
\n

"); for (int i=0;i<40;i++) flag[i]=0; int x=1; MString ppacket; do { x++; ppacket=packet.getbedfirst("
","
"); if (ppacket.found) goto ok; ppacket=packet.getbedfirst("
","
"); if (ppacket.found) goto ok; ppacket=packet.getbedfirst("
","
"); if (ppacket.found) goto ok; ppacket=packet.getbedfirst("
","
"); if (ppacket.found) goto ok; goto ok2; ok: packet.erase(0,4); packet.erase(ppacket.print()); ppacket.concat("
"); //Normaler Chatschrieb printf("%s\n",ppacket.print()); if (ppacket.includes("")) { MString k; k=ppacket.getbedfirst(""); col[mc]=k.print(); k=ppacket.getbedfirst("",":"); Sender[mc]=k.print(); k=ppacket.getbedfirst(": ","
"); message[mc]=k.print(); mc++; } //Du flüsterst zu ... if (ppacket.includes("")) { MString k; col[mc]="000000"; k=ppacket.getbedfirst("",":"); Sender[mc]=k.print(); k="Du fluesterst zu "; k+=Sender[mc]; k+=":"; k+=ppacket.getbedfirst(": ","
"); message[mc]=k.print(); Sender[mc]="---"; flag[mc]=4; mc++; } //... flüstert ... if (ppacket.includes("")) { MString k; col[mc]="000000"; k=ppacket.getbedfirst("",""); Sender[mc]=k.print(); k=ppacket.getbedfirst(" ","
"); message[mc]=k.print(); flag[mc]=3; mc++; } //me if (ppacket.includes("")) { MString k; col[mc]="000000"; k=ppacket.getbedfirst("","
"); message[mc]=k.print(); Sender[mc]="..."; flag[mc]=4; mc++; } printf("xx1\n"); //Bob Nachrichten, gemischtes if (ppacket.includes("")) { MString k; k=ppacket.getbedfirst("MrBob: ","
"); if (k.includes("Du gehst in das Separee")) { sepname=k.getbedfirst("Du gehst in das Separee ",""); k.erase(""); if (isinsep) ChatterSepList.abmelden(k); } if (k.includes("ist wieder da.")) { MString k;k=message[mc];k.erase(" ist wieder da."); k.erase(""); if (isinsep) ChatterSepList.anmelden(k); } if (k.includes("ist im Augenblick abgemeldet")) { MString k;k=message[mc];k.erase(" ist im Augenblick abgemeldet"); if (isinsep) ChatterSepList.abmelden(k); } if (k.includes("betritt das Separee")) { if (autokicknicksonsperrlist) { MString k;k=message[mc];k.erase(" betritt das Separee"); if (onsperrliste(k)) {MString x;x="/sepkick ";x+=k;say(x.print());message[mc]="Nick on Sperrlist joined";} peopleinsep++; ChatterSepList.AddChatter(k); } else { MString k;k=message[mc];k.erase(" betritt das Separee"); ChatterSepList.AddChatter(k); peopleinsep++; } } if (k.includes("Schwupp und raus aus dem Separee")) { isinsep=0; peopleinsep=0; ChatterSepList.clearall(); } k.erase(""); k.erase(""); k.erase(""); k.erase(""); k.erase(""); message[mc]=k.print(); Sender[mc]="Wenlok"; flag[mc]=1; mc++; } printf("xx1\n"); //Userlist anzeigen if (ppacket.includes("")) { MString k; k=ppacket.getbedfirst("",""); k+=":\n"; k+=ppacket.getbedfirst("","
"); k.replace("",""); k.replace("",""); k.replace("

","