TweetFollow Us on Twitter

Break-out Box
Volume Number:7
Issue Number:12
Column Tag:C Workshop

Go With the Flow

By Byron Miller, Minneapolis, MN

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

An Alternative to Expensive Protocol Analyzers

I had a problem that needed a solution. The device I was debugging was having trouble Kermiting files between it and the host. I first used a breakout box to check hardware handshaking (since the breakout box is specifically for testing the physical protocol layer, it is of no use for testing the stream or network protocol layer). As it turned out the handshaking lines behaved correctly. “Now what?”, I thought. I needed to look at the data coming over the line. My first thought was to use a file capture program and look at the data stream. I soon abandoned this idea because a file capture program displays the characters in an ASCII format and since control characters are used to control data flow, they do not have a corresponding printable character. What I really needed is a protocol analyzer. However protocol analyzers are expensive, and I could not justify the cost. So my other alternative is to develop my own. After weighing the pros and cons I decided it was in my own best interest to develop my own analyzer. The result of my effort is the Macintosh Break-Out Box (MBOB) protocol analyzer.

Mac Break Out Box Specification

Supports:
 xon, xoff, parity, overrun, framing errors, break detection.
 Single filter of operator choosing (editable text dialog).
 Clipboard access via resizable window.
 Baud rate and parity selection via an editable text dialog.

Menu Layout:

apple symbol | File | Edit | Options

about | Monito | Copy | Baud

| --------- | Clear | Parity

| Quit | Clipboard | Filter

| | | Stop Bits

Listing 1. Specification of MBOB's functionality along with the menu layout.

MBOB is an alternative to expensive logical analyzers. Often, vendors develop propriety RS232 protocols. Vendors may not have the need or resources to justify the expense of a protocol analyzer, and MBOB is the tool for filling the void. MBOB provides basic functionality, in that it filters for a single character which is user defined, and baud, parity and stop bits are selectable. It uses the modem port of the Mac and is written in Think C and tested on the Mac Plus through the II lines.

In this article I shall go through the software design process for developing MBOB. First I’ll generate a design specification, followed by a description of the functional sections, and then I’ll wrap it up with suggestions on how to improve MBOB.

Figure 2.

Background

Before I begin discussing how MBOB is implemented I would like to talk briefly about the methodology to produce it. I used a variation of the Yourdon methodology to produce this application. In a nutshell, the Yourdon design methodology is a formalized process and notation for developing quality software; quality software is defined as code which is maintainable, reliable, and thoroughly documented. Normally, this methodology is broken down into two phases; much like the moon’s only less! First is the analysis, followed by the design phase.

Usually, the analysis phase starts with a problem definition. During the analysis stage, designers look for the best solution to the problem. Furthermore, they also decide if they are focusing correctly on the right problem. In other words, problem definition starts with an analysis of a proposed solution. If designers discover that there is a problem with the solution, another is picked and the process is repeated until they are satisfied with the results of the analysis. Once problem definition is satisfied, the design phase kicks in.

The Design Phase consists of a statement of purpose, events list, data flow diagram (DFD), process specification, user interface considerations, and pseudo code. In the design phase each elements making up the design phase describes the system from different perspective. For instance, the statement of purpose and the process specification are often combined to describe in English what problem it satisfies, and how the system will interact. The event list defines what events the system recognizes and responds to. The user interface describes what the shell of the system will look like. DFD’s are used to represents how the system works from a data point of view. Finally, the designer distills each perspective into pseudo code. Once in pseudo code, the system is ready for mechanical process of language specific coding.

defaultSettings = 
 [baudSetting + paritySetting + stopBits + filterChar]

SelectionEvent = 
 [(menuSelection) + (command key equivalent for menu selection)]

WindowPtr = 
 [ptr to record that contains current window’s graphical attributes]

StatusRecord = 
 [serial status record + filter character count]

Figure 3.

The data dictionary for the top level structure chart. Data dictionary notation is as follows: An equal (“=”), means “is composed of”, plus (“+”) stands for logical and. Left and right parentheses (“()”) mean optional, while curly brackets and square brackets stand for iteration and select one respectively. Comments are denoted by double asterisks (“**”), and the @ sign means that what follows is part of an ID for a data store.

Analysis

Analysis for this problem is straight forward. The problem is understood and thus easily defined; a lot of times this is the most difficult part. To briefly restate the problem: There is no way to look at characters coming over the serial line on the fly. The solution is to monitor these characters. Part of the analysis is looking at existing products to see if they satisfy the problem. Additionally, sometimes cost analysis is necessary to decide whether to buy or produce your own application. In this case, the decision was made to produce an application. This was a result of analysis of required functionality versus cost of an existing protocol analyzer.

Design

MBOB’s process specification is similar to the one used by Apple computer in object oriented design. When this approach is used, several parts of the traditional methodology are combined. For instance, the statement of purpose, event list, and user interface are combined into a single document see figure 1. Under this approach, DFD’s are omitted from the design since they do not convey any new information. Next, the specification is broken up into areas of functionality or modules. Each function module is then organized, based on the event list and the user interface considerations to form a structure chart. Finally, individual modules within the structure chart are pseudo coded.

Implementation

Figures 2 and 3 shows a top level structure chart and its associated data dictionary of the core functions. The main loop is a typical Macintosh application shell which is event driven. It responds to events such as keyboard, rodent (mouse) input, and the serial ports. Main loop fetches events from the event queue and sends the event to the correct function; much the same as an object in the object oriented paradigm sends a message to a corresponding method. Initializing the serial port and loading default settings is handled by the function Init Serial. It is called from main loop, before it actually begins fetching events from the queue. Similarly, function shut down application is called from main loop just before it exits. Moreover, shut down application flushes the serial port’s buffer and frees the port, making it available for use by other applications. Handle serial selection is not a real function, but more of a functional block composed of several functions. It handles events from the keyboard and rodent that have to do with initiating some activity with the serial port. For instance, either a menu selection or an equivalent command sequence activates the change settings function. Change settings is used change port parameters like baud and parity. However, before it attempts to change parameters, it first calls reset ports. Function doSerial performs the job of monitoring the serial stream and display status keeps track of correctly updating the display window.

Once the structure charts are adequately defined, they are translated and fleshed out into pseudo code and then into source code. Often times pseudo code may look a lot like real code since enough information is available from other portions of the design process. Listing MBOB functs.c presents code corresponding to the structure charts.

Operation

Since most everyone is already familiar with the compile and debug stages of software development, it is omitted and instead I’ll proceed to operating the application. Operation is easy for anyone already familiar with a window based environment such as the Mac or Microsoft’s windows. Double clicking on the application’s icon invokes it. Once started, the file, edit and option menu bars are displayed. Choosing the monitor menu under the file menu bar begins parsing of the serial data stream. Terminating the application is as easy as choosing the quit menu which is also located under the file menu bar. And as you may have already guessed, the option menu bar controls changing serial port characteristics and the filter selection. In a typical session, the application is invoked, and the port characteristics are set. Next, the filter character is selected, followed by monitoring the data stream.

That’s a Wrap People

Currently, MBOB is adequate for my needs. However, as is the case in the software life cycle model, useful software should be evolved! With that in mind, I submit the following suggestions for evolving this application. First, more filters! One is OK, but it is a bit of a pain to debug protocols where more than one character is sought. Or, how about a counter to keep track of the number of filter characters encountered? Finally, how about adding file access. This feature gives the developer the option to post process the stream.

Most problems have solutions when attacked from them right angle. However, a solution is not always enough. Often a plan is needed, so that the problem is not attacked from the left. New analysis and design methodologies present software developers with the techniques not only to solve the problem, but to do it in a manner which produces quality software.

References

Mark, David.; and Reed, Cartwright. Macintosh Programming Primer, volume one. New York: Addison-Wesley, 1989.

Wilkerson, Brian. “How to Develop an Object Based Application.” Develop magazine, April, 1990.

Lecture notes from “Structured Analysis and Design for real time systems.” Edition 4.0. Yourdon, Inc 1501 Broadway, NY, NY 10036.

Listing: MBOB.h

#define FALSE    0
#define TRUE1

#define BASE_RES_ID400
#define NIL 0L
#define MOVE_TO_FRONT-1L
#define REMOVE_ALL_EVENTS 0

#define SLEEP    0L
#define NIL_MOUSE_REGION  0L
#define WNE_TRAP_NUM 0x60
#define UNIMPL_TRAP_NUM   0x9f

#define BANNER_OFFSET96
#define HORIZONTAL_OFFSET 0
#define INITIAL_ROW24
#define LEFT_MARGIN10
#define ROW_HEIGHT 15
#define SCROLL_BAR_PIXELS 16
#define START_ROW0

#define TEXT_FONT_SIZE    10
 /* in pixels */
#define GRAD_FONT_SIZE    6

#define APPLE_MENU_IDBASE_RES_ID
#define FILE_MENU_ID BASE_RES_ID+1
#define EDIT_MENU_ID BASE_RES_ID+2
#define OPTION_MENU_ID    BASE_RES_ID+3

#define OPEN_ITEM1
#define TRANSFER_ITEM3
#define LAUNCH_ITEM4
#define QUIT_ITEM6
#define ABOUT_ITEM 1
#define COPY_ITEM4
#define PASTE_ITEM 5
#define CLEAR_ITEM 6
#define CLIPBOARD_ITEM    7
#define BAUD_ITEM1
#define PARITY_ITEM2
#define STOP_ITEM3
#define FILTER_ITEM4

#define ABOUT_ALERT400
#define LAUNCH_ALERT 401
#define ENOUGH_ALERT 403
#define ERR_ALERT404
#define CLIPBOARD_ALERT   406
#define EMPTY_ALERT407

#define DRAG_THRESHOLD    30

#define OK_BUTTON1
 /* dialog list items */
#define CANCEL_BUTTON2
#define FIRST_RADIO3
#define SECOND_RADIO 4
#define THIRD_RADIO5
#define FOURTH_RADIO 6
#define FIFTH_RADIO7
#define SIXTH_RADIO8
#define FIRST_FILTER 3

#define ONTRUE
#define OFF FALSE

#define FLOAT_CONST4
 /* floating pt numbers take up 4 bytes */

#define WATCH_ICON 4

#define WINDOW_HOME_LEFT  45
 /* global coords */
#define WINDOW_HOME_RIGHT 45
#define NEW_WINDOW_OFFSET 20
#define LEAVE_WHERE_IT_IS FALSE

typedef struct
{
 StringPtrpfName;
 /* ptr to the name of launchee */
 short intparam;
 char   LC[2];
 /* extended params: */
 long int extBlockLen;  /* number of bytes in extension == 6 */
 short intfFlags;/* finder file info flags */
 long int launchFlags;    /* bits 30, & 31 equal 1 for sublaunch */
}  LaunchStruct, *pLaunchStruct;

typedef struct
{
 int    baud;    /* 300 <= baud <= 57600 */
 int    parity;  /* 0 <= parity <= 2 {0 = none, 1 = even, 2 = odd} */
 int    stopBits;/* 0 <= stopBits <=1 {0 = 1 stop, 1 = 2 stop} */
 int    filter;  /* 0 <= filter <= 255 {ascii range} */
} dlogSettings, *dlogSettingsPtr;
Listing:  Dlogs.c

#include <QuickDraw.h>
#include <MacTypes.h>
#include <FontMgr.h>
#include <WindowMgr.h>
#include <MenuMgr.h>
#include <TextEdit.h>
#include <DialogMgr.h>
#include <EventMgr.h>
#include <DeskMgr.h>
#include <StdfilePkg.h>
#include <FileMgr.h>
#include <ToolboxUtil.h>
#include <ControlMgr.h>
#include <SerialDvr.h>

#include “MBOB.h”

extern  gEOL[];

/*
 Created by :  Byro
 Date   : 05/10/90
 Modified : 05/17/90
*/

HndlBaudDialog(settings)
 dlogSettingsPtr settings;
 
{
 int    dialDone = FALSE, itemHit, itemType;
 Rect   itemRect;
 Handle itemHandle;
 DialogPtrBaudDialog;
 dlogSettings  oldSettings; /* used to restore in case of cancel */
 
 
 oldSettings = *settings;
 BaudDialog = GetNewDialog(BASE_RES_ID, NIL, MOVE_TO_FRONT);
 if (BaudDialog == NIL)
 {
 StopAlert(ENOUGH_ALERT, NIL);
 return(TRUE);
 }

 SelectWindow(BaudDialog);
 SetBaud(settings, BaudDialog);  /* load current settings */
 ShowWindow(BaudDialog);  /* initially invisible */
 
 while (dialDone == FALSE)
 {
 ModalDialog(NIL, &itemHit);
 switch(itemHit)
 {
 case OK_BUTTON :
 HideWindow(BaudDialog);
 DisposDialog(BaudDialog);
 dialDone = TRUE;
 break;
 case CANCEL_BUTTON :
 HideWindow(BaudDialog);
 DisposDialog(BaudDialog);
 *settings = oldSettings; /* load old values */
 dialDone = TRUE;
 return(CANCEL_BUTTON);
 break;
 case FIRST_RADIO :
 
 /* turn on 300 baud radio dial */
 
 GetDItem(BaudDialog, FIRST_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, ON);
 
 GetDItem(BaudDialog, SECOND_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);

 GetDItem(BaudDialog, THIRD_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);

 GetDItem(BaudDialog, FOURTH_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);
 
 GetDItem(BaudDialog, FIFTH_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);
 
 GetDItem(BaudDialog, SIXTH_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);
 
 settings->baud = baud300;
 
 break;
 case SECOND_RADIO :
 
 /* turn on 1200 baud radio dial */
 
 GetDItem(BaudDialog, FIRST_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);
 
 GetDItem(BaudDialog, SECOND_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, ON);

 GetDItem(BaudDialog, THIRD_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);

 GetDItem(BaudDialog, FOURTH_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);
 
 GetDItem(BaudDialog, FIFTH_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);
 
 GetDItem(BaudDialog, SIXTH_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);
 
 settings->baud = baud1200; 
 
 break;
 case THIRD_RADIO :
 
 /* turn on 4800 baud radio dial */
 
 GetDItem(BaudDialog, FIRST_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);
 
 GetDItem(BaudDialog, SECOND_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);

 GetDItem(BaudDialog, THIRD_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, ON);

 GetDItem(BaudDialog, FOURTH_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);
 
 GetDItem(BaudDialog, FIFTH_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);
 
 GetDItem(BaudDialog, SIXTH_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);
 
 settings->baud = baud4800; 
 
 break;
 case FOURTH_RADIO :
 
 /* turn on 9600 baud radio dial */
 
 GetDItem(BaudDialog, FIRST_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);
 
 GetDItem(BaudDialog, SECOND_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);

 GetDItem(BaudDialog, THIRD_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);

 GetDItem(BaudDialog, FOURTH_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, ON);
 
 GetDItem(BaudDialog, FIFTH_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);
 
 GetDItem(BaudDialog, SIXTH_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);
 
 settings->baud = baud9600; 
 
 break;
 case FIFTH_RADIO :
 
 /* turn on 19200 baud radio dial */
 
 GetDItem(BaudDialog, FIRST_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);
 
 GetDItem(BaudDialog, SECOND_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);

 GetDItem(BaudDialog, THIRD_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);

 GetDItem(BaudDialog, FOURTH_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);
 
 GetDItem(BaudDialog, FIFTH_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, ON);
 
 GetDItem(BaudDialog, SIXTH_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);
 
 settings->baud = baud19200;
 
 break;
 case SIXTH_RADIO :
 
 /* turn on 57600 baud radio dial */
 
 GetDItem(BaudDialog, FIRST_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);
 
 GetDItem(BaudDialog, SECOND_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);

 GetDItem(BaudDialog, THIRD_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);

 GetDItem(BaudDialog, FOURTH_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);
 
 GetDItem(BaudDialog, FIFTH_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);
 
 GetDItem(BaudDialog, SIXTH_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, ON);
 
 settings->baud = baud57600;
 
 break;
 default :
 break;
 }
 }
 return(NIL);  /* all ok */
}

HndlParityDialog(settings)
 dlogSettingsPtr settings;
 
{
 int    dialDone = FALSE, itemHit, itemType;
 Rect   itemRect;
 Handle itemHandle;
 DialogPtrParityDialog;
 dlogSettings  oldSettings; /* used to restore in case of cancel */
 
 oldSettings = *settings;
 
 ParityDialog = GetNewDialog(BASE_RES_ID + 1, NIL, MOVE_TO_FRONT);
 if (ParityDialog == NIL)
 {
 StopAlert(ENOUGH_ALERT, NIL);
 return(TRUE);
 }
 
 SelectWindow(ParityDialog);
 SetParity(settings, ParityDialog);
 ShowWindow(ParityDialog);/* initially invisible */
 
 while (dialDone == FALSE)
 {
 ModalDialog(NIL, &itemHit);
 switch(itemHit)
 {
 case OK_BUTTON :
 HideWindow(ParityDialog);
 DisposDialog(ParityDialog);
 dialDone = TRUE;
 break;
 case CANCEL_BUTTON :
 HideWindow(ParityDialog);
 DisposDialog(ParityDialog);
 *settings = oldSettings; /* load old values */
 dialDone = TRUE;
 return(CANCEL_BUTTON);
 break;
 case FIRST_RADIO :
 
 /* turn on even parity radio dial */
 
 GetDItem(ParityDialog, FIRST_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, ON);
 
 GetDItem(ParityDialog, SECOND_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);

 GetDItem(ParityDialog, THIRD_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);

 settings->parity = evenParity;
 
 break;
 case SECOND_RADIO :
 
 /* turn on no parity radio dial */
 
 GetDItem(ParityDialog, FIRST_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);
 
 GetDItem(ParityDialog, SECOND_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, ON);

 GetDItem(ParityDialog, THIRD_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);

 settings->parity = noParity;
 
 break;
 case THIRD_RADIO :
 
 /* turn on odd parity radio dial */
 
 GetDItem(ParityDialog, FIRST_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);
 
 GetDItem(ParityDialog, SECOND_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);

 GetDItem(ParityDialog, THIRD_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, ON);

 settings->parity = oddParity;
 
 break;
 default :
 break;
 }
 }
 return(NIL);  /* all ok */
}

HndlStopBitsDialog(settings)
 dlogSettingsPtr settings;
 
{
 int    dialDone = FALSE, itemHit, itemType;
 Rect   itemRect;
 Handle itemHandle;
 DialogPtrStopBitsDialog;
 dlogSettings  oldSettings; /* used to restore in case of cancel */
 
 oldSettings = *settings;
 
 StopBitsDialog = GetNewDialog(BASE_RES_ID + 2, NIL, MOVE_TO_FRONT);
 if (StopBitsDialog == NIL)
 {
 StopAlert(ENOUGH_ALERT, NIL);
 return(TRUE);
 }
 
 SelectWindow(StopBitsDialog);
 SetStopBits(settings, StopBitsDialog);
 ShowWindow(StopBitsDialog);/* initially invisible */
 
 while (dialDone == FALSE)
 {
 ModalDialog(NIL, &itemHit);
 switch(itemHit)
 {
 case OK_BUTTON :
 HideWindow(StopBitsDialog);
 DisposDialog(StopBitsDialog);
 dialDone = TRUE;
 break;
 case CANCEL_BUTTON :
 HideWindow(StopBitsDialog);
 DisposDialog(StopBitsDialog);
 *settings = oldSettings; /* load old values */
 dialDone = TRUE;
 return(CANCEL_BUTTON);
 break;
 case FIRST_RADIO :
 
 /* turn on 1 stop bit radio dial */
 
 GetDItem(StopBitsDialog, FIRST_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, ON);
 
 GetDItem(StopBitsDialog, SECOND_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);

 settings->stopBits = stop10;
 
 break;
 case SECOND_RADIO :
 
 /* turn on 2 stop bits radio dial */
 
 GetDItem(StopBitsDialog, FIRST_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);
 
 GetDItem(StopBitsDialog, SECOND_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, ON);

 settings->stopBits = stop20;
 
 break;
 
 default :
 break;
 }
 }
 return(NIL);  /* all ok */
}

HndlFilterDialog(settings)
 dlogSettingsPtr settings;
 
{
 int    dialDone = FALSE, filterChar, itemHit, itemType;
 Rect   itemRect;
 Handle itemHandle;
 DialogPtrFilterDialog;
 Str255 CfilterString, filterString;
 
 settings->filter = 0;
 FilterDialog = GetNewDialog(BASE_RES_ID + 3, NIL, MOVE_TO_FRONT);
 if (FilterDialog == NIL)
 {
 StopAlert(ENOUGH_ALERT, NIL);
 return(TRUE);
 }
 
 SelectWindow(FilterDialog);
 ShowWindow(FilterDialog);/* initially invisible */
 
 while (dialDone == FALSE)
 {
 ModalDialog(NIL, &itemHit);
 switch(itemHit)
 {
 case OK_BUTTON :
 HideWindow(FilterDialog);
 DisposDialog(FilterDialog);
 
 /* be sure and check this for valid input */
 
 if (*filterString != *gEOL)
 {
 if (isItADigit(filterString) == TRUE)
 {
 
 /* string ok */
 
 P2Cstr(filterString, CfilterString);
 filterChar = atoi(CfilterString);
 
 /* range check */
 
 if (filterChar < 256)
 settings->filter = filterChar;
 else
 {
 ; /* display error dialog */
 }
 }
 else
 return(TRUE); /* err condition */
 }
 dialDone = TRUE;
 break;
 case CANCEL_BUTTON :
 HideWindow(FilterDialog);
 DisposDialog(FilterDialog);
 dialDone = TRUE;
 return(CANCEL_BUTTON);
 break;
 case FILTER_ITEM :
 
 /* get filter value from dialog */
 
 GetDItem(FilterDialog, FILTER_ITEM, &itemType,
 &itemHandle, &itemRect);
 GetIText(itemHandle, filterString);
 break;
 default :
 break;
 }
 }
 return(NIL);  /* all ok */
}

SetBaud(Settings, dlogPtr)
 dlogSettingsPtr Settings;
 DialogPtrdlogPtr;
 
/*
 sets radio buttons in baud rate dialog according to values in
 the settings structure.
*/

{
 int    itemHit, itemType;
 Rect   itemRect;
 Handle itemHandle;

 switch (Settings->baud)
 {
 case baud300 :
 
 /* turn on 300 baud radio dial */
 
 GetDItem(dlogPtr, FIRST_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, ON);
 
 GetDItem(dlogPtr, SECOND_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);

 GetDItem(dlogPtr, THIRD_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);

 GetDItem(dlogPtr, FOURTH_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);
 
 GetDItem(dlogPtr, FIFTH_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);
 
 GetDItem(dlogPtr, SIXTH_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);
 break;
 
 case baud1200 :
 
 /* turn on 1200 baud radio dial */
 
 GetDItem(dlogPtr, FIRST_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);
 
 GetDItem(dlogPtr, SECOND_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, ON);

 GetDItem(dlogPtr, THIRD_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);

 GetDItem(dlogPtr, FOURTH_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);
 
 GetDItem(dlogPtr, FIFTH_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);
 
 GetDItem(dlogPtr, SIXTH_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);
 break;
 
 case baud4800 :
 
 /* turn on 4800 baud radio dial */
 
 GetDItem(dlogPtr, FIRST_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);
 
 GetDItem(dlogPtr, SECOND_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);

 GetDItem(dlogPtr, THIRD_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, ON);

 GetDItem(dlogPtr, FOURTH_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);
 
 GetDItem(dlogPtr, FIFTH_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);
 
 GetDItem(dlogPtr, SIXTH_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);
 break;
 
 case baud9600 :
 
 /* turn on 9600 baud radio dial */
 
 GetDItem(dlogPtr, FIRST_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);
 
 GetDItem(dlogPtr, SECOND_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);

 GetDItem(dlogPtr, THIRD_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);

 GetDItem(dlogPtr, FOURTH_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, ON);
 
 GetDItem(dlogPtr, FIFTH_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);
 
 GetDItem(dlogPtr, SIXTH_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);
 break;
 
 case baud19200 :
 
 /* turn on 19200 baud radio dial */
 
 GetDItem(dlogPtr, FIRST_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);
 
 GetDItem(dlogPtr, SECOND_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);

 GetDItem(dlogPtr, THIRD_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);

 GetDItem(dlogPtr, FOURTH_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);
 
 GetDItem(dlogPtr, FIFTH_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, ON);
 
 GetDItem(dlogPtr, SIXTH_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);
 break;
 
 case baud57600 :
 
 /* turn on 57600 baud radio dial */
 
 GetDItem(dlogPtr, FIRST_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);
 
 GetDItem(dlogPtr, SECOND_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);

 GetDItem(dlogPtr, THIRD_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);

 GetDItem(dlogPtr, FOURTH_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);
 
 GetDItem(dlogPtr, FIFTH_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);
 
 GetDItem(dlogPtr, SIXTH_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, ON); 
 break;
 
 default :
 break;
 }
}

SetParity(settings, dlogPtr)
 dlogSettingsPtr settings;
 DialogPtrdlogPtr;
 
/*
 Sets Parity defaults in input dialog.
*/

{
 int    itemHit, itemType;
 Rect   itemRect;
 Handle itemHandle;

 switch (settings->parity)
 {
 case evenParity :
 
 /* turn on even parity radio dial */
 
 GetDItem(dlogPtr, FIRST_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, ON);
 
 GetDItem(dlogPtr, SECOND_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);

 GetDItem(dlogPtr, THIRD_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);
 break;
 
 case noParity :
 
 /* turn on no parity radio dial */
 
 GetDItem(dlogPtr, FIRST_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);
 
 GetDItem(dlogPtr, SECOND_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, ON);

 GetDItem(dlogPtr, THIRD_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);
 break;
 
 case oddParity :
 
 /* turn on odd parity radio dial */
 
 GetDItem(dlogPtr, FIRST_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);
 
 GetDItem(dlogPtr, SECOND_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);

 GetDItem(dlogPtr, THIRD_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, ON);
 break;
 
 default :
 break;
 }
}

SetStopBits(settings, dlogPtr)
 dlogSettingsPtr settings;
 DialogPtrdlogPtr;
 
/*
 Sets Stop Bit(s) defaults in input dialog.
*/

{
 int    itemHit, itemType;
 Rect   itemRect;
 Handle itemHandle;

 switch (settings->stopBits)
 {
 case stop10 :
 
 /* turn on 1 stop bit radio dial */
 
 GetDItem(dlogPtr, FIRST_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, ON);
 
 GetDItem(dlogPtr, SECOND_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);
 break;
 
 case stop20 :
 
 /* turn on 2 stop bits radio dial */
 
 GetDItem(dlogPtr, FIRST_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, OFF);
 
 GetDItem(dlogPtr, SECOND_RADIO, &itemType, &itemHandle, &itemRect);
 SetCtlValue(itemHandle, ON);
 break;
 
 default :
 break;
 }
}

Continued in next frame
Volume Number:7
Issue Number:12
Column Tag:C Workshop

Go With the Flow (code)


Listing:  Utils.c

extern  gEOL[];
extern  gSP[];
extern  gTAB[];


C2Pstr(src, dst)
 unsigned char src[], dst[];

/* C 2 Pascal String converts a  C string into a pascal string */

{
 int  i = 0;
 unsigned char j;

 /* put length at start of destination string */

 j = (unsigned char) strlen(src);
 dst[0] = j;

 /* copy chars until delimiter encountered */

 while (src[i] != *gEOL)
 {
 dst[i + 1] = src[i];
 i++;
 }
}

i2a(n, s)
 int    n;
 char s[];
 
/*
 convert n to character string in array s.  Taken from pp.60 k & r.
*/

{
 int i, sign;
 
 if((sign = n) < 0)/* record sign */
 n = -n;/* make n positive */
 i = 0;
 
 /* generate digits in reverse order */
 
 do
 {
 s[i++] = n % 10 + ‘0’;   /* get next digit */
 } while ((n /= 10) > 0); /* delete it */
 
 if (sign < 0)
 s[i++] = ‘-’;
 s[i] = *gEOL;
 reverse(s);
}

reverse(s)
 char s[];
 
/*
 reverse string s in place
*/

{
 int c, i, j;
 
 for (i = 0, j = strlen(s) - 1; i < j; i++, j--)
 {
 c = s[i];
 s[i] = s[j];
 s[j] = c;
 }
}

double a2f(s)
 char s[];
 
/* 
 convert a string s to double.  lifted from k & r pp. 69 
*/

{
 double val, power;
 int    i, sign;
 
 for (i = 0; s[i] == *gSP || s[i] == ‘\n’ || s[i] == *gTAB; i++)
 ; /* blow off white spaces */
 
 sign = 1;
 
 if (s[i] == ‘+’ || s[i] == ‘-’) /* sign */
 sign = (s[i++] == ‘+’) ? 1 : -1;
 for (val = 0; s[i] >= ‘0’ && s[i] <= ‘9’; i++)
 val = 10 * val + s[i] - ‘0’;
 if (s[i] == ‘.’)
 i++;
 for (power = 1; s[i] >= ‘0’ && s[i] <= ‘9’; i++)
 {
 val = 10 * val + s[i] - ‘0’;
 power *= 10;
 }
 return(sign * val / power);
}

P2Cstr(source, dest)

/* This function converts a Pascal string into a C string */

char  source[], dest[];
 
{
 char ch;
 int i, j;
 
 ch = source[0]; /* get string length; from 1st ele of pascal string 
*/
 j = (int) ch; /* convert to integer */
 
 
 for (i = 0; i < j; i++)
 dest[i] = source[i + 1];
 
 while (i < 256)
 {
 dest[i] = ‘\0’; /* tack on delimiter to end of string */
 i++;
 }
 
 return(j); /* ret it length */
 
}

pStrCpy(src, dst)
 char *src,
 *dst;
 
/* pascal string copy function */

{
 int  i,
 length;
 
 length = *src;
 
 for (i = 0; i <= length + 1; i++)
 {
 *dst = *src;
 src++; dst++;
 }
}

ZeroStruct(a, b)
 Ptr  a;/* ptr to structure */
 int  b;/* iteration index */

/*
 Zero Structure does just that with the two parameters passed to it. 
 The
  first, is the ptr to the structure and the second is the loop index.
*/

{
 int i;

 for(i = 0; i < b; i++)
 ((unsigned char *) a) [i] = 0;

}

a2i(s)
 char s[];
 
/*
 convert s to integer.  Taken from K & R pp. #58.
*/

{
 int  i, n, sign;
 
 for (i = 0; s[i] == ‘ ‘ || s[i] == ‘\n’ || s[i] == ‘\t’; i++)
 ; /* skip white spaces */
 
 sign = 1;
 if (s[i] == ‘+’ || s[i] ==’-’)  /* sign */
 sign = (s[i++] == ‘+’) ? 1 : -1;
 for (n = 0; s[i] >= ‘0’ && s[i] <= ‘9’; i++)
 n = 10 * n + s[i] - ‘0’;
 return(sign * n);
}

isItADigit(cPtr)
 char *cPtr;
 
/* 
 checks pascal strings for non-numeric characters and returns true 
 value if no invalid characters are detected.
*/

{
 char ch;
 int    i,
 length = 0;
 
 length = *cPtr; /* extract length of pascal string */
 
 if (length == 0)
 return(FALSE);  /* zero length string */
 
 for (i = 1; i <= length; i++)
 {
 ch = *(cPtr + i);
 if ((ch >= ‘0’) && (ch <= ‘9’))
 ;
 else
 return(FALSE);
 }
 return(TRUE);
}

cmpStruct(strct1, strct2, length)
 unsigned char *strct1,
 *strct2;
 int    length;
 
/*
 compares structures returning a true if they are equal or a false
 if they are not.
*/

{
 int  i;
 
 for (i = 0; i < length; i++)
 {
 if (*strct1 == *strct2)
 {
 strct1++;
 strct2++;
 }
 else
 return(FALSE);  /* not equal */
 }
 return(TRUE);   /* equal */
}

Adigit(c)
 char *c;
 
/*
 returns true | false.  This function works for integers and the
 integer portion of a floating point number.
*/

{
 /* look at first char to see if it is +ive | -ive */
 
 if (*c == ‘-’ || *c ==’+’)
 {
 c++;
 
 /* look at next char to determine if digit */
 
 if (*c >= ‘0’ && *c <= ‘9’)
 return(TRUE);
 else
 return(FALSE);
 }
 
 /* otherwise look only at first char */
 if (*c >= ‘0’ && *c <= ‘9’)
 return(TRUE);
 else
 return(FALSE);
}

f2a(aNumber, aStr, precision)
 float  aNumber;
 char *aStr;
 int    precision;
 
/*
 converts a float number to an ascii string with n digits of precision
 to the right of the decimal point;ie, a precision of zero generates 
an
 long and a precistion of two generates an integer with a mantissa of 
two
 digits.
 
 Note:
 The variable The variable aStr must be cleared before entry to this 
routine or the funct
 returns strange results.
*/

{
 float  sign;
 int  i = 0, l;
 long tmp = 0;
 
 if (precision < 0)/* range check */
 precision = 0;
 
 if ((sign = aNumber) < 0)/* record sign */
 {
 aStr[i++] = ‘-’;
 aNumber = - aNumber;/* make n positive */
 }
 
 /* generate long portion */
 
 do
 { /* generate digits in reverse order */
 aStr[i++] = (long) aNumber % 10 + ‘0’;/* get next digit */
 aNumber /= 10;
 tmp = aNumber;
 } while ((tmp) > 0);/* delete it */
 
 if (sign < 0)   /* reverse long portion */
 reverse(aStr + 1);
 else
 reverse(aStr);
 
 /* create mantissa */
 
 if (precision != 0)
 {
 aStr[i] = ‘.’;
 i++;
 
 /* make mantissa a long with the precision of n decimal places */
 
 aNumber = sign;
 tmp = aNumber;  /* trunc mantissa */
 aNumber -= tmp; /* restore only mantissa */
 
 
 if (aNumber < 0)/* make +ive */
 aNumber = - aNumber;
 
 for (l = 1; l <= precision; l++)
 {
 aNumber *= 10;
 
 aStr[i++] = (long) aNumber % 10 + ‘0’;/* get next digit */
 tmp = aNumber;
 aNumber -= tmp; /* rotate left one place */
 }
 }
 
 aStr[i] = *gEOL;/* tack on delimiter */

}

cmpss(s1, s2)
 char *s1, *s2;
 
/*
 compares for occurance of substring s1 in s2 and returns either a
 zero value of match found, or a minus one value if no match found.
*/

{
 int  i,
 s1Length = 0,
 s2Length = 0;
 
 s1Length = strlen(s1);
 s2Length = strlen(s2);
 
 /* compare for substring inc’ing s2 and only chking for s1 length chars 
*/
 
 for (i = 0; i < s2Length; i++)
 {
 if (strncmp(s1, s2 + i, s1Length) == 0)
 return(0);
 }
 
 return(-1);
}
Listing:  MBOB Functs.c

#include <MacTypes.h>
#include <FontMgr.h>
#include <WindowMgr.h>
#include <MenuMgr.h>
#include <TextEdit.h>
#include <DialogMgr.h>
#include <EventMgr.h>
#include <DeskMgr.h>
#include <StdfilePkg.h>
#include <FileMgr.h>
#include <ToolboxUtil.h>
#include <ControlMgr.h>
#include <SerialDvr.h>

#include “MBOB.h”

/*
 Created by :  Byro
 Date   : 05/14/90
 Modified : 06/21/90
*/


InitSerial(defaultSettings)
 dlogSettingsPtr defaultSettings;
 
/*
 Initialize Serial drivers does just that.  Furthermore, it also loads
 the default values into the settings structure.
*/

{
 int    AinRefNumber = AinRefNum, AoutRefNumber = AoutRefNum, Config, 
Err = noErr;
 Str255 ErrStrng;
 
 
 if ((Err = OpenDriver(“\p.Ain”, &AinRefNumber)) != noErr)
 {
 /* error dialog and exit to shell */
 
 NumToString((long) Err, ErrStrng);/* load err val into dlog */
 ParamText(ErrStrng, NIL, NIL, NIL);
 StopAlert(ERR_ALERT, NIL);
 ExitToShell();
 }
 
 if ((Err = OpenDriver(“\p.Aout”, &AoutRefNumber)) != noErr)
 {
 /* error dialog and exit to shell */
 
 NumToString((long) Err, ErrStrng);/* load err val into dlog */
 ParamText(ErrStrng, NIL, NIL, NIL);
 StopAlert(ERR_ALERT, NIL);
 ExitToShell();
 }

 Config = baud9600 + data8 + stop20 + noParity;
 
 ResetPorts(Config); /* reconfigure modem port */
 
 /* load defaults settings structure */
 
 defaultSettings->baud = baud9600;
 defaultSettings->parity = noParity;
 defaultSettings->stopBits = stop20;
 defaultSettings->filter = (int) NIL;
}

shutdownAppl()

/*
 This function closes application by flushing I/O buffer and closing
 the serial drvrs before exiting to the shell.
*/

{
 int    Err = noErr;
 Str255 ErrStrng;
 
 /* flush drvrs */
 
 if ((Err = KillIO(AinRefNum)) != noErr)     /* modem input/output port 
*/
 {
 NumToString((long) Err, ErrStrng);/* load err val into dlog */
 ParamText(ErrStrng, NIL, NIL, NIL);
 StopAlert(ERR_ALERT, NIL);
 }
 
 if ((Err = KillIO(AoutRefNum)) != noErr)
 {
 NumToString((long) Err, ErrStrng);/* load err val into dlog */
 ParamText(ErrStrng, NIL, NIL, NIL);
 StopAlert(ERR_ALERT, NIL);
 }
 
 RAMSDClose(sPortA);
 
 ExitToShell();
}

doSerial(Awindow, settings, serStatPtr, filterKountPtr)
 WindowPtr*Awindow;
 dlogSettingsPtr settings;
 SerStaRec*serStatPtr;
 int    *filterKountPtr;
 
/*
 Reads serial input parses status record looking for changes since 
 last iteration.  Additionally, it also parses input buffer looking for
 filter character.
*/

{
 BooleaninvalidRect = FALSE;
 char   serBuf[64];/* serial input buffer */
 int    i;
 long   bufKount = NIL; /* I.M. II-178 */
 static SerStaRecoldSerStat;
 
 /* read buffer once */

 SerGetBuf(AinRefNum, &bufKount);  /* get # of bytes currently in input 
buffer */
 if ((bufKount < 0) || (bufKount > 63))
 bufKount = NIL;
 if (FSRead(AinRefNum, &bufKount, serBuf) == noErr)
 {
 if (bufKount != NIL)
 {
 for (i = 0; i < bufKount; i++)
 {
 if (serBuf[i] == settings->filter)
 *filterKountPtr += 1;  /* inc filter count */
 }
 SerStatus(AinRefNum, serStatPtr); /* read status */
 if (cmpStruct(&oldSerStat, serStatPtr, sizeof(oldSerStat)) != TRUE)
 invalidRect = TRUE;
 if ((invalidRect == TRUE) || (*filterKountPtr > 0))
 {
 InvalRect(&(*Awindow)->portRect); /* generate update evnt */
 }
 oldSerStat = *serStatPtr;
 }
 }
}

displayStatus(SerStatPtr, filterCount)
 SerStaRec*SerStatPtr;
 int    filterCount;
 
/*
 display all vitals from port status
*/

{
 Byte SWOverruns, HWOverruns, Parity, Framing;
 int    CursorRow = INITIAL_ROW;   /* current cursor row position */
 
 TextSize(TEXT_FONT_SIZE);
 
 /* mask values */
 
 SWOverruns = swOverrunErr & SerStatPtr->cumErrs;
 HWOverruns = hwOverrunErr & SerStatPtr->cumErrs;
 Parity = parityErr & SerStatPtr->cumErrs;
 Framing = framingErr & SerStatPtr->cumErrs;
 
 /* display status using conditionals coupled with movetos and drawstrings. 
*/
 
 MoveTo(LEFT_MARGIN, CursorRow);
 if (SWOverruns != FALSE)
 DrawString(“\pSoftware Overrun error(s) detected   “);
 else
 DrawString(“\pno Software Overrun errors detected  “);
 MoveTo(LEFT_MARGIN, CursorRow += ROW_HEIGHT);
 MoveTo(LEFT_MARGIN, CursorRow += ROW_HEIGHT);
 
 if (HWOverruns != FALSE)
 DrawString(“\pHardware Overrun error(s) detected   “);
 else
 DrawString(“\pno Hardware Overrun errors detected  “);
 MoveTo(LEFT_MARGIN, CursorRow += ROW_HEIGHT);
 MoveTo(LEFT_MARGIN, CursorRow += ROW_HEIGHT);
 
 if (Parity != FALSE)
 DrawString(“\pParity error(s) detected   “);
 else
 DrawString(“\pno Parity errors detected  “);
 MoveTo(LEFT_MARGIN, CursorRow += ROW_HEIGHT);
 MoveTo(LEFT_MARGIN, CursorRow += ROW_HEIGHT);
 
 if (Framing != FALSE)
 DrawString(“\pFraming error(s) detected   “);
 else
 DrawString(“\pno Framing errors detected  “);
 MoveTo(LEFT_MARGIN, CursorRow += ROW_HEIGHT);
 MoveTo(LEFT_MARGIN, CursorRow += ROW_HEIGHT);
 
 if (SerStatPtr->ctsHold != FALSE)
 DrawString(“\pCTS disabled   “);
 else
 DrawString(“\pCTS enabled    “);
 MoveTo(LEFT_MARGIN, CursorRow += ROW_HEIGHT);
 MoveTo(LEFT_MARGIN, CursorRow += ROW_HEIGHT);
 
 if (SerStatPtr->xOffHold != FALSE)
 DrawString(“\pStream suspended   “);
 else
 DrawString(“\pStream  enabled    “);
 MoveTo(LEFT_MARGIN, CursorRow += ROW_HEIGHT);
 MoveTo(LEFT_MARGIN, CursorRow += ROW_HEIGHT);
 
 if (filterCount > 0)
 DrawString(“\pfilter Character detected   “);
 else
 DrawString(“\p                            “);
 /* don’t display */
}

ChangeSettings(settingPtr)
 dlogSettingsPtr    settingPtr;
 
/*
 changes serial port A settings to values in setting structure.
*/

{
 int  Config, Err = noErr;
 
 Config = settingPtr->baud + data8 + settingPtr->parity + settingPtr->stopBits;
 ResetPorts(Config); /* reconfigure modem port */
}

ResetPorts(config)
 int config;
 
/* resets/reconfigures modem port to value specified by config param 
*/

{
 int  Err = noErr;
 Str255 ErrStrng;
 
 /* reset modem input serial port */
 
 if ((Err = SerReset(AinRefNum, config)) != noErr)
 {
 /* error dialog and exit to shell */
 
 NumToString((long) Err, ErrStrng);/* load err val into dlog */
 ParamText(ErrStrng, NIL, NIL, NIL);
 StopAlert(ERR_ALERT, NIL);
 ExitToShell();  
 }
 
 /* reset modem output serial port */
 
 if ((Err = SerReset(AoutRefNum, config)) != noErr)
 {
 /* error dialog and exit to shell */
 
 NumToString((long) Err, ErrStrng);/* load err val into dlog */
 ParamText(ErrStrng, NIL, NIL, NIL);
 StopAlert(ERR_ALERT, NIL);
 ExitToShell();  
 }
}
Listing:  MBOB.c

#include <QuickDraw.h>
#include <MacTypes.h>
#include <FontMgr.h>
#include <WindowMgr.h>
#include <MenuMgr.h>
#include <TextEdit.h>
#include <DialogMgr.h>
#include <EventMgr.h>
#include <DeskMgr.h>
#include <StdfilePkg.h>
#include <FileMgr.h>
#include <ToolboxUtil.h>
#include <ControlMgr.h>
#include <SerialDvr.h>

#include “MBOB.h”


/* Mac Break Out Box is an application that allows the Mac to act as 
a
 logical breakout box.
 The following are included as part of the project:
 
 mactraps lib
 strings lib
 serd resources
 mbob.c
 mbob functs.c
 dlogs.c
 utils.c
 
 
 Written by :  Byro
 Date : 05/07/90
 Modified : 06/22/90
 
 
 Version Log:
 1.0 initial release
*/

/************* globals  ***************/

char gCR[] = “\r”;
char gTAB[] = “\t”;
char gSP[] = “ “;/* space */
char gEOL[] = “\0”;

main()

{

 BooleandoneFlag = FALSE, WNEImplemented;
 dlogSettings  mySettings;
 EventRecordmyEvent;
 Handle ClipHandle;
 MenuHandle AppleMenu;
 Rect   DragRect;
 WindowPtrStatWindow,
 ClipboardWindow;

 ToolBoxInit();
 WindowInit(&StatWindow, “\pStatus Window”);
 SetUpDragRect(&DragRect);
 MenuBarInit(&AppleMenu);
 CreateClipBoardWindow(&ClipboardWindow);
 ClipHandle = NewHandle(NIL);
 InitSerial(&mySettings);
 MainLoop(&doneFlag, &myEvent, &WNEImplemented, &DragRect, &AppleMenu,
 &StatWindow, &ClipboardWindow, &ClipHandle, &mySettings);

}

/*******************************************************/

ToolBoxInit()  
 
 /* initialization */

{
 InitGraf(&thePort);
 InitFonts();
 FlushEvents( everyEvent, REMOVE_ALL_EVENTS );
 InitWindows();
 InitMenus();
 TEInit();
 InitDialogs(NIL);
 InitCursor();
}

/*******************************************************/

WindowInit(aWindow, windowTitle)
 WindowPtr*aWindow;
 Str255 *windowTitle;
 
{
 /* init window ptr */
 
 *aWindow = GetNewWindow(BASE_RES_ID, NIL, MOVE_TO_FRONT);
 
 /* if can’t open window let user know */
 
 if (*aWindow == NIL)
 {
 /* system dialog goes here */
 
 StopAlert(EMPTY_ALERT, NIL);
 ExitToShell();  /* ciao */
 }
 
 if (**windowTitle != NIL)
 SetWTitle(*aWindow, windowTitle);
 
 SetPort(*aWindow);/* make current graf port */

}

/*******************************************************/

SetUpDragRect(DragRect)
 Rect *DragRect;
 
{
 *DragRect = screenBits.bounds;
 (*DragRect).left += DRAG_THRESHOLD;
 (*DragRect).right -= DRAG_THRESHOLD;
 (*DragRect).bottom -= DRAG_THRESHOLD;
}

/*******************************************************/
MenuBarInit(AppleMenu)
 MenuHandle *AppleMenu;
 
{
 Handle myMenuBar;
 
 myMenuBar = GetNewMBar(BASE_RES_ID);
 SetMenuBar(myMenuBar);
 *AppleMenu = GetMHandle(APPLE_MENU_ID);
 AddResMenu(*AppleMenu, ‘DRVR’);
 DrawMenuBar();
}

/*******************************************************/
CreateClipBoardWindow(ClipBoardWindow)
 WindowPtr*ClipBoardWindow;
 
{

 if (( *ClipBoardWindow = GetNewWindow(BASE_RES_ID, NIL, MOVE_TO_FRONT)) 
 == NIL)
 {
 NoteAlert(CLIPBOARD_ALERT, NIL);
 /* ExitToShell(); */
 }
 
 /* set window title */
 
 SetWTitle(*ClipBoardWindow, “\p ClipBoard”);
 
 MoveWindow(*ClipBoardWindow, WINDOW_HOME_LEFT, WINDOW_HOME_RIGHT, 
 LEAVE_WHERE_IT_IS);
}

/*******************************************************/
MainLoop(doneFlag, myEvent, WNEImplemented, DragRect, AppleMenu, 
 StatWindow, CBWindow, clipHandle, MySettings)
 Boolean*doneFlag;
 EventRecord*myEvent;
 Boolean*WNEImplemented;
 Rect   *DragRect;
 MenuHandle *AppleMenu;
 WindowPtr*StatWindow,
 *CBWindow;
 Handle *clipHandle;
 dlogSettingsPtr MySettings;
 
{
 int    filterKount = 0;
 SerStaRecserStat; /* serial status record */

 /* check to see if multifinder running */
 
 *WNEImplemented = (NGetTrapAddress(WNE_TRAP_NUM, ToolTrap) != 
 NGetTrapAddress(UNIMPL_TRAP_NUM, ToolTrap));
 
 /* main program/Event loop */
 
 do
 {
 /* check serial port for input and process if necessary */
 
 doSerial(StatWindow, MySettings, &serStat, &filterKount);
 
 HandleEvent(doneFlag, myEvent, WNEImplemented, DragRect,
 AppleMenu, StatWindow, CBWindow, clipHandle,
 MySettings, &serStat, &filterKount);
 } 
 while (*doneFlag == FALSE);
 shutdownAppl(); /* ciao */
}

/*******************************************************/
HandleEvent(doneFlag, myEvent, WNEImplemented, DragRect, AppleMenu, 
 StatWindow, CbWindow, clipHandl, meSettings,
 serStatPtr, fKountPtr)
 Boolean*doneFlag;
 EventRecord*myEvent;
 Boolean*WNEImplemented;
 Rect   *DragRect;
 MenuHandle *AppleMenu;
 WindowPtr*StatWindow,
 *CbWindow;
 Handle *clipHandl;
 dlogSettingsPtr meSettings;
 SerStaRec*serStatPtr;
 int    *fKountPtr;
 
{
 char   theChar;
 Rect   myClip, oldClip;
 WindowPtroldPort; /* contains current graph port */
 static Boolean  monitorStream = FALSE;
 
 /* multifinder check */
 
 if (*WNEImplemented)
 WaitNextEvent(everyEvent, myEvent, SLEEP, NIL_MOUSE_REGION);
 else
 {
 SystemTask(); /* time slice for OS */
 GetNextEvent(everyEvent, myEvent);
 }
 
 switch ((*myEvent).what)
 {
 case mouseDown:
 HandleMouseDown(doneFlag, myEvent,WNEImplemented, DragRect, AppleMenu,
 &monitorStream, StatWindow, CbWindow, meSettings);
 break;

 case nullEvent:
 case mouseUp:
 case keyUp:
 case updateEvt:

 /* 
 see if update is for this window or monitor stream menu selected 
 & redraw window if either condition true.
 */
 
 if (((WindowPtr) (*myEvent).message == *StatWindow) || (monitorStream 
== TRUE))
 { 
 
 /* reset filter counter when monitoring starts */
 
 if (monitorStream == TRUE)
 {
 *fKountPtr = 0;
 ZeroStruct(serStatPtr, sizeof(SerStaRec));
 SelectWindow(*StatWindow);
 ShowWindow(*StatWindow);
 }
 
 SysBeep(4);
 BeginUpdate(*StatWindow);
 
 GetPort(&oldPort);/* save current graph port */
 SetPort(*StatWindow);
 EraseRect(&(*StatWindow)->portRect);
 displayStatus(serStatPtr, *fKountPtr);
 SetPort(oldPort); /* restore old graph port */
 EndUpdate(*StatWindow);
 monitorStream = FALSE; /* reset after use */
 }
 
 /* chk if update for clip board window */
 
 if ((WindowPtr) (*myEvent).message == *CbWindow)
 {
 BeginUpdate(*CbWindow);
 GetPort(&oldPort);/* save current graph port */
 SetPort(*CbWindow);
 EraseRect(&(*CbWindow)->portRect);
 
 /* clip scrollbar sections of clipboard */
 
 SetRect(&myClip, (*CbWindow)->portRect.left, (*CbWindow)->portRect.top,
 (*CbWindow)->portRect.right, (*CbWindow)->portRect.bottom);
 oldClip = myClip; /* save old portrect  */
 myClip.bottom -= SCROLL_BAR_PIXELS;
 myClip.right -= SCROLL_BAR_PIXELS;
 ClipRect(&myClip); 
 
 DisplayClipboard(CbWindow, clipHandl);
 ClipRect(&oldClip); /* restore old clip region */
 DrawGrowIcon(*CbWindow);
 ShowWindow(*CbWindow);
 SetPort(oldPort); /* restore old graph port */
 EndUpdate(*CbWindow);
 }
 break;
 case keyDown:
 case autoKey:
 theChar = (*myEvent).message & charCodeMask;
 if (((*myEvent).modifiers & cmdKey) != 0)
 HandleMenuChoice(MenuKey(theChar), doneFlag, AppleMenu, 
 &monitorStream, CbWindow, meSettings);
 break;
 case activateEvt:
 break;
 default:
 break;
 }
}

/*******************************************************/

HandleMouseDown(doneFlag, myEvent, WNEImplemented, DragRect, AppleMenu, 

 monStreamPtr, statWindow, cBwindow, MeSettings)
 Boolean*doneFlag;
 EventRecord*myEvent;
 Boolean*WNEImplemented;
 Rect   *DragRect;
 MenuHandle *AppleMenu;
 Boolean*monStreamPtr;
 WindowPtr*statWindow,
 *cBwindow;
 dlogSettingsPtr MeSettings;
 
{
 BooleanStillInGoAway, updateBackdrop = FALSE;
 WindowPtrwhichWindow;
 short intthePart;
 long int menuChoice;
 MenuHandle disableHandle;
 long   nuSize;
 Rect   limitRect;
 
 WindowPtroldPort;
 
 thePart = FindWindow((*myEvent).where, &whichWindow);
 GetPort(&oldPort);/* save current graph port  */
 switch(thePart)
 {
 case inContent:
 /* activate the window that was pt’d @  */
 
 SetPort(whichWindow);
 SelectWindow(whichWindow);
 break;
 case inMenuBar:
 menuChoice = MenuSelect((*myEvent).where);
 HandleMenuChoice(menuChoice, doneFlag, AppleMenu, 
 monStreamPtr, cBwindow, MeSettings);
 break;
 case inSysWindow:
 SystemClick(myEvent, whichWindow);
 break;
 case inDrag:
 DragWindow(whichWindow, (*myEvent).where, DragRect);
 updateBackdrop = TRUE;
 break;
 case inGoAway:
 /* highlight close box when clicked */
 
 StillInGoAway = TrackGoAway(whichWindow, (*myEvent).where);
 if (StillInGoAway)
 {
 /* re-enable menu selection when window closed */
 
 if (whichWindow == *statWindow)
 {
 disableHandle = GetMHandle(FILE_MENU_ID);
 EnableItem(disableHandle, OPEN_ITEM);
 }
 
 if (whichWindow == *cBwindow)
 {
 disableHandle = GetMHandle(EDIT_MENU_ID);
 EnableItem(disableHandle, CLIPBOARD_ITEM);
 }
 
 updateBackdrop = TRUE;
 
 /* restore old graph port */
 
 SetPort(oldPort);
 HideWindow(whichWindow);
 SendBehind(whichWindow, NIL);
 }
 break;
 case inGrow:
 if (whichWindow == *cBwindow)
 {
 /* determine min, max dimensions, based on screen here */
 
 SetRect(&limitRect, 80, 80, screenBits.bounds.right,
 screenBits.bounds.bottom);
 
 /* get nu dimensions of window */
 
 nuSize = GrowWindow(whichWindow, (*myEvent).where,
 &limitRect);
 
 /* resize window */
 
 SizeWindow(whichWindow, LoWord(nuSize), HiWord(nuSize), TRUE);
 GetPort(&oldPort);/* save current graph port  */
 SetPort(whichWindow);
 InvalRect(&whichWindow->portRect);/* generate update evnt */
 
 /* restore old graph port */
 
 SetPort(oldPort);
 updateBackdrop = TRUE;
 }
 break;
 default:
 break;
 }
 
 /* generate update evnt for back ground window if condition met */
 
 if (updateBackdrop == TRUE)
 InvalRect(&(*statWindow)->portRect);
}

/*******************************************************/
HandleMenuChoice(menuChoice, doneFlag, AppleMenu, monSptr, cbWindow, 
MySetngs)
 long   menuChoice;
 Boolean*doneFlag;
 MenuHandle *AppleMenu;
 Boolean*monSptr;
 WindowPtr*cbWindow;
 dlogSettingsPtr MySetngs;

{
 int theMenu;
 int theItem;
 
 if (menuChoice != FALSE)
 {
 theMenu = HiWord(menuChoice);
 theItem = LoWord(menuChoice);
 switch (theMenu)
 {
 case APPLE_MENU_ID:
 HandleAppleChoice(theItem, AppleMenu);
 break;
 case EDIT_MENU_ID:
 HandleEditChoice(theItem, cbWindow);
 break;
 case FILE_MENU_ID:
 HandleFileChoice(theItem, doneFlag, monSptr);
 break;
 case OPTION_MENU_ID:
 HandleOptionsChoice(theItem, MySetngs);
 break;
 default:
 break;
 }
 HiliteMenu(0);
 }
}

/*******************************************************/

HandleAppleChoice(theItem, AppleMenu)
 int theItem;
 MenuHandle *AppleMenu;

{
 Str255 accName;
 int    accNumber;
 short intitemNumber;
 DialogPtrAboutDialog;
 
 switch (theItem)
 {
 case ABOUT_ITEM:
 NoteAlert(ABOUT_ALERT, NIL);
 break;
 default: 
 GetItem(*AppleMenu, theItem, accName);
 accNumber = OpenDeskAcc(accName);
 break;
 }
}

/*******************************************************/
HandleEditChoice(theItem, theCbWindow)
 int    theItem;
 WindowPtr*theCbWindow;
 
{
 int Err;
 long *myPtr, Ptr = 0;
 MenuHandle editHandle;
 
 myPtr = &Ptr;
 
 /* generate update evnt for clipboard window */
 
 switch (theItem)
 {
 case COPY_ITEM:
 /* defined by application */
 break;
 case PASTE_ITEM:
 /* defined by application */
 break;
 case CLEAR_ITEM:
 /* clear clipboard; refer to I.M. I:385-386, I:461 */
 
 ZeroScrap();
 PutScrap(4, ‘PAT’, myPtr);
 InvalRect(&(*theCbWindow)->portRect);
 break;
 case CLIPBOARD_ITEM:
 /* disable item when selected */
 
 editHandle = GetMHandle(EDIT_MENU_ID);
 DisableItem(editHandle, CLIPBOARD_ITEM);
 
 SelectWindow(*theCbWindow);
 ShowWindow(*theCbWindow);
 break;
 default:
 break;
 }
}

/*******************************************************/

HandleFileChoice(theItem, doneFlag, mSPtr)
 int  theItem;
 Boolean*doneFlag,
 *mSPtr;/* monitor stream ptr */

{
 OSErr  DoLaunch();/* forward declaration */
 Boolean  SubLaunch; /* sublaunch if true and launch if false */
 int    Err = noErr;
 MenuHandle fileHandle;
 
 switch (theItem)
 {
 case OPEN_ITEM:
 /* disable item when selected */
 
 fileHandle = GetMHandle(FILE_MENU_ID);
 DisableItem(fileHandle, OPEN_ITEM);
 
 *mSPtr = TRUE;
 break;
 case TRANSFER_ITEM:
 /* quits current routine after launch */
 
 SubLaunch = FALSE;
 Err = DoLaunch(SubLaunch); 
 break;
 case LAUNCH_ITEM:
 SubLaunch = TRUE; /* doesn’t quit after launch */
 Err = DoLaunch(SubLaunch);
 break;
 case QUIT_ITEM:
 *doneFlag = TRUE;
 break;
 }
 
 /* handle launch failure */
 
 if (Err != noErr)
 NoteAlert(LAUNCH_ALERT, NIL);
}

/*******************************************************/
HandleOptionsChoice(theItem, mySetngs)
 int  theItem;
 dlogSettingsPtr mySetngs;

{
 int    Err = noErr;
 
 /* load default settings here */
 
 switch (theItem)
 {
 case BAUD_ITEM :
 Err = HndlBaudDialog(mySetngs);
 break;
 case PARITY_ITEM :
 Err = HndlParityDialog(mySetngs);
 break;
 case STOP_ITEM :
 Err = HndlStopBitsDialog(mySetngs);
 break;
 case FILTER_ITEM :
 Err = HndlFilterDialog(mySetngs);
 break;
 default :
 break;
 }
 
 /* exit program if memory exhausted */
 
 if (Err == TRUE)
 {
 shutdownAppl();  /* close serial drvr and exit*/
 }

 if (Err != CANCEL_BUTTON)
 {
 /* reset serial drvrs and load nu settings vals */
 
 ChangeSettings(mySetngs);
 }
 
}

/*******************************************************/
DisplayClipboard(BoardWindow, ClipHandle)
 WindowPtr*BoardWindow;
 Handle *ClipHandle;
 
/* displays either text or pict clipboard item */

{
 Rect myRect;
 long length,
 offset;
 
 if ((length = GetScrap(*ClipHandle, ‘TEXT’, &offset)) < 0)
 {
 if ((length = GetScrap(*ClipHandle, ‘PICT’, &offset)) < 0)
 ;/* NoteAlert(CLIPBOARD_ALERT, NIL); */
 else
 {
 /* display pict data */
 
 myRect = (*BoardWindow)->portRect;
 CenterPict(*ClipHandle, &myRect);
 DrawPicture(*ClipHandle, &myRect);
 }
 }
 else
 {
 /* display text data */
 
 HLock(*ClipHandle);
 TextBox(**ClipHandle, length, &(thePort->portRect), teJustLeft);
 HUnlock(*ClipHandle);
 }
}

/*******************************************************/

OSErr LaunchIt(pLnch)
 pLaunchStruct pLnch;

/*
 This function is pascal call back routine.  It lanches nu apps; refer
 to pp. 118 & 119 in the ls c manual for more info.
 note:  result code < 0 means error
*/

{
 asm
 {
 move.l 8(sp),a0 /* pops ptr into a0 */
 _Launch/* calls launch */
 /* OSErr ret’d in d0 */
 }
}

/*******************************************************/

OSErr DoLaunch(subLaunch)
 BooleansubLaunch; /* sublaunch if true & launch if false */
 
{
 LaunchStruct  myLaunch;
 Point  where;   /* where to display dialog */
 SFReplyreply;   /* reply record */
 SFTypeList myFileTypes;  /* we only want appls */
 short intnumFileTypes = 1;
 HFileInfomyPB;
 StringPtrdirNameStr;
 OSErr  err;
 OSErr  LaunchIt();/* forward declare funct */
 
 where.h = 80;
 where.v = 90;
 myFileTypes[0] = ‘APPL’; /* only appls */
 
 /* let the user choose the file to launch */
 
 SFGetFile(where, “”, NIL, numFileTypes, myFileTypes, NIL, &reply);
 
 if (reply.good)
 {
 dirNameStr = (StringPtr) &reply.fName;/* init to file selected */
 
 /* get finder flags */
 
 myPB.ioCompletion = NIL;
 myPB.ioNamePtr = dirNameStr;
 myPB.ioVRefNum = reply.vRefNum;
 myPB.ioFDirIndex = 0;
 myPB.ioDirID = 0;
 err = PBGetCatInfo((CInfoPBPtr) &myPB, FALSE);
 if (err != noErr)
 return(err);  /* how to handle this? */
 
 /* set the current volume to where the target appl is */
 
 err = SetVol(NIL, reply.vRefNum);
 if (err != noErr)
 return(err);  /* ditto */
 
 /* set up the launch params */
 
 myLaunch.pfName = (StringPtr) &reply.fName;       /* ptr to our filename 
*/
 myLaunch.param = 0; /* we don’t want alt screen or sound buffs */
 
 /* set up LC so as to tell launch that htere is non-junk next */
 
 myLaunch.LC[0] = ‘L’;  myLaunch.LC[1] = ‘C’;
 myLaunch.extBlockLen = 6;/* len of param blk past this long word */
 
 /* copy flags; set bit 6 of low byte to 1 for RO access: */
 
 myLaunch.fFlags = myPB.ioFlFndrInfo.fdFlags;      /* from _GetCatInfo 
*/
 
 /* test sublaunch & set launch flags accordingly */
 
 if (subLaunch)
 myLaunch.launchFlags = 0xC0000000;/* set 2 high bit for sublaunch */
 else
 myLaunch.launchFlags = 0x00000000;/* launch & quit */
 /* Debugger(); */
 err = LaunchIt(&myLaunch); /* call _Launch */
 if (err < 0)
 {
 /* launch failed, put up alert to tell user */
 /* LaunchFailed();*/
 return(err);
 }
 else
 return(noErr);
 }
}

/*******************************************************/

CenterPict(thePicture, myRectPtr)
 PicHandlethePicture;
 Rect   *myRectPtr;
 
{
 Rect windRect, 
 pictureRect;
 
 windRect = *myRectPtr;
 pictureRect = (**(thePicture)).picFrame;
 myRectPtr->top = (windRect.bottom - windRect.top - (pictureRect.bottom
 - pictureRect.top)) / 2 + windRect.top;
 myRectPtr->bottom = myRectPtr->top + (pictureRect.bottom - pictureRect.top);
 myRectPtr->left = (windRect.right - windRect.left - (pictureRect.right 

 - pictureRect.left)) / 2 + windRect.left;
 myRectPtr->right = myRectPtr->left + (pictureRect.right - pictureRect.left);
}

Listing:  MBOB.R

resource ‘DLOG’ (400, “Baud”) {
 {40, 40, 240, 280},
 dBoxProc,
 invisible,
 noGoAway,
 0x0,
 408,
 “Baud Rate Dialog”
};

resource ‘DLOG’ (401, “Parity”) {
 {40, 40, 200, 240},
 dBoxProc,
 invisible,
 noGoAway,
 0x0,
 409,
 “New Dialog”
};

resource ‘DLOG’ (402, “Stop”) {
 {60, 80, 180, 280},
 dBoxProc,
 invisible,
 noGoAway,
 0x0,
 410,
 “Stop Bits Dialog”
};

resource ‘DLOG’ (403, “Filter”) {
 {100, 100, 260, 380},
 dBoxProc,
 invisible,
 noGoAway,
 0x0,
 411,
 “Filter Dialog”
};

resource ‘WIND’ (400) {
 {48, 23, 332, 470},
 documentProc,
 invisible,
 goAway,
 0x0,
 “App Window”
};

resource ‘MENU’ (400, “Apple”) {
 400,
 textMenuProc,
 0x7FFFFFFD,
 enabled,
 apple,
 { /* array: 2 elements */
 /* [1] */
 “About MacBreak Out Box”, noIcon, noKey, noMark, plain,
 /* [2] */
 “-”, noIcon, noKey, noMark, 16
 }
};

resource ‘MENU’ (401, “File”) {
 401,
 textMenuProc,
 0x7FFFFFED,
 enabled,
 “File”,
 { /* array: 6 elements */
 /* [1] */
 “Monitor Stream”, noIcon, “O”, noMark, plain,
 /* [2] */
 “-”, noIcon, noKey, noMark, plain,
 /* [3] */
 “Transfer...”, noIcon, “T”, noMark, plain,
 /* [4] */
 “Launch...”, noIcon, “L”, noMark, plain,
 /* [5] */
 “-”, noIcon, noKey, noMark, plain,
 /* [6] */
 “Quit”, noIcon, “Q”, noMark, plain
 }
};

resource ‘MENU’ (402, “Edit”) {
 402,
 textMenuProc,
 0x60,
 enabled,
 “Edit”,
 { /* array: 7 elements */
 /* [1] */
 “Undo”, noIcon, “Z”, noMark, plain,
 /* [2] */
 “-”, noIcon, noKey, noMark, plain,
 /* [3] */
 “Cut”, noIcon, “X”, noMark, plain,
 /* [4] */
 “Copy”, noIcon, “C”, noMark, plain,
 /* [5] */
 “Paste”, noIcon, “V”, noMark, plain,
 /* [6] */
 “Clear”, noIcon, noKey, noMark, plain,
 /* [7] */
 “Show Clip Board”, noIcon, noKey, noMark, plain
 }
};

resource ‘MENU’ (403, “Options”) {
 403,
 textMenuProc,
 0xF,
 enabled,
 “Options”,
 { /* array: 4 elements */
 /* [1] */
 “Baud”, noIcon, noKey, noMark, plain,
 /* [2] */
 “Parity”, noIcon, noKey, noMark, plain,
 /* [3] */
 “Stop Bits”, noIcon, noKey, noMark, plain,
 /* [4] */
 “Filter”, noIcon, noKey, noMark, plain
 }
};

resource ‘MBAR’ (400) {
 { /* array MenuArray: 4 elements */
 /* [1] */
 400,
 /* [2] */
 401,
 /* [3] */
 402,
 /* [4] */
 403
 }
};

resource ‘DITL’ (400, “About”) {
 { /* array DITLarray: 2 elements */
 /* [1] */
 {140, 138, 160, 198},
 Button {
 enabled,
 “OK”
 },
 /* [2] */
 {81, 33, 133, 314},
 StaticText {
 enabled,
 “This is the MacBreak out Box application”
 }
 }
};

resource ‘DITL’ (401, “Launch”) {
 { /* array DITLarray: 2 elements */
 /* [1] */
 {171, 84, 191, 144},
 Button {
 enabled,
 “OK”
 },
 /* [2] */
 {60, 24, 168, 216},
 StaticText {
 enabled,
 “Unable to launch application\n      Check”
 “ the following:\n\n          1. Path name\n”
 “          2. File name\n          3. Avai”
 “lable memory”
 }
 }
};

resource ‘DITL’ (402, “Free”) {
 { /* array DITLarray: 2 elements */
 /* [1] */
 {106, 65, 126, 125},
 Button {
 enabled,
 “OK”
 },
 /* [2] */
 {68, 1, 95, 254},
 StaticText {
 enabled,
 “  Unable to release memory”
 }
 }
};

resource ‘DITL’ (404, “Err”) {
 { /* array DITLarray: 2 elements */
 /* [1] */
 {108, 85, 128, 145},
 Button {
 enabled,
 “OK”
 },
 /* [2] */
 {55, 0, 95, 259},
 StaticText {
 enabled,
 “An unexpected value of ^0 was returned f”
 “rom the program”
 }
 }
};

resource ‘DITL’ (405, “Hosed”) {
 { /* array DITLarray: 2 elements */
 /* [1] */
 {121, 94, 141, 154},
 Button {
 enabled,
 “Thpt!”
 },
 /* [2] */
 {58, 8, 119, 234},
 StaticText {
 enabled,
 “Logic fault, this file is returning a ne”
 “gitive file length!”
 }
 }
};

resource ‘DITL’ (407, “Empty”) {
 { /* array DITLarray: 2 elements */
 /* [1] */
 {116, 97, 136, 157},
 Button {
 enabled,
 “OK”
 },
 /* [2] */
 {57, 0, 110, 267},
 StaticText {
 enabled,
 “Not enough memory to allocate storage fo”
 “r application window\n        Check avail”
 “able free memory”
 }
 }
};

resource ‘DITL’ (403, “Enough”) {
 { /* array DITLarray: 2 elements */
 /* [1] */
 {116, 97, 136, 157},
 Button {
 enabled,
 “OK”
 },
 /* [2] */
 {63, 1, 103, 271},
 StaticText {
 enabled,
 “Not enough memory to allocate storage\n  “
 “      Check available free memory”
 }
 }
};

resource ‘DITL’ (406, “ClipBoard”) {
 { /* array DITLarray: 2 elements */
 /* [1] */
 {116, 97, 136, 157},
 Button {
 enabled,
 “OK”
 },
 /* [2] */
 {57, 0, 110, 267},
 StaticText {
 enabled,
 “Not enough memory to allocate storage fo”
 “r clipboard window\n        Check availab”
 “le free memory”
 }
 }
};

resource ‘DITL’ (408, “Baud”) {
 { /* array DITLarray: 9 elements */
 /* [1] */
 {153, 27, 173, 87},
 Button {
 enabled,
 “OK”
 },
 /* [2] */
 {152, 148, 172, 208},
 Button {
 enabled,
 “Cancel”
 },
 /* [3] */
 {45, 40, 65, 100},
 RadioButton {
 enabled,
 “300”
 },
 /* [4] */
 {78, 40, 98, 100},
 RadioButton {
 enabled,
 “1200”
 },
 /* [5] */
 {108, 40, 128, 100},
 RadioButton {
 enabled,
 “4800”
 },
 /* [6] */
 {47, 149, 67, 209},
 RadioButton {
 enabled,
 “9600”
 },
 /* [7] */
 {77, 149, 97, 209},
 RadioButton {
 enabled,
 “19200”
 },
 /* [8] */
 {107, 149, 127, 209},
 RadioButton {
 enabled,
 “57600”
 },
 /* [9] */
 {8, 53, 31, 192},
 StaticText {
 disabled,
 “Baud Rate Selection”
 }
 }
};

resource ‘DITL’ (409, “Parity”) {
 { /* array DITLarray: 6 elements */
 /* [1] */
 {126, 23, 146, 83},
 Button {
 enabled,
 “OK”
 },
 /* [2] */
 {127, 113, 147, 173},
 Button {
 enabled,
 “Cancel”
 },
 /* [3] */
 {42, 66, 62, 126},
 RadioButton {
 enabled,
 “Even”
 },
 /* [4] */
 {66, 66, 86, 126},
 RadioButton {
 enabled,
 “None”
 },
 /* [5] */
 {93, 66, 113, 126},
 RadioButton {
 enabled,
 “Odd”
 },
 /* [6] */
 {10, 43, 30, 163},
 StaticText {
 disabled,
 “Parity Selection”
 }
 }
};

resource ‘DITL’ (410, “Stop”) {
 { /* array DITLarray: 5 elements */
 /* [1] */
 {36, 124, 56, 184},
 Button {
 enabled,
 “Ok”
 },
 /* [2] */
 {82, 124, 102, 184},
 Button {
 enabled,
 “Cancel”
 },
 /* [3] */
 {36, 8, 56, 104},
 RadioButton {
 enabled,
 “1 Stop Bit”
 },
 /* [4] */
 {83, 9, 103, 102},
 RadioButton {
 enabled,
 “2 Stop Bits”
 },
 /* [5] */
 {6, 27, 28, 167},
 StaticText {
 disabled,
 “Stop Bits Selection”
 }
 }
};

resource ‘DITL’ (411, “Filter”) {
 { /* array DITLarray: 4 elements */
 /* [1] */
 {118, 47, 138, 107},
 Button {
 enabled,
 “Ok”
 },
 /* [2] */
 {118, 179, 138, 239},
 Button {
 enabled,
 “Cancel”
 },
 /* [3] */
 {18, 4, 59, 276},
 StaticText {
 disabled,
 “                    Character Filter\nEnt”
 “er an 8 bit decimal number for filter”
 },
 /* [4] */
 {80, 113, 100, 173},
 EditText {
 enabled,
 “”
 }
 }
};

resource ‘ALRT’ (400, “About”) {
 {40, 40, 240, 380},
 400,
 { /* array: 4 elements */
 /* [1] */
 OK, visible, silent,
 /* [2] */
 OK, visible, silent,
 /* [3] */
 OK, visible, silent,
 /* [4] */
 OK, visible, silent
 }
};

resource ‘ALRT’ (401, “Launch”) {
 {40, 140, 240, 380},
 401,
 { /* array: 4 elements */
 /* [1] */
 OK, visible, silent,
 /* [2] */
 OK, visible, silent,
 /* [3] */
 OK, visible, silent,
 /* [4] */
 OK, visible, silent
 }
};

resource ‘ALRT’ (402, “Free”) {
 {80, 80, 240, 280},
 402,
 { /* array: 4 elements */
 /* [1] */
 OK, visible, silent,
 /* [2] */
 OK, visible, silent,
 /* [3] */
 OK, visible, silent,
 /* [4] */
 OK, visible, silent
 }
};

resource ‘ALRT’ (403, “Enough”) {
 {80, 80, 220, 340},
 403,
 { /* array: 4 elements */
 /* [1] */
 OK, visible, silent,
 /* [2] */
 OK, visible, silent,
 /* [3] */
 OK, visible, silent,
 /* [4] */
 OK, visible, silent
 }
};

resource ‘ALRT’ (404, “Err”) {
 {76, 128, 206, 368},
 404,
 { /* array: 4 elements */
 /* [1] */
 OK, visible, silent,
 /* [2] */
 OK, visible, silent,
 /* [3] */
 OK, visible, silent,
 /* [4] */
 OK, visible, silent
 }
};

resource ‘ALRT’ (405, “Hosed”) {
 {58, 118, 208, 358},
 405,
 { /* array: 4 elements */
 /* [1] */
 OK, visible, silent,
 /* [2] */
 OK, visible, silent,
 /* [3] */
 OK, visible, silent,
 /* [4] */
 OK, visible, silent
 }
};

resource ‘ALRT’ (407, “Empty”) {
 {40, 40, 240, 310},
 407,
 { /* array: 4 elements */
 /* [1] */
 OK, visible, silent,
 /* [2] */
 OK, visible, silent,
 /* [3] */
 OK, visible, silent,
 /* [4] */
 OK, visible, silent
 }
};

resource ‘ALRT’ (406, “ClipBoard”) {
 {40, 40, 240, 310},
 406,
 { /* array: 4 elements */
 /* [1] */
 OK, visible, silent,
 /* [2] */
 OK, visible, silent,
 /* [3] */
 OK, visible, silent,
 /* [4] */
 OK, visible, silent
 }
};
 

Community Search:
MacTech Search:

Software Updates via MacUpdate

BBEdit 11.1.1 - Powerful text and HTML e...
BBEdit is the leading professional HTML and text editor for the Mac. Specifically crafted in response to the needs of Web authors and software developers, this award-winning product provides a... Read more
CrossOver 14.1.3 - Run Windows apps on y...
CrossOver can get your Windows productivity applications and PC games up and running on your Mac quickly and easily. CrossOver runs the Windows software that you need on Mac at home, in the office,... Read more
Little Snitch 3.5.3 - Alerts you about o...
Little Snitch gives you control over your private outgoing data. Track background activity As soon as your computer connects to the Internet, applications often have permission to send any... Read more
OmniGraffle Pro 6.2.3 - Create diagrams,...
OmniGraffle Pro helps you draw beautiful diagrams, family trees, flow charts, org charts, layouts, and (mathematically speaking) any other directed or non-directed graphs. We've had people use... Read more
OmniFocus 2.2 - GTD task manager with iO...
OmniFocus helps you manage your tasks the way that you want, freeing you to focus your attention on the things that matter to you most. Capturing tasks and ideas is always a keyboard shortcut away in... Read more
Cocktail 8.4 - General maintenance and o...
Cocktail is a general purpose utility for OS X that lets you clean, repair and optimize your Mac. It is a powerful digital toolset that helps hundreds of thousands of Mac users around the world get... Read more
PDFKey Pro 4.3 - Edit and print password...
PDFKey Pro can unlock PDF documents protected for printing and copying when you've forgotten your password. It can now also protect your PDF files with a password to prevent unauthorized access and/... Read more
Kodi 15.0.beta1 - Powerful media center...
Kodi (was XBMC) is an award-winning free and open-source (GPL) software media player and entertainment hub that can be installed on Linux, OS X, Windows, iOS, and Android, featuring a 10-foot user... Read more
DiskCatalogMaker 6.4.12 - Catalog your d...
DiskCatalogMaker is a simple disk management tool which catalogs disks. Simple, light-weight, and fast. Finder-like intuitive look and feel. Super-fast search algorithm. Can compress catalog data... Read more
Macs Fan Control 1.3.0.0 - Monitor and c...
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

Moleskine Timepage – Calendar for iCloud...
Moleskine Timepage – Calendar for iCloud, Google & Exchange 1.0 Device: iOS iPhone Category: Productivity Price: $4.99, Version: 1.0 (iTunes) Description: The most elegant calendar for your pocket and wrist, Timepage is a... | Read more »
QuizUp Gets Social in its New Update
Plain Vanilla Corp has released a new and improved version of their popular trivia game, QuizUp. The app now emphasizes social play so you can challenge friends from all over the world. [Read more] | Read more »
The Deep (Games)
The Deep 1.0 Device: iOS Universal Category: Games Price: $1.99, Version: 1.0 (iTunes) Description: Swipe Controls Delve into the deep in this retro rogue-like! Swipe to move your diver around and keep away from the enemies as you... | Read more »
Battle of Gods: Ascension (Games)
Battle of Gods: Ascension 1.0 Device: iOS Universal Category: Games Price: $2.99, Version: 1.0 (iTunes) Description: TURN-BASED TACTICAL COMBATFight tactical battles against the forces of Hades! In Battle of Gods: Ascension you play... | Read more »
Shadowmatic's Latest Update Adds a...
Shadowmatic's shadowy shadow-ness is getting a little shadowy-er thanks to a recent update that adds an Arcade Mode. [Read more] | Read more »
Sunrise Calendar and Slack Have Assimila...
Wunderlist is perhaps one of the most populat and beloved productivity apps on the App Store - and now it's gone and incorporated itself into other useful services like Sunrise Calendar and Slack. [Read more] | Read more »
Crossy Road Devs Hipster Whale are Bring...
Hipster Whale, the minds behind the rather popular (and rather great) Crossy Road, have teamed-up with Bandai Namco to create PAC-MAN 256: an absolutely bonkers looking maze runner chaser thing. | Read more »
Meet the New Spotify Music
Spotify Music  has a lot going on. They're introducing 3 new modes to serve all your musical needs, with the "Now" start page  gives you curated playlists based on your particular tastes. As you listen the app will learn more about your tastes and... | Read more »
What the Apple Watch Gets Right, and Wha...
| Read more »
Celebrate PAC-MAN's 35th Birthday W...
BANDAI NAMCO Entertainment America is celebrating PAC-MAN's 35th anniversary by releasing updates for PAC-MAN and PAC-MAN Lite for iOS. [Read more] | Read more »

Price Scanner via MacPrices.net

What Would the ideal Apple Productivity Platf...
For the past four years I’ve kept a foot in both the Mac and iPad camps respectively. my daily computing hours divided about 50/50 between the two devices with remarkable consistency. However, there’... Read more
PageMeUp 1.2.1 Ten Dollar Page Layout Applica...
Paris, France-based Softobe, an OS X software development company, has announced that their PageMeUp v. 1.2.1, is available on the Mac App Store for $9.99. The license can be installed on up to 5... Read more
Eight New Products For USB Type-C Application...
Fresco Logic, specialists in advanced connectivity technologies and ICs, has introduced two new product families targeting the Type-C connector recently introduced across a number of consumer... Read more
Scripps National Spelling Bee Launches Buzzwo...
Scripps National Spelling Bee fans can monitor the action at the 2015 Spelling Bee with the new Buzzworthy app for iOS, Android and Windows mobile devices. The free Buzzworthy app provides friendly... Read more
13-inch 2.5GHz MacBook Pro on sale for $120 o...
B&H Photo has the 13″ 2.5GHz MacBook Pro on sale for $979 including free shipping plus NY sales tax only. Their price is $120 off MSRP, and it’s the lowest price for this model (except for Apple’... Read more
27-inch 3.3GHz 5K iMac on sale for $1899, $10...
B&H Photo has the new 27″ 3.3GHz 5K iMac on sale for $1899.99 including free shipping plus NY tax only. Their price is $100 off MSRP. Read more
Save up to $50 on iPad Air 2, NY tax only, fr...
B&H Photo has iPad Air 2s on sale for up to $50 off MSRP including free shipping plus NY sales tax only: - 16GB iPad Air 2 WiFi: $469 $30 off - 64GB iPad Air 2 WiFi: $549.99 $50 off - 128GB iPad... Read more
Updated Mac Price Trackers
We’ve updated our Mac Price Trackers with the latest information on prices, bundles, and availability on systems from Apple’s authorized internet/catalog resellers: - 15″ MacBook Pros - 13″ MacBook... Read more
New 13-inch 2.9GHz Retina MacBook Pro on sale...
B&H Photo has the 13″ 2.9GHz/512GB Retina MacBook Pro on sale for $1699.99 including free shipping plus NY tax only. Their price is $100 off MSRP, and it’s the lowest price for this model from... Read more
Apple refurbished 2014 MacBook Airs available...
The Apple Store has Apple Certified Refurbished 2014 MacBook Airs available starting at $679. An Apple one-year warranty is included with each MacBook, and shipping is free: - 11″ 1.4GHz/128GB... Read more

Jobs Board

*Apple* Solutions Consultant - Retail Sales...
**Job Summary** As an Apple Solutions Consultant (ASC) you are the link between our customers and our products. Your role is to drive the Apple business in a retail Read more
*Apple* Watch SW Application Project Manager...
**Job Summary** The Apple Watch software team is looking for an Application Engineering Project Manager to work on new projects for Apple . The successful candidate Read more
Engineering Manager for *Apple* Maps on the...
…the Maps App Team get to take part in just about any new feature in Apple Maps, often contributing a majority of the feature work. In our day-to-day engineering work, we Read more
Senior Software Engineer - *Apple* SIM - Ap...
Changing the world is all in a day039s work at Apple . If you love innovation, here039s your chance to make a career of it. You039ll work hard. But the job comes with Read more
Lead *Apple* Solutions Consultant - Retail...
**Job Summary** Job Summary The Lead ASC is an Apple employee who serves as the Apple business manager and influencer in a hyper-business critical Reseller's store Read more
All contents are Copyright 1984-2011 by Xplain Corporation. All rights reserved. Theme designed by Icreon.