rom/graphics/drawellipse.c

   1 /*
   2     Copyright © 1995-2011, The AROS Development Team. All rights reserved.
   3     $Id$    $Log
   4
   5     Desc: Graphics function DrawEllipse
   6     Lang: english
   7 */
   8
   9 #include <aros/debug.h>
  10 #include <clib/macros.h>
  11 #include <graphics/rastport.h>
  12
  13 #include "graphics_intern.h"
  14 #include "gfxfuncsupport.h"
  15 #include "intregions.h"
  16
  17 /****************************************************************************************/
  18
  19 struct ellipse_render_data
  20 {
  21     struct render_special_info rsi;
  22     WORD a, b;
  23 };
  24
  25 static ULONG ellipse_render(APTR ellipse_rd, WORD srcx, WORD srcy,
  26                            OOP_Object *dstbm_obj, OOP_Object *dst_gc,
  27                            struct Rectangle *rect, struct GfxBase *GfxBase)
  28 {
  29     struct ellipse_render_data *erd = ellipse_rd;
  30
  31     /*
  32      * This is a quick way to install ClipRect on a GC. Just set one pointer.
  33      * This is why we have a struct Rectangle * in the GC.
  34      */
  35     GC_DOCLIP(dst_gc) = rect;
  36
  37     HIDD_BM_DrawEllipse(dstbm_obj, dst_gc, erd->a + rect->MinX - srcx, erd->b + rect->MinY - srcy,
  38                                            erd->a, erd->b);
  39
  40     /*
  41      * After we exit this routine, 'rect' will be not valid any more.
  42      * So do not forget to reset the pointer!
  43      */
  44     GC_DOCLIP(dst_gc) = NULL;
  45
  46     return 0;
  47 }
  48
  49 /*****************************************************************************
  50
  51     NAME */
  52 #include <graphics/rastport.h>
  53 #include <proto/graphics.h>
  54
  55         AROS_LH5(void, DrawEllipse,
  56
  57 /*  SYNOPSIS */
  58         AROS_LHA(struct RastPort *, rp, A1),
  59         AROS_LHA(WORD             , xCenter, D0),
  60         AROS_LHA(WORD             , yCenter, D1),
  61         AROS_LHA(WORD             , a, D2),
  62         AROS_LHA(WORD             , b, D3),
  63
  64 /*  LOCATION */
  65         struct GfxBase *, GfxBase, 30, Graphics)
  66
  67 /*  FUNCTION
  68         Draw an ellipse
  69
  70     INPUTS
  71         rp              - destination RastPort
  72         xCenter,yCenter - coordinate of centerpoint
  73         a               - radius in x direction
  74         b               - radius in y direction
  75
  76     RESULT
  77
  78     NOTES
  79
  80     EXAMPLE
  81
  82     BUGS
  83
  84     SEE ALSO
  85
  86     INTERNALS
  87
  88     HISTORY
  89         29-10-95    digulla automatically created from
  90                             graphics_lib.fd and clib/graphics_protos.h
  91
  92 *****************************************************************************/
  93 {
  94     AROS_LIBFUNC_INIT
  95
  96     struct Rectangle    rr;
  97     struct ellipse_render_data erd;
  98
  99     FIX_GFXCOORD(xCenter);
 100     FIX_GFXCOORD(yCenter);
 101     FIX_GFXCOORD(a);
 102     FIX_GFXCOORD(b);
 103
 104     /* bug("driver_DrawEllipse(%d %d %d %d)\n", xCenter, yCenter, a, b);
 105     */
 106     rr.MinX = xCenter - a;
 107     rr.MinY = yCenter - b;
 108     rr.MaxX = xCenter + a;
 109     rr.MaxY = yCenter + b;
 110
 111     erd.a = a;
 112     erd.b = b;
 113
 114     do_render_func(rp, NULL, &rr, ellipse_render, &erd, TRUE, TRUE, GfxBase);
 115
 116     AROS_LIBFUNC_EXIT
 117
 118 } /* DrawEllipse */