rom/graphics/drawellipse.c

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