/*            bot.c           */
/*   TUROKIN IRC-BOTTI    */
/*    gcc bot.c -o bot    */
/* tee tiedosto botdata.h ja käsittele siellä funktiossa parsedata() kaikki data mitä servu lähettää*/

#include <stdio.h>
#include <string.h>
#include <sys/types.h>
#include <sys/socket.h>
#include <unistd.h>
#include <netinet/in.h>
#include <netdb.h>
#include "botdata.h" /*botdata.h sisältää kaiken datan parserointiin liittyvän*/

int fd;

void usage(char *nimi);
void ircconnect(char *servu, int port, char *name);
void printbuffer(char *puskuri);
int parsedata(char *data, int sokka, char *kannu);

int main(int argc, char *argv[])
{
        int bytes, i;
        char buffer[1000], pingi[50], joini[50], message[200], nick[100];

        printf("Turokki's IRC-bot starting...\n");
        if(argc != 5) { usage(argv[0]); } else { ircconnect(argv[1], atoi(argv[2]), argv[4]); }

         /*Looppi joka vastaanottaa dataa serveriltä, printtaa sen näytölle, ja lähettää sen eteenpäin käsiteltäväksi*/
        while(1)
        {
                for(i=0; i<1000; i++) buffer[i] = '\0';
                recv(fd, buffer, 1000, 0);
                 /*Jos halutaan nähdä mitä servu lähettää käytetään printbufferia, muutoin tämän rivin voi ottaa pois*/
                printbuffer(buffer);
                 /*Eli tee tiedosto botdata.h ja laita sinne parsedata funktio (prototyyppi yllä), jossa tarkistat mitä dataa tulee ja sitä sitten käsitellään*/
                parsedata(buffer, fd, argv[3]);
        }

         /*Loppujen lopuksi suljetaan yhteys ja sammutetaan ohjelma*/
        close(fd);
        printf("Disconnected!!!\n");
        return(0);
}

/*Tämä funktio yhdistää servulle annettujen argumenttien perusteella*/
void ircconnect(char *servu, int port, char *name)
{
        int i;
        char buffer[1000];

         /*Rakentajat joita tarvitaan socketeissa*/
        struct hostent *he;
        struct sockaddr_in server;

         /*Selvitetään servun IP osoite annetusta nimestä*/
        printf("Looking up server... ");
        if((he = gethostbyname(servu)) == NULL)
        {
                printf("Invalid server!!!\n");
                printf("Exiting...\n");
                exit(0);
        }

         /*Printataan kaivettu tieto ylös*/
        printf("found!!!\n");
        printf("Hostname: %s\n", he->h_name);
        printf("IP Address: %s\n", (inet_ntoa(*((struct in_addr *) he->h_addr))));

         /*Muodostetaan socketti*/
        printf("Trying to connect on port %i... ", port);
        if((fd = socket(AF_INET, SOCK_STREAM, 0)) == -1)
        {
                printf("Error in socket()!!!\n");
                exit(0);
        }

         /*Laitetaan tarvittava data samaan pakettiin*/
        server.sin_family = AF_INET;
        server.sin_port = htons(port);
        server.sin_addr = *((struct in_addr *)he->h_addr);
        bzero(&(server.sin_zero), 8);

        /*Ja lopuksi yhdistetään määrättyyn porttiin*/
        if(connect(fd, (struct sockaddr *)&server, sizeof(struct sockaddr)) == -1)
        {
                printf("\nCould not connect!!!\n");
                exit(0);
        }


        printf("Connected!!!\n");

        /*Kaikki sujui hienosti mutta laitetaan vielä nickname stringi servulle että servu vaihtaa nikin oikeaksi*/
        printf("Sending nick name string...");
        for(i=0; i<1000; i++) buffer[i] = '\0';
        sprintf(buffer, "NICK %s\r\nUSER %s \"\" \"%s\" :x\r\n", name, name, (inet_ntoa(*((struct in_addr *) he->h_addr))));
        send(fd, buffer, strlen(buffer), 0);
        printf(" done!!!\n");
}

/*Käytin debuggauksessa tälläistä funktiota jolla tarkistin mitä se servu oikein lähetti, ei ole pakko ottaa mukaan*/
void printbuffer(char *puskuri)
{
        int i;

        for(i=0; i<1000; i++)
        {
                if(puskuri[i] != '\0') printf("%c", puskuri[i]);
        }
}

/*Tästä tuskin tarvitsee sanoa mitään*/
void usage(char *nimi)
{
        printf("Usage: %s <IRC-SERVER> <PORT> <CHANNEL> <NICKNAME>\n", nimi);
        exit(0);
}


----------EOF------------


/*Tosilyhyt esimerkki parsedata.h tiedostosta, vastaa vain pingeihin mitä servu lähettää että botti pysyisi servulla disconnectaamatta*/
/*ELI SIIS ÄLKÄÄ OTTAKO TÄSTÄ OPPIA!!! :)*/

#include <stdio.h>
#include <stdlib.h>
#include <string.h>

int parsedata(char *data, int sokka, char *kannu)
{
        int i, y;
        char pong[100];
        char puskuri[1000];

        for(i=0; i<1000; i++)
        {
                 /*Tämä tarkistus on yhtä helvettiä näin mutta en tiedä miten sen olisin järkevämmin toteuttanut :F*/
                if(data[i] == 'P' && data[i+1] == 'I' && data[i+2] == 'N' && data[i+3] == 'G' && data[i+4] == ' ' && data[i+5] == ':')
                {
                        for(y=0; y<100; y++) pong[y] = '\0';
                         /*Sitä samaa purkkaa eli kerätään serverin lähettämä numero/kirjain sarja ylös*/
                        for(y=0; y<40; y++) { if(data[i+6+y] != '\0') pong[y] = data[i+6+y]; }
                        for(y=0; y<40; y++) { if(pong[y] != '\0') printf("%c", pong[y]); }

                        /*ja vastataan servulle takaisin kyseisellä sarjalla*/
                        for(y=0; y<1000; y++) puskuri[y] == '\0';
                        sprintf(puskuri, "PONG :%s\r\n", pong);
                        send(sokka, puskuri, strlen(puskuri), 0);

                        /*Tein botilleni omat authit jolloin botti saa aina opit kun joinii kannullemme, eli laita kohtaan tunnus ja salasana omat tietosi*/
                        if(authed == 0)
                        {
                                for(y=0; y<1000; y++) puskuri[y] == '\0';
                                sprintf(puskuri, "PRIVMSG Q@CServe.quakenet.org :AUTH tunnus salasana\r\n");
                                send(sokka, puskuri, strlen(puskuri), 0);
                                authed = 1;
                        }

                         /*Loppujen lopuksi joinitaan kyseiselle kannulle joka on jo määritelty*/
                        for(y=0; y<1000; y++) puskuri[y] == '\0';
                        sprintf(puskuri, "JOIN #%s\r\n", kannu);
                        send(sokka, puskuri, strlen(puskuri), 0);
                }
         }
}

-----------------EOF-------------