workbench/demos/cxtest.c

   1 /*
   2     Copyright © 1998-2001, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc: Test program for Commodities
   6     Lang: English
   7 */
   8
   9 #include <proto/exec.h>
  10 #include <proto/commodities.h>
  11 #include <proto/intuition.h>
  12 #include <intuition/intuition.h>
  13 #include <exec/memory.h>
  14 #include <libraries/commodities.h>
  15 #include <dos/dos.h>
  16
  17 #include <stdio.h>
  18 #include <stdlib.h>
  19
  20 struct IntuitionBase *IntuitionBase;
  21
  22 int main(int argc, char* argv[])
  23 {
  24     struct Library *CxBase;
  25     CxObj          *myBroker;
  26     CxObj          *filter;
  27     CxObj          *trans;
  28     struct InputEvent myie;
  29     struct Window  *window;
  30
  31     struct NewBroker brok =
  32     {
  33         NB_VERSION,
  34         "AROS TestBroker",
  35         "SDuvan 20.04.98",
  36         "Broker for testing the commodities library",
  37         0,
  38         0,
  39         0,
  40         NULL,                   /* nb_Port - will be initialized below */
  41         0
  42     };
  43
  44
  45     myie.ie_NextEvent = NULL;
  46     myie.ie_Class = IECLASS_RAWKEY;
  47     myie.ie_SubClass = IESUBCLASS_COMPATIBLE;
  48     myie.ie_Code= 0x20;
  49     myie.ie_Qualifier = 0;
  50
  51     IntuitionBase = (struct IntuitionBase *)OpenLibrary("intuition.library",39);
  52
  53     window = OpenWindowTags(NULL,
  54                             WA_IDCMP,   IDCMP_RAWKEY,
  55                             WA_Height, 50,
  56                             WA_Width, 100,
  57                             TAG_END);
  58
  59     if(!window)
  60     {
  61         fprintf(stderr, "Window failed to open.\n");
  62         exit(1);
  63     }
  64
  65
  66     fprintf(stderr, "Testing commodities.library...\n");
  67     fflush(stderr);
  68     CxBase = OpenLibrary("commodities.library", 0);
  69
  70     brok.nb_Port = CreateMsgPort();
  71
  72     if(CxBase == NULL)
  73     {
  74         fprintf(stderr, "Couldn't open commodities.library.\n");
  75         return -1;
  76     }
  77
  78     fprintf(stderr, "Calling CxBroker().\n");
  79     fflush(stderr);
  80
  81     myBroker = CxBroker(&brok, NULL);
  82
  83     fprintf(stderr, "Broker installed.\n");
  84     fflush(stderr);
  85
  86     if(myBroker == NULL)
  87     {
  88         fprintf(stderr, "Error in creating object.\n");
  89         CloseLibrary(CxBase);
  90         return -1;
  91     }
  92
  93     fprintf(stderr, "Creating filter object.\n");
  94     filter = CxFilter("rawkey return");
  95
  96     if(!filter)
  97     {
  98         fprintf(stderr, "Error in creating filter.\n");
  99         CloseLibrary(CxBase);
 100         return -1;
 101     }
 102
 103     fprintf(stderr, "Filter created.\n");
 104
 105     AttachCxObj(myBroker, filter);
 106
 107     fprintf(stderr, "Filter attached.\n");
 108     fflush(stderr);
 109
 110     {
 111         /*      int sig = AllocSignal(-1); */
 112
 113         /* trans = CxSignal(FindTask(NULL), sig); */
 114         /* trans = CxDebug(1); */
 115         trans = CxTranslate(&myie);
 116         if(!trans)
 117         {
 118             fprintf(stderr, "Error in creating translator.\n");
 119             return -1;
 120         }
 121
 122         AttachCxObj(filter, trans);
 123
 124         ActivateCxObj(myBroker, TRUE);
 125
 126         fprintf(stderr, "Broker activated.\n");
 127         fflush(stderr);
 128
 129         Wait(SIGBREAKF_CTRL_C);
 130         /*      Wait(SIGBREAKF_CTRL_C | 1 << sig); */
 131     }
 132
 133     fprintf(stderr, "Deleting all objects.\n");
 134     DeleteCxObjAll(myBroker);
 135
 136     CloseWindow(window);
 137
 138     fprintf(stderr, "Closing commodities.library...\n");
 139     CloseLibrary(CxBase);
 140     CloseLibrary((struct Library *)IntuitionBase);
 141     fprintf(stderr, "All done.\n");
 142
 143     return 0;
 144 }
 145