AmendHub

--- scratch.c Sat Mar 30 20:46:53 2024 +++ scratch.c Sat Mar 30 20:46:53 2024 @@ -0,0 +1,142 @@ +/* + Copyright Eric Helgeson 2023-2024. +*/ +// some unused attempts to get folders working +#include <unix.h> +/* +// some stuff in main just to get a stdout window + printf("hello\n"); + //fflush(stdout); + while(!Button()); + ExitToShell(); + + +// This does seem to work! +static Boolean isFSSpecFolder(FSSpec *fss) +{ + HFileInfo pb; + OSErr err = 0; + + pb.ioCompletion = 0L; + pb.ioNamePtr = &fss->name[0]; + pb.ioVRefNum = fss->vRefNum; + pb.ioFDirIndex = 0; + pb.ioDirID = fss->parID; + + err = PBGetCatInfoSync((CInfoPBPtr)&pb); + if((pb.ioFlAttrib & 0x10) != 0) + { + puts("folder"); + return true; + } else { + puts("not folder"); + return false; + } +} + +// This does seem to work but i only haven parentID so never get the actual dir i want. +Str255 filename, temp; +void loopFilesInDir(long dirID, short vRefNum, char *dirName) +{ + CInfoPBRec cipbr; + HFileInfo *fpb = (HFileInfo *)&cipbr; + DirInfo *dpb = (DirInfo *)&cipbr; + short rc, idx; + Str255 dirFullName; + char cstrName[32] = {0}; + + // dont need probably + //strcpy((char *) dirFullName, dirName); + printf(" Searching: %s\n", dirName); + + fpb->ioVRefNum = vRefNum; // example had 0... cant assume defaulvol...? + fpb->ioNamePtr = filename; + + for(idx=1; true; idx++) { + fpb->ioDirID = dirID; + fpb->ioFDirIndex = idx; + + rc = PBGetCatInfo(&cipbr, false); + if(rc) break; + + pToCStr(filename,cstrName ); + printf("%s\n", cstrName); + } +} + +/* an attempt to get a dirID from a FSSpec +short GetDirID(FSSpec *fss, long *dirID) +{ + CInfoPBRec rec; + short err = 0; + Boolean isFolder, wasAlias; + int loopCnt = 0; +tryAgain: + rec.hFileInfo.ioVRefNum = fss->vRefNum; + rec.hFileInfo.ioDirID = fss->parID; + rec.hFileInfo.ioNamePtr = fss->name; + rec.hFileInfo.ioFDirIndex = -1; // dir + + PBGetCatInfoSync(&rec); //err handle + return err; + if( !(rec.hFileInfo.ioFlAttrib & 0x10) ) { + fss->parID = rec.hFileInfo.ioFlParID; + fss->vRefNum = rec.hFileInfo.ioVRefNum; + loopCnt++; + if(loopCnt > 2) + return dirNFErr; + goto tryAgain; + } + *dirID = rec.dirInfo.ioDrDirID; + return err; +} */ + +pascal OSErr DoOpenDoc(AppleEvent *event, AppleEvent *reply, long handlerRefcon) +{ + CInfoPBRec cipbr; + HFileInfo *fpb = (HFileInfo *)&cipbr; + DirInfo *dpb = (DirInfo *)&cipbr; + + FSSpec fss; + AEDescList docList; + OSErr err = noErr; + long index, itemsInList; + Size actualSize; + AEKeyword keywd; + DescType returnedType; + short fRefNum = 0; + char cstrName[32] = {0}; + long dirID = 0; + + err = AEGetParamDesc(event, keyDirectObject, typeAEList, &docList); + if(err != noErr) return err; + err = AECountItems(&docList, &itemsInList); + if(err != noErr) return err; + + for(index = 1; index <= itemsInList; index++) + { + err = AEGetNthPtr(&docList, index, typeFSS, &keywd, &returnedType, (Ptr)&fss, sizeof(fss), &actualSize); + if(err) return err; + printf("fss.vRefNum: %d\n", fss.vRefNum); + printf("fss.parID: %d\n", fss.parID); + pToCStr(fss.name, cstrName); + printf("fss.name: %s\n", cstrName); + if(isFSSpecFolder(&fss)) { + // GetDirID(&fss, &dirID); + //ListFiles(fss.vRefNum, fss.parID); + loopFilesInDir(fss.parID, fss.vRefNum, cstrName); + + } + err = FSpOpenDF(&fss, fsRdPerm, &fRefNum); + if(err) return err; + + err = openFile(fss.name, fRefNum, fss.vRefNum, fss.parID); + if(err) + return err; + else + gHandledByDnD = true; + } + AEDisposeDesc(&docList); + return noErr; +} +*/