test/obtainpentest.c

   1 #include <proto/graphics.h>
   2 #include <proto/exec.h>
   3 #include <intuition/intuitionbase.h>
   4 #include <intuition/screens.h>
   5 #include <graphics/view.h>
   6
   7 #include <stdio.h>
   8
   9 int main(void)
  10 {
  11   struct IntuitionBase * IntuitionBase;
  12   struct Library * GfxBase;
  13   struct ViewPort * vp;
  14   struct ColorMap * cm;
  15 #define NUMCOLORS 32
  16   ULONG n[2*NUMCOLORS];
  17   ULONG i;
  18
  19   IntuitionBase = (struct IntuitionBase *)OpenLibrary("intuition.library",0);
  20   GfxBase = OpenLibrary("graphics.library",0);
  21
  22   cm = GetColorMap(NUMCOLORS);
  23
  24   vp = &IntuitionBase->ActiveScreen->ViewPort;
  25
  26   AttachPalExtra(cm,vp);
  27
  28   n[0]  = ObtainPen(cm,
  29                     -1,
  30                     0xa0000000,
  31                     0xb0000000,
  32                     0xc0000000,
  33                     0);
  34
  35   printf("Got pen number %ld.\n",(long)n[0]);
  36
  37   printf("Trying to obtain the same pen as shared.\n");
  38   n[1]  = ObtainPen(cm,
  39                     -1,
  40                     0xa0000000,
  41                     0xb0000000,
  42                     0xc0000000,
  43                     0);
  44
  45   printf("Got pen number %ld (=%ld!).\n",(long)n[1],(long)n[0]);
  46
  47   printf("Trying to obtain a pen as exclusive.\n");
  48   n[2]  = ObtainPen(cm,
  49                     -1,
  50                     0xa0000000,
  51                     0xb0000000,
  52                     0xc0000000,
  53                     PENF_EXCLUSIVE);
  54
  55   printf("Got pen number %ld.\n",(long)n[2]);
  56
  57   printf("Trying to allocate pen %ld as exclusive again.\n",(long)n[2]);
  58   n[3]  = ObtainPen(cm,
  59                     n[2],
  60                     0xa0000000,
  61                     0xb0000000,
  62                     0xc0000000,
  63                     PENF_EXCLUSIVE);
  64
  65   printf("Got pen number %ld.\n",(long)n[3]);
  66
  67   printf("Trying to allocate pen %ld as shared.\n",(long)n[2]);
  68   n[4]  = ObtainPen(cm,
  69                     n[2],
  70                     0xa0000000,
  71                     0xb0000000,
  72                     0xc0000000,
  73                     0);
  74
  75   printf("Got pen number %ld.\n",(long)n[4]);
  76
  77   printf("Releasing all pens.\n");
  78   ReleasePen(cm, n[4]);
  79   ReleasePen(cm, n[3]);
  80   ReleasePen(cm, n[2]);
  81   ReleasePen(cm, n[1]);
  82   ReleasePen(cm, n[0]);
  83
  84   printf("Obtaining a shared pen.\n");
  85   n[0]  = ObtainPen(cm,
  86                     -1,
  87                     0xa0000000,
  88                     0xb0000000,
  89                     0xc0000000,
  90                     0);
  91
  92   printf("Got pen number %ld.\n",(long)n[0]);
  93
  94   ReleasePen(cm, n[0]);
  95
  96   printf("---------------------------\n");
  97
  98   printf("Trying to allocate %d shared pens\n",NUMCOLORS);
  99   i = 0;
 100   while (i < NUMCOLORS)
 101   {
 102     n[i] = ObtainPen(cm, -1, i << 28, i << 24, i << 20,0);
 103
 104     printf("Got pen %ld\n",(long)n[i]);
 105     i++;
 106   }
 107
 108   printf("Trying to get %d exclusive pens (no pen was released)\n",NUMCOLORS);
 109   i = 0;
 110   while (i < NUMCOLORS)
 111   {
 112     n[i+NUMCOLORS] = ObtainPen(cm, -1, 0,0,0,PENF_EXCLUSIVE);
 113
 114     printf("Got pen %ld (=-1)\n",(long)n[i+NUMCOLORS]);
 115     i++;
 116   }
 117
 118   printf("Releasing all pens!\n");
 119   i = 0;
 120   while (i < 2 * NUMCOLORS)
 121   {
 122     ReleasePen(cm, n[i]);
 123     i++;
 124   }
 125
 126   printf("---------------------------\n");
 127
 128
 129   printf("Trying to get %d exclusive pens\n",NUMCOLORS);
 130   i = 0;
 131   while (i < NUMCOLORS)
 132   {
 133     n[i] = ObtainPen(cm, -1, 0,0,0,PENF_EXCLUSIVE);
 134
 135     printf("Got pen %ld\n",(long)n[i]);
 136     i++;
 137   }
 138
 139   printf("Trying to allocate %d shared pens (no pen was released)\n",NUMCOLORS);
 140   i = 0;
 141   while (i < NUMCOLORS)
 142   {
 143     n[i+NUMCOLORS] = ObtainPen(cm, -1, 0,0,0,0);
 144
 145     printf("Got pen %ld (=-1)\n",(long)n[i+NUMCOLORS]);
 146     i++;
 147   }
 148
 149   printf("Releasing all pens!\n");
 150   i = 0;
 151   while (i < 2*NUMCOLORS)
 152   {
 153     ReleasePen(cm, n[i]);
 154     i++;
 155   }
 156
 157   printf("---------------------------\n");
 158
 159   printf("Trying to allocate %d shared pens at certain indices\n",NUMCOLORS);
 160   i = 0;
 161   while (i < NUMCOLORS)
 162   {
 163     n[i] = ObtainPen(cm, i, 0, 0, 0,0);
 164
 165     printf("Got pen %ld\n",(long)n[i]);
 166     i++;
 167   }
 168
 169   printf("Trying to get %d exclusive pens (no pen was released)\n",NUMCOLORS);
 170   i = 0;
 171   while (i < NUMCOLORS)
 172   {
 173     n[i+NUMCOLORS] = ObtainPen(cm, -1, 0,0,0,PENF_EXCLUSIVE);
 174
 175     printf("Got pen %ld (=-1)\n",(long)n[i+NUMCOLORS]);
 176     i++;
 177   }
 178
 179   printf("Releasing all pens!\n");
 180   i = 0;
 181   while (i < 2 * NUMCOLORS)
 182   {
 183     ReleasePen(cm, n[i]);
 184     i++;
 185   }
 186
 187   printf("---------------------------\n");
 188
 189   printf("Trying to get %d exclusive pens at certain indices\n",NUMCOLORS);
 190   i = 0;
 191   while (i < NUMCOLORS)
 192   {
 193     n[i] = ObtainPen(cm, i, 0,0,0,PENF_EXCLUSIVE);
 194
 195     printf("Got pen %ld\n",(long)n[i]);
 196     i++;
 197   }
 198
 199   printf("Trying to allocate %d shared pens (bo pen was released)\n",NUMCOLORS);
 200   i = 0;
 201   while (i < NUMCOLORS)
 202   {
 203     n[i+NUMCOLORS] = ObtainPen(cm, -1, 0,0,0,0);
 204
 205     printf("Got pen %ld (=-1)\n",(long)n[i+NUMCOLORS]);
 206     i++;
 207   }
 208
 209   printf("Releasing all pens!\n");
 210   i = 0;
 211   while (i < 2*NUMCOLORS)
 212   {
 213     ReleasePen(cm, n[i]);
 214     i++;
 215   }
 216
 217   printf("---------------------------\n");
 218
 219   FreeColorMap(cm);
 220
 221     return 0;
 222 }