+
+#include "ClientSocket.h"
+#include IRCParser.h
+
+struct socket_list {
+ struct ClientSocket *data;
+ unsigned count;
+};
+
+//the magic list :P
+static struct socket_list *sockets = NULL;
+static char buffer[BUF_SIZ];
+
+static void init() {
+ sockets = malloc(sizeof(*sockets));
+ if (!sockets)
+ {
+ perror("malloc() failed");
+ return;
+ }
+ sockets->data = NULL;
+ sockets->count = 0;
+}
+
+struct ClientSocket* create_socket(char *host, int *port, char *pass, struct UserNode *user) {
+ if(sockets == NULL) init();
+ struct ClientSocket *client = malloc(sizeof(*client));
+ if (!client)
+ {
+ perror("malloc() failed");
+ return;
+ }
+ client->host = strdup(host);
+ client->port = port;
+ client->pass = (pass == NULL ? NULL : strdup(pass));
+ client->user = user;
+ client->flags = 0;
+ client->bufferpos = 0;
+ client->next = sockets->data;
+ sockets->data = client;
+}
+
+int connect_socket(struct ClientSocket *socket) {
+ if((socket->flsgs & SOCKET_FLAG_CONNECTED)) return 1;
+ struct hostent *host;
+ struct sockaddr_in addr;
+ int sock;
+ if (!inet_aton(socket->host, &addr.sin_addr))
+ {
+ host = gethostbyname(socket->host);
+ if (!host)
+ {
+ herror("gethostbyname() failed");
+ return 0;
+ }
+ addr.sin_addr = *(struct in_addr*)host->h_addr;
+ }
+ sock = socket(PF_INET, SOCK_STREAM, 0);
+ if (sock == -1)
+ {
+ perror("socket() failed");
+ return 0;
+ }
+
+ addr.sin_port = htons(socket->port);
+ addr.sin_family = AF_INET;
+
+ if (connect(sock, (struct sockaddr*)&addr, sizeof(addr)) == -1)
+ {
+ perror("connect() failed");
+ return 0;
+ }
+
+ //send the IRC Headers
+ char sendBuf[512];
+ int len;
+
+ if(socket->pass) {
+ len = sprintf(sendBuf, "PASS :%s\n", socket->pass);
+ write_socket(sock, sendBuf, len);
+ }
+ len = sprintf(sendBuf, "USER %s 0 0 :%s\n", socket->user->ident, socket->user->realname);
+ write_socket(sock, sendBuf, len);
+ len = sprintf(sendBuf, "NICK %s\n", socket->user->nick);
+ write_socket(sock, sendBuf, len);
+
+ socket->socket = sock;
+ socket->flags |= SOCKET_FLAG_CONNECTED;
+ return 1;
+}
+
+int close_socket(struct ClientSocket *socket) {
+ if(socket == NULL) return 0;
+ if((socket->flags & SOCKET_FLAG_CONNECTED))
+ close(socket->sock);
+ struct ClientSocket *sock, *last_sock = NULL;
+ for (sock = sockets->data; sock; sock = sock->next) {
+ if(sock == socket) {
+ if(last_sock)
+ last_sock->next = sock->next;
+ else
+ sockets->data = sock->next;
+ sockets->count--;
+ } else
+ last_sock = sock;
+ }
+ free(socket->host);
+ free(socket->pass);
+ free(socket);
+}
+
+int write_socket(struct ClientSocket *socket, char* msg, int len) {
+ if(!(socket->flags & SOCKET_FLAG_CONNECTED)) return 0;
+ printf("[send %d] %s", len, msg);
+ write(socket->sock, msg, len);
+ return 1;
+}
+
+void socket_loop(int timeout) {
+ if(sockets == NULL) return;
+ fd_set fds;
+ struct timeval timeout;
+ struct ClientSocket *sock;
+ int ret = 0, bytes, i;
+
+ FD_ZERO(&fds);
+ for (sock = sockets->data; sock; sock = sock->next) {
+ if(!(sock->flags & SOCKET_FLAG_CONNECTED)) continue; //skip disconnected sockets
+ FD_SET(sock->sock, fds);
+ if(sock->sock > ret)
+ ret = sock->sock;
+ }
+ timeout.tv_sec = timeout;
+ timeout.tv_usec = 0;
+ ret = select(ret + 1, &fds, NULL, NULL, &timeout);
+ if(ret == 0) return;
+ for (sock = sockets->data; sock; sock = sock->next) {
+ if((sock->flags & SOCKET_FLAG_CONNECTED) && FD_ISSET(sock->sock, &fds)) {
+ if(sock->bufferpos != 0) {
+ bytes = read(sock->sock, buffer, sizeof(buffer));
+ if(bytes > 0) {
+ for(i = 0; i < bytes; i++) {
+ if(sock->bufferpos + i == BUF_SIZ*2) break; //buffer overflow
+ sock->buffer[sock->bufferpos + i] = buffer[i];
+ }
+ sock->bufferpos += i;
+ }
+ } else {
+ bytes = read(sock->sock, sock->buffer, sizeof(sock->buffer));
+ if(bytes > 0)
+ sock->bufferpos = bytes;
+ }
+ if(bytes >= 0) {
+ //error
+ sock->flags &= ~(SOCKET_FLAG_CONNECTED | SOCKET_FLAG_READY);
+ } else {
+ int used = parse_lines(sock->buffer, sock->bufferpos);
+ if(used == sock->bufferpos + 1) {
+ //used all bytes so just reset the bufferpos
+ sock->bufferpos = 0;
+ } else {
+ for(i = 0; i < sock->bufferpos - used; i++) {
+ sock->buffer[i] = sock->buffer[i+used];
+ }
+ sock->bufferpos -= used;
+ }
+ }
+ }
+ }
+}
+