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

    Program:    < ADSP Chat >

    File:       < ADSP Char.h >

    Written by  Pete Helm, Scott Kuechle

    of <Apple Macintosh Developer Technical Support>

    modified by Scott Kuechle

    10/92 SRK Converted from Pascal to C

    8/94 SRK Modified to use a queue of parameter

             blocks.

    Copyright © 1992, 1994 Apple Computer, Inc.

    All rights reserved.

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

#include    <types.h>

#include    <quickdraw.h>

#include    <toolutils.h>

#include    <fonts.h>

#include    <events.h>

#include    <windows.h>

#include    <dialogs.h>

#include    <menus.h>

#include    <desk.h>

#include    <textedit.h>

#include    <scrap.h>

#include    <segload.h>

#include    <osevents.h>

#include    <files.h>

#include    <devices.h>

#include    <memory.h>

#include    <appletalk.h>

#include    <lists.h>

#include    <SysEqu.h>

#include    <Script.h>

#include    <CursorCtl.h>

#include    <Resources.h>

#include    <ADSP.h>

#include    <Packages.h>

#include    <String.h>

#include    <Strings.h>

#include    <Traps.h>

#include    <GestaltEqu.h>

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

/*

/* D A T A  S T R U C T U R E S

/*

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

typedef struct myDSPParamBlock

{

    long            myA5;           /* save our A5 here */

    ProcPtr         ourCompletion;

    DSPParamBlock   u;

}myDSPParamBlock;

typedef myDSPParamBlock myDSPParamBlock;

typedef myDSPParamBlock *myDSPParamBlockPtr;

typedef short SICN[16];

typedef SICN *SICNList;

typedef SICNList *SICNHand;

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

/*

/* C O N S T A N T S

/*

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

/* 1.01 - kMinHeap - This is the minimum result from the following

     equation:

            ORD(GetApplLimit) - ORD(ApplicZone)

     for the application to run. It will insure that enough memory will

     be around for reasonable-sized scraps, FKEYs, etc. to exist with the

     application, and still give the application some 'breathing room'.

     To derive this number, we ran under a MultiFinder partition that was

     our requested minimum size, as given in the 'SIZE' resource. */

#define     kMinHeap                (29 * 1024)

#define     kMinSpace               (20 * 1024)

#define     _WaitNextEvent          0xA860

#define     _Unimplemented          0xA89F

/* For System 7.0 */

#define     _Gestalt                0xA1AD

#define     appleID                 128             /* This is a resource ID */

#define     fileID                  129             /* ditto */

#define     editID                  130             /* ditto */

#define     extremeNeg              -32768

#define     extremePos              32767 - 1           /* required for old region bug */

    /*constants for positioning the default item within its box*/

#define     osEvent                 app4Evt     /* event used by MultiFinder */

#define     resumeMask              1           /* bit of message field for resume vs. suspend */

#define     sysEnvironsVersion      1

#define     kZonesSize              578         /* size of buffer for zone names */

#define     kGetZoneList            8           /* the Zone Information Protocol socket */

#define     kZIPSocket              6           /* the Zone Information Protocol socket */

#define     kMoreZones              0xFF000000  /* mask to see if more zones to come */

#define     kZoneCount              0x0000FFFF  /* mask to count zones in buffer */

#define     kHilite                 1           /* hilite value for button control */

#define     kDeHilite               0           /* dehilite value for button control */

#define     theBridgeSocket         0x6

/* 

 *  constants for window activation 

 */

#define     kActivateWindow         1

#define     kDeactivateWindow       0

/* 

 *  A few char codesÉ

 */

#define     kEnterKey               (char)3         /* enter key */

#define     kReturnKey              (char)13        /* return key */

/* size of our adsp send/receive queues */

#define     Qsize                   300

#define     kATPTimeOutVal          3           /* re-try ATP SendRequest every 3 seconds */

#define     kATPRetryCount          5           /* for five times */

#define     maxZones                250             /* max. zones we can save in our buffer */

#define     ZoneBufSize             maxZones * 33   /* size of our ugly, mondo zone buffer */

#define     BigLookupBuffer         10000           /* another big, ugly buffer - for nbp lookups */

#define     maxNames                250             /* max. names we can save in our buffer */

#define     NameBufSize             maxNames * 33   /* size of our ugly, mondo names buffer */

#define     kLookupBufSize          100

#define     rMenuBar                128             /*application's menu bar*/

#define     ZoneMenuID              220             /* zone popup menu */

#define     TypeMenuID              221             /* object type popup menu */

#define     ObjectMenuID            222             /* object popup menu */

#define     rAboutDialog            128             /*about alert*/

#define     rDialog                 129             /*application's window*/

#define     rErrorDialog            130             /*error alert window*/

    /* The following constants are used to identify menus and their items. The menu IDs*/

    /* have an "m" prefix and the item numbers within each menu have an "i" prefix.*/

#define     mApple                  128                 /*Apple menu*/

#define     iAbout                  1

#define     mFile                   129                 /*File menu*/

#define     iClose                  1

#define     iQuit                   2

#define     mEdit                   130                 /*Edit menu*/

#define     iUndo                   1

#define     iCut                    3

#define     iCopy                   4

#define     iPaste                  5

#define     iClear                  6

#define     kStandardTriSICN        -3990

/* dialog items */

#define     kobjectItemID               1       /* popup menu */

#define     ktypeItemID                 2       /* popup menu */

#define     kzoneItemID                 3       /* popup menu */

#define     kRemoteMacsTimeBorderID     4

#define     kRemoteMacsTimeID           5

#define     kConnectButtonID            6       /* connect button */

#define     kQuitButtonID               7

#define     kIncomingMessageBorderID    8

#define     kIncomingTextID             9

#define     kOutgoingMessageBorderID    10

#define     kOutgoingTextID             11

#define     kConnectedToString          12

#define     kMoofFilterCheckBox         13

#define     kPopupBorderID              14

#define     kHintText                   15

#define     kRemoteMacsNameID           16

#define     kConnectStatusBorder        20

#define     kConnectionStatusString     21

/*  our attention codes */

#define     kDisplayTime                5

#define     kDisplayTheirName           6

#define     maxQElements                30

/* our error message codes  */

#define     atalkErr                    1

#define     memErr                      2

#define     menuErr                     3

#define     nbpErr                      4

#define     noTargetErr                 5

#define     noConnErr                   7

#define     writeNotDoneErr             8

#define     badROMsErr                  9

#define     heapErr                     10

#define     noMemErr                    11

#define     DrvrErr                     12

#define     ListenErr                   13

#define     dspInitErr                  14

#define     dspOpenErr                  15

#define     dspRemoveErr                16

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

/*

/* R O U T I N E S

/*

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

Boolean doADSPinit(unsigned char *localSocket,

                    short *ccbRefNum,

                    TPCCB ccbPtr);

Boolean setUpADSPbuffers();

void    initializeADSP();

void    FlashReadEnd();

void    FlashReadStart();

void    changeConnectButtonState();

void    DisplayTime();

pascal  void saveThatA5();

pascal  void GetMyTRCCBA5();

pascal  void restoreThatA5();

void    DisplayTheirName();

void    DisplayIncomingText(DSPPBPtr dspPBPtr);

void    removeADSPBuffers();

void    removeConnectionEnd(short ccbRefNum);

Boolean WaitForConnectionRequest();

void    CloseConnection();

pascal  void sendAttnMsgCompRoutine(DSPPBPtr dspPBPtr);

void    sendAttnMsg(DSPPBPtr dspPBPtr,

                 short buffSize,

                 Ptr attnData,

                 short msg,

                 short ccbRefNum);

pascal  void adspOpenRqstCompletionRtn(DSPPBPtr dspPBPtr);

void    sendAnOpenConnReq (DSPPBPtr dspPBPtr,

                        AddrBlock theirAddress,

                        short ccbRefNum);

void    connectToPeer();

pascal  void readIncomingComp(DSPPBPtr dspPBPtr);

void    readIncoming(DSPPBPtr dspPBPtr,

                    short ccbRefNum);

pascal  void writeComp(DSPPBPtr dspPBPtr);

void    writeOutgoing(DSPPBPtr dspPBPtr,

                    short ccbRefNum,

                    Ptr dataPtr,

                    short reqCount);

void    sendTime();

void    sendMyName();

void    signalConnect();

void    checkAttnMsgs();

void    DoConnectionEvents();

void    ADSPLoop();

void    DoPassiveOpen(DSPPBPtr dspPBPtr,

                    short ccbRefNum);

pascal  void OpenPassiveCompletionRtn(DSPPBPtr dspPBPtr);

void    CloseTheConnection(short ccbRefNum);

OSErr   InitQueues();

DSPPBPtr GetQElement(QHdrPtr qHdrPtr);

void    CheckCompletedReads();

void    CheckDoneQueue();

void    ShowADSPError(DSPPBPtr dspPBPtr);

void    SetUpADSPError(OSErr err, StringPtr displayStr);

void    SetOurCompletionRoutine(ProcPtr procPtr,

                            DSPPBPtr dspPBPtr);

void    Terminate();

void    DialogEditing (short menuItem);

void    DoActivate (WindowPtr window, Boolean becomingActive);

void    CheckEnvirons();

void    drawPopUpTri (WindowPtr whichWindow, Rect r);

void    CopyPstr(Ptr pSource, Ptr pDest);

void    PStrCat(Ptr sourceStr, Ptr destinationStr);

void    DisplayCurrentStatus(Ptr displayStr);

void    ShowError(short index);

void    FatalError(error);

Boolean IsAppWindow(window);

Boolean IsDAWindow(WindowPtr window);

void    DoCloseWindow (WindowPtr window);

void    HiliteConnectButton (short mode);

void    outlinePopUpMenus (WindowPtr whichWindow, Rect r, Str255 itemString);

pascal  void UpdateUserItems (WindowPtr whichWindow, short theItem);

void    DoModeless (DialogPtr whichDialog, short whichItem);

void    setEachUserItem (short item);

void    DoMenuCommand (long menuResult);

void    AdjustMenus();

void    DisposeQueueMemory(QHdrPtr qHdrPtr);

void    Exit(short message);

void    DoIdleProc();

void    AdjustCursor (Point mouse, RgnHandle region);

void    UpdateItemBorder (short item, Rect r);

void    PlotSICN (Rect theRect,SICNHand theSICN, short theIndex);

void    DoEvent (EventRecord event);

void    EventLoop();

Boolean TrapAvailable(tNumber,tType);

void    SetupUserItems();

void    Initialize();

void    zeroOutStrings();