X-Git-Url: https://git.cworth.org/git?p=ttt;a=blobdiff_plain;f=src%2Fttt-client.c;h=508aa88e91ecffba87e9c7e63a3caaa92db521ea;hp=80fca846e13ee46e4fae37b87ee966901a91de9a;hb=f8bdcd97af8d0dcee79ab692fffb83dba5a5498a;hpb=5d56d3cd8b4685e905ed604277ac9cb32c876127 diff --git a/src/ttt-client.c b/src/ttt-client.c index 80fca84..508aa88 100644 --- a/src/ttt-client.c +++ b/src/ttt-client.c @@ -21,46 +21,265 @@ #include "ttt-client.h" +#include "ttt-error.h" +#include "ttt-lex.h" +#include "ttt-server.h" +#include "ttt-socket.h" +#include "ttt-token.h" + struct _ttt_client { + pthread_mutex_t mutex; + pthread_t thread; + ttt_server_t *server; int socket; + yyscan_t scanner; + + char *name; + + char **request_strings; + int num_request_strings; }; -ttt_client_t * -ttt_client_create (ttt_server_t *server, int socket) +typedef ttt_error_t (*ttt_command_func_t) (ttt_client_t *client, + char **args, + int num_args); + +static ttt_error_t +_ttt_client_execute_helo (ttt_client_t *client, + char **args, + int num_args); + +typedef struct _ttt_command_description { + const char *command; + int args_min; + int args_max; + ttt_command_func_t execute; +} ttt_command_description_t; + +ttt_command_description_t command_descriptions[] = { + {"HELO", 1, 1, _ttt_client_execute_helo} +}; + +static ttt_error_t +_ttt_client_execute_helo (ttt_client_t *client, + char **args, + int num_args) { - ttt_client_t *client; + ttt_error_t error; + char *response; - client = xmalloc (sizeof (ttt_client_t)); + if (num_args == 1) + ttt_client_set_name (client, args[0]); + + error = ttt_server_register_client (client->server, client); + if (error) + return error; + + xasprintf (&response, "HELO %s %s %s\n", client->name, + ttt_server_get_host (client->server), + ttt_server_get_port (client->server)); + + ttt_client_send (client, response); + + free (response); + + return TTT_ERROR_NONE; +} + +#define ARRAY_SIZE(arr) (sizeof(arr)/sizeof(arr[0])) + +static void +_free_request (ttt_client_t *client); + +static void +_ttt_client_init (ttt_client_t *client, + ttt_server_t *server, + int socket) +{ + FILE *file; + + pthread_mutex_init (&client->mutex, NULL); client->server = server; client->socket = socket; - return client; + file = xfdopen (socket, "r"); + yylex_init(&client->scanner); + yyset_in (file, client->scanner); + + client->request_strings = NULL; + client->num_request_strings = 0; + + client->name = NULL; } -void -ttt_client_destroy (ttt_client_t *client) +static void +_ttt_client_fini (ttt_client_t *client) { - close (client->socket); + pthread_mutex_lock (&client->mutex); - free (client); + ttt_server_unregister_client (client->server, client); + + free (client->name); + client->name = NULL; + + yylex_destroy (client->scanner); + shutdown (client->socket, SHUT_RDWR); + + _free_request (client); + + pthread_mutex_unlock (&client->mutex); + + pthread_mutex_destroy (&client->mutex); } -void -ttt_client_handle_requests (ttt_client_t *client) +/* XXX: The memory management for the request strings is pretty cheesy. */ +static void +_append_to_request (ttt_client_t *client, + const char *string) +{ + client->num_request_strings++; + client->request_strings = + xrealloc (client->request_strings, + client->num_request_strings * sizeof (char *)); + + client->request_strings[client->num_request_strings - 1] = xstrdup (string); +} + +static void +_free_request (ttt_client_t *client) +{ + int i; + + for (i = 0; i < client->num_request_strings; i++) + free (client->request_strings[i]); + + free (client->request_strings); + + client->request_strings = NULL; + client->num_request_strings = 0; +} + +static ttt_status_t +_read_request (ttt_client_t *client) { -#define BUF_SIZE 1024 + ttt_token_t token; + + _free_request (client); while (1) { - char buf[BUF_SIZE]; - int cnt; - cnt = read (client->socket, buf, BUF_SIZE); - if (cnt == 0) + token = yylex (client->scanner); + /* Yes, EOF in two different enums is pretty ugly. */ + if (token == TTT_TOKEN_EOF) + return TTT_STATUS_EOF; + + if (token == TTT_TOKEN_NEWLINE) { + if (client->num_request_strings) + return TTT_STATUS_SUCCESS; + else + continue; + } + + assert (token == TTT_TOKEN_STRING); + + _append_to_request (client, yyget_text (client->scanner)); + } +} + +static ttt_error_t +_execute_request (ttt_client_t *client) +{ + int i; + + char *command = client->request_strings[0]; + int num_args = client->num_request_strings-1; + ttt_command_description_t *desc; + + for (i=0; i < strlen (command); i++) + command[i] = toupper (command[i]); + + for (i=0; i < ARRAY_SIZE(command_descriptions); i++) { + desc = &command_descriptions[i]; + if (strcmp(command, desc->command) == 0) { + if ((num_args < desc->args_min) || (num_args > desc->args_max)) + return TTT_ERROR_SYNTAX; + return (desc->execute) (client, &client->request_strings[1], num_args); + } + } + + return TTT_ERROR_COMMAND; +} + +static void * +_handle_requests_thread (void *closure) +{ + ttt_status_t status; + ttt_error_t error; + ttt_client_t *client = closure; + + while (1) { + + status = _read_request (client); + if (status == TTT_STATUS_EOF) break; - write (0, buf, cnt); - write (client->socket, buf, cnt); + if (status) + ASSERT_NOT_REACHED; + + error = _execute_request (client); + if (error) + ttt_client_send (client, ttt_error_string (error)); + } + + _ttt_client_fini (client); + free (client); + + return (void *) 0; +} + +/* Exported: See ttt-client.h for documentation. */ +void +ttt_client_new (void *closure, int client_socket) +{ + ttt_server_t *server = closure; + ttt_client_t *client; + int err; + + client = xmalloc (sizeof (ttt_client_t)); + + _ttt_client_init (client, server, client_socket); + + err = pthread_create (&client->thread, NULL, + _handle_requests_thread, client); + if (err != 0) { + fprintf (stderr, "Error: pthread_create failed: %s. Aborting.\n", + strerror (err)); + exit (1); } } +/* Exported: See ttt-client.h for documentation. */ +void +ttt_client_send (ttt_client_t *client, const char *message) +{ + pthread_mutex_lock (&client->mutex); + + ttt_socket_write (client->socket, message, strlen (message)); + + pthread_mutex_unlock (&client->mutex); +} + +/* Exported: See ttt-client.h for documentation. */ +const char* +ttt_client_get_name (ttt_client_t *client) +{ + return client->name; +} +/* Exported: See ttt-client.h for documentation. */ +void +ttt_client_set_name (ttt_client_t *client, const char *name) +{ + free (client->name); + client->name = xstrdup (name); +}