Multiple IPStack Related changes (and other bugfixes)
[tpg/acess2.git] / Modules / IPStack / main.c
index 2a22d1e..bec82b3 100644 (file)
@@ -1,44 +1,45 @@
 /*
  * Acess2 IP Stack
- * - Address Resolution Protocol
+ * - Stack Initialisation
  */
 #define DEBUG  0
-#define VERSION        ((0<<8)|10)
+#define VERSION        VER2(0,10)
 #include "ipstack.h"
+#include "link.h"
 #include <modules.h>
 #include <fs_devfs.h>
-#include <tpl_drv_common.h>
-#include <tpl_drv_network.h>
 
 // === IMPORTS ===
- int   ARP_Initialise();
+extern int     ARP_Initialise();
+extern void    UDP_Initialise();
+extern void    TCP_Initialise();
+extern int     IPv4_Initialise();
+extern int     IPv6_Initialise();
+
+extern tAdapter        *IPStack_GetAdapter(const char *Path);
+extern char    *IPStack_Root_ReadDir(tVFS_Node *Node, int Pos);
+extern tVFS_Node       *IPStack_Root_FindDir(tVFS_Node *Node, const char *Name);
+extern int     IPStack_Root_IOCtl(tVFS_Node *Node, int ID, void *Data);
+extern tInterface      gIP_LoopInterface;
 
 // === PROTOTYPES ===
  int   IPStack_Install(char **Arguments);
-char   *IPStack_ReadDir(tVFS_Node *Node, int Pos);
-tVFS_Node      *IPStack_FindDir(tVFS_Node *Node, char *Name);
- int   IPStack_IOCtl(tVFS_Node *Node, int ID, void *Data);
- int   IPStack_AddInterface(char *Device);
-tAdapter       *IPStack_GetAdapter(char *Path);
+ int   IPStack_CompareAddress(int AddressType, void *Address1, void *Address2, int CheckBits);
 
 // === GLOBALS ===
 MODULE_DEFINE(0, VERSION, IPStack, IPStack_Install, NULL, NULL);
 tDevFS_Driver  gIP_DriverInfo = {
        NULL, "ip",
        {
-       .Size = 0,      // Number of interfaces
+       .Size = -1,     // Number of interfaces
        .NumACLs = 1,
        .ACLs = &gVFS_ACL_EveryoneRX,
        .Flags = VFS_FFLAG_DIRECTORY,
-       .ReadDir = IPStack_ReadDir,
-       .FindDir = IPStack_FindDir
+       .ReadDir = IPStack_Root_ReadDir,
+       .FindDir = IPStack_Root_FindDir,
+       .IOCtl = IPStack_Root_IOCtl
        }
 };
- int   glIP_Interfaces = 0;
-tInterface     *gIP_Interfaces = NULL;
-tInterface     *gIP_Interfaces_Last = NULL;
- int   glIP_Adapters = 0;
-tAdapter       *gIP_Adapters = NULL;
 
 // === CODE ===
 /**
@@ -49,211 +50,88 @@ int IPStack_Install(char **Arguments)
 {
         int    i = 0;
        
-       // Install Handlers
+       // Layer 3 - Network Layer Protocols
        ARP_Initialise();
+       IPv4_Initialise();
+       IPv6_Initialise();
+       // Layer 4 - Transport Layer Protocols
+       TCP_Initialise();
+       UDP_Initialise();
        
-       // Parse module arguments
-       for( i = 0; Arguments[i]; i++ )
+       if(Arguments)
        {
-               //if(strcmp(Arguments[i], "Device") == '=') {
-               //      
-               //}
-       }
-       
-       return 1;
-}
-
-/**
- * \brief Read from the IP Stack's Device Directory
- */
-char *IPStack_ReadDir(tVFS_Node *Node, int Pos)
-{
-       tInterface      *iface;
-       char    name[5] = "ip0\0\0";
-       
-       // Create the name
-       if(Pos < 10)
-               name[2] = '0' + Pos;
-       else {
-               name[2] = '0' + Pos/10;
-               name[3] = '0' + Pos%10;
-       }
-       
-       // Traverse the list
-       for( iface = gIP_Interfaces; iface && Pos--; iface = iface->Next ) ;
-       
-       // Did we run off the end?
-       if(!iface)      return NULL;
-       
-       // Return the pre-generated name
-       return strdup(name);
-}
-
-/**
- * \brief Get the node of an interface
- */
-tVFS_Node *IPStack_FindDir(tVFS_Node *Node, char *Name)
-{
-        int    i;
-        tInterface     *iface;
-       
-       if(Name[0] != 'i' || Name[1] != 'p')    return NULL;
-       if(Name[2] < '0' || Name[2] > '9')      return NULL;
-       
-       if(Name[3] == '\0') {
-               i = Name[2] - '0';
-               for( iface = gIP_Interfaces; iface && i--; iface = iface->Next ) ;
-               if(!iface)      return NULL;
-               return &iface->Node;
+               // Parse module arguments
+               for( i = 0; Arguments[i]; i++ )
+               {
+                       // TODO:
+                       // Define interfaces by <Device>,<Type>,<HexStreamAddress>,<Bits>
+                       // Where:
+                       // - <Device> is the device path (E.g. /Devices/ne2k/0)
+                       // - <Type> is a number (e.g. 4) or symbol (e.g. AF_INET4)
+                       // - <HexStreamAddress> is a condensed hexadecimal stream (in big endian)
+                       //      (E.g. 0A000201 for 10.0.2.1 IPv4)
+                       // - <Bits> is the number of subnet bits (E.g. 24 for an IPv4 Class C)
+                       // Example: /Devices/ne2k/0,4,0A00020A,24
+                       
+                       // I could also define routes using <Interface>,<HexStreamNetwork>,<Bits>,<HexStreamGateway>
+                       // Example: 1,00000000,0,0A000201
+               }
        }
        
-       if(Name[3] < '0' || Name[3] > '9')      return NULL;
+       // Initialise loopback interface
+       gIP_LoopInterface.Adapter = IPStack_GetAdapter("LOOPBACK");
        
-       i = (Name[2] - '0')*10;
-       i += Name[3] - '0';
+       DevFS_AddDevice( &gIP_DriverInfo );
        
-       for( iface = gIP_Interfaces; iface && i--; iface = iface->Next ) ;
-       if(!iface)      return NULL;
-       return &iface->Node;
+       return MODULE_ERR_OK;
 }
 
-static const char *casIOCtls[] = { DRV_IOCTLNAMES, "add_interface", NULL };
 /**
- * \brief Handles IOCtls for the IPStack root
+ * \brief Gets the size (in bytes) of a specified form of address
  */
-int IPStack_IOCtl(tVFS_Node *Node, int ID, void *Data)
+int IPStack_GetAddressSize(int AddressType)
 {
-       switch(ID)
+       switch(AddressType)
        {
-       // --- Standard IOCtls (0-3) ---
-       case DRV_IOCTL_TYPE:
-               return DRV_TYPE_MISC;
-       
-       case DRV_IOCTL_IDENT:
-               if( !CheckMem( Data, 4 ) )      return -1;
-               memcpy(Data, "IP\0\0", 4);
-               return 1;
-       
-       case DRV_IOCTL_VERSION:
-               return VERSION;
-       
-       case DRV_IOCTL_LOOKUP:
-               if( !CheckString( Data ) )      return -1;
-               return LookupString( (char**)casIOCtls, (char*)Data );
-       
-       // --- Non-Standard IOCtls ---
-       /*
-        * add_interface
-        * - Adds a new IP interface and binds it to a device
-        */
-       case 4:
-               if( !CheckString( Data ) )      return -1;
-               return IPStack_AddInterface(Data);
+       case -1:        // -1 = maximum
+               return sizeof(tIPv6);
+       
+       case AF_NULL:
+               return 0;
+       
+       case AF_INET4:
+               return sizeof(tIPv4);
+       case AF_INET6:
+               return sizeof(tIPv6);
+               
+       default:
+               return 0;
        }
-       return 0;
 }
 
-// --- Internal ---
 /**
- * \fn int IPStack_AddInterface(char *Device)
- * \brief Adds an interface to the list
+ * \brief Compare two IP Addresses masked by CheckBits
  */
-int IPStack_AddInterface(char *Device)
+int IPStack_CompareAddress(int AddressType, void *Address1, void *Address2, int CheckBits)
 {
-       tInterface      *iface;
+        int    size = IPStack_GetAddressSize(AddressType);
+       Uint8   mask;
+       Uint8   *addr1 = Address1, *addr2 = Address2;
        
-       iface = malloc(sizeof(tInterface));
-       if(!iface)      return -2;      // Return ERR_MYBAD
+       // Sanity check size
+       if( CheckBits < 0 )     CheckBits = 0;
+       if( CheckBits > size*8 )        CheckBits = size*8;
        
-       iface->Next = NULL;
-       iface->Type = 0;        // Unset type
+       // Check first bits/8 bytes
+       if( memcmp(Address1, Address2, CheckBits/8) != 0 )      return 0;
        
-       // Create Node
-       iface->Node.Flags = VFS_FFLAG_DIRECTORY;
-       iface->Node.Size = 0;
-       iface->Node.NumACLs = 1;
-       iface->Node.ACLs = &gVFS_ACL_EveryoneRX;
-       iface->Node.ReadDir = NULL;
-       iface->Node.FindDir = NULL;
+       // Check if the mask is a multiple of 8
+       if( CheckBits % 8 == 0 )        return 1;
        
-       // Get adapter handle
-       iface->Adapter = IPStack_GetAdapter(Device);
-       if( !iface->Adapter ) {
-               free( iface );
-               return -1;      // Return ERR_YOUFAIL
-       }
-       
-       // Append to list
-       LOCK( &glIP_Interfaces );
-       if( gIP_Interfaces ) {
-               gIP_Interfaces_Last->Next = iface;
-               gIP_Interfaces_Last = iface;
-       }
-       else {
-               gIP_Interfaces = iface;
-               gIP_Interfaces_Last = iface;
-       }
-       RELEASE( &glIP_Interfaces );
-       
-       // Success!
-       return 1;
-}
-
-/**
- * \fn tAdapter *IPStack_GetAdapter(char *Path)
- * \brief Gets/opens an adapter given the path
- */
-tAdapter *IPStack_GetAdapter(char *Path)
-{
-       tAdapter        *dev;
-       
-       LOCK( &glIP_Adapters );
-       
-       // Check if this adapter is already open
-       for( dev = gIP_Adapters; dev; dev = dev->Next )
-       {
-               if( strcmp(dev->Device, Path) == 0 ) {
-                       dev->NRef ++;
-                       RELEASE( &glIP_Adapters );
-                       return dev;
-               }
-       }
-       
-       // Ok, so let's open it
-       dev = malloc( sizeof(tAdapter) + strlen(Path) + 1 );
-       if(!dev) {
-               RELEASE( &glIP_Adapters );
-               return NULL;
-       }
-       
-       // Fill Structure
-       strcpy( dev->Device, Path );
-       dev->NRef = 1;
-       
-       // Open Device
-       dev->DeviceFD = VFS_Open( dev->Device, VFS_OPENFLAG_READ|VFS_OPENFLAG_WRITE );
-       if( dev->DeviceFD == -1 ) {
-               free( dev );
-               RELEASE( &glIP_Adapters );
-               return NULL;
-       }
-       
-       // Check that it is a network interface
-       if( VFS_IOCtl(dev->DeviceFD, 0, NULL) != DRV_TYPE_NETWORK ) {
-               Warning("IPStack_GetAdapter: '%s' is not a network interface", dev->Device);
-               VFS_Close( dev->DeviceFD );
-               free( dev );
-               RELEASE( &glIP_Adapters );
-               return NULL;
-       }
-       
-       // Get MAC Address
-       VFS_IOCtl(dev->DeviceFD, NET_IOCTL_GETMAC, &dev->MacAddr);
-       
-       // Add to list
-       dev->Next = gIP_Adapters;
-       gIP_Adapters = dev;
+       // Check last bits
+       mask = 0xFF << (8 - (CheckBits % 8));
+       if( (addr1[CheckBits/8] & mask) == (addr2[CheckBits/8] & mask) )
+               return 1;
        
-       RELEASE( &glIP_Adapters );
-       return dev;
+       return 0;
 }

UCC git Repository :: git.ucc.asn.au