TweetFollow Us on Twitter

ADB Count
Volume Number:6
Issue Number:5
Column Tag:XCMD Corner

Related Info: ADB Manager

CountADBs and Reality

By Donald Koscheka, , Mark Armstrong

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

This column strives to present interesting insights into enhancing Hypercard through XCMDs. When I started writing this column almost two years ago, I was apprehensive; how would I come up with a new idea each month year in and year out. The answer to this question was something of a revelation to me -- once I decided to keep coming up with new ideas, I began looking in new places for those ideas. No part of Macintosh programming is off-limits, I explore everything. Of course there are limits to what one person can do and I find myself very often writing a column in response to some question asked by a colleague or a reader.

I’ve decided that it’s time to go one step further. Beginning this month, intermittently offer this space for “guest XCMDs” such as Mark Armstrong’s following ADB externals. The guest columnist idea appeals to me for two reasons: (1) it broadens the column’s “reach” by discussing areas that I may have not explored myself and (2) it provides you with different perspectives and coding styles so that you can see how others have solved specific problems in an XCMD. This is an open invitation. If you would like to have your XCMD published, send it to me via AppleLink (N0735) or America OnLine (AFC Donald) or to the Editor. Use Macwrite or TEXT only. I will respond as quickly as possible to inform you as to whether I can use the article or not. A few rules: If I can use the material, I will edit it and return it to you for approval. I edit for style and grammar, expect to have some work done to your prose. Don’t submit anything that you don’t want in the public domain and don’t submit any article without source code. You may use whatever language you like. Give yourself a “short plug” at the beginning of the column so that other readers get to know you better.

This month, I would like to introduce Mark Armstrong, Vice President of Research and Development at Pharos Technologies, Inc, a software development and systems integration company in Cincinnati, Ohio. Mark has written one commercial engineering application on the Macintosh called “UNITize” and has contributed to the arcade-style game “Marble Madness”. With his physics degree firmly in hand, he still wonders how he got mixed up in all this.

CountADBs and Reality

In some circumstances (such as on the factory floor), there is a need to monitor the Macintosh to determine whether the mouse or keyboard devices become detached from ADB. Some software may modify their behavior if certain input devices are available, hiding or showing functionality based on that result. Below are two simple XFCN’s, developed in Think C 4.0, that tell you if the mouse and keyboard are connected.

According to Inside Macintosh Volume 5, the function CountADBs() “returns a value representing the number of devices connected to the Apple Desktop Bus (ADB) by counting the number of entries in the device table....” The important word is representing. It does not really tell you what is connected out there on the bus. Consequently, even if you have no devices hooked up to ADB, CountADBs() will return a value of 2. This happens because the system always installs the keyboard and mouse drivers regardless of whether they are physically resident. To find out what is really connected to ADB you can poll devices that you believe are connected to the ADB. Connected devices will respond to the poll.

Before going too far, you must determine whether the host machine is equipped for ADB. The following call to SysEnvirons() determines whether ADB is installed.

/* 1 */

Boolean ADBExists()
 {
 SysEnvRectheWorld;
 OSErr  err;
 
 err = SysEnvirons(1,&theWorld);
 if (err) return (FALSE);
 else
 {
if ((theWorld.machineType >= 0) && (theWorld.machineType < 3)) 
 return (FALSE);
 else return (TRUE);
 }
 }

Once you have determined that ADB exists on your machine, you check to see what devices are actually there by looping from 1 to the maximum allowable number of ADB devices (16). Inside the loop, you call ADBIndAvail() which returns TRUE if the specified device is physically connected and functional or FALSE otherwise. ADBIndAvail() takes a device specified by the index and sends a command via ADBOp() to that device to see if it is responding. If the device receives the operation, it will signal that it has done so by executing a completion routine. If the completion routine ADBOp() doesn’t execute, then the device did not receive the message, and we can assume that the device is dysfunctional or disconnected. The completion routine ADBComplete() sets a global variable to TRUE. If completion does not occur, then the operation times out and the global variable remains FALSE. In the following code, we use the first byte of Scratch8 as the global variable. We chose to use Scratch8 because this code was developed for a Think C 4.0 XCMD where A4 had already been pushed using SetUpA4(). In most cases, a regular global variable will do the trick.

/* 2 */

#define ADB_TIMEOUT10000

extern char Scratch8[]  : 0x9FA;

ADBComplete(){
 *(char *)Scratch8 = TRUE;
}

ADBIndAvail(index)
 short  index;
 {
 ADBAddress addrs;
 ADBDataBlock  devBlock;
 OSErr  err;
 short  cmdNum;
 Str255 ADBData;
 
 addrs = GetIndADB(&devBlock,index);
 cmdNum = ((addrs*16)+0xF);
 ADBData[0] = 0;
 ADBData[1] = 0;
 ADBData[2] = 0;
 
 *(char *)Scratch8 = FALSE;
 err = ADBOp(NIL,ADBComplete,&ADBData,cmdNum);
 if (!err){
 short I= 0;
 do
 if (++I > ADB_TIMEOUT) *(char *)Scratch8 = TRUE; 
 while (!*(char *)Scratch8);
 if (ADBData[0] != 0) return (TRUE);
 }
 return (FALSE);
}

In both cases below, the first portion of the code checks to see if the first and only argument is a question mark (?) or an exclamation point (!). If so, the XFCN responds appropriately as suggested by MacDTS.

The XFCN checks first to see if ADB exists on this machine and returns an error code if it does not. Next, it loops through all the devices to see if any one of them is a responding mouse. If it finds one, it returns TRUE, otherwise it completes the loop and returns FALSE. Each time through the loop, we call GetIndADB(), as directed in Inside Mac, to determine if the device in question is, indeed, a mouse.

/* 3 */

#include “MacTypes.h”
#include “HyperXCmd.h”
#include “DeskBus.h”
#include “SetUpA4.h”

#define ADB_KEYBOARD 2
#define ADB_MOUSE3

#define STANDARD_KBD 1
#define EXTENDED_KBD 2

#define MAX_ADB_DEVICES 16

pascal main(paramPtr)
   XCmdBlockPtr  paramPtr;
   {
   Str255 str;
   shortix;
   
   RememberA0();
   SetUpA4();
   
   if(paramPtr->paramCount == 1){
   ZeroToPas(paramPtr,*((unsigned char **)paramPtr->params[0]),str);
      if (str[0] == 1){
        if (str[1] == ‘?’) 
 pstrcpy(str,”\pKBDAvail()”);
        else if (str[1] == ‘!’) 
 pstrcpy(str,”\pv1.0; © Pharos Technologies, Inc. 1989");
      }
      goto Done;
   }
   
   if (!ADBExists()){ 
 pstrcpy(str,”\p0\rnoADB”); 
 goto Done; 
 }
   
 for ( ix  =1; ix <=MAX_ADB_DEVICES; ix ++){
 ADBDataBlock    ADBinfo;
 ADBAddress ADBaddr;
 
 if (!ADBIndAvail( ix )) continue;
 ADBaddr = GetIndADB(&ADBinfo,I);
 if (ADBaddr <= 0) continue;
 if (ADBinfo.origADBAddr == ADB_MOUSE){ 
 pstrcpy(str,”\ptrue”); 
 goto Done; 
 }
 }
 pstrcpy(str,”\pfalse”);
Done:
   paramPtr->returnValue = PasToZero(paramPtr,(StringPtr)str);
   RestoreA4();
}

A similar routine checks for keyboard devices. This routine not only checks to see if it is a keyboard, but also returns the type of keyboard by examining the devType field of ADBInfo.

/* 4 */

#include “MacTypes.h”
#include “HyperXCmd.h”
#include “DeskBus.h”
#include “SetUpA4.h”

#define ADB_KEYBOARD 2
#define ADB_MOUSE3
#define STANDARD_KBD 1
#define EXTENDED_KBD 2
#define MAX_ADB_DEVICES 16

pascal main(paramPtr)
   XCmdBlockPtr  paramPtr;
   {
   Str255 str;
   shortI;
   
   RememberA0();
   SetUpA4();
   
   if (paramPtr->paramCount == 1){
   ZeroToPas(paramPtr,*((unsigned char **)paramPtr->params[0]),str);
      if (str[0] == 1){
        if (str[1] == ‘?’) 
 pstrcpy(str,”\pKBDAvail()”);
        else if (str[1] == ‘!’) 
 pstrcpy(str,”\pv1.0; © Pharos Technologies, Inc. 1989");
      }
      goto Done;
    }
   
   if (!ADBExists()){ 
 pstrcpy(str,”\p0\rnoADB”); 
 goto Done; 
 }
   
 for (I=1;I<=MAX_ADB_DEVICES;I++){
 ADBDataBlock    ADBinfo;
 ADBAddress ADBaddr;
 
 if (!ADBIndAvail(I)) continue;
 ADBaddr = GetIndADB(&ADBinfo,I);
 if (ADBaddr <= 0) continue;

 if (ADBinfo.origADBAddr == ADB_KEYBOARD){
 if (ADBinfo.devType == STANDARD_KBD){ 
 pstrcpy(str,”\ptrue,standard”); 
 goto Done; 
 }
 else if (ADBinfo.devType == EXTENDED_KBD){ 
 pstrcpy(str,”\ptrue,extended”); 
 goto Done; 
 }
 else{ 
 pstrcpy(str,”\ptrue,unknown”); 
 goto Done; 
 }
 }
 }
 pstrcpy(str,”\pfalse”);
Done:
   paramPtr->returnValue = PasToZero(paramPtr,(StringPtr)str);
   RestoreA4();
   }

Once you know how to identify a particular device, it is easy to check to see if it is present on ADB. If you don’t know how to identify a given device, then the code above can be easily modified to return all devices found on ADB. By the way, I would like to give special thanks and credit to Cameron Birse. If you don’t recognize the name from any number of “sources”, then never mind.

 

Community Search:
MacTech Search:

Software Updates via MacUpdate

Corel Painter 20.1.0.285 - Digital art s...
Corel Painter lets you advance your digital art style with painted textures, subtle glazing brushwork, interactive gradients, and realistic Natural-Media. Easily transition from traditional to... Read more
iTubeDownloader 6.5.19 - Easily download...
iTubeDownloader is a powerful-yet-simple YouTube downloader for the masses. Because it contains a proprietary browser, you can browse YouTube like you normally would. When you see something you want... Read more
OmniFocus 3.8 - GTD task manager with iO...
OmniFocus is an organizer app. It uses projects to organize tasks naturally, and then add tags to organize across projects. Easily enter tasks when you’re on the go, and process them when you have... Read more
Hazel 4.4.5 - Create rules for organizin...
Hazel is your personal housekeeper, organizing and cleaning folders based on rules you define. Hazel can also manage your trash and uninstall your applications. Organize your files using a familiar... Read more
Macs Fan Control 1.5.7 - Monitor and con...
Macs Fan Control allows you to monitor and control almost any aspect of your computer's fans, with support for controlling fan speed, temperature sensors pane, menu-bar icon, and autostart with... Read more
Acorn 6.6 - Bitmap image editor.
Acorn is a new image editor built with one goal in mind - simplicity. Fast, easy, and fluid, Acorn provides the options you'll need without any overhead. Acorn feels right, and won't drain your bank... Read more
OnyX 3.8.2 - Maintenance and optimizatio...
OnyX is a multifunction utility that you can use to verify the startup disk and the structure of its system files, to run miscellaneous maintenance and cleaning tasks, to configure parameters in the... Read more
macOS Catalina 10.15.5 - An Operating Sy...
macOS Catalina gives you more of everything you love about Mac. Experience three all-new media apps: Apple Music, Apple TV, and Apple Podcasts. Locate a missing Mac with the new Find My app. And now... Read more
macOS High Sierra Security Updates 10.13...
macOS High Sierra introduces new core technologies that improve the most important functions of your Mac. From rearchitecting how it stores your data to improving the efficiency of video streaming to... Read more
Numi 3.28 - Menu-bar calculator supports...
Numi is a calculator that magically combines calculations with text, and allows you to freely share your computations. Numi combines text editor and calculator Support plain English. For example, '5... Read more

Latest Forum Discussions

See All

Steam Link Spotlight - Signs of the Sojo...
Steam Link Spotlight is a feature where we look at PC games that play exceptionally well using the Steam Link app. Our last entry was XCOM: Chimera Squad. Read about how it plays using Steam Link's new mouse and keyboard support over here. | Read more »
Steampunk Tower 2, DreamGate's sequ...
Steampunk Tower 2 is a DreamGate's follow up to their previous tower defence game. It's available now for both iOS and Android as a free-to-play title and will see players defending their lone base by kitting it out with a variety of turrets. [... | Read more »
Clash Royale: The Road to Legendary Aren...
Supercell recently celebrated its 10th anniversary and their best title, Clash Royale, is as good as it's ever been. Even for lapsed players, returning to the game is as easy as can be. If you want to join us in picking the game back up, we've put... | Read more »
Pokemon Go Fest 2020 will be a virtual e...
Niantic has announced that Pokemon Go Fest will still take place this year although understandably it won't be a physical event. Instead, it will become a virtual celebration and is set to be held on 25th and 26th July. [Read more] | Read more »
Marvel Future Fight's major May upd...
Marvel Future Fight's latest update has now landed, and it sounds like a big one. The focus this time around is on Marvel's Guardians of the Galaxy, and it introduces all-new characters, quests, and uniforms for players to collect. [Read more] | Read more »
SINoALICE, Yoko Taro and Pokelabo's...
Yoko Taro and developer Pokelabo's SINoALICE has now opened for pre-registration over on the App Store. It's already amassed 1.5 million Android pre-registrations, and it's currently slated to launch on July 1st. [Read more] | Read more »
Masketeers: Idle Has Fallen's lates...
Masketeers: Idle Has Fallen is the latest endeavour from Appxplore, the folks behind Crab War, Thor: War of Tapnarok and Light A Way. It's an idle RPG that's currently available for Android in Early Access and will head to iOS at a later date. [... | Read more »
Evil Hunter Tycoon celebrates 2 million...
Evil Hunter Tycoon has proved to be quite the hit since launching back in March, with its most recent milestone being 2 million downloads. To celebrate the achievement, developer Super Planet has released a new updated called Darkness' Front Yard... | Read more »
Peak's Edge is an intriguing roguel...
Peak's Edge is an upcoming roguelike puzzle game from developer Kenny Sun that's heading for both iOS and Android on June 4th as a free-to-play title. It will see players rolling a pyramid shape through a variety of different levels. [Read more] | Read more »
Clash Royale: The Road to Legendary Aren...
Supercell recently celebrated its 10th anniversary and their best title, Clash Royale, is as good as it's ever been. Even for lapsed players, returning to the game is as easy as can be. If you want to join us in picking the game back up, we've put... | Read more »

Price Scanner via MacPrices.net

New 16″ MacBook Pros now on sale for up to $2...
Apple reseller DataVision is now offering new 16″ Apple MacBook Pros for up to $255 off MSRP, each including free shipping. Prices start at $2194. DataVision charges sales tax for NY, NJ, PA, and CA... Read more
Apple now offering Certified Refurbished iPho...
Apple is now offering Certified Refurbished iPhone Xr models in the refurbished section of their online store starting at $499. Each iPhone comes with Apple’s standard one-year warranty, ships free,... Read more
Sale! Get a 10.2″ 32GB WiFi iPad for only $27...
Walmart has new 10.2″ 32GB WiFi iPads on sale for $50 off Apple’s MSRP, only $279. These are the same iPads sold by Apple in their retail and online stores. Be sure to select Walmart as the seller... Read more
Apple resellers offer new 2020 Mac minis for...
Apple resellers are offering new 2020 Mac minis for up to $50 off Apple’s MSRP with prices available starting at $759. Shipping is free: (1) B&H Photo: – 2020 4-Core Mac mini: $759 $40 off MSRP... Read more
Sprint is offering the Apple iPhone 11 free t...
Did you miss out on Sprint’s recent free iPhone SE promotion? No worries. Sprint has the 64GB iPhone 11 available for $0 per month for new lines when you trade-in a qualifying phone in any condition... Read more
Apple has clearance 2019 13″ 1.4GHz MacBook P...
Apple has Certified Refurbished 2019 13″ 1.4GHz 4-Core Touch Bar MacBook Pros available today starting at $979 and up to $440 off original MSRP. Apple’s one-year warranty is included, shipping is... Read more
Apple restocks 2019 MacBook Airs starting at...
Apple has clearance, Certified Refurbished, 2019 13″ MacBook Airs available again starting at $779. Each MacBook features a new outer case, comes with a standard Apple one-year warranty, and is... Read more
Apple restocks clearance Mac minis for only $...
Apple has restocked Certified Refurbished 2018 4-Core Mac minis for only $599. Each mini comes with a new outer case plus a standard Apple one-year warranty. Shipping is free: – 3.6GHz Quad-Core... Read more
Apple’s new 2020 13″ MacBook Airs on sale for...
B&H Photo has Apple’s new 2020 13″ 4-Core and 6-Core MacBook Airs on sale today for $50-$100 off Apple’s MSRP, starting at $949. Expedited shipping is free to many addresses in the US. The... Read more
B&H continues to offer clearance 2019 13″...
B&H Photo has clearance 2019 13″ 4-Core MacBook Pros available for up to $300 off Apple’s original MSRP, with prices starting at $1149. Expedited shipping is free to many addresses in the US. B... Read more

Jobs Board

Security Officer - *Apple* Store - NANA (Un...
**Security Officer \- Apple Store** **Description** About NMS Built on a culture of safety and integrity, NMSdelivers award\-winning, integrated support services to Read more
Transition Into Practice Program (TIP) - Sept...
…Academy-Transition into Practice (TIP) Residency program at St Mary Medical Center in Apple Valley, CA. **We are seekingRegistered Nurses who are:** + New graduate Read more
Essbase Developer - *Apple* - Theorem, LLC...
Job Summary Apple is seeking an experienced, detail-minded Essbase developer to join our worldwide business development and strategy team. If you are someone who Read more
Senior Software Engineer @ *Apple* - Theore...
Job Summary Apple is looking for a seasoned senior software engineer to join our worldwide business development and strategy team. This is an opportunity to lead a Read more
Cub Foods - *Apple* Valley - Now Hiring Par...
Cub Foods - Apple Valley - Now Hiring Part Time! United States of America, Minnesota, Apple Valley Retail Operations Post Date May 18, 2020 Requisition # 119230 Read more
All contents are Copyright 1984-2011 by Xplain Corporation. All rights reserved. Theme designed by Icreon.