epi/EpiWebview
1
0
Fork 0
Code Issues 3 Pull Requests Actions Packages Projects Releases 7 Wiki Activity

Feature: Labelprint für Kistenetiketten hinzugefügt

Browse Source
This commit is contained in:
leopold.strobl
2025-10-27 12:14:44 +01:00
parent 43bc416554
commit 14bae6c9ef
1068 changed files with 229014 additions and 1807 deletions
Download Patch File Download Diff File Expand all files Collapse all files
vendor/tecnickcom/tc-lib-pdf-graph/src/Draw.php
Vendored
+791
View File
@@ -0,0 +1,791 @@
<?php
/**
* Draw.php
*
* @since 2011-05-23
* @category Library
* @package PdfGraph
* @author Nicola Asuni <info@tecnick.com>
* @copyright 2011-2024 Nicola Asuni - Tecnick.com LTD
* @license http://www.gnu.org/copyleft/lesser.html GNU-LGPL v3 (see LICENSE.TXT)
* @link https://github.com/tecnickcom/tc-lib-pdf-graph
*
* This file is part of tc-lib-pdf-graph software library.
*/
namespace Com\Tecnick\Pdf\Graph;
use Com\Tecnick\Pdf\Graph\Exception as GraphException;
/**
* Com\Tecnick\Pdf\Graph\Draw
*
* @since 2011-05-23
* @category Library
* @package PdfGraph
* @author Nicola Asuni <info@tecnick.com>
* @copyright 2011-2024 Nicola Asuni - Tecnick.com LTD
* @license http://www.gnu.org/copyleft/lesser.html GNU-LGPL v3 (see LICENSE.TXT)
* @link https://github.com/tecnickcom/tc-lib-pdf-graph
*
* @phpstan-import-type StyleDataOpt from \Com\Tecnick\Pdf\Graph\Base
*
* @SuppressWarnings("PHPMD.ExcessiveClassComplexity")
*/
class Draw extends \Com\Tecnick\Pdf\Graph\Gradient
{
/**
* Draws a line between two points.
*
* @param float $posx1 Abscissa of first point.
* @param float $posy1 Ordinate of first point.
* @param float $posx2 Abscissa of second point.
* @param float $posy2 Ordinate of second point.
* @param StyleDataOpt $style Line style to apply.
*
* @return string PDF command
*/
public function getLine(
float $posx1,
float $posy1,
float $posx2,
float $posy2,
array $style = [],
): string {
return $this->getStyleCmd($style)
. $this->getRawPoint($posx1, $posy1)
. $this->getRawLine($posx2, $posy2)
. $this->getPathPaintOp('S');
}
/**
* Draws a Bezier curve.
* The Bezier curve is a tangent to the line between the control points at either end of the curve.
*
* @param float $posx0 Abscissa of start point.
* @param float $posy0 Ordinate of start point.
* @param float $posx1 Abscissa of control point 1.
* @param float $posy1 Ordinate of control point 1.
* @param float $posx2 Abscissa of control point 2.
* @param float $posy2 Ordinate of control point 2.
* @param float $posx3 Abscissa of end point.
* @param float $posy3 Ordinate of end point.
* @param string $mode Mode of rendering. @see getPathPaintOp()
* @param StyleDataOpt $style Style.
*
* @return string PDF command
*
* @SuppressWarnings("PHPMD.ExcessiveParameterList")
*/
public function getCurve(
float $posx0,
float $posy0,
float $posx1,
float $posy1,
float $posx2,
float $posy2,
float $posx3,
float $posy3,
string $mode = 'S',
array $style = [],
): string {
return $this->getStyleCmd($style)
. $this->getRawPoint($posx0, $posy0)
. $this->getRawCurve($posx1, $posy1, $posx2, $posy2, $posx3, $posy3)
. $this->getPathPaintOp($mode);
}
/**
* Draws a poly-Bezier curve.
* Each Bezier curve segment is a tangent to the line between the control points at either end of the curve.
*
* @param float $posx0 Abscissa of start point.
* @param float $posy0 Ordinate of start point.
* @param array<array<float>> $segments An array of bezier descriptions. Format: array(x1, y1, x2, y2, x3, y3).
* @param string $mode Mode of rendering. @see getPathPaintOp()
* @param StyleDataOpt $style Style.
*
* @return string PDF command
*/
public function getPolycurve(
float $posx0,
float $posy0,
array $segments,
string $mode = 'S',
array $style = [],
): string {
$out = $this->getStyleCmd($style)
. $this->getRawPoint($posx0, $posy0);
foreach ($segments as $segment) {
[$posx1, $posy1, $posx2, $posy2, $posx3, $posy3] = $segment;
$out .= $this->getRawCurve($posx1, $posy1, $posx2, $posy2, $posx3, $posy3);
}
return $out . $this->getPathPaintOp($mode);
}
/**
* Draws an ellipse.
* An ellipse is formed from n Bezier curves.
*
* @param float $posx Abscissa of center point.
* @param float $posy Ordinate of center point.
* @param float $hrad Horizontal radius.
* @param float $vrad Vertical radius.
* @param float $angle Angle oriented (anti-clockwise). Default value: 0.
* @param float $angs Angle in degrees at which starting drawing.
* @param float $angf Angle in degrees at which stop drawing.
* @param string $mode Mode of rendering. @see getPathPaintOp()
* @param StyleDataOpt $style Style.
* @param int $ncv Number of curves used to draw a 90 degrees portion of ellipse.
*
* @return string PDF command
*
* @SuppressWarnings("PHPMD.ExcessiveParameterList")
*/
public function getEllipse(
float $posx,
float $posy,
float $hrad,
float $vrad = 0,
float $angle = 0,
float $angs = 0,
float $angf = 360,
string $mode = 'S',
array $style = [],
int $ncv = 2
): string {
if (empty($vrad)) {
$vrad = $hrad;
}
return $this->getStyleCmd($style)
. $this->getRawEllipticalArc(
$posx,
$posy,
$hrad,
$vrad,
$angle,
$angs,
$angf,
false,
$ncv,
true,
true,
false
)
. $this->getPathPaintOp($mode);
}
/**
* Draws a circle.
* A circle is formed from n Bezier curves.
*
* @param float $posx Abscissa of center point.
* @param float $posy Ordinate of center point.
* @param float $rad Radius.
* @param float $angs Angle in degrees at which starting drawing.
* @param float $angf Angle in degrees at which stop drawing.
* @param string $mode Mode of rendering. @see getPathPaintOp()
* @param StyleDataOpt $style Style.
* @param int $ncv Number of curves used to draw a 90 degrees portion of ellipse.
*
* @return string PDF command
*/
public function getCircle(
float $posx,
float $posy,
float $rad,
float $angs = 0,
float $angf = 360,
string $mode = 'S',
array $style = [],
int $ncv = 2
): string {
return $this->getEllipse($posx, $posy, $rad, $rad, 0, $angs, $angf, $mode, $style, $ncv);
}
/**
* Draws a circle pie sector.
*
* @param float $posx Abscissa of center point.
* @param float $posy Ordinate of center point.
* @param float $rad Radius.
* @param float $angs Angle in degrees at which starting drawing.
* @param float $angf Angle in degrees at which stop drawing.
* @param string $mode Mode of rendering. @see getPathPaintOp()
* @param StyleDataOpt $style Style.
* @param int $ncv Number of curves used to draw a 90 degrees portion of ellipse.
*
* @return string PDF command
*/
public function getPieSector(
float $posx,
float $posy,
float $rad,
float $angs = 0,
float $angf = 360,
string $mode = 'FD',
array $style = [],
int $ncv = 2
): string {
return $this->getStyleCmd($style)
. $this->getRawEllipticalArc(
$posx,
$posy,
$rad,
$rad,
0,
$angs,
$angf,
true,
$ncv,
true,
true,
false
)
. $this->getPathPaintOp($mode);
}
/**
* Draws a basic polygon.
*
* @param array<float> $points Points - array containing 4 points for each segment: (x0, y0, x1, y1, x2, y2, ...)
* @param string $mode Mode of rendering. @see getPathPaintOp()
* @param StyleDataOpt $style Style.
*
* @return string PDF command
*/
public function getBasicPolygon(
array $points,
string $mode = 'S',
array $style = [],
): string {
$nco = count($points); // number of coordinates
$out = $this->getStyleCmd($style)
. $this->getRawPoint($points[0], $points[1]);
for ($idx = 2; $idx < $nco; $idx += 2) {
$out .= $this->getRawLine($points[$idx], $points[($idx + 1)]);
}
return $out . $this->getPathPaintOp($mode);
}
/**
* Returns the polygon default style command and initialize the first segment style if missing.
*
* @param array<StyleDataOpt> $styles Array of styles -
* one style entry for each polygon segment and/or one global "all" entry.
*
* @return string PDF command
*/
protected function getDefaultSegStyle(array $styles = []): string
{
$out = '';
if (! empty($styles['all'])) {
$out .= $this->getStyleCmd($styles['all']);
}
if (empty($styles[0])) {
$styles[0] = [];
}
return $out;
}
/**
* Draws a polygon with a different style for each segment.
*
* @param array<float> $points Points - array with values (x0, y0, x1, y1,..., x(n-1), y(n-1))
* @param string $mode Mode of rendering. @see getPathPaintOp()
* @param array<StyleDataOpt> $styles Array of styles -
* one style entry for each polygon segment and/or one global "all" entry.
*
* @return string PDF command
*
* @SuppressWarnings("PHPMD.CyclomaticComplexity")
* @SuppressWarnings("PHPMD.NPathComplexity")
*/
public function getPolygon(array $points, string $mode = 'S', array $styles = []): string
{
$nco = count($points); // number of points
if ($nco < 6) {
return ''; // we need at least 3 points
}
$nseg = (int) ($nco / 2); // number of segments (including the closing one)
$out = $this->getDefaultSegStyle($styles);
if (
$this->isClosingMode($mode)
&& (($points[($nco - 2)] != $points[0]) || ($points[($nco - 1)] != $points[1]))
) {
// close polygon by adding the first point (x, y) at the end
$points[$nco++] = $points[0];
$points[$nco++] = $points[1];
if (!empty($styles[0])) {
// copy style for the last segment
$styles[($nseg - 1)] = $styles[0];
}
}
// paint the filling
if ($this->isFillingMode($mode)) {
$out .= $this->getBasicPolygon($points, $this->getModeWithoutStroke($mode));
if ($this->isClippingMode($mode)) {
return $out;
}
}
$nco -= 3;
// paint the outline
for ($idx = 0; $idx < $nco; $idx += 2) {
$segid = (int) ($idx / 2);
if (! isset($styles[$segid])) {
$styles[$segid] = [];
}
$out .= $this->getLine(
$points[$idx],
$points[($idx + 1)],
$points[($idx + 2)],
$points[($idx + 3)],
$styles[$segid]
);
}
return $out;
}
/**
* Draws a regular polygon.
*
* @param float $posx Abscissa of center point.
* @param float $posy Ordinate of center point.
* @param float $radius Radius of inscribed circle.
* @param int $sides Number of sides.
* @param float $angle Angle of the orientation (anti-clockwise).
* @param string $mode Mode of rendering. @see getPathPaintOp()
* @param array<StyleDataOpt> $styles Array of styles -
* one style entry for each polygon segment and/or one global "all" entry.
* @param string $cirmode Mode of rendering of the inscribed circle (if any). @see getPathPaintOp()
* @param StyleDataOpt $cirstyle Style of inscribed circle.
*
* @return string PDF command
*/
public function getRegularPolygon(
float $posx,
float $posy,
float $radius,
int $sides,
float $angle = 0,
string $mode = 'S',
array $styles = [],
string $cirmode = '',
array $cirstyle = []
): string {
if ($sides < 3) { // triangle is the minimum polygon
return '';
}
$out = '';
if ($cirmode !== '') {
$out .= $this->getCircle($posx, $posy, $radius, 0, 360, $cirmode, $cirstyle);
}
$points = [];
for ($idx = 0; $idx < $sides; ++$idx) {
$angrad = $this->degToRad($angle + ($idx * 360 / $sides));
$points[] = ($posx + ($radius * sin($angrad)));
$points[] = ($posy + ($radius * cos($angrad)));
}
return $out . $this->getPolygon($points, $mode, $styles);
}
/**
* Draws a star polygon.
*
* @param float $posx Abscissa of center point.
* @param float $posy Ordinate of center point.
* @param float $radius Radius of inscribed circle.
* @param int $nvert Number of vertices.
* @param int $ngaps Number of gaps (if ($ngaps % $nvert = 1) then is a regular polygon).
* @param float $angle Angle oriented (anti-clockwise).
* @param string $mode Mode of rendering. @see getPathPaintOp()
* @param array<StyleDataOpt> $styles Array of styles -
* one style entry for each polygon segment and/or one global "all" entry.
* @param string $cirmode Mode of rendering of the inscribed circle (if any). @see getPathPaintOp()
* @param StyleDataOpt $cirstyle Style of inscribed circle.
*
* @return string PDF command
*
* @SuppressWarnings("PHPMD.ExcessiveParameterList")
*/
public function getStarPolygon(
float $posx,
float $posy,
float $radius,
int $nvert,
int $ngaps,
float $angle = 0,
string $mode = 'S',
array $styles = [],
string $cirmode = '',
array $cirstyle = []
): string {
if ($nvert < 2) {
return '';
}
$out = '';
if ($cirmode !== '') {
$out .= $this->getCircle($posx, $posy, $radius, 0, 360, $cirmode, $cirstyle);
}
$points2 = [];
$visited = [];
for ($idx = 0; $idx < $nvert; ++$idx) {
$angrad = $this->degToRad($angle + ($idx * 360 / $nvert));
$points2[] = $posx + ($radius * sin($angrad));
$points2[] = $posy + ($radius * cos($angrad));
$visited[] = false;
}
$points = [];
$idx = 0;
do {
$points[] = $points2[($idx * 2)];
$points[] = $points2[(($idx * 2) + 1)];
$visited[$idx] = true;
$idx += $ngaps;
$idx %= $nvert;
} while (! $visited[$idx]);
return $out . $this->getPolygon($points, $mode, $styles);
}
/**
* Draws a rectangle with a different style for each segment.
*
* @param float $posx Abscissa of upper-left corner.
* @param float $posy Ordinate of upper-left corner.
* @param float $width Width.
* @param float $height Height.
* @param string $mode Mode of rendering. @see getPathPaintOp()
* @param array<StyleDataOpt> $styles Array of styles -
* one style entry for each side (T,R,B,L) and/or one global "all" entry.
* @return string PDF command
*/
public function getRect(
float $posx,
float $posy,
float $width,
float $height,
string $mode = 'S',
array $styles = []
): string {
$points = [
$posx, $posy,
$posx + $width, $posy,
$posx + $width, $posy + $height,
$posx, $posy + $height,
$posx, $posy,
];
return $this->getPolygon($points, $mode, $styles);
}
/**
* Draws a rounded rectangle.
*
* @param float $posx Abscissa of upper-left corner.
* @param float $posy Ordinate of upper-left corner.
* @param float $width Width.
* @param float $height Height.
* @param float $hrad X-axis radius of the ellipse used to round off the corners of the rectangle.
* @param float $vrad Y-axis radius of the ellipse used to round off the corners of the rectangle.
* @param string $corner Round corners to draw: 0 (square i-corner) or 1 (rounded i-corner) in i-position.
* Positions are int the following order: top right, bottom right, bottom left and
* top left.
* @param string $mode Mode of rendering. @see getPathPaintOp()
* @param StyleDataOpt $style Style.
*
* @return string PDF command
*
* @SuppressWarnings("PHPMD.CyclomaticComplexity")
* @SuppressWarnings("PHPMD.NPathComplexity")
*/
public function getRoundedRect(
float $posx,
float $posy,
float $width,
float $height,
float $hrad,
float $vrad,
string $corner = '1111',
string $mode = 'S',
array $style = [],
): string {
if (($corner === '0000') || (empty($hrad) && empty($vrad))) {
// basic rectangle with straight corners
return $this->getBasicRect($posx, $posy, $width, $height, $mode, $style);
}
$out = $this->getStyleCmd($style);
if ($corner[3] !== '0') {
$out .= $this->getRawPoint(($posx + $hrad), $posy);
} else {
$out .= $this->getRawPoint($posx, $posy);
}
$posxc = ($posx + $width - $hrad);
$posyc = ($posy + $vrad);
$out .= $this->getRawLine($posxc, $posy);
$arc = (4 / 3 * (sqrt(2) - 1));
$harc = ($hrad * $arc);
$varc = ($vrad * $arc);
if ($corner[0] !== '0') {
$out .= $this->getRawCurve(
($posxc + $harc),
($posyc - $vrad),
($posxc + $hrad),
($posyc - $varc),
($posxc + $hrad),
$posyc
);
} else {
$out .= $this->getRawLine(($posx + $width), $posy);
}
$posxc = ($posx + $width - $hrad);
$posyc = ($posy + $height - $vrad);
$out .= $this->getRawLine(($posx + $width), $posyc);
if ($corner[1] !== '0') {
$out .= $this->getRawCurve(
($posxc + $hrad),
($posyc + $varc),
($posxc + $harc),
($posyc + $vrad),
$posxc,
($posyc + $vrad)
);
} else {
$out .= $this->getRawLine(($posx + $width), ($posy + $height));
}
$posxc = ($posx + $hrad);
$posyc = ($posy + $height - $vrad);
$out .= $this->getRawLine($posxc, ($posy + $height));
if ($corner[2] !== '0') {
$out .= $this->getRawCurve(
($posxc - $harc),
($posyc + $vrad),
($posxc - $hrad),
($posyc + $varc),
($posxc - $hrad),
$posyc
);
} else {
$out .= $this->getRawLine($posx, ($posy + $height));
}
$posxc = ($posx + $hrad);
$posyc = ($posy + $vrad);
$out .= $this->getRawLine($posx, $posyc);
if ($corner[3] !== '0') {
$out .= $this->getRawCurve(
($posxc - $hrad),
($posyc - $varc),
($posxc - $harc),
($posyc - $vrad),
$posxc,
($posyc - $vrad)
);
} else {
$out .= $this->getRawLine($posx, $posy);
}
return $out . $this->getPathPaintOp($mode);
}
/**
* Draws an arrow.
*
* @param float $posx0 Abscissa of first point.
* @param float $posy0 Ordinate of first point.
* @param float $posx1 Abscissa of second point (head side).
* @param float $posy1 Ordinate of second point (head side)
* @param int $headmode Arrow head mode:
* 0 = draw only
* head arms; 1 =
* draw closed head
* without filling;
* 2 = closed and
* filled head; 3 =
* filled head.
* @param float $armsize Length of head arms.
* @param int $armangle Angle between an head arm and the arrow shaft.
* @param StyleDataOpt $style Line style to apply.
*
* @return string PDF command
*/
public function getArrow(
float $posx0,
float $posy0,
float $posx1,
float $posy1,
int $headmode = 0,
float $armsize = 5,
int $armangle = 15,
array $style = [],
): string {
// getting arrow direction angle; 0 deg angle is when both arms go along X axis; angle grows clockwise.
$dir_angle = atan2(($posy0 - $posy1), ($posx0 - $posx1));
if ($dir_angle < 0) {
$dir_angle += (2 * self::MPI);
}
$armangle = $this->degToRad($armangle);
$sx1 = $posx1;
$sy1 = $posy1;
if ($headmode > 0) {
// calculate the stopping point for the arrow shaft
$linewidth = 0;
$linewidth = $style['lineWidth'] ?? (float) $this->getLastStyleProperty('lineWidth', $linewidth);
$sx1 = ($posx1 + (($armsize - $linewidth) * cos($dir_angle)));
$sy1 = ($posy1 + (($armsize - $linewidth) * sin($dir_angle)));
}
$out = $this->getStyleCmd($style);
// main arrow line / shaft
$out .= $this->getLine($posx0, $posy0, $sx1, $sy1);
// left arrowhead arm tip
$hxl = ($posx1 + ($armsize * cos($dir_angle + $armangle)));
$hyl = ($posy1 + ($armsize * sin($dir_angle + $armangle)));
// right arrowhead arm tip
$hxr = ($posx1 + ($armsize * cos($dir_angle - $armangle)));
$hyr = ($posy1 + ($armsize * sin($dir_angle - $armangle)));
$modemap = [
0 => 'S',
1 => 's',
2 => 'b',
3 => 'f',
];
$points = [$hxl, $hyl, $posx1, $posy1, $hxr, $hyr];
return $out . $this->getBasicPolygon($points, $modemap[$headmode], $style);
}
/**
* Get a registration mark.
*
* @param float $posx Abscissa of center point.
* @param float $posy Ordinate of center point.
* @param float $rad Radius.
* @param bool $double If true prints two concentric crop marks.
* @param string $color Color.
*
* @return string PDF command
*/
public function getRegistrationMark(
float $posx,
float $posy,
float $rad,
bool $double = false,
string $color = 'all'
): string {
$style = [
'lineWidth' => max((0.5 / $this->kunit), ($rad / 30)),
'lineCap' => 'butt',
'lineJoin' => 'miter',
'miterLimit' => (10.0 / $this->kunit),
'dashArray' => [],
'dashPhase' => 0,
'lineColor' => $color,
'fillColor' => $color,
];
$colobj = $this->pdfColor->getColorObject($color);
if (! $colobj instanceof \Com\Tecnick\Color\Model) {
throw new GraphException('Unknow color: ' . $color);
}
$out = $colobj->getPdfColor()
. $this->getPieSector($posx, $posy, $rad, 90, 180, 'F')
. $this->getPieSector($posx, $posy, $rad, 270, 360, 'F')
. $this->getCircle($posx, $posy, $rad, 0, 360, 'S', [], 8);
if ($double) {
$radi = ($rad * 0.5);
$out .= $colobj->invertColor()->getPdfColor()
. $this->getPieSector($posx, $posy, $radi, 90, 180, 'F')
. $this->getPieSector($posx, $posy, $radi, 270, 360, 'F')
. $this->getCircle($posx, $posy, $radi, 0, 360, 'S', [], 8)
. $colobj->getPdfColor()
. $this->getPieSector($posx, $posy, $radi, 0, 90, 'F')
. $this->getPieSector($posx, $posy, $radi, 180, 270, 'F')
. $this->getCircle($posx, $posy, $radi, 0, 360, 'S', [], 8);
}
return $this->getStartTransform()
. $this->getStyleCmd($style)
. $out
. $this->getStopTransform();
}
/**
* Get a CMYK registration mark.
*
* @param float $posx Abscissa of center point.
* @param float $posy Ordinate of center point.
* @param float $rad Radius.
*
* @return string PDF command
*/
public function getCmykRegistrationMark(float $posx, float $posy, float $rad): string
{
// internal radius
$radi = ($rad * 0.6);
// external radius
$rade = ($rad * 1.3);
// line style for external circle
$style = [
'lineWidth' => max((0.5 / $this->kunit), ($rad / 30)),
'lineCap' => 'butt',
'lineJoin' => 'miter',
'miterLimit' => (10.0 / $this->kunit),
'dashArray' => [],
'dashPhase' => 0,
'lineColor' => 'All',
'fillColor' => '',
];
return $this->getStartTransform()
. (($this->pdfColor->getColorObject('Cyan') instanceof \Com\Tecnick\Color\Model)
? $this->pdfColor->getColorObject('Cyan')->getPdfColor() : '')
. $this->getPieSector($posx, $posy, $radi, 270, 360, 'F')
. (($this->pdfColor->getColorObject('Magenta') instanceof \Com\Tecnick\Color\Model)
? $this->pdfColor->getColorObject('Magenta')->getPdfColor() : '')
. $this->getPieSector($posx, $posy, $radi, 0, 90, 'F')
. (($this->pdfColor->getColorObject('Yellow') instanceof \Com\Tecnick\Color\Model)
? $this->pdfColor->getColorObject('Yellow')->getPdfColor() : '')
. $this->getPieSector($posx, $posy, $radi, 90, 180, 'F')
. (($this->pdfColor->getColorObject('Key') instanceof \Com\Tecnick\Color\Model)
? $this->pdfColor->getColorObject('Key')->getPdfColor() : '')
. $this->getPieSector($posx, $posy, $radi, 180, 270, 'F')
. $this->getStyleCmd($style)
. $this->getCircle($posx, $posy, $rad, 0, 360, 'S', [], 8)
. $this->getLine($posx, ($posy - $rade), $posx, ($posy - $radi))
. $this->getLine($posx, ($posy + $radi), $posx, ($posy + $rade))
. $this->getLine(($posx - $rade), $posy, ($posx - $radi), $posy)
. $this->getLine(($posx + $radi), $posy, ($posx + $rade), $posy)
. $this->getStopTransform();
}
}