TweetFollow Us on Twitter

Sep 93 Tips, Tidbits
Volume Number:9
Issue Number:9
Column Tag:Tips & Tidbits

Related Into: Standard File Memory Manager

Tips & Tidbits

By Neil Ticktin, Editor-in-Chief

This column is your opportunity to spread the word about little bits of information that you find out about. These tidbits can be programming related or they can be user tips that are particularly useful to programmers.

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

To submit a tip, send in a letter to the magazine. E-mail is our preferred method, but feel free to send something via the US Mail. See page two for all addresses. If you do send snail mail, enclose a printed copy and a disk copy of the letter so that it does not have to be retyped.

Tip of the Month

The toolbox call BlockMove is quite efficient and smart, especially for large chunks of data. In moving smaller pieces of memory, a very simple macro can do as well and execute much faster:

/* 1 (/
#define BLOCKMOVE(source,dest,len) \
{ typedef struct { char s[len] ; } _sss ;  \
  *(_sss*) (dest) = *(_sss*) (source) ;\
}

This macro generates a temporary structure of size 'len', and assigns the source structure to the destination structure. In this case the compiler will generate a tight loop moving 2 or 4 bytes of data whenever possible. There is no space penalty, i.e., it compiles to exactly the same number of bytes as a normal BlockMove.

Two restrictions apply in using BLOCKMOVE:

• the parameter 'len' must be a constant.

• the source and destinations cannot overlap.

Some performance comparisons:

Bytes BlockMove memcpy BLOCKMOVE

50 9 9 2

100 11 15 4

150 12 21 7

200 14 28 8

250 15 34 11

300 17 41 13

350 18 49 14

400 20 55 16

450 21 61 19

500 22 68 21

These comparisons were done on a PowerBook Duo 230 using Think C 6.0. Times are all measured in ticks for 5000 samples.

- Jan Bruyndonckx, Wave Research, Belgium

[If you are interested in more information on BlockMove, you might want to check out an article by Mike Scanlin in the May, 1993 issue of MacTech Magazine. The article is about writing a more efficient 68040 BlockMove. - Ed.]

Dump obj formatter

The MPW command 'dumpobj SomeLibrary > LibraryObjectCode.a' disassembles compiled library code into the form:

Module: Flags=$00=(Local Code) Module="SomeProcedure"(8) Segment="Main"(7)

Reference: Flags=$90=(A5Relative 16BitPatch 16BitOffsets FromCode)

Ref="arrow"(12)

0006

Content: Flags $08

Contents offset $0000 size $003A

00000000: 4E56 FFFC 'NV..' LINK A6,#$FFFC

00000004: 4AAE 0008 'J...' TST.L $0008(A6)

00000008: 6606 'f.' BNE.S *+$0008 ;00000010

The script below modifies the disassembled code into the form:

Module="SomeProcedure"(8) Segment="Main"(7)
 LINK   A6,#$FFFC
 TST.L  $0008(A6)
 BNE.S  *+$0008

The script:

          #2
format -f geneva -s 9 -t 26  #Set font, font size, tab size

#STEP1 - removes code comments 
find •
Loop
  #Find ; preceded by spaces & select to
  #  the end of line
find /" "+;/:/ /
  #Replace selection with nothing
replace § ""
End

#STEP2 - removes routine text header
find •
Loop
#Selects all lines between Reference &
#  second word Content
#end of line to the.
find /Reference/:/Content/:/Content/:/ /
replace § ""#Replace selection with nothing
End

#STEP3 - Delete everything before exprssn
#"Module="
find •
Loop
#Select everything in front of
#Module= to the beginning of the line
find /"Module="/:\•\
replace § ""#Replace with nothing
find !1 #Select next line
End

#STEP4 - Formats instruction lines
find •
Loop
#Find the line that starts with 4 0's
find /"0000"????/
 #followed by any 4 characters.
find /?«43»/#Select 43 characters from beginning of line
replace § "t"   #Replace selection w/tab
#Select spaces between Opcode and operand
find /" "+/ 
replace § "t"   #Replace with a tab
End#Repeat the Loop until done

In MPW, make the window that contains your disassemble routine the target window - click on it and then click back to the window that contains the above script. Select the lines under each step separately and hit the "Enter" key. Your code should align nicely into the format shown above.

- Greg Pribyl, Incline Village, NV

Customgetfile customization

I recently had to customize a CustomGetFile dialog to select folders. The returned StandardFileReply record contains the file specificatins of the target folder. But I needed to create files inside that folder while the directory ID in the specifications refers to its parent directory.

A simple method for getting a FSSpec record having as parID the directory ID of the selected folder, thus allowing to put the name of the new file into FSSpec.name without further actions, uses FSMakeFSSpec, documented in Inside Macintosh VI (25-30):

FUNCTION FSMakeFSSpec  (vRefNum:Integer;  dirID: LongInt; fileName: Str255; 
VAR spec: FSSpec): OSErr;

The first two parameters will be the same as in the file specifications of the target folder while fileName will contain a partial path.

/* 3 */

function  FileInFolderSpec (theSpec: 
 FSSpec): FSSpec;
var
 target:  FSSpec;
 fn: Str255;
 error:  OSErr;
begin
{theSpec: folder specifications}
 fn:=Concat(':' ,theSpec.name,': ');

 {create a partial path}
 error:=FSMakeFSSpec(theSpec.vRefNum,
 theSpec.parID, fn, target);
 FileInFolderSpec:= target;
end;

A fnfErr (file or directory does not exist) error will be returned because the partial path was incomplete, ending with ':' instead of a filename, but target is nonetheless valid.

- Luigi Belverato, Milano, Italy

 

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

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
Apple refurbished 15-inch Retina MacBook Pros...
Apple has Certified Refurbished 2015 15″ Retina MacBook Pros available for up to $380 off the cost of new models. An Apple one-year warranty is included with each model, and shipping is free: - 15″ 2... Read more
Apple refurbished Mac minis available for up...
Apple has Certified Refurbished Mac minis available starting at $419. Apple’s one-year warranty is included with each mini, and shipping is free: - 1.4GHz Mac mini: $419 $80 off MSRP - 2.6GHz Mac... Read more
Apple Mac Sales Finally Colliding With ‘Innov...
After successfully swimming against a tide of diminishing PC sales through 2014 and 2015, it appears that Apple has finally stopped defying gravity and is running up against the unwritten “innovate... Read more
13-inch Retina MacBook Pros on sale for up to...
B&H Photo has 13″ Retina MacBook Pros on sale for up to $150 off MSRP. Shipping is free, and B&H charges NY tax only: - 13″ 2.7GHz/128GB Retina MacBook Pro: $1189 $110 off MSRP - 13″ 2.7GHz/... Read more

Jobs Board

*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
*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* Retail - Multiple Positions - Apple,...
Job Description:SalesSpecialist - Retail Customer Service and SalesTransform Apple Store visitors into loyal Apple customers. When customers enter the store, 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
All contents are Copyright 1984-2011 by Xplain Corporation. All rights reserved. Theme designed by Icreon.