/* The GIMP -- an image manipulation program
 * Copyright (C) 1995 Spencer Kimball and Peter Mattis
 *
 * gimpdrawable-stroke.c
 * Copyright (C) 2003 Simon Budig  <simon@gimp.org>
 *
 * This program is free software; you can 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 of the License, or
 * (at your option) any later version.
 *
 * This program 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 this program; if not, write to the Free Software
 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
 */

#include "config.h"

#include <glib-object.h>

#include "libgimpcolor/gimpcolor.h"

#include "core-types.h"

#include "base/pixel-region.h"
#include "base/temp-buf.h"
#include "base/tile-manager.h"

#include "core/gimpitem.h"
#include "core/gimpscanconvert.h"

#include "vectors/gimpstroke.h"
#include "vectors/gimpvectors.h"

#include "paint-funcs/paint-funcs.h"

#include "gimp.h"
#include "gimpdrawable.h"
#include "gimpdrawable-stroke.h"
#include "gimpimage.h"

#include "gimp-intl.h"


/*  local function prototypes  */

void
gimp_drawable_stroke_vectors (GimpDrawable         *drawable,
                              GimpVectors          *vectors,
                              gdouble               opacity,
                              GimpRGB              *color,
                              GimpLayerModeEffects  paint_mode,
                              gdouble               width,
                              GimpJoinStyle         join,
                              GimpCapStyle          cap,
                              gboolean              antialias)
{
  GimpScanConvert *scan_convert;
  gint             num_coords = 0;
  GimpStroke      *stroke;
  TileManager     *base;
  TileManager     *mask;
  gint             x1, x2, y1, y2, bytes, w, h;
  guchar           ucolor[4] = { 0, 0, 0, 255 };
  guchar           bg[1] = { 0, };
  guchar          *src_bytes;
  PixelRegion      maskPR, basePR;

  /* what area do we operate on? */
  gimp_drawable_mask_bounds (drawable, &x1, &y1, &x2, &y2);

  w = x2 - x1;
  h = y2 - y1;

  gimp_item_offsets (GIMP_ITEM (drawable), &x2, &y2);

  scan_convert = gimp_scan_convert_new (w, h, antialias ? 1 : 0);

  /* For each Stroke in the vector, interpolate it, and add it to the
   * ScanConvert */
  for (stroke = gimp_vectors_stroke_get_next (vectors, NULL);
       stroke;
       stroke = gimp_vectors_stroke_get_next (vectors, stroke))
    {
      GimpVector2 *points;
      gboolean     closed;
      GArray      *coords;
      gint i;

      /* Get the interpolated version of this stroke, and add it to our
       * scanconvert. */
      coords = gimp_stroke_interpolate (stroke, 1, &closed);

      if (coords && coords->len)
        {
          points = g_new0 (GimpVector2, coords->len);

          for (i = 0; i < coords->len; i++)
            {
              points[i].x = g_array_index (coords, GimpCoords, i).x;
              points[i].y = g_array_index (coords, GimpCoords, i).y;
              num_coords++;
            }

          gimp_scan_convert_add_polyline (scan_convert, coords->len,
                                          points, closed);

          g_free (points);
        }
    }

  if (num_coords == 0)
    {
      gimp_scan_convert_free (scan_convert);
      return;
    }

  gimp_scan_convert_stroke (scan_convert, join, cap, width);

  /* fill a 1-bpp Tilemanager with black, this will describe the shape
   * of the stroke. */
  mask = tile_manager_new (w, h, 1);
  tile_manager_set_offsets (mask, x1+x2, y1+y2);
  pixel_region_init (&maskPR, mask, 0, 0, w, h, TRUE);
  color_region (&maskPR, bg);

  /* render the stroke into it */
  gimp_scan_convert_render (scan_convert, mask);

  gimp_scan_convert_free (scan_convert);

  bytes = drawable->bytes;
  if (!gimp_drawable_has_alpha (drawable))
    bytes++;

  src_bytes = g_malloc0 (bytes);

  /* Fill a TileManager with the stroke color */
  gimp_rgb_get_uchar (color, &(ucolor[0]), &(ucolor[1]), &(ucolor[2]));
  src_bytes[bytes - 1] = OPAQUE_OPACITY;
  gimp_image_transform_color (GIMP_ITEM (drawable)->gimage, drawable,
                              src_bytes, GIMP_RGB, ucolor);
  base = tile_manager_new (w, h, bytes);
  tile_manager_set_offsets (base, x1+x2, y1+y2);
  pixel_region_init (&basePR, base, 0, 0, w, h, TRUE);
  color_region (&basePR, src_bytes);
  g_free (src_bytes);

  /* combine mask and stroke color TileManager */
  pixel_region_init (&basePR, base, 0, 0, w, h, TRUE);
  pixel_region_init (&maskPR, mask, 0, 0, w, h, FALSE);
  apply_mask_to_region (&basePR, &maskPR, OPAQUE_OPACITY);

  /* Apply to drawable */
  pixel_region_init (&basePR, base, 0, 0, w, h, FALSE);
  gimp_image_apply_image (gimp_item_get_image (GIMP_ITEM (drawable)),
                          drawable, &basePR,
                          TRUE, _("Render Stroke"), opacity, paint_mode,
                          NULL, x1, y1);

  tile_manager_unref (mask);
  tile_manager_unref (base);

  gimp_drawable_update (drawable, x1, y1, w, h);
}