jepler/multiversal
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Implement GetVRefNum and FlushVol

Browse source
This commit is contained in:
Adam Goode 2024-04-05 23:01:42 -04:00
parent adfb38179e
commit 5511012eb4
1 changed files with 19 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

19
custom/glue.c
View file

@ -141,6 +141,17 @@ pascal OSErr GetVol(StringPtr volName, short *vRefNum)
return err;
}
pascal OSErr GetVRefNum(short refNum, short *vRefNum)
{
FCBPBRec pb;
pb.ioNamePtr = NULL;
pb.ioVRefNum = 0;
pb.ioRefNum = refNum;
pb.ioFCBIndx = 0;
OSErr err = PBGetFCBInfoSync(&pb);
*vRefNum = pb.ioFCBVRefNum;
return err;
}
pascal OSErr UnmountVol(ConstStr63Param volName, short vRefNum)
{
@ -267,6 +278,14 @@ pascal OSErr FSClose(short refNum)
return PBCloseSync(&pb);
}
pascal OSErr FlushVol(ConstStr63Param volName, short vRefNum)
{
ParamBlockRec pb;
pb.fileParam.ioNamePtr = (StringPtr)volName;
pb.fileParam.ioVRefNum = vRefNum;
return PBFlushVolSync(&pb);
}
pascal OSErr FSRead(short refNum, long *count, void *buffPtr)
{
OSErr err;