3 * - Stack Initialisation
6 #define VERSION VER2(0,10)
11 #include <tpl_drv_common.h>
12 #include <tpl_drv_network.h>
15 //! Default timeout value, 30 seconds
16 #define DEFAULT_TIMEOUT (30*1000)
19 extern int ARP_Initialise();
20 extern void UDP_Initialise();
21 extern void TCP_Initialise();
22 extern int IPv4_Initialise();
23 extern int IPv4_Ping(tInterface *Iface, tIPv4 Addr);
24 extern int IPv6_Initialise();
25 //extern int IPv6_Ping(tInterface *Iface, tIPv6 Addr);
28 int IPStack_Install(char **Arguments);
29 int IPStack_IOCtlRoot(tVFS_Node *Node, int ID, void *Data);
30 char *IPStack_Root_ReadDir(tVFS_Node *Node, int Pos);
31 tVFS_Node *IPStack_Root_FindDir(tVFS_Node *Node, char *Name);
32 int IPStack_Root_IOCtl(tVFS_Node *Node, int ID, void *Data);
33 int IPStack_AddInterface(char *Device);
34 tAdapter *IPStack_GetAdapter(char *Path);
35 char *IPStack_Iface_ReadDir(tVFS_Node *Node, int Pos);
36 tVFS_Node *IPStack_Iface_FindDir(tVFS_Node *Node, char *Name);
37 int IPStack_Iface_IOCtl(tVFS_Node *Node, int ID, void *Data);
40 MODULE_DEFINE(0, VERSION, IPStack, IPStack_Install, NULL, NULL);
41 tDevFS_Driver gIP_DriverInfo = {
44 .Size = 0, // Number of interfaces
46 .ACLs = &gVFS_ACL_EveryoneRX,
47 .Flags = VFS_FFLAG_DIRECTORY,
48 .ReadDir = IPStack_Root_ReadDir,
49 .FindDir = IPStack_Root_FindDir,
50 .IOCtl = IPStack_Root_IOCtl
53 tSpinlock glIP_Interfaces = 0;
54 tInterface *gIP_Interfaces = NULL;
55 tInterface *gIP_Interfaces_Last = NULL;
56 int giIP_NextIfaceId = 1;
57 tSpinlock glIP_Adapters = 0;
58 tAdapter *gIP_Adapters = NULL;
59 tSocketFile *gIP_FileTemplates;
63 * \fn int IPStack_Install(char **Arguments)
64 * \brief Intialise the relevant parts of the stack and register with DevFS
66 int IPStack_Install(char **Arguments)
70 // Layer 2 - Data Link Layer
72 // Layer 3 - Network Layer
75 // Layer 4 - Transport Layer
81 // Parse module arguments
82 for( i = 0; Arguments[i]; i++ )
84 //if(strcmp(Arguments[i], "Device") == '=') {
90 DevFS_AddDevice( &gIP_DriverInfo );
96 * \brief Adds a file to the socket list
98 int IPStack_AddFile(tSocketFile *File)
100 Log_Log("IPStack", "Added file '%s'", File->Name);
101 File->Next = gIP_FileTemplates;
102 gIP_FileTemplates = File;
107 * \brief Read from the IP Stack's Device Directory
109 char *IPStack_Root_ReadDir(tVFS_Node *Node, int Pos)
113 ENTER("pNode iPos", Node, Pos);
116 for( iface = gIP_Interfaces; iface && Pos--; iface = iface->Next ) ;
118 // Did we run off the end?
126 Log_Warning("IPStack", "IPStack_Root_ReadDir - malloc error");
132 Pos = iface->Node.ImplInt;
138 name[0] = '0' + Pos/10;
139 name[1] = '0' + Pos%10;
143 name[0] = '0' + Pos/100;
144 name[1] = '0' + (Pos/10)%10;
145 name[2] = '0' + Pos%10;
150 // Return the pre-generated name
155 * \brief Get the node of an interface
157 tVFS_Node *IPStack_Root_FindDir(tVFS_Node *Node, char *Name)
162 ENTER("pNode sName", Node, Name);
165 while('0' <= Name[i] && Name[i] <= '9')
168 num += Name[i] - '0';
171 if(Name[i] != '\0') {
176 for( iface = gIP_Interfaces; iface; iface = iface->Next )
178 if( iface->Node.ImplInt == num )
180 LEAVE('p', &iface->Node);
188 static const char *casIOCtls_Root[] = { DRV_IOCTLNAMES, "add_interface", NULL };
190 * \brief Handles IOCtls for the IPStack root
192 int IPStack_Root_IOCtl(tVFS_Node *Node, int ID, void *Data)
195 ENTER("pNode iID pData", Node, ID, Data);
199 // --- Standard IOCtls (0-3) ---
201 LEAVE('i', DRV_TYPE_MISC);
202 return DRV_TYPE_MISC;
204 case DRV_IOCTL_IDENT:
205 tmp = ModUtil_SetIdent(Data, "IPStack");
209 case DRV_IOCTL_VERSION:
213 case DRV_IOCTL_LOOKUP:
214 tmp = ModUtil_LookupString( (char**)casIOCtls_Root, (char*)Data );
220 * - Adds a new IP interface and binds it to a device
223 if( Threads_GetUID() != 0 ) LEAVE_RET('i', -1);
224 if( !CheckString( Data ) ) LEAVE_RET('i', -1);
225 tmp = IPStack_AddInterface(Data);
233 * \brief Read from an interface's directory
235 char *IPStack_Iface_ReadDir(tVFS_Node *Node, int Pos)
237 tSocketFile *file = gIP_FileTemplates;
238 while(Pos-- && file) {
242 if(!file) return NULL;
244 return strdup(file->Name);
248 * \brief Gets a named node from an interface directory
250 tVFS_Node *IPStack_Iface_FindDir(tVFS_Node *Node, char *Name)
252 tSocketFile *file = gIP_FileTemplates;
254 // Get file definition
255 for(;file;file = file->Next)
257 if( strcmp(file->Name, Name) == 0 ) break;
259 if(!file) return NULL;
262 return file->Init(Node->ImplPtr);
266 * \brief Names for interface IOCtl Calls
268 static const char *casIOCtls_Iface[] = {
271 "get_address", "set_address",
273 "get_gateway", "set_gateway",
279 * \brief Handles IOCtls for the IPStack interfaces
281 int IPStack_Iface_IOCtl(tVFS_Node *Node, int ID, void *Data)
284 tInterface *iface = (tInterface*)Node->ImplPtr;
285 ENTER("pNode iID pData", Node, ID, Data);
289 // --- Standard IOCtls (0-3) ---
291 LEAVE('i', DRV_TYPE_MISC);
292 return DRV_TYPE_MISC;
294 case DRV_IOCTL_IDENT:
295 tmp = ModUtil_SetIdent(Data, STR(IDENT));
299 case DRV_IOCTL_VERSION:
303 case DRV_IOCTL_LOOKUP:
304 tmp = ModUtil_LookupString( (char**)casIOCtls_Iface, (char*)Data );
310 * - Get/Set the interface type
317 if( Threads_GetUID() != 0 ) {
318 LOG("Attempt by non-root to alter an interface (%i)", Threads_GetUID());
322 if( !CheckMem( Data, sizeof(int) ) ) {
323 LOG("Invalid pointer %p", Data);
327 switch( *(int*)Data )
331 memset(&iface->IP6, 0, sizeof(tIPv6)); // Clear address
335 memset(&iface->IP4, 0, sizeof(tIPv4));
339 memset(&iface->IP6, 0, sizeof(tIPv6));
346 LEAVE('i', iface->Type);
351 * - Get the interface's address
356 case 0: LEAVE_RET('i', 1);
358 if( !CheckMem( Data, sizeof(tIPv4) ) ) LEAVE_RET('i', -1);
359 memcpy( Data, &iface->IP4.Address, sizeof(tIPv4) );
362 if( !CheckMem( Data, sizeof(tIPv6) ) ) LEAVE_RET('i', -1);
363 memcpy( Data, &iface->IP6.Address, sizeof(tIPv6) );
370 * - Get the interface's address
373 if( Threads_GetUID() != 0 ) LEAVE_RET('i', -1);
376 case 0: LEAVE_RET('i', 1);
378 if( !CheckMem( Data, sizeof(tIPv4) ) ) LEAVE_RET('i', -1);
379 iface->Type = 0; // One very hacky mutex/trash protector
380 memcpy( &iface->IP4.Address, Data, sizeof(tIPv4) );
384 if( !CheckMem( Data, sizeof(tIPv6) ) ) LEAVE_RET('i', -1);
386 memcpy( &iface->IP6.Address, Data, sizeof(tIPv6) );
394 * - Get/Set the bits in the address subnet
400 switch( iface->Type )
402 case 4: LEAVE_RET('i', iface->IP4.SubnetBits);
403 case 6: LEAVE_RET('i', iface->IP6.SubnetBits);
404 default: LEAVE_RET('i', 0);
409 if( Threads_GetUID() != 0 ) LEAVE_RET('i', -1);
410 if( !CheckMem(Data, sizeof(int)) ) LEAVE_RET('i', -1);
412 // Check and set the subnet bits
413 switch( iface->Type )
416 if( *(int*)Data < 0 || *(int*)Data > 31 ) LEAVE_RET('i', -1);
417 iface->IP4.SubnetBits = *(int*)Data;
418 LEAVE_RET('i', iface->IP4.SubnetBits);
420 if( *(int*)Data < 0 || *(int*)Data > 127 ) LEAVE_RET('i', -1);
421 iface->IP6.SubnetBits = *(int*)Data;
422 LEAVE_RET('i', iface->IP6.SubnetBits);
432 * - Get the interface's IPv4 gateway
440 if( !CheckMem( Data, sizeof(tIPv4) ) ) LEAVE_RET('i', -1);
441 memcpy( Data, &iface->IP4.Gateway, sizeof(tIPv4) );
451 * - Get/Set the interface's IPv4 gateway
454 if( Threads_GetUID() != 0 ) LEAVE_RET('i', -1);
461 if( !CheckMem( Data, sizeof(tIPv4) ) ) LEAVE_RET('i', -1);
462 iface->Type = 0; // One very hacky mutex/trash protector
463 memcpy( &iface->IP4.Gateway, Data, sizeof(tIPv4) );
474 * - Gets the name of the attached device
478 LEAVE_RET('i', iface->Adapter->DeviceLen);
479 if( !CheckMem( Data, iface->Adapter->DeviceLen+1 ) )
481 strcpy( Data, iface->Adapter->Device );
482 return iface->Adapter->DeviceLen;
486 * - Send an ICMP Echo
495 if( !CheckMem( Data, sizeof(tIPv4) ) ) LEAVE_RET('i', -1);
496 tmp = IPv4_Ping(iface, *(tIPv4*)Data);
513 * \fn int IPStack_AddInterface(char *Device)
514 * \brief Adds an interface to the list
516 int IPStack_AddInterface(char *Device)
521 ENTER("sDevice", Device);
523 card = IPStack_GetAdapter(Device);
525 iface = malloc(sizeof(tInterface));
528 return -2; // Return ERR_MYBAD
532 iface->Type = 0; // Unset type
535 iface->Node.ImplPtr = iface;
536 iface->Node.Flags = VFS_FFLAG_DIRECTORY;
537 iface->Node.Size = -1;
538 iface->Node.NumACLs = 1;
539 iface->Node.ACLs = &gVFS_ACL_EveryoneRX;
540 iface->Node.ReadDir = IPStack_Iface_ReadDir;
541 iface->Node.FindDir = IPStack_Iface_FindDir;
542 iface->Node.IOCtl = IPStack_Iface_IOCtl;
543 iface->Node.MkNod = NULL;
544 iface->Node.Link = NULL;
545 iface->Node.Relink = NULL;
546 iface->Node.Close = NULL;
549 iface->TimeoutDelay = DEFAULT_TIMEOUT;
551 // Get adapter handle
552 iface->Adapter = IPStack_GetAdapter(Device);
553 if( !iface->Adapter ) {
556 return -1; // Return ERR_YOUFAIL
559 // Delay setting ImplInt until after the adapter is opened
560 // Keeps things simple
561 iface->Node.ImplInt = giIP_NextIfaceId++;
564 LOCK( &glIP_Interfaces );
565 if( gIP_Interfaces ) {
566 gIP_Interfaces_Last->Next = iface;
567 gIP_Interfaces_Last = iface;
570 gIP_Interfaces = iface;
571 gIP_Interfaces_Last = iface;
573 RELEASE( &glIP_Interfaces );
575 gIP_DriverInfo.RootNode.Size ++;
578 LEAVE('i', iface->Node.ImplInt);
579 return iface->Node.ImplInt;
583 * \fn tAdapter *IPStack_GetAdapter(char *Path)
584 * \brief Gets/opens an adapter given the path
586 tAdapter *IPStack_GetAdapter(char *Path)
591 ENTER("sPath", Path);
593 LOCK( &glIP_Adapters );
595 // Check if this adapter is already open
596 for( dev = gIP_Adapters; dev; dev = dev->Next )
598 if( strcmp(dev->Device, Path) == 0 ) {
600 RELEASE( &glIP_Adapters );
606 // Ok, so let's open it
607 dev = malloc( sizeof(tAdapter) + strlen(Path) + 1 );
609 RELEASE( &glIP_Adapters );
615 strcpy( dev->Device, Path );
617 dev->DeviceLen = strlen(Path);
620 dev->DeviceFD = VFS_Open( dev->Device, VFS_OPENFLAG_READ|VFS_OPENFLAG_WRITE );
621 if( dev->DeviceFD == -1 ) {
623 RELEASE( &glIP_Adapters );
628 // Check that it is a network interface
629 tmp = VFS_IOCtl(dev->DeviceFD, 0, NULL);
630 LOG("Device type = %i", tmp);
631 if( tmp != DRV_TYPE_NETWORK ) {
632 Warning("IPStack_GetAdapter: '%s' is not a network interface", dev->Device);
633 VFS_Close( dev->DeviceFD );
635 RELEASE( &glIP_Adapters );
641 VFS_IOCtl(dev->DeviceFD, NET_IOCTL_GETMAC, &dev->MacAddr);
644 dev->Next = gIP_Adapters;
647 RELEASE( &glIP_Adapters );
650 Link_WatchDevice( dev );