3 * - By John Hodge (thePowersGang)
13 #include <api_drv_disk.h>
16 #define FDD_VERSION VER2(1,10)
21 int FDD_Install(char **Arguments);
22 int FDD_RegisterFS(void);
24 char *FDD_ReadDir(tVFS_Node *Node, int pos);
25 tVFS_Node *FDD_FindDir(tVFS_Node *dirNode, const char *Name);
26 int FDD_IOCtl(tVFS_Node *Node, int ID, void *Data);
27 Uint64 FDD_ReadFS(tVFS_Node *node, Uint64 off, Uint64 len, void *buffer);
29 int FDD_int_ReadWriteWithinTrack(int Disk, int Track, int bWrite, size_t Offset, size_t Length, void *Buffer);
32 MODULE_DEFINE(0, FDD_VERSION, Storage_FDDv2, FDD_Install, NULL, "x86_ISADMA", NULL);
33 tDrive gaFDD_Disks[MAX_DISKS];
34 tVFS_Node gaFDD_DiskNodes[MAX_DISKS];
35 tDevFS_Driver gFDD_DriverInfo = {
40 .ACLs = &gVFS_ACL_EveryoneRX,
41 .Flags = VFS_FFLAG_DIRECTORY,
42 .ReadDir = FDD_ReadDir,
43 .FindDir = FDD_FindDir,
49 int FDD_Install(char **Arguments)
57 // NOTE: CMOS only reports 2 disks
58 if( (data & 0xF0) == 0x40 )
59 gaFDD_Disks[0].bValid = gaFDD_Disks[0].bInserted = 1;
60 if( (data & 0x0F) == 0x04 )
61 gaFDD_Disks[1].bValid = gaFDD_Disks[1].bInserted = 1;
63 if( gaFDD_Disks[0].bValid == 0 && gaFDD_Disks[1].bValid == 0 )
64 return MODULE_ERR_NOTNEEDED;
67 // Initialise controller
76 * \brief Register the FDD driver with DevFS
78 int FDD_RegisterFS(void)
80 gFDD_DriverInfo.RootNode.CTime = gFDD_DriverInfo.RootNode.MTime
81 = gFDD_DriverInfo.RootNode.ATime = now();
83 for( int i = 0; i < MAX_DISKS; i ++ )
85 if( !gaFDD_Disks[i].bValid ) continue ;
87 // Initialise Child Nodes
88 gaFDD_DiskNodes[i].Inode = i;
89 gaFDD_DiskNodes[i].Flags = 0;
90 gaFDD_DiskNodes[i].NumACLs = 0;
91 gaFDD_DiskNodes[i].Read = FDD_ReadFS;
92 gaFDD_DiskNodes[i].Write = NULL;//FDD_WriteFS;
93 gaFDD_DiskNodes[i].Size = 1440*1024; // TODO: Non 1.44 disks
96 DevFS_AddDevice( &gFDD_DriverInfo );
101 * \brief Get the name of the \a Pos th item in the driver root
102 * \param Node Root node (unused)
103 * \param Pos Position
104 * \return Heap string of node name
106 char *FDD_ReadDir(tVFS_Node *Node, int Pos)
109 if(Pos < 0 || Pos > MAX_DISKS )
111 if(gaFDD_Disks[Pos].bValid)
114 ret_tpl[0] = '0' + Pos;
116 return strdup(ret_tpl);
120 * \brief Get a node by name
121 * \param Node Root node (unused)
122 * \param Name Drive name
123 * \return Pointer to node structure
125 tVFS_Node *FDD_FindDir(tVFS_Node *Node, const char *Name)
128 if( '0' > Name[0] || Name[0] > '9' ) return NULL;
129 if( Name[1] != '\0' ) return NULL;
133 return &gaFDD_DiskNodes[pos];
136 static const char *casIOCTLS[] = {DRV_IOCTLNAMES,DRV_DISK_IOCTLNAMES,NULL};
138 * \brief Driver root IOCtl Handler
139 * \param Node Root node (unused)
141 * \param Data IOCtl specific data pointer
143 int FDD_IOCtl(tVFS_Node *Node, int ID, void *Data)
147 BASE_IOCTLS(DRV_TYPE_DISK, "FDDv2", FDD_VERSION, casIOCTLS);
149 case DISK_IOCTL_GETBLOCKSIZE: return 512;
157 * \brief Read from a disk
158 * \param Node Disk node
159 * \param Offset Byte offset in disk
160 * \param Length Number of bytes to read
161 * \param Buffer Destination buffer
162 * \return Number of bytes read
164 Uint64 FDD_ReadFS(tVFS_Node *Node, Uint64 Offset, Uint64 Length, void *Buffer)
166 int disk = Node->Inode;
171 ENTER("pNode XOffset XLength pBuffer", Node, Offset, Length, Buffer);
173 if( Offset > Node->Size ) LEAVE_RET('i', 0);
174 if( Length > Node->Size ) Length = Node->Size;
175 if( Offset + Length > Node->Size )
176 Length = Node->Size - Offset;
180 track = Offset / BYTES_PER_TRACK;
181 Offset %= BYTES_PER_TRACK;
186 if(rem_len > BYTES_PER_TRACK-Offset)
187 len = BYTES_PER_TRACK - Offset;
190 FDD_int_ReadWriteWithinTrack(disk, track, 0, Offset, len, dest);
196 while( rem_len > BYTES_PER_TRACK )
198 FDD_int_ReadWriteWithinTrack(disk, track, 0, 0, BYTES_PER_TRACK, dest);
199 dest += BYTES_PER_TRACK;
200 rem_len -= BYTES_PER_TRACK;
204 FDD_int_ReadWriteWithinTrack(disk, track, 0, 0, rem_len, dest);
211 * \brief Read from a track
213 int FDD_int_ReadWriteWithinTrack(int Disk, int Track, int bWrite, size_t Offset, size_t Length, void *Buffer)
215 if( Offset > BYTES_PER_TRACK || Length > BYTES_PER_TRACK )
217 if( Offset + Length > BYTES_PER_TRACK )
220 ENTER("iDisk iTrack bbWrite xOffset xLength pBuffer",
221 Disk, Track, bWrite, Offset, Length, Buffer);
223 Mutex_Acquire( &gaFDD_Disks[Disk].Mutex );
225 // If the cache doesn't exist, create it
226 if( !gaFDD_Disks[Disk].TrackData[Track] )
228 gaFDD_Disks[Disk].TrackData[Track] = malloc( BYTES_PER_TRACK );
229 // Don't bother reading if this is a whole track write
230 if( !(bWrite && Offset == 0 && Length == BYTES_PER_TRACK) )
232 LOG("Reading track");
233 FDD_int_ReadWriteTrack(Disk, Track, 0, gaFDD_Disks[Disk].TrackData[Track]);
240 // Write to cache then commit cache to disk
241 char *dest = gaFDD_Disks[Disk].TrackData[Track];
242 LOG("Write to cache");
243 memcpy( dest + Offset, Buffer, Length );
244 FDD_int_ReadWriteTrack(Disk, Track, 1, gaFDD_Disks[Disk].TrackData[Track]);
249 char *src = gaFDD_Disks[Disk].TrackData[Track];
250 LOG("Read from cache");
251 memcpy(Buffer, src + Offset, Length);
254 Mutex_Release( &gaFDD_Disks[Disk].Mutex );