friend.c

   1 /*
   2  *  Copyright (C) 2013  Thadeu Lima de Souza Cascardo <cascardo@cascardo.info>
   3  *
   4  *  This program is free software; you can redistribute it and/or modify
   5  *  it under the terms of the GNU General Public License as published by
   6  *  the Free Software Foundation; either version 3 of the License, or
   7  *  (at your option) any later version.
   8  *
   9  *  This program is distributed in the hope that it will be useful,
  10  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12  *  GNU General Public License for more details.
  13  *
  14  *  You should have received a copy of the GNU General Public License along
  15  *  with this program; if not, write to the Free Software Foundation, Inc.,
  16  *  51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
  17  */
  18
  19 #include "friend.h"
  20 #include <string.h>
  21 #include <glib.h>
  22 #include <sys/socket.h>
  23 #include <netinet/in.h>
  24 #include <arpa/inet.h>
  25 #include <netdb.h>
  26 #include <errno.h>
  27 #include <stdio.h>
  28 #include "message.h"
  29
  30 struct friend {
  31         char *name;
  32         char *address;
  33         uint16_t port;
  34         GInetSocketAddress *saddr;
  35 };
  36
  37 static GSocket *usock;
  38
  39 int sock_init(void)
  40 {
  41         GSocketAddress *address;
  42         GInetAddress *any_addr;
  43         GError *error;
  44         int err = 0;
  45         any_addr = g_inet_address_new_any(G_SOCKET_FAMILY_IPV6);
  46         usock = g_socket_new(G_SOCKET_FAMILY_IPV6, G_SOCKET_TYPE_DATAGRAM, G_SOCKET_PROTOCOL_UDP, NULL);
  47         address = g_inet_socket_address_new(any_addr, 17078);
  48         if (!g_socket_bind(usock, address, TRUE, &error)) {
  49                 err = error->code;
  50                 g_error_free(error);
  51         }
  52         g_object_unref(address);
  53         g_object_unref(any_addr);
  54         if (!err)
  55                 message_init(usock);
  56         else
  57                 g_object_unref(usock);
  58         return err;
  59 }
  60
  61 int friend_send_message(struct friend *friend, char *buffer, size_t len)
  62 {
  63         g_socket_send_to(usock, G_SOCKET_ADDRESS(friend->saddr), buffer, len, NULL, NULL);
  64         return 0;
  65 }
  66
  67 struct cache {
  68         GList *friends;
  69 };
  70
  71 static struct cache *ucache;
  72
  73 struct friend *friend_get_by_address(GInetAddress *address, uint16_t port)
  74 {
  75         GList *l;
  76         for (l = g_list_first(ucache->friends); l != NULL; l = g_list_next(l)) {
  77                 struct friend *friend = l->data;
  78                 if (g_inet_address_equal(g_inet_socket_address_get_address(friend->saddr), address) &&
  79                     friend->port == port)
  80                         return friend;
  81         }
  82         return NULL;
  83 }
  84
  85 int create_cache(struct cache **cache)
  86 {
  87         ucache = *cache = g_slice_new0(struct cache);
  88         (*cache)->friends = NULL;
  89         return 0;
  90 }
  91
  92 static void destroy_friend(gpointer data)
  93 {
  94         struct friend *friend = data;
  95         g_free(friend->name);
  96         g_free(friend->address);
  97         g_object_unref(friend->saddr);
  98         g_slice_free(struct friend, friend);
  99 }
 100
 101 int destroy_cache(struct cache *cache)
 102 {
 103         if (cache->friends)
 104                 g_list_free_full(cache->friends, destroy_friend);
 105         g_slice_free(struct cache, cache);
 106 }
 107
 108 char * friend_get_name(struct friend *friend)
 109 {
 110         return friend->name;
 111 }
 112
 113 int cache_add_friend(struct cache *cache, char *name, char *address, uint16_t port)
 114 {
 115         struct friend *friend;
 116         GInetAddress *addr;
 117         friend = g_slice_new0(struct friend);
 118         friend->name = g_strdup(name);
 119         friend->address = g_strdup(address);
 120         friend->port = port;
 121         addr = g_inet_address_new_from_string(address);
 122         friend->saddr = G_INET_SOCKET_ADDRESS(g_inet_socket_address_new(addr, friend->port));
 123         g_object_unref(addr);
 124         cache->friends = g_list_append(cache->friends, friend);
 125         ping(friend);
 126         return 0;
 127 }
 128
 129 int load_cache(struct cache *cache, char *fname)
 130 {
 131         GKeyFile *file;
 132         gchar **groups;
 133         gchar **group;
 134         file = g_key_file_new();
 135         g_key_file_load_from_file(file, fname, G_KEY_FILE_KEEP_COMMENTS | G_KEY_FILE_KEEP_TRANSLATIONS, NULL);
 136         groups = g_key_file_get_groups(file, NULL);
 137         for (group = groups; *group != NULL; group++) {
 138                 gchar *name;
 139                 gchar *address;
 140                 uint16_t port;
 141                 name = g_key_file_get_value(file, *group, "name", NULL);
 142                 address = g_key_file_get_value(file, *group, "address", NULL);
 143                 port = g_key_file_get_integer(file, *group, "port", NULL);
 144                 cache_add_friend(cache, name, address, port);
 145                 g_free(name);
 146                 g_free(address);
 147         }
 148         g_strfreev(groups);
 149         g_key_file_free(file);
 150         return 0;
 151 }
 152
 153 int store_cache(struct cache *cache, char *fname)
 154 {
 155         GKeyFile *file;
 156         GList *f;
 157         gchar *contents;
 158         gssize len;
 159         file = g_key_file_new();
 160         g_key_file_load_from_file(file, fname, G_KEY_FILE_KEEP_COMMENTS | G_KEY_FILE_KEEP_TRANSLATIONS, NULL);
 161         for (f = g_list_first(cache->friends); f != NULL; f = g_list_next(f)) {
 162                 struct friend *friend = f->data;
 163                 g_key_file_set_value(file, friend->name, "name", friend->name);
 164                 g_key_file_set_value(file, friend->name, "address", friend->address);
 165                 g_key_file_set_integer(file, friend->name, "port", friend->port);
 166         }
 167         contents = g_key_file_to_data(file, &len, NULL);
 168         g_file_set_contents(fname, contents, len, NULL);
 169         g_free(contents);
 170         g_key_file_free(file);
 171         return 0;
 172 }