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

Black Hole Joyrider (Games)
Black Hole Joyrider 1.0 Device: iOS Universal Category: Games Price: $2.99, Version: 1.0 (iTunes) Description: Guide your spacecraft through the gravity well of a powerful black hole using only your retro-thrusters and dwindling fuel... | Read more »
My Koi (Games)
My Koi 1.0 Device: iOS iPhone Category: Games Price: $1.99, Version: 1.0 (iTunes) Description: My Koi is a beautiful and relaxing fish pond app. Customise and name each fish. Feed them daily. Watch them grow. Collect new fish.... | Read more »
Never Gone (Games)
Never Gone 1.0.2 Device: iOS Universal Category: Games Price: $2.99, Version: 1.0.2 (iTunes) Description: ###IMPPORTANT### Never Gone's HD art resources require devices with more than 1GB RAM, so please note that iPhone 4/4s, iPad 2/... | Read more »
INKS. (Games)
INKS. 1.0 Device: iOS Universal Category: Games Price: $1.99, Version: 1.0 (iTunes) Description: From the makers of BAFTA-winning Lumino City comes INKS. INKS updates pinball for a new generation. It combines the joy of pinball with... | Read more »
How to maximise your profits in Bakery B...
Running a bakery can be an expensive venture. You’ll need to continuously upgrade your oven, your kitchen supplies, and even your ingredients to keep customers happy. Most of these renovations in Bakery Blitz cost a pretty penny, but we have a few... | Read more »
How to manage your time in Bakery Blitz
It can be tricky, especially when you risk burning your kitchen to the ground if you forget a cake in the oven, so make sure to use these time management tricks to keep your bakery running smoothly. Don’t collect the money right away [Read more] | Read more »
Model 15 (Music)
Model 15 1.0 Device: iOS iPhone Category: Music Price: $29.99, Version: 1.0 (iTunes) Description: The Moog Model 15 App is the first Moog modular synthesizer and synthesis educational tool created exclusively for iPad, iPhone and... | Read more »
How to deal with wind in Angry Birds Act...
Angry Birds Action! is a physics-based puzzler in which you're tasked with dragging and launching birds around an obstacle-littered field to achieve a set objective. It's simple enough at first, but when wind gets introduced things can get pretty... | Read more »
How to get three stars in every level of...
Angry Birds Action! is, essentially, a pinball-style take on the pull-and-fling action of the original games. When you first boot it up, you'll likely be wondering exactly what it is you have to do to get a good score. Well, never fear as 148Apps... | Read more »
The beginner's guide to Warbits
Warbits is a turn-based strategy that's clearly inspired by Nintendo's Advance Wars series. Since turn-based strategy games can be kind of tricky to dive into, see below for a few tips to help you in the beginning. Positioning is crucial [Read... | Read more »

Price Scanner via MacPrices.net

12-inch 128GB iPad Pros on sale for up to $10...
B&H Photo has 12″ 128GB 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 128GB WiFi iPad Pro: $899 $50 off MSRP... Read more
Global Tablet Sales Slump Continues, iPad’s F...
Another miserable showing for the global slate tablet category in calendar Q1/16, with global tablet shipments falling another 1ten percent to 46.5 million units during the according to Strategy... Read more
Revel Systems to Showcase iPad POS Platform w...
Revel Systems, specialists in iPad Point of Sale management solution for brick-and-mortar retail, food businesses and more, today announced that it will showcase its innovative iPad Point of Sale... Read more
13-inch 2.5GHz MacBook Pro on sale for $999,...
B&H Photo has the 13″ 2.5GHz MacBook Pro on sale for $999 including free shipping plus NY sales tax only. Their price is $100 off MSRP. Read more
Apple refurbished 2015 iMacs available for up...
Apple now has a full line of Certified Refurbished 2015 21″ & 27″ iMacs available for up to $350 off MSRP. Apple’s one-year warranty is standard, and shipping is free. The following models are... Read more
Indian Smartphone Market Grows Annually by 12...
India’s smartphone market grew by 12 percent year-over-year, with 24.4 million units shipping in Q1 2016. The top five vendors stayed the same, with Samsung in the lead, followed by Micromax, Intex... Read more
Get Notifications When Your Friend’s Phone Ba...
Calgary, Canada based Stonelight Pictures has announced the release of Battery Share 1.0.1, its new utility for iOS 9 supported devices. The company notes that people are spending more time on their... Read more
11-inch 1.6GHz/128GB MacBook Air on sale for...
Amazon has the current-generation 11″ 1.6GHz/128GB MacBook Air (sku MJVM2LL/A) on sale for $749.99 for a limited time. Their price is $150 off MSRP, and it’s the lowest price available for this model... Read more
Price drops on clearance 2015 13-inch MacBook...
B&H Photo has dropped prices on clearance 2015 13″ MacBook Airs by up to $250. Shipping is free, and B&H charges NY sales tax only: - 13″ 1.6GHz/4GB/128GB MacBook Air (MJVE2LL/A): $799, $200... Read more
Mac minis on sale for up to $100 off MSRP
B&H Photo has Mac minis on sale for up to $100 off MSRP including free shipping plus NY sales tax only: - 1.4GHz Mac mini: $449 $50 off MSRP - 2.6GHz Mac mini: $649 $50 off MSRP - 2.8GHz Mac mini... Read more

Jobs Board

*Apple* Retail - Multiple Positions (US) - A...
Job Description: Sales Specialist - Retail Customer Service and Sales Transform Apple Store visitors into loyal Apple customers. When customers enter the store, Read more
Restaurant Manager (Neighborhood Captain) - A...
…in every aspect of daily operation. WHY YOU'LL LIKE IT: You'll be the Big Apple . You'll solve problems. You'll get to show your ability to handle the stress and Read more
Automotive Sales Consultant - Apple Ford Linc...
…you. The best candidates are smart, technologically savvy and are customer focused. Apple Ford Lincoln Apple Valley is different, because: $30,000 annual salary Read more
Restaurant Manager (Neighborhood Captain) - A...
…in every aspect of daily operation. WHY YOU'LL LIKE IT: You'll be the Big Apple . You'll solve problems. You'll get to show your ability to handle the stress and Read more
Simply Mac *Apple* Specialist- Service Repa...
Simply Mac is the largest premier retailer of Apple products in the nation. In order to support our growing customer base, we are currently looking for a driven Read more
All contents are Copyright 1984-2011 by Xplain Corporation. All rights reserved. Theme designed by Icreon.