src/raw/swift_list.c

   1 /*
   2  * swift implementation of syscall API
   3  *
   4  * Simulates the classic socket syscalls (socket, bind, send, recv).
   5  * Implementation uses raw sockets (AF_INET, SOCK_RAW).
   6  *
   7  * Subsequently, implementation is to be ported into kernel space and
   8  * the interface is going to be offered by the Linux syscall API.
   9  *
  10  * Heavily inspired by GLIBC's <sys/socket.h>
  11  * (/usr/include/sys/socket.h).
  12  *
  13  * 2011, Razvan Deaconescu, razvan.deaconescu@cs.pub.ro
  14  */
  15
  16 #include <stdio.h>
  17 #include <stdlib.h>
  18 #include <string.h>
  19 #include <sys/types.h>
  20 #include <sys/socket.h>
  21 #include <netinet/in.h>
  22 #include <unistd.h>
  23 #include <errno.h>
  24
  25 #include "swift_types.h"
  26 #include "swift_list.h"
  27 /*
  28  * Add new socket to list. Called by sw_socket "syscall".
  29  */
  30
  31 struct sock_list *list_add_socket(int s)
  32 {
  33         struct sock_list *ptr = malloc(sizeof(*ptr));
  34         if (ptr == NULL)
  35                 return NULL;
  36
  37         ptr->next = &sock_list_head;
  38         ptr->prev = sock_list_head.prev;
  39         sock_list_head.prev->next = ptr;
  40         sock_list_head.prev = ptr;
  41         ptr->s = s;
  42
  43         return ptr;
  44 }
  45
  46 /*
  47  * Bind socket to given address. Called by sw_bind "syscall".
  48  */
  49
  50 struct sock_list *list_update_socket_address(int s, __CONST_SOCKADDR_ARG addr)
  51 {
  52         struct sock_list *ptr;
  53
  54         for (ptr = sock_list_head.next; ptr != &sock_list_head; ptr = ptr->next)
  55                 if (ptr->s == s) {
  56                         memcpy(&ptr->addr, addr, sizeof(ptr->addr));
  57                         return ptr;
  58                 }
  59
  60         return NULL;
  61 }
  62
  63 /*
  64  * Get list element containing socket s. Called by sw_send* "syscalls".
  65  */
  66
  67 struct sock_list *list_elem_from_socket(int s)
  68 {
  69         struct sock_list *ptr;
  70
  71         for (ptr = sock_list_head.next; ptr != &sock_list_head; ptr = ptr->next)
  72                 if (ptr->s == s)
  73                         return ptr;
  74
  75         return NULL;
  76 }
  77
  78 /*
  79  * Get list element containing address addr. Called by sw_bind "syscall".
  80  */
  81
  82 struct sock_list *list_elem_from_address(__CONST_SOCKADDR_ARG addr)
  83 {
  84         struct sock_list *ptr;
  85
  86         for (ptr = sock_list_head.next; ptr != &sock_list_head; ptr = ptr->next) {
  87                 if (ptr->bind_state == STATE_NOTBOUND)
  88                         continue;
  89                 if (memcmp(&ptr->addr, addr, sizeof(addr)) == 0)
  90                         return ptr;
  91         }
  92
  93         return NULL;
  94 }
  95
  96 /*
  97  * Unlink socket from list. Called by list_remove_socket.
  98  */
  99 static struct sock_list *list_unlink_socket(int s)
 100 {
 101         struct sock_list *ptr;
 102
 103         for (ptr = sock_list_head.next; ptr != &sock_list_head; ptr = ptr->next)
 104                 if (ptr->s == s) {
 105                         ptr->next->prev = ptr->prev;
 106                         ptr->prev->next = ptr->next;
 107                         ptr->next = ptr;
 108                         ptr->prev = ptr;
 109                         return ptr;
 110                 }
 111
 112         return NULL;
 113 }
 114
 115 /*
 116  * Remove socket from list. Called by sw_close "syscall".
 117  */
 118
 119 int list_remove_socket(int s)
 120 {
 121         struct sock_list *ptr;
 122
 123         ptr = list_unlink_socket(s);
 124         if (ptr == NULL)
 125                 return -1;
 126
 127         free(ptr);
 128         return 0;
 129 }
 130
 131 /*
 132  * Check if a socket is bound.
 133  */
 134 int list_socket_is_bound(int s)
 135 {
 136         struct sock_list *ptr;
 137
 138         for (ptr = sock_list_head.next; ptr != &sock_list_head; ptr = ptr->next)
 139                 if (ptr->s == s) {
 140                         if (ptr->bind_state == STATE_BOUND)
 141                                 return 1;
 142                         break;
 143                 }
 144
 145         return 0;
 146 }