TweetFollow Us on Twitter

May 94 Tips
Volume Number:10
Issue Number:5
Column Tag:Tips & Tidbits

Related Info: Font Manager Window Mgr

Tips & Tidbits

By Scott T Boyd, Editor

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

Tip Of The Month

Counting items in a directory

Here’s a piece of code which counts the number of items in a directory. It’s particularly useful if you are going to do something to every file in a directory (and its subdirectories) and want to show a progress bar. It counts both invisible and visible items, so if you don’t want invisibles counted, you’ll need to modify it. The CountGlobals structure is used to minimize the amount of stack space used when recursively calling GetLevelCount and to hold global information that might be needed at any time.

- Jim Luther, Cupertino, CA


/* 1 */
struct CountGlobals
{
 OSErr  result;  // temp holder of results - saves 2 bytes of stack at 
each level
 Str63  itemName;// the name of the current item
 CInfoPBRec myCPB; // the parameter block used for PBGetCatInfo calls 
 
 unsigned long files;// the number of files in the directory structure 

 unsigned long directories; // the number of directories in the directory 
structure
};
typedef struct CountGlobals CountGlobals;
typedef CountGlobals *CountGlobalsPtr;
// static prototypes
static void GetLevelCount(long currentDirID, 
 CountGlobalsPtr theGlobals);
void CountDirectoryItems(short srcVRefNum, long srcDirID,
 unsigned long *files, unsigned long *directories);


static void GetLevelCount(long currentDirID, 
 CountGlobalsPtr theGlobals)
{
short index = 1; 
do {
 theGlobals->myCPB.dirInfo.ioFDirIndex = index;
 // we need to do this every time through; GetCatInfo returns ioFlNum 
in this field
 theGlobals->myCPB.dirInfo.ioDrDirID = currentDirID;     

 theGlobals->result =
 PBGetCatInfoSync((CInfoPBPtr)&theGlobals->myCPB);
 if (theGlobals->result == noErr)
 {
 if ((theGlobals->myCPB.dirInfo.ioFlAttrib & ioDirMask) != 0)
 {
 // we have a directory
 ++(theGlobals->directories);

 GetLevelCount(  theGlobals->myCPB.dirInfo.ioDrDirID,
 theGlobals);  // recurse

 theGlobals->result = noErr;// clear error return on way back
 }
 else
 {
 // we have a file
 ++(theGlobals->files);
 }
 }
 ++index;
} while (theGlobals->result == noErr);
}


void CountDirectoryItems(short srcVRefNum, 
 long srcDirID,
 unsigned long *files,
 unsigned long *directories)
{
CountGlobals theGlobals;

 theGlobals.myCPB.dirInfo.ioNamePtr = theGlobals.itemName;
 theGlobals.myCPB.dirInfo.ioVRefNum = srcVRefNum;
 theGlobals.files = 0;
 theGlobals.directories = 0;

 GetLevelCount(srcDirID, &theGlobals);

 *files = theGlobals.files;
 *directories = theGlobals.directories;
}

Spread the word about things you know that others could benefit from knowing! Send

us your tips and tidbits, especially programming-related tips. We’re also looking for user tips particularly useful to programmers .

MacTech Magazine will pay $25 for every tip used, and $50 for the Tip of the Month. You can take your award in orders or subscriptions if you prefer.

To submit a tip, send it in by e-mail. (Please make sure your code compiles). See page two for our addresses.

Popup Menus Pop Up Again

In the February issue, Laurent Haas suggested a method of forcing pop-up menus to appear in a certain font and size. His method involved forcing the system to use a new system font. I used to use this method as well, since it was the method suggested in an Apple DTS Q&A stack. Unfortunately, it has two drawbacks:

(1) It is very slow because the system has to rebuild the cached font info every time the font manager sees that LastSPExtra (the global variable at 0x0B4C) is -1. (That is why the -1 is being stuffed in there in the first place - otherwise the other changes are ignored because of the caching).

(2) It doesn’t work - no kidding... if it works consistently on a particular machine, you are very lucky. Much of the time it simply does not have the desired effect - usually the font will change, but the size won't.

The method I use now is to patch _TextFont and _TextSize immediately before calling PopupMenuSelect and then unpatch them immediately afterwards (to minimize interference with anything else that uses these traps). My patches call the original routine but with a substituted argument for the font number or size. This works consistently and has no speed penalty to speak of. After unpatching, I also need to restore the font and size of the window manager port, since the menu defproc has explicitly set them by calling TextFont(0) and TextSize(0). Because of the patches, the WMgrPort now has a font and size different from the system font and size. I set the current port to the WMgrPort and do a TextFont and a TextSize to set them back to 0. On a colour Mac, this must also be done for the Colour Window manager port as well.

This method doesn’t use any low memory globals, so is less likely to break. It does, however, require tweaking the window manager port(s), which could possibly break but I doubt it.

- Rowan Daniell, Software Engineer, Cowie Associates Ltd

Moving Targets In Mpw

With the advent of the Universal C interfaces it is a pain switching back and forth between the CIncludes and PPCCIncludes folders. Adding the following three lines to your UserStartUp-<yourname> script will make life easier:


/* 2 */
AddMenu Tools 'Use Universal CIncludes' 
 'SET CIncludes "{MPW}Interfaces:PPCCIncludes:"'

AddMenu Tools 'Use Standard CIncludes' 
 'SET CIncludes "{MPW}Interfaces:CIncludes:"'

AddMenu Tools (- ''

Any menu can be specified, but I chose to add these commands to the top of my Tools menu (which is also why I added a dividing line beneath the two items). Selecting an item causes the shell variable {CIncludes} to be set to the appropriate path. This can make life much easier when jumping between older projects and new, PowerPC-savvy projects.

- Bryan Pietrzak, Softdisk Publishing

 

Community Search:
MacTech Search:

Software Updates via MacUpdate

Latest Forum Discussions

See All

How to evolve Eevee in Pokemon GO
By now, almost everyone should be hip to how to evolve Pokemon in Pokemon GO (and if not, there's a guide for that). Just gather enough candy of the appropriate type, feed them all to the Pokemon, and evolution happens. It's a miracle that would... | Read more »
CSR Racing 2: Guide to all game modes
It might not seem like there are all that many ways to go fast in a straight line, but CSR Racing 2 begs to differ. [Read more] | Read more »
Bulb Boy (Games)
Bulb Boy 1.0 Device: iOS Universal Category: Games Price: $2.99, Version: 1.0 (iTunes) Description: Multi-award winning 2D point & click horror adventure about a boy with a glowing head. | Read more »
5 top free emoji keyboard apps
If we're not at peak emoji yet as a society, it feels like we definitely should be. The emoji concept has gone far beyond what anyone in Japan could have envisioned when the people there unleashed it on an unsuspecting world, but the West has... | Read more »
How to unlock more characters in Disney...
One of the big charms of Disney Emoji Blitz is seeing a wide variety of beloved Disney and Pixar characters transformed into smiling emojis. Even someone like the sneaky Randall from Monsters Inc., who probably never cracked a smile on film, is... | Read more »
Cubway (Games)
Cubway 1.0 Device: iOS Universal Category: Games Price: $1.99, Version: 1.0 (iTunes) Description: Cubway is a journey with an abstract story of lifecycle of rebirth, called Samsara. Guide the cube through the long way full of dangers... | Read more »
Colorcube (Games)
Colorcube 1.0 Device: iOS Universal Category: Games Price: $1.99, Version: 1.0 (iTunes) Description: Turn pieces and blend colours in this minimal yet visually stunning puzzler.Over 200 handcrafted and challenging levels. Features... | Read more »
Doodle God Griddlers (Games)
Doodle God Griddlers 1.0 Device: iOS Universal Category: Games Price: $4.99, Version: 1.0 (iTunes) Description: | Read more »
Crusader Kings: Chronicles (Games)
Crusader Kings: Chronicles 1.0 Device: iOS Universal Category: Games Price: $4.99, Version: 1.0 (iTunes) Description: Crusader Kings: Chronicles is an interactive text based game that puts you in the shoes of Guy de Rose as you make... | Read more »
Roads of Rome: New Generation (Games)
Roads of Rome: New Generation 1.0 Device: iOS Universal Category: Games Price: $5.99, Version: 1.0 (iTunes) Description: | Read more »

Price Scanner via MacPrices.net

Apple price trackers, updated continuously
Scan our Apple Price Trackers for the latest information on sales, bundles, and availability on systems from Apple’s authorized internet/catalog resellers. We update the trackers continuously: - 15″... Read more
13-inch 2.5GHz MacBook Pro (Apple refurbished...
Apple has Certified Refurbished 13″ 2.5GHz MacBook Pros available for $829, or $270 off the cost of new models. Apple’s one-year warranty is standard, and shipping is free: - 13″ 2.5GHz MacBook Pros... Read more
21-inch iMacs on sale for up to $120 off MSRP
B&H Photo has 21″ iMacs on sale for up to $120 off MSRP including free shipping plus NY sales tax only: - 21″ 3.1GHz iMac 4K: $1379 $120 off MSRP - 21″ 2.8GHz iMac: $1199.99 $100 off MSRP - 21″ 1... Read more
Charitybuzz Set to Auction Unique Apple-1 Com...
Offering an opportunity to own the computer that sparked a revolution, on Monday, July 25, leading online charity auction platform Charitybuzz will auction what is claimed to be the world’s most... Read more
MacBook Airs on sale for up to $150 off MSRP
Amazon has 11″ and 13″ MacBook Airs on sale for up to $150 off MSRP for a limited time. Shipping is free: - 13″ 1.6GHz/128GB MacBook Air (sku MMGF2LL/A): $899.99 $100 off MSRP - 13″ 1.6GHz/256GB... Read more
Apple refurbished 13-inch Retina MacBook Pros...
Apple has Certified Refurbished 13″ Retina MacBook Pros available for up to $270 off the cost of new models. An Apple one-year warranty is included with each model, and shipping is free: - 13″ 2.7GHz... Read more
Apple refurbished 11-inch MacBook Airs availa...
Apple has Certified Refurbished 11″ MacBook Airs (the latest models), available for up to $170 off the cost of new models. An Apple one-year warranty is included with each MacBook, and shipping is... Read more
Apple iPad Pro Sales Far Outpacing Microsoft...
A report on Appleinsider notes that despite Microsoft Surface tablet PC sales growing by 9 percent year over year, revenues remained below $1 billion, and are down sequentially from the $1.1 billion... Read more
DEVONthink 2.9 Features Ultra-fast, Robust, A...
DEVONthink 2.9 allows users to keep databases synchronized using many means of transport. It transmits them between Macs on the local network or stores them in a syncable form on removable hard... Read more
12-inch WiFi Apple iPad Pros on sale for up t...
B&H Photo has 12″ WiFi iPad Pros on sale for up to $100 off MSRP, each including free shipping. B&H charges sales tax in NY only: - 12″ Space Gray 32GB WiFi iPad Pro: $749 $50 off MSRP - 12″... Read more

Jobs Board

*Apple* Retail - Multiple Positions, Willow...
Job Description:SalesSpecialist - Retail Customer Service and SalesTransform Apple Store visitors into loyal Apple customers. When customers enter the store, Read more
*Apple* Evangelist - JAMF Software (United S...
The Apple Evangelist is responsible for building and cultivating strategic relationships with Apple 's small and mid-market business development field teams. This Read more
*Apple* Solutions Consultant - APPLE (United...
Job Summary As an Apple Solutions Consultant, you'll be the link between our future customers and our products. You'll showcase your entrepreneurial spirit as you Read more
*Apple* Professional Learning Specialist - A...
Job Summary The Apple Professional Learning Specialist is a full-time position for one year with Apple in the Phoenix, AZ area. This position requires a high Read more
*Apple* Picker - Apple Hill Orchard (United...
Apple Hill Orchard, Co. Rte. 21,Whitehall, NY 9/7/16-10/228/16. Pick fresh market or processing apples Productivity of 60 boxes and 80 boxes processing fruit per Read more
All contents are Copyright 1984-2011 by Xplain Corporation. All rights reserved. Theme designed by Icreon.