mirror of
https://github.com/woo-j/zint.git
synced 2024-12-23 13:33:55 +03:00
5e2044ff2e
encodation in certain cases (and no pessimizations found so far), props lyngklip (BWIPP); fix extended char latching when exactly 3 extended chars at end; count code set C (not digits) in loop deciding when to shift/latch to extended for better estimate AZTEC: return warning if ECC < 5% (due to bit-stuffing when version given); return error if > 22 layers (Zint 26) for Reader Initialisation symbol requested for better error message AZTEC/HANXIN/QRCODE: consolidate different ECC data size tables into one indexed by ECC DBAR_EXP: check for reduced length <= 77 up front for better error message HANXIN: use `malloc()` rather than `z_alloca()` for large binary array QRCODE: `ecc_level` now 0-based (not 1-based) MICROQR: consolidate different version end routines into one `microqr_end()` and use new `microqr_data` table to simplify code MICROPDF417: use table for max codewords per column library: centralize all error messages using new `errtxt()`, `errtxtf()`, `errtxt_adj()` funcs that protect `symbol->errtxt` from overflow, & try to make error messages more consistent thru-out, adding more feedback info to many, & use positional args "%n$" in prep for l10n (maybe); `is_sane/is_sane_lookup()` -> `not_sane/not_sane_lookup()`, returning 1-based position (zero on failure) instead of bool; `long` ints -> plain `int` (except those dealing with `ftell()`, `fread()` etc) as depend on int being 32-bits already GUI: in "grpDATF.ui" use "PlainText" rather than "RichText" for tracker ratio examples as height of text messing up sometimes manual: clarify Codablock-F length maximum & add examples docs: README: pandoc 3.5, Ubuntu 24.04 CMake: use "-Wpedantic" for Clang only as GNU complains about `errtxtf()` positional args "%n$"
361 lines
14 KiB
C
361 lines
14 KiB
C
/* svg.c - Scalable Vector Graphics */
|
|
/*
|
|
libzint - the open source barcode library
|
|
Copyright (C) 2009-2024 Robin Stuart <rstuart114@gmail.com>
|
|
|
|
Redistribution and use in source and binary forms, with or without
|
|
modification, are permitted provided that the following conditions
|
|
are met:
|
|
|
|
1. Redistributions of source code must retain the above copyright
|
|
notice, this list of conditions and the following disclaimer.
|
|
2. Redistributions in binary form must reproduce the above copyright
|
|
notice, this list of conditions and the following disclaimer in the
|
|
documentation and/or other materials provided with the distribution.
|
|
3. Neither the name of the project nor the names of its contributors
|
|
may be used to endorse or promote products derived from this software
|
|
without specific prior written permission.
|
|
|
|
THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND
|
|
ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
|
|
IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
|
|
ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE
|
|
FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
|
|
DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
|
|
OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
|
|
HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
|
|
LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
|
|
OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
|
|
SUCH DAMAGE.
|
|
*/
|
|
/* SPDX-License-Identifier: BSD-3-Clause */
|
|
|
|
#include <errno.h>
|
|
#include <math.h>
|
|
#include <stdio.h>
|
|
|
|
#include "common.h"
|
|
#include "filemem.h"
|
|
#include "output.h"
|
|
#include "fonts/normal_woff2.h"
|
|
#include "fonts/upcean_woff2.h"
|
|
|
|
/* Convert Ultracode rectangle colour to RGB */
|
|
static void svg_pick_colour(const int colour, char colour_code[7]) {
|
|
const int idx = colour >= 1 && colour <= 8 ? colour - 1 : 6 /*black*/;
|
|
static const char rgbs[8][7] = {
|
|
"00ffff", /* 0: Cyan (1) */
|
|
"0000ff", /* 1: Blue (2) */
|
|
"ff00ff", /* 2: Magenta (3) */
|
|
"ff0000", /* 3: Red (4) */
|
|
"ffff00", /* 4: Yellow (5) */
|
|
"00ff00", /* 5: Green (6) */
|
|
"000000", /* 6: Black (7) */
|
|
"ffffff", /* 7: White (8) */
|
|
};
|
|
strcpy(colour_code, rgbs[idx]);
|
|
}
|
|
|
|
/* Convert text to use HTML entity codes */
|
|
static void svg_make_html_friendly(const unsigned char *string, char *html_version) {
|
|
|
|
for (; *string; string++) {
|
|
switch (*string) {
|
|
case '>':
|
|
strcpy(html_version, ">");
|
|
html_version += 4;
|
|
break;
|
|
|
|
case '<':
|
|
strcpy(html_version, "<");
|
|
html_version += 4;
|
|
break;
|
|
|
|
case '&':
|
|
strcpy(html_version, "&");
|
|
html_version += 5;
|
|
break;
|
|
|
|
case '"':
|
|
strcpy(html_version, """);
|
|
html_version += 6;
|
|
break;
|
|
|
|
case '\'':
|
|
strcpy(html_version, "'");
|
|
html_version += 6;
|
|
break;
|
|
|
|
default:
|
|
*html_version++ = *string;
|
|
break;
|
|
}
|
|
}
|
|
|
|
*html_version = '\0';
|
|
}
|
|
|
|
/* Helper to output floating point attribute */
|
|
static void svg_put_fattrib(const char *prefix, const int dp, const float val, struct filemem *fmp) {
|
|
fm_putsf(prefix, dp, val, fmp);
|
|
fm_putc('"', fmp);
|
|
}
|
|
|
|
/* Helper to output opacity attribute attribute and close tag (maybe) */
|
|
static void svg_put_opacity_close(const unsigned char alpha, const float val, const int close, struct filemem *fmp) {
|
|
if (alpha != 0xff) {
|
|
svg_put_fattrib(" opacity=\"", 3, val, fmp);
|
|
}
|
|
if (close) {
|
|
fm_putc('/', fmp);
|
|
}
|
|
fm_puts(">\n", fmp);
|
|
}
|
|
|
|
INTERNAL int svg_plot(struct zint_symbol *symbol) {
|
|
static const char normal_font_family[] = "Arimo";
|
|
static const char upcean_font_family[] = "OCRB";
|
|
struct filemem fm;
|
|
struct filemem *const fmp = &fm;
|
|
float previous_diameter;
|
|
float radius, half_radius, half_sqrt3_radius;
|
|
int i;
|
|
char fgcolour_string[7];
|
|
char bgcolour_string[7];
|
|
unsigned char fgred, fggreen, fgblue, fg_alpha;
|
|
unsigned char bgred, bggreen, bgblue, bg_alpha;
|
|
float fg_alpha_opacity = 0.0f, bg_alpha_opacity = 0.0f; /* Suppress `-Wmaybe-uninitialized` */
|
|
int bold;
|
|
|
|
struct zint_vector_rect *rect;
|
|
struct zint_vector_hexagon *hex;
|
|
struct zint_vector_circle *circle;
|
|
struct zint_vector_string *string;
|
|
|
|
char colour_code[7];
|
|
int len, html_len;
|
|
|
|
const int upcean = is_upcean(symbol->symbology);
|
|
char *html_string;
|
|
|
|
(void) out_colour_get_rgb(symbol->fgcolour, &fgred, &fggreen, &fgblue, &fg_alpha);
|
|
if (fg_alpha != 0xff) {
|
|
fg_alpha_opacity = fg_alpha / 255.0f;
|
|
}
|
|
sprintf(fgcolour_string, "%02X%02X%02X", fgred, fggreen, fgblue);
|
|
(void) out_colour_get_rgb(symbol->bgcolour, &bgred, &bggreen, &bgblue, &bg_alpha);
|
|
if (bg_alpha != 0xff) {
|
|
bg_alpha_opacity = bg_alpha / 255.0f;
|
|
}
|
|
sprintf(bgcolour_string, "%02X%02X%02X", bgred, bggreen, bgblue);
|
|
|
|
len = (int) ustrlen(symbol->text);
|
|
html_len = len + 1;
|
|
|
|
for (i = 0; i < len; i++) {
|
|
switch (symbol->text[i]) {
|
|
case '>':
|
|
case '<':
|
|
case '"':
|
|
case '&':
|
|
case '\'':
|
|
html_len += 6;
|
|
break;
|
|
}
|
|
}
|
|
if (symbol->output_options & EANUPC_GUARD_WHITESPACE) {
|
|
html_len += 12; /* Allow for "<" & ">" */
|
|
}
|
|
|
|
html_string = (char *) z_alloca(html_len);
|
|
|
|
/* Check for no created vector set */
|
|
/* E-Mail Christian Schmitz 2019-09-10: reason unknown Ticket #164 */
|
|
if (symbol->vector == NULL) {
|
|
return errtxt(ZINT_ERROR_INVALID_DATA, symbol, 681, "Vector header NULL");
|
|
}
|
|
if (!fm_open(fmp, symbol, "w")) {
|
|
return errtxtf(ZINT_ERROR_FILE_ACCESS, symbol, 680, "Could not open SVG output file (%1$d: %2$s)", fmp->err,
|
|
strerror(fmp->err));
|
|
}
|
|
|
|
/* Start writing the header */
|
|
fm_puts("<?xml version=\"1.0\" standalone=\"no\"?>\n"
|
|
"<!DOCTYPE svg PUBLIC \"-//W3C//DTD SVG 1.1//EN\" \"http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd\">\n",
|
|
fmp);
|
|
fm_printf(fmp, "<svg width=\"%d\" height=\"%d\" version=\"1.1\" xmlns=\"http://www.w3.org/2000/svg\">\n",
|
|
(int) ceilf(symbol->vector->width), (int) ceilf(symbol->vector->height));
|
|
fm_puts(" <desc>Zint Generated Symbol</desc>\n", fmp);
|
|
if ((symbol->output_options & EMBED_VECTOR_FONT) && symbol->vector->strings) {
|
|
/* Split into `puts()` rather than one very large `printf()` */
|
|
fm_printf(fmp, " <style>@font-face {font-family:\"%s\"; src:url(data:font/woff2;base64,",
|
|
upcean ? "OCRB" : "Arimo");
|
|
fm_puts(upcean ? upcean_woff2 : normal_woff2, fmp);
|
|
fm_puts(");}</style>\n", fmp);
|
|
}
|
|
fm_printf(fmp, " <g id=\"barcode\" fill=\"#%s\">\n", fgcolour_string);
|
|
|
|
if (bg_alpha != 0) {
|
|
fm_printf(fmp, " <rect x=\"0\" y=\"0\" width=\"%d\" height=\"%d\" fill=\"#%s\"",
|
|
(int) ceilf(symbol->vector->width), (int) ceilf(symbol->vector->height), bgcolour_string);
|
|
svg_put_opacity_close(bg_alpha, bg_alpha_opacity, 1 /*close*/, fmp);
|
|
}
|
|
|
|
if (symbol->vector->rectangles) {
|
|
int current_colour = 0;
|
|
rect = symbol->vector->rectangles;
|
|
fm_puts(" <path d=\"", fmp);
|
|
while (rect) {
|
|
if (current_colour && rect->colour != current_colour) {
|
|
fm_putc('"', fmp);
|
|
if (current_colour != -1) {
|
|
svg_pick_colour(current_colour, colour_code);
|
|
fm_printf(fmp, " fill=\"#%s\"", colour_code);
|
|
}
|
|
svg_put_opacity_close(fg_alpha, fg_alpha_opacity, 1 /*close*/, fmp);
|
|
fm_puts(" <path d=\"", fmp);
|
|
}
|
|
current_colour = rect->colour;
|
|
fm_putsf("M", 2, rect->x, fmp);
|
|
fm_putsf(" ", 2, rect->y, fmp);
|
|
fm_putsf("h", 2, rect->width, fmp);
|
|
fm_putsf("v", 2, rect->height, fmp);
|
|
fm_putsf("h-", 2, rect->width, fmp);
|
|
fm_puts("Z", fmp);
|
|
rect = rect->next;
|
|
}
|
|
fm_putc('"', fmp);
|
|
if (current_colour != -1) {
|
|
svg_pick_colour(current_colour, colour_code);
|
|
fm_printf(fmp, " fill=\"#%s\"", colour_code);
|
|
}
|
|
svg_put_opacity_close(fg_alpha, fg_alpha_opacity, 1 /*close*/, fmp);
|
|
}
|
|
|
|
if (symbol->vector->hexagons) {
|
|
previous_diameter = radius = half_radius = half_sqrt3_radius = 0.0f;
|
|
hex = symbol->vector->hexagons;
|
|
fm_puts(" <path d=\"", fmp);
|
|
while (hex) {
|
|
if (previous_diameter != hex->diameter) {
|
|
previous_diameter = hex->diameter;
|
|
radius = 0.5f * previous_diameter;
|
|
half_radius = 0.25f * previous_diameter;
|
|
half_sqrt3_radius = 0.43301270189221932338f * previous_diameter;
|
|
}
|
|
if ((hex->rotation == 0) || (hex->rotation == 180)) {
|
|
fm_putsf("M", 2, hex->x, fmp);
|
|
fm_putsf(" ", 2, hex->y + radius, fmp);
|
|
fm_putsf("L", 2, hex->x + half_sqrt3_radius, fmp);
|
|
fm_putsf(" ", 2, hex->y + half_radius, fmp);
|
|
fm_putsf("L", 2, hex->x + half_sqrt3_radius, fmp);
|
|
fm_putsf(" ", 2, hex->y - half_radius, fmp);
|
|
fm_putsf("L", 2, hex->x, fmp);
|
|
fm_putsf(" ", 2, hex->y - radius, fmp);
|
|
fm_putsf("L", 2, hex->x - half_sqrt3_radius, fmp);
|
|
fm_putsf(" ", 2, hex->y - half_radius, fmp);
|
|
fm_putsf("L", 2, hex->x - half_sqrt3_radius, fmp);
|
|
fm_putsf(" ", 2, hex->y + half_radius, fmp);
|
|
} else {
|
|
fm_putsf("M", 2, hex->x - radius, fmp);
|
|
fm_putsf(" ", 2, hex->y, fmp);
|
|
fm_putsf("L", 2, hex->x - half_radius, fmp);
|
|
fm_putsf(" ", 2, hex->y + half_sqrt3_radius, fmp);
|
|
fm_putsf("L", 2, hex->x + half_radius, fmp);
|
|
fm_putsf(" ", 2, hex->y + half_sqrt3_radius, fmp);
|
|
fm_putsf("L", 2, hex->x + radius, fmp);
|
|
fm_putsf(" ", 2, hex->y, fmp);
|
|
fm_putsf("L", 2, hex->x + half_radius, fmp);
|
|
fm_putsf(" ", 2, hex->y - half_sqrt3_radius, fmp);
|
|
fm_putsf("L", 2, hex->x - half_radius, fmp);
|
|
fm_putsf(" ", 2, hex->y - half_sqrt3_radius, fmp);
|
|
}
|
|
fm_putc('Z', fmp);
|
|
hex = hex->next;
|
|
}
|
|
fm_putc('"', fmp);
|
|
svg_put_opacity_close(fg_alpha, fg_alpha_opacity, 1 /*close*/, fmp);
|
|
}
|
|
|
|
previous_diameter = radius = 0.0f;
|
|
circle = symbol->vector->circles;
|
|
while (circle) {
|
|
if (previous_diameter != circle->diameter) {
|
|
previous_diameter = circle->diameter;
|
|
radius = 0.5f * previous_diameter;
|
|
}
|
|
fm_puts(" <circle", fmp);
|
|
svg_put_fattrib(" cx=\"", 2, circle->x, fmp);
|
|
svg_put_fattrib(" cy=\"", 2, circle->y, fmp);
|
|
svg_put_fattrib(" r=\"", circle->width ? 3 : 2, radius, fmp);
|
|
|
|
if (circle->colour) { /* Legacy - no longer used */
|
|
if (circle->width) {
|
|
fm_printf(fmp, " stroke=\"#%s\"", bgcolour_string);
|
|
svg_put_fattrib(" stroke-width=\"", 3, circle->width, fmp);
|
|
fm_puts(" fill=\"none\"", fmp);
|
|
} else {
|
|
fm_printf(fmp, " fill=\"#%s\"", bgcolour_string);
|
|
}
|
|
/* This doesn't work how the user is likely to expect - more work needed! */
|
|
svg_put_opacity_close(bg_alpha, bg_alpha_opacity, 1 /*close*/, fmp);
|
|
} else {
|
|
if (circle->width) {
|
|
fm_printf(fmp, " stroke=\"#%s\"", fgcolour_string);
|
|
svg_put_fattrib(" stroke-width=\"", 3, circle->width, fmp);
|
|
fm_puts(" fill=\"none\"", fmp);
|
|
}
|
|
svg_put_opacity_close(fg_alpha, fg_alpha_opacity, 1 /*close*/, fmp);
|
|
}
|
|
circle = circle->next;
|
|
}
|
|
|
|
bold = (symbol->output_options & BOLD_TEXT) && !upcean;
|
|
string = symbol->vector->strings;
|
|
while (string) {
|
|
const char *const halign = string->halign == 2 ? "end" : string->halign == 1 ? "start" : "middle";
|
|
fm_puts(" <text", fmp);
|
|
svg_put_fattrib(" x=\"", 2, string->x, fmp);
|
|
svg_put_fattrib(" y=\"", 2, string->y, fmp);
|
|
fm_printf(fmp, " text-anchor=\"%s\"", halign);
|
|
if (upcean) {
|
|
fm_printf(fmp, " font-family=\"%s, monospace\"", upcean_font_family);
|
|
} else {
|
|
fm_printf(fmp, " font-family=\"%s, Arial, sans-serif\"", normal_font_family);
|
|
}
|
|
svg_put_fattrib(" font-size=\"", 1, string->fsize, fmp);
|
|
if (bold) {
|
|
fm_puts(" font-weight=\"bold\"", fmp);
|
|
}
|
|
if (string->rotation != 0) {
|
|
fm_printf(fmp, " transform=\"rotate(%d", string->rotation);
|
|
fm_putsf(",", 2, string->x, fmp);
|
|
fm_putsf(",", 2, string->y, fmp);
|
|
fm_puts(")\"", fmp);
|
|
}
|
|
svg_put_opacity_close(fg_alpha, fg_alpha_opacity, 0 /*close*/, fmp);
|
|
svg_make_html_friendly(string->text, html_string);
|
|
fm_printf(fmp, " %s\n", html_string);
|
|
fm_puts(" </text>\n", fmp);
|
|
string = string->next;
|
|
}
|
|
|
|
fm_puts(" </g>\n"
|
|
"</svg>\n", fmp);
|
|
|
|
if (fm_error(fmp)) {
|
|
errtxtf(0, symbol, 682, "Incomplete write to SVG output (%1$d: %2$s)", fmp->err, strerror(fmp->err));
|
|
(void) fm_close(fmp, symbol);
|
|
return ZINT_ERROR_FILE_WRITE;
|
|
}
|
|
|
|
if (!fm_close(fmp, symbol)) {
|
|
return errtxtf(ZINT_ERROR_FILE_WRITE, symbol, 684, "Failure on closing SVG output file (%1$d: %2$s)",
|
|
fmp->err, strerror(fmp->err));
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
/* vim: set ts=4 sw=4 et : */
|