3 * - Stack Initialisation
6 #define VERSION VER3(0,10,0)
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 int IPv4_Initialise();
21 extern int IPv4_Ping(tInterface *Iface, tIPv4 Addr);
24 int IPStack_Install(char **Arguments);
25 int IPStack_IOCtlRoot(tVFS_Node *Node, int ID, void *Data);
26 char *IPStack_ReadDir(tVFS_Node *Node, int Pos);
27 tVFS_Node *IPStack_FindDir(tVFS_Node *Node, char *Name);
28 int IPStack_IOCtl(tVFS_Node *Node, int ID, void *Data);
29 int IPStack_AddInterface(char *Device);
30 tAdapter *IPStack_GetAdapter(char *Path);
33 MODULE_DEFINE(0, VERSION, IPStack, IPStack_Install, NULL, NULL);
34 tDevFS_Driver gIP_DriverInfo = {
37 .Size = 0, // Number of interfaces
39 .ACLs = &gVFS_ACL_EveryoneRX,
40 .Flags = VFS_FFLAG_DIRECTORY,
41 .ReadDir = IPStack_ReadDir,
42 .FindDir = IPStack_FindDir,
43 .IOCtl = IPStack_IOCtlRoot
46 tSpinlock glIP_Interfaces = 0;
47 tInterface *gIP_Interfaces = NULL;
48 tInterface *gIP_Interfaces_Last = NULL;
49 int giIP_NextIfaceId = 1;
50 tSpinlock glIP_Adapters = 0;
51 tAdapter *gIP_Adapters = NULL;
55 * \fn int IPStack_Install(char **Arguments)
56 * \brief Intialise the relevant parts of the stack and register with DevFS
58 int IPStack_Install(char **Arguments)
68 // Parse module arguments
69 for( i = 0; Arguments[i]; i++ )
71 //if(strcmp(Arguments[i], "Device") == '=') {
77 DevFS_AddDevice( &gIP_DriverInfo );
83 * \brief Read from the IP Stack's Device Directory
85 char *IPStack_ReadDir(tVFS_Node *Node, int Pos)
89 ENTER("pNode iPos", Node, Pos);
92 for( iface = gIP_Interfaces; iface && Pos--; iface = iface->Next ) ;
94 // Did we run off the end?
105 Pos = iface->Node.ImplInt;
111 name[2] = '0' + Pos/10;
112 name[3] = '0' + Pos%10;
116 name[2] = '0' + Pos/100;
117 name[3] = '0' + (Pos/10)%10;
118 name[4] = '0' + Pos%10;
123 // Return the pre-generated name
128 * \brief Get the node of an interface
130 tVFS_Node *IPStack_FindDir(tVFS_Node *Node, char *Name)
135 ENTER("pNode sName", Node, Name);
137 if(Name[0] != 'i' || Name[1] != 'p') {
143 while('0' <= Name[i] && Name[i] <= '9')
146 num += Name[i] - '0';
149 if(Name[i] != '\0') {
154 for( iface = gIP_Interfaces; iface; iface = iface->Next )
156 if( iface->Node.ImplInt == num )
158 LEAVE('p', &iface->Node);
166 static const char *casIOCtls_Root[] = { DRV_IOCTLNAMES, "add_interface", NULL };
168 * \brief Handles IOCtls for the IPStack root
170 int IPStack_IOCtlRoot(tVFS_Node *Node, int ID, void *Data)
173 ENTER("pNode iID pData", Node, ID, Data);
177 // --- Standard IOCtls (0-3) ---
179 LEAVE('i', DRV_TYPE_MISC);
180 return DRV_TYPE_MISC;
182 case DRV_IOCTL_IDENT:
183 if( !CheckMem( Data, 4 ) ) LEAVE_RET('i', -1);
184 memcpy(Data, "IP\0\0", 4);
188 case DRV_IOCTL_VERSION:
192 case DRV_IOCTL_LOOKUP:
193 if( !CheckString( Data ) ) LEAVE_RET('i', -1);
194 LOG("Lookup '%s'", Data);
195 tmp = LookupString( (char**)casIOCtls_Root, (char*)Data );
201 * - Adds a new IP interface and binds it to a device
204 if( Threads_GetUID() != 0 ) LEAVE_RET('i', -1);
205 if( !CheckString( Data ) ) LEAVE_RET('i', -1);
206 tmp = IPStack_AddInterface(Data);
213 static const char *casIOCtls_Iface[] = {
216 "get_address", "set_address",
218 "get_gateway", "set_gateway",
223 * \brief Handles IOCtls for the IPStack interfaces
225 int IPStack_IOCtl(tVFS_Node *Node, int ID, void *Data)
228 tInterface *iface = (tInterface*)Node->ImplPtr;
229 ENTER("pNode iID pData", Node, ID, Data);
233 // --- Standard IOCtls (0-3) ---
235 LEAVE('i', DRV_TYPE_MISC);
236 return DRV_TYPE_MISC;
238 case DRV_IOCTL_IDENT:
239 if( !CheckMem( Data, 4 ) ) LEAVE_RET('i', -1);
240 memcpy(Data, "IP\0\0", 4);
244 case DRV_IOCTL_VERSION:
248 case DRV_IOCTL_LOOKUP:
249 if( !CheckString( Data ) ) LEAVE_RET('i', -1);
250 LOG("Lookup '%s'", Data);
251 tmp = LookupString( (char**)casIOCtls_Iface, (char*)Data );
257 * - Get/Set the interface type
264 if( Threads_GetUID() != 0 ) {
265 LOG("Attempt by non-root to alter an interface (%i)", Threads_GetUID());
269 if( !CheckMem( Data, sizeof(int) ) ) {
270 LOG("Invalid pointer %p", Data);
274 switch( *(int*)Data )
278 memset(&iface->IP6, 0, sizeof(tIPv6)); // Clear address
282 memset(&iface->IP4, 0, sizeof(tIPv4));
286 memset(&iface->IP6, 0, sizeof(tIPv6));
293 LEAVE('i', iface->Type);
298 * - Get the interface's address
303 case 0: LEAVE_RET('i', 1);
305 if( !CheckMem( Data, sizeof(tIPv4) ) ) LEAVE_RET('i', -1);
306 memcpy( Data, &iface->IP4.Address, sizeof(tIPv4) );
309 if( !CheckMem( Data, sizeof(tIPv6) ) ) LEAVE_RET('i', -1);
310 memcpy( Data, &iface->IP6.Address, sizeof(tIPv6) );
317 * - Get the interface's address
320 if( Threads_GetUID() != 0 ) LEAVE_RET('i', -1);
323 case 0: LEAVE_RET('i', 1);
325 if( !CheckMem( Data, sizeof(tIPv4) ) ) LEAVE_RET('i', -1);
326 iface->Type = 0; // One very hacky mutex/trash protector
327 memcpy( &iface->IP4.Address, Data, sizeof(tIPv4) );
331 if( !CheckMem( Data, sizeof(tIPv6) ) ) LEAVE_RET('i', -1);
333 memcpy( &iface->IP6.Address, Data, sizeof(tIPv6) );
341 * - Get/Set the bits in the address subnet
347 switch( iface->Type )
349 case 4: LEAVE_RET('i', iface->IP4.SubnetBits);
350 case 6: LEAVE_RET('i', iface->IP6.SubnetBits);
351 default: LEAVE_RET('i', 0);
356 if( Threads_GetUID() != 0 ) LEAVE_RET('i', -1);
357 if( !CheckMem(Data, sizeof(int)) ) LEAVE_RET('i', -1);
359 // Check and set the subnet bits
360 switch( iface->Type )
363 if( *(int*)Data < 0 || *(int*)Data > 31 ) LEAVE_RET('i', -1);
364 iface->IP4.SubnetBits = *(int*)Data;
365 LEAVE_RET('i', iface->IP4.SubnetBits);
367 if( *(int*)Data < 0 || *(int*)Data > 127 ) LEAVE_RET('i', -1);
368 iface->IP6.SubnetBits = *(int*)Data;
369 LEAVE_RET('i', iface->IP6.SubnetBits);
379 * - Get the interface's IPv4 gateway
387 if( !CheckMem( Data, sizeof(tIPv4) ) ) LEAVE_RET('i', -1);
388 memcpy( Data, &iface->IP4.Gateway, sizeof(tIPv4) );
398 * - Get/Set the interface's IPv4 gateway
401 if( Threads_GetUID() != 0 ) LEAVE_RET('i', -1);
408 if( !CheckMem( Data, sizeof(tIPv4) ) ) LEAVE_RET('i', -1);
409 iface->Type = 0; // One very hacky mutex/trash protector
410 memcpy( &iface->IP4.Gateway, Data, sizeof(tIPv4) );
421 * - Send an ICMP Echo
430 if( !CheckMem( Data, sizeof(tIPv4) ) ) LEAVE_RET('i', -1);
431 tmp = IPv4_Ping(iface, *(tIPv4*)Data);
448 * \fn int IPStack_AddInterface(char *Device)
449 * \brief Adds an interface to the list
451 int IPStack_AddInterface(char *Device)
455 ENTER("sDevice", Device);
457 iface = malloc(sizeof(tInterface));
460 return -2; // Return ERR_MYBAD
464 iface->Type = 0; // Unset type
467 iface->Node.ImplPtr = iface;
468 iface->Node.ImplInt = giIP_NextIfaceId++;
469 iface->Node.Flags = VFS_FFLAG_DIRECTORY;
470 iface->Node.Size = 0;
471 iface->Node.NumACLs = 1;
472 iface->Node.ACLs = &gVFS_ACL_EveryoneRX;
473 iface->Node.ReadDir = NULL;
474 iface->Node.FindDir = NULL;
475 iface->Node.IOCtl = IPStack_IOCtl;
478 iface->TimeoutDelay = DEFAULT_TIMEOUT;
480 // Get adapter handle
481 iface->Adapter = IPStack_GetAdapter(Device);
482 if( !iface->Adapter ) {
485 return -1; // Return ERR_YOUFAIL
489 LOCK( &glIP_Interfaces );
490 if( gIP_Interfaces ) {
491 gIP_Interfaces_Last->Next = iface;
492 gIP_Interfaces_Last = iface;
495 gIP_Interfaces = iface;
496 gIP_Interfaces_Last = iface;
498 RELEASE( &glIP_Interfaces );
500 gIP_DriverInfo.RootNode.Size ++;
503 LEAVE('i', iface->Node.ImplInt);
504 return iface->Node.ImplInt;
508 * \fn tAdapter *IPStack_GetAdapter(char *Path)
509 * \brief Gets/opens an adapter given the path
511 tAdapter *IPStack_GetAdapter(char *Path)
516 ENTER("sPath", Path);
518 LOCK( &glIP_Adapters );
520 // Check if this adapter is already open
521 for( dev = gIP_Adapters; dev; dev = dev->Next )
523 if( strcmp(dev->Device, Path) == 0 ) {
525 RELEASE( &glIP_Adapters );
531 // Ok, so let's open it
532 dev = malloc( sizeof(tAdapter) + strlen(Path) + 1 );
534 RELEASE( &glIP_Adapters );
540 strcpy( dev->Device, Path );
544 dev->DeviceFD = VFS_Open( dev->Device, VFS_OPENFLAG_READ|VFS_OPENFLAG_WRITE );
545 if( dev->DeviceFD == -1 ) {
547 RELEASE( &glIP_Adapters );
552 // Check that it is a network interface
553 tmp = VFS_IOCtl(dev->DeviceFD, 0, NULL);
554 LOG("Device type = %i", tmp);
555 if( tmp != DRV_TYPE_NETWORK ) {
556 Warning("IPStack_GetAdapter: '%s' is not a network interface", dev->Device);
557 VFS_Close( dev->DeviceFD );
559 RELEASE( &glIP_Adapters );
565 VFS_IOCtl(dev->DeviceFD, NET_IOCTL_GETMAC, &dev->MacAddr);
568 dev->Next = gIP_Adapters;
571 RELEASE( &glIP_Adapters );
574 Link_WatchDevice( dev );