mirror of
https://github.com/Oibaf66/frodo-wii.git
synced 2024-11-22 19:39:24 +01:00
Reading d64 files (not used yet)
This commit is contained in:
simon.kagstrom
parent
f7f838d04d
commit
4236bd59e2
319
Src/d64-read.cpp
Normal file
319
Src/d64-read.cpp
Normal file
@ -0,0 +1,319 @@
|
||||
/********************************************************************************************/
|
||||
static fpos_t GetFilePos(int Track, int Sector)
|
||||
{
|
||||
fpos_t pos;
|
||||
|
||||
char buffer[256];
|
||||
pos = 0;
|
||||
|
||||
|
||||
if (Track >= 1 && Track <= 17)
|
||||
{
|
||||
if (Sector > 20)
|
||||
{
|
||||
Sector = 20;
|
||||
}
|
||||
pos += (Track - 1) * 21 * 256;
|
||||
pos += Sector * 256;
|
||||
}
|
||||
else if (Track >= 18 && Track <= 24)
|
||||
{
|
||||
if (Sector > 18)
|
||||
{
|
||||
Sector = 18;
|
||||
}
|
||||
pos += 17 * 21 * 256;
|
||||
pos += (Track - 18) * 19 * 256;
|
||||
pos += Sector * 256;
|
||||
}
|
||||
else if (Track >= 25 && Track <= 30)
|
||||
{
|
||||
if (Sector > 17)
|
||||
{
|
||||
Sector = 17;
|
||||
}
|
||||
pos += 17 * 21 * 256;
|
||||
pos += 7 * 19 * 256;
|
||||
pos += (Track - 25) * 18 * 256;
|
||||
pos += Sector * 256;
|
||||
}
|
||||
else if (Track >= 31 && Track <= 35)
|
||||
{
|
||||
if (Sector > 16)
|
||||
{
|
||||
Sector = 16;
|
||||
}
|
||||
pos += 17 * 21 * 256;
|
||||
pos += 7 * 19 * 256;
|
||||
pos += 6 * 18 * 256;
|
||||
pos += (Track - 31) * 17 * 256;
|
||||
pos += Sector * 256;
|
||||
}
|
||||
else if (Track >= 36 && Track <= 40)
|
||||
{
|
||||
if (Sector > 16)
|
||||
{
|
||||
Sector = 16;
|
||||
}
|
||||
pos += 17 * 21 * 256;
|
||||
pos += 7 * 19 * 256;
|
||||
pos += 6 * 18 * 256;
|
||||
pos += 5 * 17 * 256;
|
||||
pos += (Track - 36) * 17 * 256;
|
||||
pos += Sector * 256;
|
||||
}
|
||||
else
|
||||
{
|
||||
return 0;
|
||||
}
|
||||
return pos;
|
||||
}
|
||||
/**********************************************************************************************************/
|
||||
const char **DirD64(char *FileName) //mode = 0: quiet mode
|
||||
{
|
||||
fpos_t pos, newpos, oldpos;
|
||||
unsigned char buffer[256];
|
||||
unsigned char ext[256];
|
||||
unsigned char name[256];
|
||||
unsigned char quotname[256];
|
||||
unsigned char blocks[256];
|
||||
unsigned char Type;
|
||||
unsigned char Track;
|
||||
unsigned char Sector;
|
||||
unsigned char track;
|
||||
unsigned char sector;
|
||||
unsigned char blow;
|
||||
unsigned char bhigh;
|
||||
int pblocks;
|
||||
unsigned int bfree;
|
||||
unsigned int f64count = 0;
|
||||
unsigned int Temp, i, j, k, totalblocks;
|
||||
const char **file_list;
|
||||
FILE *File;
|
||||
int cnt = 16;
|
||||
int cur = 0;
|
||||
|
||||
file_list = (const char**)malloc(cnt * sizeof(char*));
|
||||
file_list[cur] = strdup((char*)"Empty Disc");
|
||||
file_list[cur + 1] = NULL;
|
||||
|
||||
File = fopen(FileName, "rb");
|
||||
if (!File)
|
||||
{
|
||||
return NULL;
|
||||
}
|
||||
|
||||
pos = GetFilePos(18, 0);
|
||||
fsetpos(File, &pos);
|
||||
|
||||
Track = 0;
|
||||
Sector = 0;
|
||||
fread(&Track, 1, 1, File);
|
||||
fread(&Sector, 1, 1, File);
|
||||
|
||||
fread(buffer, 2, 1, File);
|
||||
|
||||
bfree = 0;
|
||||
k = 0;
|
||||
for (j = 1; j <= 17; j++)
|
||||
{
|
||||
i = 0;
|
||||
fread(&i, 1, 1, File);
|
||||
bfree += i;
|
||||
fread(&k, 1, 1, File);
|
||||
fread(&k, 1, 1, File);
|
||||
fread(&k, 1, 1, File);
|
||||
|
||||
}
|
||||
fread(&i, 1, 1, File);
|
||||
fread(&i, 1, 1, File);
|
||||
fread(&i, 1, 1, File);
|
||||
fread(&i, 1, 1, File);
|
||||
for (j = 19; j <= 24; j++)
|
||||
{
|
||||
i = 0;
|
||||
fread(&i, 1, 1, File);
|
||||
bfree += i;
|
||||
fread(&k, 1, 1, File);
|
||||
fread(&k, 1, 1, File);
|
||||
fread(&k, 1, 1, File);
|
||||
|
||||
}
|
||||
for (j = 25; j <= 30; j++)
|
||||
{
|
||||
i = 0;
|
||||
fread(&i, 1, 1, File);
|
||||
bfree += i;
|
||||
fread(&k, 1, 1, File);
|
||||
fread(&k, 1, 1, File);
|
||||
fread(&k, 1, 1, File);
|
||||
|
||||
}
|
||||
for (j = 31; j <= 35; j++)
|
||||
{
|
||||
i = 0;
|
||||
fread(&i, 1, 1, File);
|
||||
bfree += i;
|
||||
fread(&k, 1, 1, File);
|
||||
// bfree += 0xFF - k;
|
||||
fread(&k, 1, 1, File);
|
||||
// bfree += 0xFF - k;
|
||||
fread(&k, 1, 1, File);
|
||||
// bfree += 0x01 - k;
|
||||
|
||||
}
|
||||
/*
|
||||
1-17 21 sectors * 256 bytes
|
||||
18-24 19 sectors * 256 bytes
|
||||
25-30 18 sectors * 256 bytes
|
||||
31-35 17 sectors * 256 bytes
|
||||
*/
|
||||
|
||||
fread(buffer, 16, 1, File);
|
||||
|
||||
buffer[16] = 0;
|
||||
for (i = 0; i < 16; i++)
|
||||
{
|
||||
if (buffer[i] == 0xa0)
|
||||
buffer[i] = 0;
|
||||
}
|
||||
// SetDlgItemText(hHandle, IDC_DISKTITLE, buffer);
|
||||
|
||||
fread(buffer, 16, 1, File);
|
||||
fread(buffer, 16, 1, File);
|
||||
for (j = 36; j <= 40; j++)
|
||||
{
|
||||
i = 0;
|
||||
fread(&i, 1, 1, File);
|
||||
bfree += i;
|
||||
fread(&k, 1, 1, File);
|
||||
fread(&k, 1, 1, File);
|
||||
fread(&k, 1, 1, File);
|
||||
|
||||
}
|
||||
pos = GetFilePos(18, 1);
|
||||
totalblocks = 0;
|
||||
do
|
||||
{
|
||||
if (fsetpos(File, &pos))
|
||||
{
|
||||
break;
|
||||
}
|
||||
Track = 0;
|
||||
Sector = 0;
|
||||
track = 0;
|
||||
sector = 0;
|
||||
Type = 0;
|
||||
fread(&Track, 1, 1, File);
|
||||
fread(&Sector, 1, 1, File);
|
||||
pos = GetFilePos((int)Track, (int)Sector);
|
||||
for (i = 0; i < 8; i++)
|
||||
{
|
||||
fread(&Type, 1, 1, File);
|
||||
fread(&track, 1, 1, File);
|
||||
fread(§or, 1, 1, File);
|
||||
fread(&name, 16, 1, File);
|
||||
name[16] = 0;
|
||||
|
||||
for (j = 0; j < 16; j++)
|
||||
{
|
||||
if (name[j] == 0xa0)
|
||||
{
|
||||
name[j] = 0;
|
||||
}
|
||||
else if (name[j] > 0x7a)
|
||||
{
|
||||
// name[j] = '_';
|
||||
}
|
||||
}
|
||||
|
||||
fread(buffer, 9, 1, File);
|
||||
Temp = 0;
|
||||
fread(&blow, 1, 1, File);
|
||||
fread(&bhigh, 1, 1, File);
|
||||
Temp = 256 * bhigh+blow;
|
||||
fread(buffer, 2, 1, File);
|
||||
if (Type == 0x00)
|
||||
continue;
|
||||
switch (Type)
|
||||
{
|
||||
case 0x82:
|
||||
strcpy((char*)ext, "prg");
|
||||
break;
|
||||
case 0x81:
|
||||
strcpy((char*)ext, "seq");
|
||||
break;
|
||||
case 0x80:
|
||||
strcpy((char*)ext, "del");
|
||||
break;
|
||||
case 0x84:
|
||||
strcpy((char*)ext, "rel");
|
||||
break;
|
||||
case 0x83:
|
||||
strcpy((char*)ext, "user");
|
||||
break;
|
||||
case 0xc2:
|
||||
strcpy((char*)ext, "prg<");
|
||||
break;
|
||||
case 0xc1:
|
||||
strcpy((char*)ext, "seq<");
|
||||
break;
|
||||
case 0xc0:
|
||||
strcpy((char*)ext, "del<");
|
||||
break;
|
||||
case 0xc4:
|
||||
strcpy((char*)ext, "rel<");
|
||||
break;
|
||||
case 0xc3:
|
||||
strcpy((char*)ext, "user<");
|
||||
break;
|
||||
default:
|
||||
strcpy((char*)ext, "user<");
|
||||
break;
|
||||
}
|
||||
f64count ++;
|
||||
totalblocks += Temp;
|
||||
pblocks = (int)Temp;
|
||||
sprintf((char*)blocks, "%d", Temp);
|
||||
|
||||
newpos = GetFilePos((int)track, (int)sector);
|
||||
if (newpos)
|
||||
{
|
||||
fgetpos(File, &oldpos);
|
||||
|
||||
if (!fsetpos(File, &newpos))
|
||||
{
|
||||
fread(&Temp, 2, 1, File);
|
||||
fread(&Temp, 2, 1, File);
|
||||
}
|
||||
else
|
||||
break;
|
||||
|
||||
if (fsetpos(File, &oldpos))
|
||||
break;
|
||||
}
|
||||
|
||||
sprintf((char*)quotname, "\"%s\"", name);
|
||||
sprintf((char*)buffer, "%-4d%-18s%c", pblocks, quotname, ext[0]);
|
||||
file_list[cur++] = strdup((char*)buffer);
|
||||
file_list[cur] = NULL;
|
||||
if (cur > cnt - 2)
|
||||
{
|
||||
cnt = cnt + 32;
|
||||
file_list = (const char**)realloc(file_list, cnt * sizeof(char*));
|
||||
if (!file_list)
|
||||
return NULL;
|
||||
}
|
||||
}
|
||||
if (f64count > 128)
|
||||
break;
|
||||
}
|
||||
while (Track);
|
||||
|
||||
fclose(File);
|
||||
return file_list;
|
||||
|
||||
// sprintf(buffer, "%d blocks free.", 664 - totalblocks);
|
||||
// SetDlgItemText(hHandle, IDC_FREEBLOCKS, buffer);
|
||||
|
||||
}
|
||||
Loading…
Reference in New Issue
Block a user