workbench/demos/childchild.c

   1 #include <intuition/intuition.h>
   2 #include <graphics/gfx.h>
   3 #include <graphics/gfxmacros.h>
   4 #include <proto/exec.h>
   5 #include <proto/intuition.h>
   6 #include <proto/graphics.h>
   7 #include <proto/alib.h>
   8
   9 #include <stdio.h>
  10 #include <stdlib.h>
  11
  12 #define WINWIDTH        400
  13 #define WINHEIGHT       400
  14 #define WINCX           (WINWIDTH / 2)
  15 #define WINCY           (WINHEIGHT / 2)
  16
  17 #define PATTERNWIDTH  32
  18 #define PATTERNHEIGHT 32
  19 #define PATTERNCOL1 SHADOWPEN
  20 #define PATTERNCOL2 SHINEPEN
  21
  22 struct LayerHookMsg
  23 {
  24     struct Layer *lay;
  25     struct Rectangle bounds;
  26     LONG offsetx;
  27     LONG offsety;
  28 };
  29
  30 struct IntuitionBase    *IntuitionBase;
  31 struct GfxBase          *GfxBase;
  32 struct Screen           *scr;
  33 struct DrawInfo         *dri;
  34 struct Window           *win, *win2, *win3;
  35 struct RastPort         *rp;
  36 struct BitMap           *patternbm;
  37 struct Hook             backfillhook;
  38
  39 static void cleanup(char *msg)
  40 {
  41     if(msg) printf("childchild: %s\n", msg);
  42
  43     if (win3) CloseWindow(win3);
  44     if (win2) CloseWindow(win2);
  45     if (win) CloseWindow(win);
  46
  47     if (patternbm) FreeBitMap(patternbm);
  48
  49     if (dri) FreeScreenDrawInfo(scr, dri);
  50     if (scr) UnlockPubScreen(0, scr);
  51
  52     if (GfxBase) CloseLibrary((struct Library *)GfxBase);
  53     if (IntuitionBase) CloseLibrary((struct Library *)IntuitionBase);
  54
  55     exit(0);
  56 }
  57
  58 static void openlibs(void)
  59 {
  60     if (!(IntuitionBase = (struct IntuitionBase *)OpenLibrary("intuition.library", 39)))
  61     {
  62         cleanup("Can't open intuition.library!");
  63     }
  64
  65     if (!(GfxBase = (struct GfxBase *)OpenLibrary("graphics.library", 39)))
  66     {
  67         cleanup("Can't open graphics.library!");
  68     }
  69
  70 }
  71
  72 static void getvisual(void)
  73 {
  74     if (!(scr = LockPubScreen(0))) cleanup("Can't lock pub screen!");
  75     if (!(dri = GetScreenDrawInfo(scr))) cleanup("Can't get drawinfo!");
  76 }
  77
  78
  79 static void MyBackfillFunc(struct Hook *hook,struct RastPort *rp,
  80                            struct LayerHookMsg *msg)
  81 {
  82     struct Layer *lay;
  83     WORD x1,y1,x2,y2,px,py,pw,ph;
  84
  85     lay = msg->lay;
  86
  87     x1 = msg->bounds.MinX;
  88     y1 = msg->bounds.MinY;
  89     x2 = msg->bounds.MaxX;
  90     y2 = msg->bounds.MaxY;
  91
  92     px = (x1 - lay->bounds.MinX) % PATTERNWIDTH;
  93
  94     pw = PATTERNWIDTH - px;
  95
  96     do
  97     {
  98         y1 = msg->bounds.MinY;
  99         py = (y1 - lay->bounds.MinY) % PATTERNHEIGHT;
 100
 101         ph = PATTERNHEIGHT - py;
 102
 103         if (pw > (x2 - x1 + 1)) pw = x2 - x1 + 1;
 104
 105         do
 106         {
 107             if (ph > (y2 - y1 + 1)) ph = y2 - y1 + 1;
 108
 109             BltBitMap(patternbm,
 110                       px,
 111                       py,
 112                       rp->BitMap,
 113                       x1,
 114                       y1,
 115                       pw,
 116                       ph,
 117                       192,
 118                       255,
 119                       0);
 120
 121             y1 += ph;
 122
 123             py = 0;
 124             ph = PATTERNHEIGHT;
 125
 126         } while (y1 <= y2); /* while(y1 < y2) */
 127
 128         x1 += pw;
 129
 130         px = 0;
 131         pw = PATTERNWIDTH;
 132
 133     } while (x1 <= x2); /* while (x1 < x2) */
 134 }
 135
 136
 137 static void InitBackfillHook(void)
 138 {
 139     backfillhook.h_Entry = HookEntry;
 140     backfillhook.h_SubEntry = (HOOKFUNC)MyBackfillFunc;
 141 }
 142
 143 static struct RastPort temprp;
 144
 145 static void MakePattern(void)
 146 {
 147     if (!(patternbm = AllocBitMap(PATTERNWIDTH * 2,
 148                                   PATTERNHEIGHT * 2,
 149                                   GetBitMapAttr(scr->RastPort.BitMap,BMA_DEPTH),
 150                                   BMF_CLEAR,
 151                                   scr->RastPort.BitMap)))
 152     {
 153         cleanup("Can't create pattern bitmap!");
 154     }
 155
 156     InitRastPort(&temprp);
 157
 158     temprp.BitMap = patternbm;
 159
 160     SetAPen(&temprp,dri->dri_Pens[PATTERNCOL1]);
 161
 162     RectFill(&temprp, 0, 0, 10, 10);
 163     RectFill(&temprp, 0, 0, PATTERNWIDTH - 1, PATTERNHEIGHT - 1);
 164
 165     SetAPen(&temprp, dri->dri_Pens[PATTERNCOL2]);
 166
 167     RectFill(&temprp, 0, 0, PATTERNWIDTH / 2 - 1, PATTERNHEIGHT / 2 - 1);
 168     RectFill(&temprp, PATTERNWIDTH / 2, PATTERNHEIGHT / 2, PATTERNWIDTH - 1, PATTERNHEIGHT - 1);
 169 }
 170
 171 static void makewin(void)
 172 {
 173     win = OpenWindowTags(0, WA_PubScreen, (IPTR)scr,
 174                             WA_Left, 20,
 175                             WA_Top, 20,
 176                             WA_Width, WINWIDTH,
 177                             WA_Height, WINHEIGHT,
 178                             WA_Title, (IPTR)"Parent",
 179                             WA_CloseGadget, TRUE,
 180                             WA_DragBar, TRUE,
 181                             WA_DepthGadget, TRUE,
 182                             WA_IDCMP, IDCMP_CLOSEWINDOW,
 183                             WA_Activate, TRUE,
 184                             WA_SimpleRefresh, TRUE,
 185                              WA_NoCareRefresh,TRUE,
 186                             WA_BackFill, (IPTR)&backfillhook,
 187                             WA_SizeGadget, TRUE,
 188                             WA_MinWidth,20,
 189                             WA_MinHeight,20,
 190                             WA_MaxWidth,1000,
 191                             WA_MaxHeight,1000,
 192                             TAG_DONE);
 193
 194
 195     if (!win) cleanup("Can't create parent window!");
 196
 197     win2 = OpenWindowTags(0, WA_PubScreen, (IPTR)scr,
 198                              WA_Parent, (IPTR)win,
 199                              WA_Left, 20,
 200                              WA_Top, 20,
 201                              WA_Width, WINWIDTH * 2 / 3,
 202                              WA_Height, WINHEIGHT * 2 / 3,
 203                              WA_Title, (IPTR)"Child",
 204                              WA_DragBar, TRUE,
 205                              WA_DepthGadget, TRUE,
 206                              WA_SimpleRefresh, TRUE,
 207                              WA_NoCareRefresh,TRUE,
 208                              WA_MinWidth,20,
 209                              WA_MinHeight,20,
 210                              WA_MaxWidth,1000,
 211                              WA_MaxHeight,1000,
 212                              WA_SizeGadget,TRUE,
 213                              TAG_DONE);
 214
 215
 216     if (!win2) cleanup("Can't create child window!");
 217
 218     win3 = OpenWindowTags(0, WA_PubScreen, (IPTR)scr,
 219                              WA_Parent, (IPTR)win2,
 220                              WA_Left, 20,
 221                              WA_Top, 20,
 222                              WA_Width, WINWIDTH / 2,
 223                              WA_Height, WINHEIGHT / 2,
 224                              WA_Title, (IPTR)"Grand Child",
 225                              WA_DragBar, TRUE,
 226                              WA_DepthGadget, TRUE,
 227                              WA_SimpleRefresh, TRUE,
 228                              WA_NoCareRefresh,TRUE,
 229                              WA_SizeGadget, TRUE,
 230                              WA_MinWidth,20,
 231                              WA_MinHeight,20,
 232                              WA_MaxWidth,1000,
 233                              WA_MaxHeight,1000,
 234                              WA_NoCareRefresh,TRUE,
 235                              TAG_DONE);
 236
 237
 238     if (!win3) cleanup("Can't create grand child window!");
 239
 240 }
 241
 242 static void handleall(void)
 243 {
 244     WaitPort(win->UserPort);
 245 }
 246
 247 int main(void)
 248 {
 249     openlibs();
 250     getvisual();
 251     MakePattern();
 252     InitBackfillHook();
 253     makewin();
 254     handleall();
 255     cleanup(0);
 256
 257     return 0;
 258 }