test/HiddGraphics/GCCopyArea.c

   1 /*
   2     Copyright © 1998, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc: Test for graphics.hidd
   6     Lang: english
   7 */
   8
   9 /*****************************************************************************
  10
  11     NAME
  12
  13         GCCopyArea
  14
  15     SYNOPSIS
  16
  17         GCCopyArea HIDD/K,WIDTH/N/K,HEIGHT/N/K,DEPTH/N/K,CHUNKY/S,DISPLAYABLE=DP/S
  18
  19     LOCATION
  20
  21         test/HiddGraphics
  22
  23     FUNCTION
  24
  25         Creates a gc, copies the left, upper corner to the center of the
  26         gc and disposes the gc.
  27
  28     INPUTS
  29         HIDD   - name of the hidd to use e.g. "graphics-X11.hidd"
  30                  (default: graphics.hidd)
  31         WIDTH  - width of bitmap (default: 320)
  32         HEIGHT - height of bitmap (default: 200)
  33         DEPTH  - depth of bitmap (default: 8)
  34         CHUNKY - create bitmap in chunky-mode (default: planar)
  35         DISPLAYABLE - show bitmap (default: FALSE)
  36
  37     RESULT
  38         RETURN_OK    - hidd works
  39         RETURN_ERROR - hidd produce errors
  40         RETURN_FAIL  - could not test hidd i.e. OpenLibrary() fails
  41
  42     NOTES
  43
  44     EXAMPLE
  45
  46     BUGS
  47
  48     SEE ALSO
  49
  50     INTERNALS
  51
  52     HISTORY
  53
  54 ******************************************************************************/
  55
  56 #define AROS_USE_OOP
  57
  58 #include <stdlib.h>
  59 #include <stdio.h>
  60
  61 #include <aros/config.h>
  62
  63 #include <exec/types.h>
  64
  65 #include <proto/exec.h>
  66 #include <proto/dos.h>
  67 #include <proto/oop.h>
  68 #include <proto/utility.h>
  69
  70 #include <utility/tagitem.h>
  71
  72 #include <oop/oop.h>
  73 #include <hidd/graphics.h>
  74 #include <hidd/graphics-amiga-intuition.h>
  75
  76 #include "gfxhiddtool.h"
  77
  78 #undef  SDEBUG
  79 #undef  DEBUG
  80 #define DEBUG 1
  81 #include <aros/debug.h>
  82
  83 struct DosLibrary    *DOSBase;
  84 struct Library       *OOPBase;
  85 struct Library       *HIDDGraphicsBase;
  86
  87 struct ght_OpenLibs LibsArray[] =
  88 {
  89     GHT_LIB("dos.library"      , 37, &DOSBase),
  90     GHT_LIB(AROSOOP_NAME       ,  0, &OOPBase),
  91     GHT_LIB(NULL               ,  0, NULL)
  92 };
  93 /***************************************************************/
  94
  95 int main(int argc, char **argv)
  96 {
  97     ULONG ret = RETURN_FAIL;
  98
  99     OOP_AttrBase HiddGCAttrBase;
 100     OOP_AttrBase HiddGfxAttrBase;
 101     OOP_AttrBase HiddBitMapAttrBase;
 102
 103     OOP_Object   *gfxHidd;
 104     OOP_Object   *bitMap;
 105     OOP_Object   *gc;
 106
 107     STRPTR hiddName = "graphics.hidd";
 108     ULONG  width    = 320;
 109     ULONG  height   = 200;
 110     ULONG  depth    = 8;
 111     ULONG  format   = vHidd_BitMap_Format_Planar;
 112     char   wait;
 113
 114     struct Args
 115     {
 116         STRPTR hiddName;
 117         IPTR   *width;
 118         IPTR   *height;
 119         IPTR   *depth;
 120         IPTR   *chunky;
 121         ULONG  displayable;
 122     };
 123
 124     struct Args args = {hiddName, &width, &height, &depth, 0, 0};
 125     struct RDArgs *rda;
 126
 127
 128     if(ght_OpenLibs(LibsArray))
 129     {
 130         rda = ReadArgs("HIDD/K,WIDTH/N/K,HEIGHT/N/K,DEPTH/N/K,CHUNKY/S,DISPLAYABLE=DP/S", (IPTR *)&args, NULL);
 131         if (rda != NULL)
 132         {
 133             if(args.chunky      != 0) format           = vHidd_BitMap_Format_Chunky;
 134             if(args.displayable != 0) args.displayable = (ULONG) TRUE;
 135
 136             HIDDGraphicsBase = OpenLibrary(args.hiddName, 0);
 137             if(HIDDGraphicsBase)
 138             {
 139                 ret = RETURN_ERROR;
 140
 141                 HiddGfxAttrBase    = OOP_ObtainAttrBase(IID_Hidd_Gfx);
 142                 HiddBitMapAttrBase = OOP_ObtainAttrBase(IID_Hidd_BitMap);
 143                 HiddGCAttrBase     = OOP_ObtainAttrBase(IID_Hidd_GC);
 144
 145                 if(HiddGfxAttrBase && HiddBitMapAttrBase && HiddGCAttrBase)
 146                 {
 147                     gfxHidd = OOP_NewObject(NULL, args.hiddName, NULL);
 148                     if(gfxHidd)
 149                     {
 150                         struct TagItem bm_tags[] =
 151                         {
 152                             {aHidd_BitMap_Width,       (IPTR) *args.width},
 153                             {aHidd_BitMap_Height,      (IPTR) *args.height},
 154                             {aHidd_BitMap_Depth,       (IPTR) *args.depth},
 155                             {aHidd_BitMap_Format,      (IPTR) format},
 156                             {aHidd_BitMap_Displayable, (IPTR) args.displayable},
 157                             {TAG_DONE, 0UL}
 158                         };
 159
 160                         bitMap = HIDD_Gfx_NewBitMap(gfxHidd, bm_tags);
 161                         if(bitMap)
 162                         {
 163                             struct TagItem gc_tags[] =
 164                             {
 165                                 {aHidd_GC_BitMap,     (IPTR) bitMap},
 166                                 {TAG_DONE, 0UL}
 167                             };
 168
 169                             gc = HIDD_Gfx_NewGC(gfxHidd, gc_tags);
 170                             if(gc)
 171                             {
 172                                 HIDD_BM_CopyArea(gc, 0, 0, gc, 140, 80, 40, 10);
 173
 174                                 printf("Press enter to continue");
 175                                 scanf("%c", &wait);
 176
 177                                 ret = RETURN_OK;
 178                             }
 179
 180                             HIDD_Gfx_DisposeBitMap(gfxHidd, bitMap);
 181                         }
 182
 183                         if(gfxHidd) OOP_DisposeObject(gfxHidd);
 184                     }
 185                 }  /* if(HiddGfxAttrBase && HiddBitMapAttrBase && HiddGCAttrBase) */
 186
 187                 if(HiddGfxAttrBase)    OOP_ReleaseAttrBase(IID_Hidd_Gfx);
 188                 if(HiddBitMapAttrBase) OOP_ReleaseAttrBase(IID_Hidd_BitMap);
 189                 if(HiddGCAttrBase)     OOP_ReleaseAttrBase(IID_Hidd_GC);
 190
 191                 CloseLibrary(HIDDGraphicsBase);
 192             } /* if(HIDDGraphicsBase) */
 193             FreeArgs(rda);
 194         }
 195         else
 196         {
 197            PrintFault(IoErr(), "");
 198         }  /* if (rda != NULL) */
 199     } /* if OpenLibs() */
 200
 201     ght_CloseLibs(LibsArray);
 202
 203     return(ret);
 204 }