6 #define VERSION VER2(0,10)
9 #include <tpl_drv_common.h>
10 #include <tpl_drv_network.h>
13 //! Default timeout value, 30 seconds
14 #define DEFAULT_TIMEOUT (30*1000)
17 extern int IPv4_Ping(tInterface *Iface, tIPv4 Addr);
18 //extern int IPv6_Ping(tInterface *Iface, tIPv6 Addr);
19 extern tVFS_Node gIP_RouteNode;
22 char *IPStack_Root_ReadDir(tVFS_Node *Node, int Pos);
23 tVFS_Node *IPStack_Root_FindDir(tVFS_Node *Node, const char *Name);
24 int IPStack_Root_IOCtl(tVFS_Node *Node, int ID, void *Data);
26 int IPStack_AddInterface(const char *Device, const char *Name);
27 int IPStack_AddFile(tSocketFile *File);
28 tAdapter *IPStack_GetAdapter(const char *Path);
30 char *IPStack_Iface_ReadDir(tVFS_Node *Node, int Pos);
31 tVFS_Node *IPStack_Iface_FindDir(tVFS_Node *Node, const char *Name);
32 int IPStack_Iface_IOCtl(tVFS_Node *Node, int ID, void *Data);
35 //! Loopback (127.0.0.0/8, ::1) Pseudo-Interface
36 tInterface gIP_LoopInterface = {
38 ImplPtr: &gIP_LoopInterface,
39 Flags: VFS_FFLAG_DIRECTORY,
42 ACLs: &gVFS_ACL_EveryoneRX,
43 ReadDir: IPStack_Iface_ReadDir,
44 FindDir: IPStack_Iface_FindDir,
45 IOCtl: IPStack_Iface_IOCtl
50 tShortSpinlock glIP_Interfaces;
51 tInterface *gIP_Interfaces = NULL;
52 tInterface *gIP_Interfaces_Last = NULL;
54 tSocketFile *gIP_FileTemplates;
56 tAdapter *gIP_Adapters = NULL;
57 int giIP_NextIfaceId = 1;
62 * \brief Read from the IP Stack's Device Directory
64 char *IPStack_Root_ReadDir(tVFS_Node *Node, int Pos)
68 ENTER("pNode iPos", Node, Pos);
73 return strdup("routes");
82 for( iface = gIP_Interfaces; iface && Pos--; iface = iface->Next ) ;
84 // Did we run off the end?
92 Log_Warning("IPStack", "IPStack_Root_ReadDir - malloc error");
98 Pos = iface->Node.ImplInt;
104 name[0] = '0' + Pos/10;
105 name[1] = '0' + Pos%10;
109 name[0] = '0' + Pos/100;
110 name[1] = '0' + (Pos/10)%10;
111 name[2] = '0' + Pos%10;
116 // Return the pre-generated name
121 * \brief Get the node of an interface
123 tVFS_Node *IPStack_Root_FindDir(tVFS_Node *Node, const char *Name)
130 ENTER("pNode sName", Node, Name);
133 if( strcmp(Name, "routes") == 0 ) {
134 return &gIP_RouteNode;
138 if( strcmp(Name, "lo") == 0 ) {
139 return &gIP_LoopInterface.Node;
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( (int)iface->Node.ImplInt == num )
159 LEAVE('p', &iface->Node);
164 for( iface = gIP_Interfaces; iface; iface = iface->Next )
166 if( strcmp(iface->Name, Name) == 0 )
168 LEAVE('p', &iface->Node);
178 static const char *casIOCtls_Root[] = { DRV_IOCTLNAMES, "add_interface", NULL };
180 * \brief Handles IOCtls for the IPStack root
182 int IPStack_Root_IOCtl(tVFS_Node *Node, int ID, void *Data)
185 ENTER("pNode iID pData", Node, ID, Data);
189 // --- Standard IOCtls (0-3) ---
191 LEAVE('i', DRV_TYPE_MISC);
192 return DRV_TYPE_MISC;
194 case DRV_IOCTL_IDENT:
195 tmp = ModUtil_SetIdent(Data, "IPStack");
199 case DRV_IOCTL_VERSION:
203 case DRV_IOCTL_LOOKUP:
204 tmp = ModUtil_LookupString( (char**)casIOCtls_Root, (char*)Data );
210 * - Adds a new IP interface and binds it to a device
213 if( Threads_GetUID() != 0 ) LEAVE_RET('i', -1);
214 if( !CheckString( Data ) ) LEAVE_RET('i', -1);
217 tmp = IPStack_AddInterface(Data, name);
226 * \fn int IPStack_AddInterface(char *Device)
227 * \brief Adds an interface to the list
229 int IPStack_AddInterface(const char *Device, const char *Name)
234 ENTER("sDevice", Device);
236 card = IPStack_GetAdapter(Device);
238 iface = malloc(sizeof(tInterface) + sprintf(NULL, "%i", giIP_NextIfaceId) + 1);
241 return -2; // Return ERR_MYBAD
245 iface->Type = 0; // Unset type
248 iface->Node.ImplPtr = iface;
249 iface->Node.Flags = VFS_FFLAG_DIRECTORY;
250 iface->Node.Size = -1;
251 iface->Node.NumACLs = 1;
252 iface->Node.ACLs = &gVFS_ACL_EveryoneRX;
253 iface->Node.ReadDir = IPStack_Iface_ReadDir;
254 iface->Node.FindDir = IPStack_Iface_FindDir;
255 iface->Node.IOCtl = IPStack_Iface_IOCtl;
256 iface->Node.MkNod = NULL;
257 iface->Node.Link = NULL;
258 iface->Node.Relink = NULL;
259 iface->Node.Close = NULL;
262 iface->TimeoutDelay = DEFAULT_TIMEOUT;
264 // Get adapter handle
265 iface->Adapter = IPStack_GetAdapter(Device);
266 if( !iface->Adapter ) {
269 return -1; // Return ERR_YOUFAIL
272 // Delay setting ImplInt until after the adapter is opened
273 // Keeps things simple
274 iface->Node.ImplInt = giIP_NextIfaceId++;
275 sprintf(iface->Name, "%i", iface->Node.ImplInt);
278 SHORTLOCK( &glIP_Interfaces );
279 if( gIP_Interfaces ) {
280 gIP_Interfaces_Last->Next = iface;
281 gIP_Interfaces_Last = iface;
284 gIP_Interfaces = iface;
285 gIP_Interfaces_Last = iface;
287 SHORTREL( &glIP_Interfaces );
289 // gIP_DriverInfo.RootNode.Size ++;
292 LEAVE('i', iface->Node.ImplInt);
293 return iface->Node.ImplInt;
297 * \brief Adds a file to the socket list
299 int IPStack_AddFile(tSocketFile *File)
301 Log_Log("IPStack", "Added file '%s'", File->Name);
302 File->Next = gIP_FileTemplates;
303 gIP_FileTemplates = File;
311 * \brief Read from an interface's directory
313 char *IPStack_Iface_ReadDir(tVFS_Node *Node, int Pos)
315 tSocketFile *file = gIP_FileTemplates;
316 while(Pos-- && file) {
320 if(!file) return NULL;
322 return strdup(file->Name);
326 * \brief Gets a named node from an interface directory
328 tVFS_Node *IPStack_Iface_FindDir(tVFS_Node *Node, const char *Name)
330 tSocketFile *file = gIP_FileTemplates;
332 // Get file definition
333 for(;file;file = file->Next)
335 if( strcmp(file->Name, Name) == 0 ) break;
337 if(!file) return NULL;
340 return file->Init(Node->ImplPtr);
344 * \brief Names for interface IOCtl Calls
346 static const char *casIOCtls_Iface[] = {
349 "get_address", "set_address",
351 "get_gateway", "set_gateway",
357 * \brief Handles IOCtls for the IPStack interfaces
359 int IPStack_Iface_IOCtl(tVFS_Node *Node, int ID, void *Data)
362 tInterface *iface = (tInterface*)Node->ImplPtr;
363 ENTER("pNode iID pData", Node, ID, Data);
367 // --- Standard IOCtls (0-3) ---
369 LEAVE('i', DRV_TYPE_MISC);
370 return DRV_TYPE_MISC;
372 case DRV_IOCTL_IDENT:
373 tmp = ModUtil_SetIdent(Data, STR(IDENT));
377 case DRV_IOCTL_VERSION:
381 case DRV_IOCTL_LOOKUP:
382 tmp = ModUtil_LookupString( (char**)casIOCtls_Iface, (char*)Data );
388 * - Get/Set the interface type
395 if( Threads_GetUID() != 0 ) {
396 LOG("Attempt by non-root to alter an interface (%i)", Threads_GetUID());
400 if( !CheckMem( Data, sizeof(int) ) ) {
401 LOG("Invalid pointer %p", Data);
405 switch( *(int*)Data )
409 memset(&iface->IP6, 0, sizeof(tIPv6)); // Clear address
413 memset(&iface->IP4, 0, sizeof(tIPv4));
417 memset(&iface->IP6, 0, sizeof(tIPv6));
424 LEAVE('i', iface->Type);
429 * - Get the interface's address
434 case 0: LEAVE_RET('i', 1);
436 if( !CheckMem( Data, sizeof(tIPv4) ) ) LEAVE_RET('i', -1);
437 memcpy( Data, &iface->IP4.Address, sizeof(tIPv4) );
440 if( !CheckMem( Data, sizeof(tIPv6) ) ) LEAVE_RET('i', -1);
441 memcpy( Data, &iface->IP6.Address, sizeof(tIPv6) );
448 * - Get the interface's address
451 if( Threads_GetUID() != 0 ) LEAVE_RET('i', -1);
454 case 0: LEAVE_RET('i', 1);
456 if( !CheckMem( Data, sizeof(tIPv4) ) ) LEAVE_RET('i', -1);
457 iface->Type = 0; // One very hacky mutex/trash protector
458 memcpy( &iface->IP4.Address, Data, sizeof(tIPv4) );
462 if( !CheckMem( Data, sizeof(tIPv6) ) ) LEAVE_RET('i', -1);
464 memcpy( &iface->IP6.Address, Data, sizeof(tIPv6) );
472 * - Get/Set the bits in the address subnet
478 switch( iface->Type )
480 case 4: LEAVE_RET('i', iface->IP4.SubnetBits);
481 case 6: LEAVE_RET('i', iface->IP6.SubnetBits);
482 default: LEAVE_RET('i', 0);
487 if( Threads_GetUID() != 0 ) LEAVE_RET('i', -1);
488 if( !CheckMem(Data, sizeof(int)) ) LEAVE_RET('i', -1);
490 // Check and set the subnet bits
491 switch( iface->Type )
494 if( *(int*)Data < 0 || *(int*)Data > 31 ) LEAVE_RET('i', -1);
495 iface->IP4.SubnetBits = *(int*)Data;
496 LEAVE_RET('i', iface->IP4.SubnetBits);
498 if( *(int*)Data < 0 || *(int*)Data > 127 ) LEAVE_RET('i', -1);
499 iface->IP6.SubnetBits = *(int*)Data;
500 LEAVE_RET('i', iface->IP6.SubnetBits);
510 * - Get the interface's IPv4 gateway
518 if( !CheckMem( Data, sizeof(tIPv4) ) ) LEAVE_RET('i', -1);
519 memcpy( Data, &iface->IP4.Gateway, sizeof(tIPv4) );
529 * - Get/Set the interface's IPv4 gateway
532 if( Threads_GetUID() != 0 ) LEAVE_RET('i', -1);
539 if( !CheckMem( Data, sizeof(tIPv4) ) ) LEAVE_RET('i', -1);
540 iface->Type = 0; // One very hacky mutex/trash protector
541 memcpy( &iface->IP4.Gateway, Data, sizeof(tIPv4) );
552 * - Gets the name of the attached device
556 LEAVE_RET('i', iface->Adapter->DeviceLen);
557 if( !CheckMem( Data, iface->Adapter->DeviceLen+1 ) )
559 strcpy( Data, iface->Adapter->Device );
560 return iface->Adapter->DeviceLen;
564 * - Send an ICMP Echo
573 if( !CheckMem( Data, sizeof(tIPv4) ) ) LEAVE_RET('i', -1);
574 tmp = IPv4_Ping(iface, *(tIPv4*)Data);
591 * \fn tAdapter *IPStack_GetAdapter(const char *Path)
592 * \brief Gets/opens an adapter given the path
594 tAdapter *IPStack_GetAdapter(const char *Path)
599 ENTER("sPath", Path);
601 Mutex_Acquire( &glIP_Adapters );
603 // Check if this adapter is already open
604 for( dev = gIP_Adapters; dev; dev = dev->Next )
606 if( strcmp(dev->Device, Path) == 0 ) {
608 Mutex_Release( &glIP_Adapters );
614 // Ok, so let's open it
615 dev = malloc( sizeof(tAdapter) + strlen(Path) + 1 );
617 Mutex_Release( &glIP_Adapters );
623 strcpy( dev->Device, Path );
625 dev->DeviceLen = strlen(Path);
628 dev->DeviceFD = VFS_Open( dev->Device, VFS_OPENFLAG_READ|VFS_OPENFLAG_WRITE );
629 if( dev->DeviceFD == -1 ) {
631 Mutex_Release( &glIP_Adapters );
636 // Check that it is a network interface
637 tmp = VFS_IOCtl(dev->DeviceFD, 0, NULL);
638 LOG("Device type = %i", tmp);
639 if( tmp != DRV_TYPE_NETWORK ) {
640 Warning("IPStack_GetAdapter: '%s' is not a network interface", dev->Device);
641 VFS_Close( dev->DeviceFD );
643 Mutex_Release( &glIP_Adapters );
649 VFS_IOCtl(dev->DeviceFD, NET_IOCTL_GETMAC, &dev->MacAddr);
652 dev->Next = gIP_Adapters;
655 Mutex_Release( &glIP_Adapters );
658 Link_WatchDevice( dev );