workbench/demos/consoledemo.c

   1 /*
   2     Copyright © 1995-97, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc: Demo for the console.device
   6     Lang: english
   7 */
   8 #include <proto/exec.h>
   9 #include <proto/intuition.h>
  10 #include <proto/dos.h>
  11 #include <dos/dosextens.h>
  12 #include <exec/io.h>
  13 #include <intuition/intuition.h>
  14 #include <devices/conunit.h>
  15
  16
  17 #define SDEBUG 1
  18 #define DEBUG 1
  19 #include <aros/debug.h>
  20
  21 struct IntuitionBase *IntuitionBase;
  22
  23 struct MsgPort   *con_mp;
  24 struct IORequest *con_io;
  25
  26 struct Window    *window;
  27
  28 #define ioStd(x) ((struct IOStdReq *)x)
  29
  30 #define TESTSTR "Test"
  31
  32 BOOL Init();
  33 VOID Cleanup();
  34 VOID HandleEvents(struct Window *);
  35
  36 /*************
  37 **  main()  **
  38 *************/
  39 int main(int argc, char **argv)
  40 {
  41     BPTR fh;
  42     SDInit();
  43
  44     D(bug("Opening CON:\n"));
  45
  46     fh = Open("CON:", MODE_NEWFILE);
  47     if (fh)
  48     {
  49         LONG ret;
  50         ULONG i;
  51
  52         D(bug("Console file opened\n"));
  53         for (i = 0; i < 100; i ++)
  54         {
  55             ret = FPuts(fh, "Test\n");
  56             D(bug("Got ret %ld\n", ret));
  57             Flush(fh);
  58         }
  59
  60         Close(fh);
  61
  62     }
  63     return 0;
  64
  65
  66     if (Init())
  67     {
  68         ioStd(con_io)->io_Command = CMD_WRITE;
  69         ioStd(con_io)->io_Data    = TESTSTR;
  70         ioStd(con_io)->io_Length  = -1L;
  71
  72         D(bug("Doing IO on console req %p\n", con_io));
  73         DoIO(con_io);
  74
  75         D(bug("IO on console req done\n"));
  76
  77         HandleEvents(window);
  78
  79         Cleanup();
  80     }
  81     return (0);
  82 }
  83
  84 /*************
  85 **  Init()  **
  86 *************/
  87 BOOL Init()
  88 {
  89     IntuitionBase = (struct IntuitionBase *)OpenLibrary("intuition.library", 37);
  90     if (IntuitionBase)
  91     {
  92         con_mp = CreateMsgPort();
  93         if (con_mp)
  94         {
  95             con_io = CreateIORequest(con_mp, sizeof (struct IOStdReq));
  96             if (con_io)
  97             {
  98
  99                 window = OpenWindowTags(NULL,
 100                         WA_Width,               400,
 101                         WA_Height,              300,
 102                         WA_SmartRefresh,        TRUE,
 103                         WA_DragBar,             TRUE,
 104                         WA_Title,               (IPTR)"Console demo",
 105                         WA_IDCMP,               IDCMP_REFRESHWINDOW|IDCMP_RAWKEY,
 106                         TAG_DONE);
 107
 108                 if (window)
 109                 {
 110                     ioStd(con_io)->io_Data   = (APTR)window;
 111                     ioStd(con_io)->io_Length = sizeof (struct Window);
 112
 113                     if (0 == OpenDevice("console.device", CONU_STANDARD, con_io, 0))
 114                     {
 115                         D(bug("Console device successfully opened\n"));
 116                         return (TRUE);
 117                     }
 118
 119                     CloseWindow(window);
 120                 }
 121                 DeleteIORequest(con_io);
 122             }
 123             DeleteMsgPort(con_mp);
 124         }
 125         CloseLibrary((struct Library *)IntuitionBase);
 126     }
 127
 128     return (FALSE);
 129 }
 130
 131 /****************
 132 **  Cleanup()  **
 133 ****************/
 134 VOID Cleanup()
 135 {
 136     CloseDevice(con_io);
 137     CloseWindow(window);
 138     DeleteIORequest(con_io);
 139     DeleteMsgPort(con_mp);
 140
 141     CloseLibrary((struct Library *)IntuitionBase);
 142
 143 }
 144
 145
 146 /*******************
 147 **  HandleEvents  **
 148 *******************/
 149 VOID HandleEvents(struct Window *win)
 150 {
 151     struct IntuiMessage *imsg;
 152     struct MsgPort *port = win->UserPort;
 153     BOOL terminated = FALSE;
 154
 155     while (!terminated)
 156     {
 157         if ((imsg = (struct IntuiMessage *)GetMsg(port)) != NULL)
 158         {
 159
 160             switch (imsg->Class)
 161             {
 162
 163             case IDCMP_REFRESHWINDOW:
 164                 BeginRefresh(win);
 165                 EndRefresh(win, TRUE);
 166                 break;
 167
 168             case IDCMP_RAWKEY:
 169                 terminated = TRUE;
 170                 break;
 171
 172             } /* switch (imsg->Class) */
 173             ReplyMsg((struct Message *)imsg);
 174
 175
 176         } /* if ((imsg = GetMsg(port)) != NULL) */
 177         else
 178         {
 179             Wait(1L << port->mp_SigBit);
 180         }
 181     } /* while (!terminated) */
 182
 183     return;
 184 } /* HandleEvents() */
 185
 186