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 "include/swift_types.h"
  26 #include "include/swift_list.h"
  27
  28 /*
  29  * Add new socket to list. Called by sw_socket "syscall".
  30  */
  31
  32 struct sock_list *list_add_socket(int s)
  33 {
  34         struct sock_list *ptr = malloc(sizeof(*ptr));
  35         if (ptr == NULL)
  36                 return NULL;
  37
  38         ptr->next = &sock_list_head;
  39         ptr->prev = sock_list_head.prev;
  40         sock_list_head.prev->next = ptr;
  41         sock_list_head.prev = ptr;
  42         ptr->s = s;
  43
  44         return ptr;
  45 }
  46
  47 /*
  48  * Bind socket to given address. Called by sw_bind "syscall".
  49  */
  50
  51 struct sock_list *list_update_socket_address(int s, __CONST_SOCKADDR_ARG addr)
  52 {
  53         struct sock_list *ptr;
  54
  55         for (ptr = sock_list_head.next; ptr != &sock_list_head; ptr = ptr->next)
  56                 if (ptr->s == s) {
  57                         memcpy(&ptr->addr, addr, sizeof(ptr->addr));
  58                         return ptr;
  59                 }
  60
  61         return NULL;
  62 }
  63
  64 /*
  65  * Get list element containing socket s. Called by sw_send* "syscalls".
  66  */
  67
  68 struct sock_list *list_elem_from_socket(int s)
  69 {
  70         struct sock_list *ptr;
  71
  72         for (ptr = sock_list_head.next; ptr != &sock_list_head; ptr = ptr->next)
  73                 if (ptr->s == s)
  74                         return ptr;
  75
  76         return NULL;
  77 }
  78
  79 /*
  80  * Get list element containing address addr. Called by sw_bind "syscall".
  81  */
  82
  83 struct sock_list *list_elem_from_address(__CONST_SOCKADDR_ARG addr)
  84 {
  85         struct sock_list *ptr;
  86
  87         for (ptr = sock_list_head.next; ptr != &sock_list_head; ptr = ptr->next) {
  88                 if (ptr->bind_state == STATE_NOTBOUND)
  89                         continue;
  90                 if (memcmp(&ptr->addr, addr, sizeof(addr)) == 0)
  91                         return ptr;
  92         }
  93
  94         return NULL;
  95 }
  96
  97 /*
  98  * Unlink socket from list. Called by list_remove_socket.
  99  */
 100 static struct sock_list *list_unlink_socket(int s)
 101 {
 102         struct sock_list *ptr;
 103
 104         for (ptr = sock_list_head.next; ptr != &sock_list_head; ptr = ptr->next)
 105                 if (ptr->s == s) {
 106                         ptr->next->prev = ptr->prev;
 107                         ptr->prev->next = ptr->next;
 108                         ptr->next = ptr;
 109                         ptr->prev = ptr;
 110                         return ptr;
 111                 }
 112
 113         return NULL;
 114 }
 115
 116 /*
 117  * Remove socket from list. Called by sw_close "syscall".
 118  */
 119
 120 int list_remove_socket(int s)
 121 {
 122         struct sock_list *ptr;
 123
 124         ptr = list_unlink_socket(s);
 125         if (ptr == NULL)
 126                 return -1;
 127
 128         free(ptr);
 129         return 0;
 130 }
 131
 132 /*
 133  * Check if a socket is bound.
 134  */
 135 int list_socket_is_bound(int s)
 136 {
 137         struct sock_list *ptr;
 138
 139         for (ptr = sock_list_head.next; ptr != &sock_list_head; ptr = ptr->next)
 140                 if (ptr->s == s) {
 141                         if (ptr->bind_state == STATE_BOUND)
 142                                 return 1;
 143                         break;
 144                 }
 145
 146         return 0;
 147 }