TweetFollow Us on Twitter

Folder Clean-up
Volume Number:9
Issue Number:3
Column Tag:Useful Tricks

Related Info: File Manager File Mgr (PBxxx) Finder Interface

Clean up Your Folders

An app to arrange your finder windows

By Mike Scanlin, MacTech Magazine Regular Contributing Author

Note: Source code files accompanying article are located on MacTech CD-ROM or source code disks.

Isn’t it nice that the Developer CD has all of its directory windows nicely orgainized and arranged so that you can work your way down eight or nine levels deep and see at a glance the complete path to where you currently are? Wouldn’t it be nice if your gigabyte hard drive obeyed the same pretty convention? Well, here’s a little code fragment that will make that possible for you.

CleanUpFolders is a tiny app I wrote when the server volumes at my company were getting out of control. People with 96” monitors would put server directory windows all over the place so that when I opened them on my 16” screen they would either be minimally visible or in a place where the Finder put them because they would otherwise be off the screen entirely. Now we run CleanUpFolders on our server volumes about once a week and all is well. It positions and sizes all directory windows in a staggered fashion, as well as changes the view of each directory to View by Name and closes any open triangles it finds.

Before CleanUpFolders:

After CleanUpFolders:

Much nicer, eh? This program has no user interface whatsoever. You just launch it and when it returns your windows are consistently sized and positioned. You can change the size, position and offset of the windows by editing the source code and recompiling. I know, it’s somewhat crude, but MacTech readers don’t want to read two pages of interface and event handling fluff just to get to the 20 lines of code that actually does something, do they? I thought so.

After you run CleanUpFolders you will have to close all your windows and then reopen them before you see its effects (because the Finder doesn’t resize an open window when you call PBSetCatInfo on it, but it will use the new size if you close and then reopen the window). Have fun.

Listing CleanUpYourFolders.c
/*****************************************************
 * CleanUpFolders
 *
 * A little app to clean up all folders' windows
 * starting with the one that this app is in and
 * continuing recursively downwards.
 *
 * Mike Scanlin  17 Oct 1992
 ****************************************************/

#define kFolderBit (1 << 4)
#define kZoomBit 0x0020
#define kOpenTriangleBit  0x0010
#define kViewMask0xFF00
#define kViewByName0x0200

void main(void);
void CleanUpAFolder(long theDrDirID);
void EnumerateCatalog(long dirID);

CInfoPBRectheCPB;
Str255  theName;
Rect    theRect;
short   hOffset, vOffset;


/*****************************************************
 * main
 * 
 * Clean up the directory that this app is residing
 * in and then all of the directories contained within
 * this directory recursively. Put this app in the 
 * root directory of a volume and launch it to clean 
 * up the entire volume.
 ****************************************************/
void main()
{
 long   dirID;
 short  vRefNum;
 
 /* Set the initial directory's size and position */
 SetRect(&theRect, 2, 40, 2+228, 40+165);
 
 /* Set the offset for each child directory */
 hOffset = 16;
 vOffset = 16;
 
 /* Find out where this app is located */
 HGetVol(&theName, &vRefNum, &dirID);

 theCPB.dirInfo.ioVRefNum = vRefNum;
 theCPB.dirInfo.ioNamePtr = theName;
 
 /* First, clean up the current directory */
 theCPB.hFileInfo.ioFDirIndex = -1;
 theCPB.dirInfo.ioDrDirID = dirID;
 PBGetCatInfo(&theCPB, FALSE);
 CleanUpAFolder(theCPB.dirInfo.ioDrParID);
 
 /* Now clean up all child directories */
 EnumerateCatalog(dirID);
}


/*****************************************************
 * CleanUpAFolder
 * 
 * Given a directory ID, this will unzoom the
 * window, size and position the window, close the
 * "triangle" and set the view to View by Name.
 ****************************************************/
void CleanUpAFolder(long theDrDirID)
{
 theCPB.dirInfo.ioDrDirID = theDrDirID;
 theCPB.dirInfo.ioDrUsrWds.frRect = theRect;
 /* clear the zoomed bit, the "open triangle bit"
  * and the view; leave the other bits alone
  * because we don't know what they're for.
  */
 theCPB.dirInfo.ioDrUsrWds.frView &=
 ~kViewMask - kZoomBit - kOpenTriangleBit;
 /* set the view to View by Name */
 theCPB.dirInfo.ioDrUsrWds.frView |= kViewByName;
 PBSetCatInfo(&theCPB, FALSE);
}


/*****************************************************
 * EnumerateCatalog
 *
 * Given a directory ID to start with, this calls
 * CleanUpAFolder once for every directory within
 * the given start directory. On entry it offsets
 * theRect down and to the right; on exit it offsets
 * it up and to the left.
 ****************************************************/
void EnumerateCatalog(long dirID)
{
 long   tempDir;
 short  index;
 OSErr  myErr;
 
 OffsetRect(&theRect, hOffset, vOffset);

 index = 1;
 do {
 theCPB.hFileInfo.ioFDirIndex = index;
 theCPB.dirInfo.ioDrDirID = dirID;
 myErr = PBGetCatInfo(&theCPB, FALSE);
 if (myErr == noErr) {
 if (theCPB.hFileInfo.ioFlAttrib & kFolderBit) {
 tempDir = theCPB.dirInfo.ioDrDirID;
 CleanUpAFolder(dirID);
 EnumerateCatalog(tempDir);
 myErr = noErr;
 }
 }
 index++;
 } while (myErr == noErr);

 OffsetRect(&theRect, -hOffset, -vOffset);
}

 

Community Search:
MacTech Search:

Software Updates via MacUpdate

Latest Forum Discussions

See All

Combo Quest (Games)
Combo Quest 1.0 Device: iOS Universal Category: Games Price: $.99, Version: 1.0 (iTunes) Description: Combo Quest is an epic, time tap role-playing adventure. In this unique masterpiece, you are a knight on a heroic quest to retrieve... | Read more »
Hero Emblems (Games)
Hero Emblems 1.0 Device: iOS Universal Category: Games Price: $2.99, Version: 1.0 (iTunes) Description: ** 25% OFF for a limited time to celebrate the release ** ** Note for iPhone 6 user: If it doesn't run fullscreen on your device... | Read more »
Puzzle Blitz (Games)
Puzzle Blitz 1.0 Device: iOS Universal Category: Games Price: $1.99, Version: 1.0 (iTunes) Description: Puzzle Blitz is a frantic puzzle solving race against the clock! Solve as many puzzles as you can, before time runs out! You have... | Read more »
Sky Patrol (Games)
Sky Patrol 1.0.1 Device: iOS Universal Category: Games Price: $1.99, Version: 1.0.1 (iTunes) Description: 'Strategic Twist On The Classic Shooter Genre' - Indie Game Mag... | Read more »
The Princess Bride - The Official Game...
The Princess Bride - The Official Game 1.1 Device: iOS Universal Category: Games Price: $3.99, Version: 1.1 (iTunes) Description: An epic game based on the beloved classic movie? Inconceivable! Play the world of The Princess Bride... | Read more »
Frozen Synapse (Games)
Frozen Synapse 1.0 Device: iOS iPhone Category: Games Price: $2.99, Version: 1.0 (iTunes) Description: Frozen Synapse is a multi-award-winning tactical game. (Full cross-play with desktop and tablet versions) 9/10 Edge 9/10 Eurogamer... | Read more »
Space Marshals (Games)
Space Marshals 1.0.1 Device: iOS Universal Category: Games Price: $4.99, Version: 1.0.1 (iTunes) Description: ### IMPORTANT ### Please note that iPhone 4 is not supported. Space Marshals is a Sci-fi Wild West adventure taking place... | Read more »
Battle Slimes (Games)
Battle Slimes 1.0 Device: iOS Universal Category: Games Price: $1.99, Version: 1.0 (iTunes) Description: BATTLE SLIMES is a fun local multiplayer game. Control speedy & bouncy slime blobs as you compete with friends and family.... | Read more »
Spectrum - 3D Avenue (Games)
Spectrum - 3D Avenue 1.0 Device: iOS Universal Category: Games Price: $2.99, Version: 1.0 (iTunes) Description: "Spectrum is a pretty cool take on twitchy/reaction-based gameplay with enough complexity and style to stand out from the... | Read more »
Drop Wizard (Games)
Drop Wizard 1.0 Device: iOS Universal Category: Games Price: $1.99, Version: 1.0 (iTunes) Description: Bring back the joy of arcade games! Drop Wizard is an action arcade game where you play as Teo, a wizard on a quest to save his... | Read more »

Price Scanner via MacPrices.net

Our MacBook Price Trackers will show you the...
Our Apple award-winning MacBook Price Trackers are continually updated with the latest information on prices, bundles, and availability for 16″ and 14″ MacBook Pros along with 13″ and 15″ MacBook... Read more
Amazon is offering a 10% discount on Apple’s...
Don’t pay full price! Amazon has 16-inch M4 Pro MacBook Pros (Silver and Black colors) on sale today for 10% off Apple’s MSRP. Shipping is free. These are the lowest prices currently available for 16... Read more
13-inch M4 MacBook Airs on sale for $150 off...
Amazon has new 13″ M4 MacBook Airs on sale for $150 off MSRP right now, starting at $849. Sale prices apply to most colors and configurations. Be sure to select Amazon as the seller, rather than a... Read more
15-inch M4 MacBook Airs on sale for $150 off...
Amazon has new 15″ M4 MacBook Airs on sale for $150 off Apple’s MSRP, starting at $1049. Be sure to select Amazon as the seller, rather than a third-party: – 15″ M4 MacBook Air (16GB/256GB): $1049, $... Read more
Amazon is offering a $50 discount on Apple’s...
Amazon has Apple’s 11th-generation A16 iPads in stock on sale for $50 (or a little more) off MSRP this week. Shipping is free: – 11″ 11th-generation 128GB WiFi iPads: $299 $50 off MSRP – 11″ 11th-... Read more
Clearance 13-inch M1 MacBook Airs available f...
Walmart has clearance, but new, Apple 13″ M1 MacBook Airs (8GB RAM, 256GB SSD) available online for $649, $360 off original MSRP, in Space Gray, Silver, and Gold colors. These are new MacBooks for... Read more
iPad minis on sale for $100 off Apple’s MSRP...
Amazon is offering $100 discounts (up to 20% off) on Apple’s newest 2024 WiFi iPad minis, each with free shipping. These are the lowest prices available for new minis among the Apple retailers we... Read more
AirPods Max headphones on sale for $479, $70...
Amazon has AirPods Max with USB-C on sale for $479.99 in all colors. Shipping is free. Their price is $70 off Apple’s MSRP, and it’s the lowest price available today for AirPods Max. Keep an eye on... Read more
14-inch M4 Pro/M4 Max MacBook Pros on sale th...
Don’t pay full price! Get a new 14″ MacBook Pro with an M4 Pro or M4 Max CPU for up to $320 off Apple’s MSRP this weekend at these retailers…they are the lowest prices available for these MacBook... Read more
Get a 15-inch M4 MacBook Air for $150 off App...
A couple of Apple retailers are offering $150 discounts on new 15″ M4 MacBook Airs this weekend. Prices at these retailers start at $1049: (1): Amazon has new 15″ M4 MacBook Airs on sale for $150 off... Read more

Jobs Board

All contents are Copyright 1984-2011 by Xplain Corporation. All rights reserved. Theme designed by Icreon.