DriverRectangleG2d.java

/* ========================================================================
 * PlantUML : a free UML diagram generator
 * ========================================================================
 *
 * (C) Copyright 2009-2024, Arnaud Roques
 *
 * Project Info:  https://plantuml.com
 * 
 * If you like this project or if you find it useful, you can support us at:
 * 
 * https://plantuml.com/patreon (only 1$ per month!)
 * https://plantuml.com/paypal
 * 
 * This file is part of PlantUML.
 *
 * PlantUML 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 3 of the License, or
 * (at your option) any later version.
 *
 * PlantUML 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 library; if not, write to the Free Software
 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301,
 * USA.
 *
 *
 * Original Author:  Arnaud Roques
 * 
 *
 */
package net.sourceforge.plantuml.klimt.drawing.g2d;

import java.awt.BasicStroke;
import java.awt.GradientPaint;
import java.awt.LinearGradientPaint;
import java.awt.Paint;
import java.awt.Graphics2D;
import java.awt.Rectangle;
import java.awt.Shape;
import java.awt.TexturePaint;
import java.awt.geom.Point2D;
import java.awt.geom.Rectangle2D;
import java.awt.geom.RoundRectangle2D;
import java.awt.image.BufferedImage;

import net.sourceforge.plantuml.klimt.UParam;
import net.sourceforge.plantuml.klimt.UPattern;
import net.sourceforge.plantuml.klimt.UShapeSized;
import net.sourceforge.plantuml.klimt.color.ColorMapper;
import net.sourceforge.plantuml.klimt.color.HColor;
import net.sourceforge.plantuml.klimt.color.HColorGradient;
import net.sourceforge.plantuml.klimt.color.HColorLinearGradient;
import net.sourceforge.plantuml.klimt.color.HColorSimple;
import net.sourceforge.plantuml.klimt.awt.XColor;
import net.sourceforge.plantuml.klimt.drawing.UDriver;
import net.sourceforge.plantuml.klimt.geom.EnsureVisible;
import net.sourceforge.plantuml.klimt.shape.URectangle;

public class DriverRectangleG2d extends DriverShadowedG2d implements UDriver<URectangle, Graphics2D> {

	private final double dpiFactor;
	private final EnsureVisible visible;

	public DriverRectangleG2d(double dpiFactor, EnsureVisible visible) {
		this.dpiFactor = dpiFactor;
		this.visible = visible;
	}

	public void draw(URectangle rect, double x, double y, ColorMapper mapper, UParam param, Graphics2D g2d) {
		g2d.setStroke(new BasicStroke((float) param.getStroke().getThickness()));
		final double rx = rect.getRx();
		final double ry = rect.getRy();
		final Shape shape;
		if (rx == 0 && ry == 0)
			shape = new Rectangle2D.Double(x, y, rect.getWidth(), rect.getHeight());
		else
			shape = new RoundRectangle2D.Double(x, y, rect.getWidth(), rect.getHeight(), rx, ry);

		visible.ensureVisible(x, y);
		visible.ensureVisible(x + rect.getWidth(), y + rect.getHeight());

		final HColor back = param.getBackcolor();

		// Shadow
		if (rect.getDeltaShadow() != 0) {
			if (back.isTransparent())
				drawOnlyLineShadowSpecial(g2d, shape, rect.getDeltaShadow(), dpiFactor);
			else
				drawShadow(g2d, shape, rect.getDeltaShadow(), dpiFactor);
		}

		final HColor color = param.getColor();
		if (color == null) {
			param.getColor();
		}
		if (back instanceof HColorGradient || back instanceof HColorLinearGradient) {
			final Paint paint = getPaintGradient(x, y, mapper, rect.getWidth(), rect.getHeight(), back);
			g2d.setPaint(paint);
			g2d.fill(shape);
			drawBorder(param, color, mapper, rect, shape, g2d, x, y);
		} else {
			if (param.getBackcolor().isTransparent() == false) {
				g2d.setColor(param.getBackcolor().toColor(mapper).toAwtColor());
				DriverLineG2d.manageStroke(param, g2d);
				managePattern(param, g2d);
				g2d.fill(shape);
			}
			if (color.equals(param.getBackcolor()) == false)
				drawBorder(param, color, mapper, rect, shape, g2d, x, y);

		}
	}

	public static void drawBorder(UParam param, HColor color, ColorMapper mapper, UShapeSized sized, Shape shape,
			Graphics2D g2d, double x, double y) {
		if (color.isTransparent())
			return;

		if (color instanceof HColorGradient || color instanceof HColorLinearGradient) {
			final Paint paint = getPaintGradient(x, y, mapper, sized.getWidth(), sized.getHeight(), color);
			g2d.setPaint(paint);
		} else {
			g2d.setColor(color.toColor(mapper).toAwtColor());
		}
		DriverLineG2d.manageStroke(param, g2d);
		g2d.draw(shape);
	}

	public static Paint getPaintGradient(double x, double y, ColorMapper mapper, double width, double height,
			final HColor back) {
		if (back instanceof HColorLinearGradient)
			return createLinearGradientPaint((HColorLinearGradient) back, mapper, x, y, width, height);

		final HColorGradient gr = (HColorGradient) back;
		final char policy = gr.getPolicy();
		final GradientPaint paint;
		if (policy == '|')
			paint = new GradientPaint((float) x, (float) (y + height) / 2, gr.getColor1().toColor(mapper).toAwtColor(),
					(float) (x + width), (float) (y + height) / 2, gr.getColor2().toColor(mapper).toAwtColor());
		else if (policy == '\\')
			paint = new GradientPaint((float) x, (float) (y + height), gr.getColor1().toColor(mapper).toAwtColor(),
					(float) (x + width), (float) y, gr.getColor2().toColor(mapper).toAwtColor());
		else if (policy == '-')
			paint = new GradientPaint((float) (x + width) / 2, (float) y, gr.getColor1().toColor(mapper).toAwtColor(),
					(float) (x + width) / 2, (float) (y + height), gr.getColor2().toColor(mapper).toAwtColor());
		else
			// for /
			paint = new GradientPaint((float) x, (float) y, gr.getColor1().toColor(mapper).toAwtColor(), (float) (x + width),
					(float) (y + height), gr.getColor2().toColor(mapper).toAwtColor());

		return paint;
	}

	private static Paint createLinearGradientPaint(HColorLinearGradient gr, ColorMapper mapper, double x, double y,
			double width, double height) {
		final int size = gr.getStops().size();
		final float[] fractions = new float[size];
		final java.awt.Color[] colors = new java.awt.Color[size];
		int i = 0;
		for (HColorLinearGradient.Stop stop : gr.getStops()) {
			fractions[i] = (float) stop.getOffset();
			final XColor base = stop.getColor().toColor(mapper);
			int alpha = (int) Math.round(base.getAlpha() * stop.getOpacity());
			if (alpha < 0)
				alpha = 0;
			if (alpha > 255)
				alpha = 255;
			colors[i] = new java.awt.Color(base.getRed(), base.getGreen(), base.getBlue(), alpha);
			i++;
		}

		final float x1;
		final float y1;
		final float x2;
		final float y2;
		if (gr.isUserSpaceOnUse()) {
			x1 = (float) gr.getX1();
			y1 = (float) gr.getY1();
			x2 = (float) gr.getX2();
			y2 = (float) gr.getY2();
		} else {
			x1 = (float) (x + gr.getX1() * width);
			y1 = (float) (y + gr.getY1() * height);
			x2 = (float) (x + gr.getX2() * width);
			y2 = (float) (y + gr.getY2() * height);
		}

		final LinearGradientPaint.CycleMethod cycleMethod;
		switch (gr.getSpreadMethod()) {
		case REFLECT:
			cycleMethod = LinearGradientPaint.CycleMethod.REFLECT;
			break;
		case REPEAT:
			cycleMethod = LinearGradientPaint.CycleMethod.REPEAT;
			break;
		case PAD:
		default:
			cycleMethod = LinearGradientPaint.CycleMethod.NO_CYCLE;
			break;
		}
		return new LinearGradientPaint(new Point2D.Float(x1, y1), new Point2D.Float(x2, y2), fractions, colors,
				cycleMethod);
	}

	public static void managePattern(UParam param, Graphics2D g2d) {
		final UPattern pattern = param.getPattern();
		if (pattern == UPattern.VERTICAL_STRIPE) {
			final BufferedImage bi = new BufferedImage(4, 4, BufferedImage.TYPE_INT_ARGB);
			final Rectangle r = new Rectangle(0, 0, 4, 4);
			final int rgb = ((HColorSimple) param.getBackcolor()).getAwtColor().getRGB();
			for (int i = 0; i < 4; i++)
				for (int j = 0; j < 4; j++)
					if (i == 0 || i == 1)
						bi.setRGB(i, j, rgb);

			g2d.setPaint(new TexturePaint(bi, r));
		} else if (pattern == UPattern.HORIZONTAL_STRIPE) {
			final BufferedImage bi = new BufferedImage(4, 4, BufferedImage.TYPE_INT_ARGB);
			final Rectangle r = new Rectangle(0, 0, 4, 4);
			final int rgb = ((HColorSimple) param.getBackcolor()).getAwtColor().getRGB();
			for (int i = 0; i < 4; i++)
				for (int j = 0; j < 4; j++)
					if (j == 0 || j == 1)
						bi.setRGB(i, j, rgb);

			g2d.setPaint(new TexturePaint(bi, r));
		} else if (pattern == UPattern.SMALL_CIRCLE) {
			final BufferedImage bi = new BufferedImage(4, 4, BufferedImage.TYPE_INT_ARGB);
			final Rectangle r = new Rectangle(0, 0, 4, 4);
			final int rgb = ((HColorSimple) param.getBackcolor()).getAwtColor().getRGB();
			bi.setRGB(0, 1, rgb);
			bi.setRGB(1, 0, rgb);
			bi.setRGB(1, 1, rgb);
			bi.setRGB(1, 2, rgb);
			bi.setRGB(2, 1, rgb);
			g2d.setPaint(new TexturePaint(bi, r));
		}
	}

}