3 * - Stack Initialisation
6 #define VERSION VER2(0,10)
12 #include <tpl_drv_common.h>
13 #include <tpl_drv_network.h>
16 //! Default timeout value, 30 seconds
17 #define DEFAULT_TIMEOUT (30*1000)
20 extern int ARP_Initialise();
21 extern int IPv4_Initialise();
22 extern int IPv4_Ping(tInterface *Iface, tIPv4 Addr);
25 int IPStack_Install(char **Arguments);
26 int IPStack_IOCtlRoot(tVFS_Node *Node, int ID, void *Data);
27 char *IPStack_ReadDir(tVFS_Node *Node, int Pos);
28 tVFS_Node *IPStack_FindDir(tVFS_Node *Node, char *Name);
29 int IPStack_IOCtl(tVFS_Node *Node, int ID, void *Data);
30 int IPStack_AddInterface(char *Device);
31 tAdapter *IPStack_GetAdapter(char *Path);
34 MODULE_DEFINE(0, VERSION, IDENT, IPStack_Install, NULL, NULL);
35 tDevFS_Driver gIP_DriverInfo = {
38 .Size = 0, // Number of interfaces
40 .ACLs = &gVFS_ACL_EveryoneRX,
41 .Flags = VFS_FFLAG_DIRECTORY,
42 .ReadDir = IPStack_ReadDir,
43 .FindDir = IPStack_FindDir,
44 .IOCtl = IPStack_IOCtlRoot
47 tSpinlock glIP_Interfaces = 0;
48 tInterface *gIP_Interfaces = NULL;
49 tInterface *gIP_Interfaces_Last = NULL;
50 int giIP_NextIfaceId = 1;
51 tSpinlock glIP_Adapters = 0;
52 tAdapter *gIP_Adapters = NULL;
56 * \fn int IPStack_Install(char **Arguments)
57 * \brief Intialise the relevant parts of the stack and register with DevFS
59 int IPStack_Install(char **Arguments)
69 // Parse module arguments
70 for( i = 0; Arguments[i]; i++ )
72 //if(strcmp(Arguments[i], "Device") == '=') {
78 DevFS_AddDevice( &gIP_DriverInfo );
84 * \brief Read from the IP Stack's Device Directory
86 char *IPStack_ReadDir(tVFS_Node *Node, int Pos)
90 ENTER("pNode iPos", Node, Pos);
93 for( iface = gIP_Interfaces; iface && Pos--; iface = iface->Next ) ;
95 // Did we run off the end?
106 Pos = iface->Node.ImplInt;
112 name[2] = '0' + Pos/10;
113 name[3] = '0' + Pos%10;
117 name[2] = '0' + Pos/100;
118 name[3] = '0' + (Pos/10)%10;
119 name[4] = '0' + Pos%10;
124 // Return the pre-generated name
129 * \brief Get the node of an interface
131 tVFS_Node *IPStack_FindDir(tVFS_Node *Node, char *Name)
136 ENTER("pNode sName", Node, Name);
138 if(Name[0] != 'i' || Name[1] != 'p') {
144 while('0' <= Name[i] && Name[i] <= '9')
147 num += Name[i] - '0';
150 if(Name[i] != '\0') {
155 for( iface = gIP_Interfaces; iface; iface = iface->Next )
157 if( iface->Node.ImplInt == num )
159 LEAVE('p', &iface->Node);
167 static const char *casIOCtls_Root[] = { DRV_IOCTLNAMES, "add_interface", NULL };
169 * \brief Handles IOCtls for the IPStack root
171 int IPStack_IOCtlRoot(tVFS_Node *Node, int ID, void *Data)
174 ENTER("pNode iID pData", Node, ID, Data);
178 // --- Standard IOCtls (0-3) ---
180 LEAVE('i', DRV_TYPE_MISC);
181 return DRV_TYPE_MISC;
183 case DRV_IOCTL_IDENT:
184 tmp = ModUtil_SetIdent(Data, STR(IDENT));
188 case DRV_IOCTL_VERSION:
192 case DRV_IOCTL_LOOKUP:
193 tmp = ModUtil_LookupString( (char**)casIOCtls_Root, (char*)Data );
199 * - Adds a new IP interface and binds it to a device
202 if( Threads_GetUID() != 0 ) LEAVE_RET('i', -1);
203 if( !CheckString( Data ) ) LEAVE_RET('i', -1);
204 tmp = IPStack_AddInterface(Data);
211 static const char *casIOCtls_Iface[] = {
214 "get_address", "set_address",
216 "get_gateway", "set_gateway",
221 * \brief Handles IOCtls for the IPStack interfaces
223 int IPStack_IOCtl(tVFS_Node *Node, int ID, void *Data)
226 tInterface *iface = (tInterface*)Node->ImplPtr;
227 ENTER("pNode iID pData", Node, ID, Data);
231 // --- Standard IOCtls (0-3) ---
233 LEAVE('i', DRV_TYPE_MISC);
234 return DRV_TYPE_MISC;
236 case DRV_IOCTL_IDENT:
237 tmp = ModUtil_SetIdent(Data, STR(IDENT));
241 case DRV_IOCTL_VERSION:
245 case DRV_IOCTL_LOOKUP:
246 tmp = ModUtil_LookupString( (char**)casIOCtls_Iface, (char*)Data );
252 * - Get/Set the interface type
259 if( Threads_GetUID() != 0 ) {
260 LOG("Attempt by non-root to alter an interface (%i)", Threads_GetUID());
264 if( !CheckMem( Data, sizeof(int) ) ) {
265 LOG("Invalid pointer %p", Data);
269 switch( *(int*)Data )
273 memset(&iface->IP6, 0, sizeof(tIPv6)); // Clear address
277 memset(&iface->IP4, 0, sizeof(tIPv4));
281 memset(&iface->IP6, 0, sizeof(tIPv6));
288 LEAVE('i', iface->Type);
293 * - Get the interface's address
298 case 0: LEAVE_RET('i', 1);
300 if( !CheckMem( Data, sizeof(tIPv4) ) ) LEAVE_RET('i', -1);
301 memcpy( Data, &iface->IP4.Address, sizeof(tIPv4) );
304 if( !CheckMem( Data, sizeof(tIPv6) ) ) LEAVE_RET('i', -1);
305 memcpy( Data, &iface->IP6.Address, sizeof(tIPv6) );
312 * - Get the interface's address
315 if( Threads_GetUID() != 0 ) LEAVE_RET('i', -1);
318 case 0: LEAVE_RET('i', 1);
320 if( !CheckMem( Data, sizeof(tIPv4) ) ) LEAVE_RET('i', -1);
321 iface->Type = 0; // One very hacky mutex/trash protector
322 memcpy( &iface->IP4.Address, Data, sizeof(tIPv4) );
326 if( !CheckMem( Data, sizeof(tIPv6) ) ) LEAVE_RET('i', -1);
328 memcpy( &iface->IP6.Address, Data, sizeof(tIPv6) );
336 * - Get/Set the bits in the address subnet
342 switch( iface->Type )
344 case 4: LEAVE_RET('i', iface->IP4.SubnetBits);
345 case 6: LEAVE_RET('i', iface->IP6.SubnetBits);
346 default: LEAVE_RET('i', 0);
351 if( Threads_GetUID() != 0 ) LEAVE_RET('i', -1);
352 if( !CheckMem(Data, sizeof(int)) ) LEAVE_RET('i', -1);
354 // Check and set the subnet bits
355 switch( iface->Type )
358 if( *(int*)Data < 0 || *(int*)Data > 31 ) LEAVE_RET('i', -1);
359 iface->IP4.SubnetBits = *(int*)Data;
360 LEAVE_RET('i', iface->IP4.SubnetBits);
362 if( *(int*)Data < 0 || *(int*)Data > 127 ) LEAVE_RET('i', -1);
363 iface->IP6.SubnetBits = *(int*)Data;
364 LEAVE_RET('i', iface->IP6.SubnetBits);
374 * - Get the interface's IPv4 gateway
382 if( !CheckMem( Data, sizeof(tIPv4) ) ) LEAVE_RET('i', -1);
383 memcpy( Data, &iface->IP4.Gateway, sizeof(tIPv4) );
393 * - Get/Set the interface's IPv4 gateway
396 if( Threads_GetUID() != 0 ) LEAVE_RET('i', -1);
403 if( !CheckMem( Data, sizeof(tIPv4) ) ) LEAVE_RET('i', -1);
404 iface->Type = 0; // One very hacky mutex/trash protector
405 memcpy( &iface->IP4.Gateway, Data, sizeof(tIPv4) );
416 * - Send an ICMP Echo
425 if( !CheckMem( Data, sizeof(tIPv4) ) ) LEAVE_RET('i', -1);
426 tmp = IPv4_Ping(iface, *(tIPv4*)Data);
443 * \fn int IPStack_AddInterface(char *Device)
444 * \brief Adds an interface to the list
446 int IPStack_AddInterface(char *Device)
450 ENTER("sDevice", Device);
452 iface = malloc(sizeof(tInterface));
455 return -2; // Return ERR_MYBAD
459 iface->Type = 0; // Unset type
462 iface->Node.ImplPtr = iface;
463 iface->Node.ImplInt = giIP_NextIfaceId++;
464 iface->Node.Flags = VFS_FFLAG_DIRECTORY;
465 iface->Node.Size = 0;
466 iface->Node.NumACLs = 1;
467 iface->Node.ACLs = &gVFS_ACL_EveryoneRX;
468 iface->Node.ReadDir = NULL;
469 iface->Node.FindDir = NULL;
470 iface->Node.IOCtl = IPStack_IOCtl;
473 iface->TimeoutDelay = DEFAULT_TIMEOUT;
475 // Get adapter handle
476 iface->Adapter = IPStack_GetAdapter(Device);
477 if( !iface->Adapter ) {
480 return -1; // Return ERR_YOUFAIL
484 LOCK( &glIP_Interfaces );
485 if( gIP_Interfaces ) {
486 gIP_Interfaces_Last->Next = iface;
487 gIP_Interfaces_Last = iface;
490 gIP_Interfaces = iface;
491 gIP_Interfaces_Last = iface;
493 RELEASE( &glIP_Interfaces );
495 gIP_DriverInfo.RootNode.Size ++;
498 LEAVE('i', iface->Node.ImplInt);
499 return iface->Node.ImplInt;
503 * \fn tAdapter *IPStack_GetAdapter(char *Path)
504 * \brief Gets/opens an adapter given the path
506 tAdapter *IPStack_GetAdapter(char *Path)
511 ENTER("sPath", Path);
513 LOCK( &glIP_Adapters );
515 // Check if this adapter is already open
516 for( dev = gIP_Adapters; dev; dev = dev->Next )
518 if( strcmp(dev->Device, Path) == 0 ) {
520 RELEASE( &glIP_Adapters );
526 // Ok, so let's open it
527 dev = malloc( sizeof(tAdapter) + strlen(Path) + 1 );
529 RELEASE( &glIP_Adapters );
535 strcpy( dev->Device, Path );
539 dev->DeviceFD = VFS_Open( dev->Device, VFS_OPENFLAG_READ|VFS_OPENFLAG_WRITE );
540 if( dev->DeviceFD == -1 ) {
542 RELEASE( &glIP_Adapters );
547 // Check that it is a network interface
548 tmp = VFS_IOCtl(dev->DeviceFD, 0, NULL);
549 LOG("Device type = %i", tmp);
550 if( tmp != DRV_TYPE_NETWORK ) {
551 Warning("IPStack_GetAdapter: '%s' is not a network interface", dev->Device);
552 VFS_Close( dev->DeviceFD );
554 RELEASE( &glIP_Adapters );
560 VFS_IOCtl(dev->DeviceFD, NET_IOCTL_GETMAC, &dev->MacAddr);
563 dev->Next = gIP_Adapters;
566 RELEASE( &glIP_Adapters );
569 Link_WatchDevice( dev );