File: mi_fllrct.c

package info (click to toggle)
plotutils 2.5-4
  • links: PTS
  • area: main
  • in suites: squeeze
  • size: 12,820 kB
  • ctags: 6,774
  • sloc: ansic: 68,284; cpp: 12,382; sh: 10,469; yacc: 2,588; makefile: 903; lex: 137
file content (85 lines) | stat: -rw-r--r-- 2,581 bytes parent folder | download | duplicates (9)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
/* This file is part of the GNU libxmi package.  

   Copyright (C) 1985, 1986, 1987, 1988, 1989, X Consortium.  For an
   associated permission notice, see the accompanying file README-X.
   
   GNU enhancements Copyright (C) 1998, 1999, 2000, 2005, Free Software
   Foundation, Inc.

   The GNU libxmi package is free software.  You may redistribute it
   and/or modify it under the terms of the GNU General Public License as
   published by the Free Software foundation; either version 2, or (at your
   option) any later version.

   The GNU libxmi package is distributed in the hope that it will be
   useful, but WITHOUT ANY WARRANTY; without even the implied warranty of
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
   General Public License for more details.

   You should have received a copy of the GNU General Public License along
   with the GNU plotutils package; see the file COPYING.  If not, write to
   the Free Software Foundation, Inc., 51 Franklin St., Fifth Floor,
   Boston, MA 02110-1301, USA. */

#include "sys-defines.h"
#include "extern.h"

#include "xmi.h"
#include "mi_spans.h"
#include "mi_gc.h"
#include "mi_api.h"

/* mi rectangles
   written by Todd Newman, with debts to all and sundry
   */

/* Very straightforward.  We let the low-level paint function invoked by
 * MI_PAINT_SPANS() worry about clipping to the destination.
 *
 * Note libxmi's convention: right edges and bottom edges of filled
 * polygons (including rectangles) are unpainted, so that adjacent polygons
 * will abut with no overlaps or gaps. */

void
miFillRectangles_internal (miPaintedSet *paintedSet, const miGC *pGC, int nrects, const miRectangle *prectInit)
{
  const miRectangle *prect; 

  /* ensure we have >=1 rects to fill */
  if (nrects <= 0)
    return;

  prect = prectInit;
  while (nrects--)
    {
      miPoint *ppt;
      miPoint *pptFirst;
      int xorg, yorg;
      unsigned int *pw, *pwFirst;
      unsigned int height, width, countdown;

      height = prect->height;
      width = prect->width;
      pptFirst = (miPoint *)mi_xmalloc (height * sizeof(miPoint));
      pwFirst = (unsigned int *)mi_xmalloc (height * sizeof(unsigned int));
      ppt = pptFirst;
      pw = pwFirst;

      xorg = prect->x;
      yorg = prect->y;
      countdown = height;
      while (countdown--)
	{
	  *pw++ = width;
	  ppt->x = xorg;
	  ppt->y = yorg;
	  ppt++;
	  yorg++;
	}

      /* paint to paintedSet, or if that's NULL, to canvas */
      MI_PAINT_SPANS(paintedSet, pGC->pixels[1], (int)height, pptFirst, pwFirst)

      prect++;
    }
}