mirror of
https://github.com/fralx/LimeReport.git
synced 2025-11-03 22:51:26 +03:00
909 lines
34 KiB
C
909 lines
34 KiB
C
/* library.c - external functions of libzint
|
|
|
|
libzint - the open source barcode library
|
|
Copyright (C) 2009 Robin Stuart <robin@zint.org.uk>
|
|
|
|
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 3 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.,
|
|
51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
|
|
*/
|
|
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
#include <errno.h>
|
|
#ifdef _MSC_VER
|
|
#include <malloc.h>
|
|
#endif
|
|
#include "common.h"
|
|
#include "gs1.h"
|
|
|
|
#define TECHNETIUM "0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ-. $/+%"
|
|
|
|
struct zint_symbol *ZBarcode_Create()
|
|
{
|
|
struct zint_symbol *symbol;
|
|
int i;
|
|
|
|
symbol = (struct zint_symbol*)malloc(sizeof(*symbol));
|
|
if (!symbol) return NULL;
|
|
|
|
memset(symbol, 0, sizeof(*symbol));
|
|
symbol->symbology = BARCODE_CODE128;
|
|
symbol->height = 0;
|
|
symbol->whitespace_width = 0;
|
|
symbol->border_width = 0;
|
|
symbol->output_options = 0;
|
|
symbol->rows = 0;
|
|
symbol->width = 0;
|
|
strcpy(symbol->fgcolour, "000000");
|
|
strcpy(symbol->bgcolour, "ffffff");
|
|
strcpy(symbol->outfile, "");
|
|
symbol->scale = 1.0;
|
|
symbol->option_1 = -1;
|
|
symbol->option_2 = 0;
|
|
symbol->option_3 = 928; // PDF_MAX
|
|
symbol->show_hrt = 1; // Show human readable text
|
|
symbol->input_mode = DATA_MODE;
|
|
strcpy(symbol->primary, "");
|
|
memset(&(symbol->encoded_data[0][0]),0,sizeof(symbol->encoded_data));
|
|
for(i = 0; i < 178; i++) {
|
|
symbol->row_height[i] = 0;
|
|
}
|
|
symbol->bitmap = NULL;
|
|
symbol->bitmap_width = 0;
|
|
symbol->bitmap_height = 0;
|
|
return symbol;
|
|
}
|
|
|
|
void ZBarcode_Clear(struct zint_symbol *symbol)
|
|
{
|
|
int i, j;
|
|
|
|
for(i = 0; i < symbol->rows; i++) {
|
|
for(j = 0; j < symbol->width; j++) {
|
|
unset_module(symbol, i, j);
|
|
}
|
|
}
|
|
symbol->rows = 0;
|
|
symbol->width = 0;
|
|
symbol->text[0] = '\0';
|
|
symbol->errtxt[0] = '\0';
|
|
if (symbol->bitmap != NULL)
|
|
free(symbol->bitmap);
|
|
symbol->bitmap = NULL;
|
|
symbol->bitmap_width = 0;
|
|
symbol->bitmap_height = 0;
|
|
}
|
|
|
|
void ZBarcode_Delete(struct zint_symbol *symbol)
|
|
{
|
|
if (symbol->bitmap != NULL)
|
|
free(symbol->bitmap);
|
|
|
|
// If there is a rendered version, ensure it's memory is released
|
|
if (symbol->rendered != NULL) {
|
|
struct zint_render_line *line, *l;
|
|
struct zint_render_string *string, *s;
|
|
|
|
// Free lines
|
|
line = symbol->rendered->lines;
|
|
while(line) {
|
|
l = line;
|
|
line = line->next;
|
|
free(l);
|
|
}
|
|
// Free Strings
|
|
string = symbol->rendered->strings;
|
|
while (string) {
|
|
s = string;
|
|
string = string->next;
|
|
free(s->text);
|
|
free(s);
|
|
}
|
|
|
|
// Free Render
|
|
free(symbol->rendered);
|
|
}
|
|
free(symbol);
|
|
}
|
|
|
|
extern int eanx(struct zint_symbol *symbol, unsigned char source[], int length); /* EAN system barcodes */
|
|
extern int c39(struct zint_symbol *symbol, unsigned char source[], int length); /* Code 3 from 9 (or Code 39) */
|
|
extern int pharmazentral(struct zint_symbol *symbol, unsigned char source[], int length); /* Pharmazentral Nummer (PZN) */
|
|
extern int ec39(struct zint_symbol *symbol, unsigned char source[], int length); /* Extended Code 3 from 9 (or Code 39+) */
|
|
extern int codabar(struct zint_symbol *symbol, unsigned char source[], int length); /* Codabar - a simple substitution cipher */
|
|
extern int matrix_two_of_five(struct zint_symbol *symbol, unsigned char source[], int length); /* Code 2 of 5 Standard (& Matrix) */
|
|
extern int industrial_two_of_five(struct zint_symbol *symbol, unsigned char source[], int length); /* Code 2 of 5 Industrial */
|
|
extern int iata_two_of_five(struct zint_symbol *symbol, unsigned char source[], int length); /* Code 2 of 5 IATA */
|
|
extern int interleaved_two_of_five(struct zint_symbol *symbol, unsigned char source[], int length); /* Code 2 of 5 Interleaved */
|
|
extern int logic_two_of_five(struct zint_symbol *symbol, unsigned char source[], int length); /* Code 2 of 5 Data Logic */
|
|
extern int itf14(struct zint_symbol *symbol, unsigned char source[], int length); /* ITF-14 */
|
|
extern int dpleit(struct zint_symbol *symbol, unsigned char source[], int length); /* Deutsche Post Leitcode */
|
|
extern int dpident(struct zint_symbol *symbol, unsigned char source[], int length); /* Deutsche Post Identcode */
|
|
extern int c93(struct zint_symbol *symbol, unsigned char source[], int length); /* Code 93 - a re-working of Code 39+, generates 2 check digits */
|
|
extern int code_128(struct zint_symbol *symbol, unsigned char source[], int length); /* Code 128 and NVE-18 */
|
|
extern int ean_128(struct zint_symbol *symbol, unsigned char source[], int length); /* EAN-128 (GS1-128) */
|
|
extern int code_11(struct zint_symbol *symbol, unsigned char source[], int length); /* Code 11 */
|
|
extern int msi_handle(struct zint_symbol *symbol, unsigned char source[], int length); /* MSI Plessey */
|
|
extern int telepen(struct zint_symbol *symbol, unsigned char source[], int length); /* Telepen ASCII */
|
|
extern int telepen_num(struct zint_symbol *symbol, unsigned char source[], int length); /* Telepen Numeric */
|
|
extern int plessey(struct zint_symbol *symbol, unsigned char source[], int length); /* Plessey Code */
|
|
extern int pharma_one(struct zint_symbol *symbol, unsigned char source[], int length); /* Pharmacode One Track */
|
|
extern int flattermarken(struct zint_symbol *symbol, unsigned char source[], int length); /* Flattermarken */
|
|
extern int fim(struct zint_symbol *symbol, unsigned char source[], int length); /* Facing Identification Mark */
|
|
extern int pharma_two(struct zint_symbol *symbol, unsigned char source[], int length); /* Pharmacode Two Track */
|
|
extern int post_plot(struct zint_symbol *symbol, unsigned char source[], int length); /* Postnet */
|
|
extern int planet_plot(struct zint_symbol *symbol, unsigned char source[], int length); /* PLANET */
|
|
extern int imail(struct zint_symbol *symbol, unsigned char source[], int length); /* Intelligent Mail (aka USPS OneCode) */
|
|
extern int royal_plot(struct zint_symbol *symbol, unsigned char source[], int length); /* RM4SCC */
|
|
extern int australia_post(struct zint_symbol *symbol, unsigned char source[], int length); /* Australia Post 4-state */
|
|
extern int code16k(struct zint_symbol *symbol, unsigned char source[], int length); /* Code 16k */
|
|
extern int pdf417enc(struct zint_symbol *symbol, unsigned char source[], int length); /* PDF417 */
|
|
extern int dmatrix(struct zint_symbol *symbol, unsigned char source[], int length); /* Data Matrix (IEC16022) */
|
|
extern int qr_code(struct zint_symbol *symbol, unsigned char source[], int length); /* QR Code */
|
|
extern int micro_pdf417(struct zint_symbol *symbol, unsigned char chaine[], int length); /* Micro PDF417 */
|
|
extern int maxicode(struct zint_symbol *symbol, unsigned char source[], int length); /* Maxicode */
|
|
extern int rss14(struct zint_symbol *symbol, unsigned char source[], int length); /* RSS-14 */
|
|
extern int rsslimited(struct zint_symbol *symbol, unsigned char source[], int length); /* RSS Limited */
|
|
extern int rssexpanded(struct zint_symbol *symbol, unsigned char source[], int length); /* RSS Expanded */
|
|
extern int composite(struct zint_symbol *symbol, unsigned char source[], int length); /* Composite Symbology */
|
|
extern int kix_code(struct zint_symbol *symbol, unsigned char source[], int length); /* TNT KIX Code */
|
|
extern int aztec(struct zint_symbol *symbol, unsigned char source[], int length); /* Aztec Code */
|
|
extern int code32(struct zint_symbol *symbol, unsigned char source[], int length); /* Italian Pharmacode */
|
|
extern int daft_code(struct zint_symbol *symbol, unsigned char source[], int length); /* DAFT Code */
|
|
extern int ean_14(struct zint_symbol *symbol, unsigned char source[], int length); /* EAN-14 */
|
|
extern int nve_18(struct zint_symbol *symbol, unsigned char source[], int length); /* NVE-18 */
|
|
extern int microqr(struct zint_symbol *symbol, unsigned char source[], int length); /* Micro QR Code */
|
|
extern int aztec_runes(struct zint_symbol *symbol, unsigned char source[], int length); /* Aztec Runes */
|
|
extern int korea_post(struct zint_symbol *symbol, unsigned char source[], int length); /* Korea Post */
|
|
extern int japan_post(struct zint_symbol *symbol, unsigned char source[], int length); /* Japanese Post */
|
|
extern int code_49(struct zint_symbol *symbol, unsigned char source[], int length); /* Code 49 */
|
|
extern int channel_code(struct zint_symbol *symbol, unsigned char source[], int length); /* Channel Code */
|
|
extern int code_one(struct zint_symbol *symbol, unsigned char source[], int length); /* Code One */
|
|
extern int grid_matrix(struct zint_symbol *symbol, unsigned char source[], int length); /* Grid Matrix */
|
|
|
|
#ifndef NO_PNG
|
|
extern int png_handle(struct zint_symbol *symbol, int rotate_angle);
|
|
#endif
|
|
|
|
extern int render_plot(struct zint_symbol *symbol, float width, float height);
|
|
|
|
extern int bmp_handle(struct zint_symbol *symbol, int rotate_angle);
|
|
extern int ps_plot(struct zint_symbol *symbol);
|
|
extern int svg_plot(struct zint_symbol *symbol);
|
|
|
|
void error_tag(char error_string[], int error_number)
|
|
{
|
|
char error_buffer[100];
|
|
|
|
if(error_number != 0) {
|
|
strcpy(error_buffer, error_string);
|
|
|
|
if(error_number > 4) {
|
|
strcpy(error_string, "error: ");
|
|
} else {
|
|
strcpy(error_string, "warning: ");
|
|
}
|
|
|
|
concat(error_string, error_buffer);
|
|
}
|
|
}
|
|
|
|
int dump_plot(struct zint_symbol *symbol)
|
|
{
|
|
FILE *f;
|
|
int i, r;
|
|
|
|
if(symbol->output_options & BARCODE_STDOUT) {
|
|
f = stdout;
|
|
} else {
|
|
f = fopen(symbol->outfile, "w");
|
|
if(!f) {
|
|
strcpy(symbol->errtxt, "Could not open output file");
|
|
return ERROR_FILE_ACCESS;
|
|
}
|
|
}
|
|
|
|
fputs("[\n", f);
|
|
for (r = 0; r < symbol->rows; r++) {
|
|
fputs(" [ ", f);
|
|
for (i = 0; i < symbol->width; i++) {
|
|
fputs(module_is_set(symbol, r, i) ? "1 " : "0 ", f);
|
|
}
|
|
fputs("]\n", f);
|
|
}
|
|
fputs("]\n", f);
|
|
|
|
fclose(f);
|
|
|
|
return 0;
|
|
}
|
|
|
|
int hibc(struct zint_symbol *symbol, unsigned char source[], int length)
|
|
{
|
|
int counter, error_number, i;
|
|
char to_process[40], temp[2], check_digit;
|
|
|
|
if(length > 36) {
|
|
strcpy(symbol->errtxt, "Data too long for HIBC LIC");
|
|
return ERROR_TOO_LONG;
|
|
}
|
|
to_upper(source);
|
|
error_number = is_sane(TECHNETIUM , source, length);
|
|
if(error_number == ERROR_INVALID_DATA1) {
|
|
strcpy(symbol->errtxt, "Invalid characters in data");
|
|
return error_number;
|
|
}
|
|
|
|
strcpy(to_process, "+");
|
|
counter = 41;
|
|
for(i = 0; i < length; i++) {
|
|
counter += posn(TECHNETIUM, source[i]);
|
|
}
|
|
counter = counter % 43;
|
|
|
|
if(counter < 10) {
|
|
check_digit = itoc(counter);
|
|
} else {
|
|
if(counter < 36) {
|
|
check_digit = (counter - 10) + 'A';
|
|
} else {
|
|
switch(counter) {
|
|
case 36: check_digit = '-'; break;
|
|
case 37: check_digit = '.'; break;
|
|
case 38: check_digit = ' '; break;
|
|
case 39: check_digit = '$'; break;
|
|
case 40: check_digit = '/'; break;
|
|
case 41: check_digit = '+'; break;
|
|
case 42: check_digit = '%'; break;
|
|
default: check_digit = ' '; break; /* Keep compiler happy */
|
|
}
|
|
}
|
|
}
|
|
|
|
temp[0] = check_digit;
|
|
temp[1] = '\0';
|
|
|
|
concat(to_process, (char *)source);
|
|
concat(to_process, temp);
|
|
length = strlen(to_process);
|
|
|
|
switch(symbol->symbology) {
|
|
case BARCODE_HIBC_128:
|
|
error_number = code_128(symbol, (unsigned char *)to_process, length);
|
|
ustrcpy(symbol->text, (unsigned char*)"*");
|
|
uconcat(symbol->text, (unsigned char*)to_process);
|
|
uconcat(symbol->text, (unsigned char*)"*");
|
|
break;
|
|
case BARCODE_HIBC_39:
|
|
symbol->option_2 = 0;
|
|
error_number = c39(symbol, (unsigned char *)to_process, length);
|
|
ustrcpy(symbol->text, (unsigned char*)"*");
|
|
uconcat(symbol->text, (unsigned char*)to_process);
|
|
uconcat(symbol->text, (unsigned char*)"*");
|
|
break;
|
|
case BARCODE_HIBC_DM:
|
|
error_number = dmatrix(symbol, (unsigned char *)to_process, length);
|
|
break;
|
|
case BARCODE_HIBC_QR:
|
|
error_number = qr_code(symbol, (unsigned char *)to_process, length);
|
|
break;
|
|
case BARCODE_HIBC_PDF:
|
|
error_number = pdf417enc(symbol, (unsigned char *)to_process, length);
|
|
break;
|
|
case BARCODE_HIBC_MICPDF:
|
|
error_number = micro_pdf417(symbol, (unsigned char *)to_process, length);
|
|
break;
|
|
case BARCODE_HIBC_AZTEC:
|
|
error_number = aztec(symbol, (unsigned char *)to_process, length);
|
|
break;
|
|
}
|
|
|
|
return error_number;
|
|
}
|
|
|
|
int gs1_compliant(int symbology)
|
|
{
|
|
/* Returns 1 if symbology supports GS1 data */
|
|
|
|
int result = 0;
|
|
|
|
switch(symbology) {
|
|
case BARCODE_EAN128:
|
|
case BARCODE_RSS_EXP:
|
|
case BARCODE_RSS_EXPSTACK:
|
|
case BARCODE_EANX_CC:
|
|
case BARCODE_EAN128_CC:
|
|
case BARCODE_RSS14_CC:
|
|
case BARCODE_RSS_LTD_CC:
|
|
case BARCODE_RSS_EXP_CC:
|
|
case BARCODE_UPCA_CC:
|
|
case BARCODE_UPCE_CC:
|
|
case BARCODE_RSS14STACK_CC:
|
|
case BARCODE_RSS14_OMNI_CC:
|
|
case BARCODE_RSS_EXPSTACK_CC:
|
|
case BARCODE_CODE16K:
|
|
case BARCODE_AZTEC:
|
|
case BARCODE_DATAMATRIX:
|
|
case BARCODE_CODEONE:
|
|
case BARCODE_CODE49:
|
|
case BARCODE_QRCODE:
|
|
result = 1;
|
|
break;
|
|
}
|
|
|
|
return result;
|
|
}
|
|
|
|
int ZBarcode_ValidID(int symbol_id)
|
|
{
|
|
/* Checks whether a symbology is supported */
|
|
|
|
int result = 0;
|
|
|
|
switch(symbol_id) {
|
|
case BARCODE_CODE11:
|
|
case BARCODE_C25MATRIX:
|
|
case BARCODE_C25INTER:
|
|
case BARCODE_C25IATA:
|
|
case BARCODE_C25LOGIC:
|
|
case BARCODE_C25IND:
|
|
case BARCODE_CODE39:
|
|
case BARCODE_EXCODE39:
|
|
case BARCODE_EANX:
|
|
case BARCODE_EAN128:
|
|
case BARCODE_CODABAR:
|
|
case BARCODE_CODE128:
|
|
case BARCODE_DPLEIT:
|
|
case BARCODE_DPIDENT:
|
|
case BARCODE_CODE16K:
|
|
case BARCODE_CODE49:
|
|
case BARCODE_CODE93:
|
|
case BARCODE_FLAT:
|
|
case BARCODE_RSS14:
|
|
case BARCODE_RSS_LTD:
|
|
case BARCODE_RSS_EXP:
|
|
case BARCODE_TELEPEN:
|
|
case BARCODE_UPCA:
|
|
case BARCODE_UPCE:
|
|
case BARCODE_POSTNET:
|
|
case BARCODE_MSI_PLESSEY:
|
|
case BARCODE_FIM:
|
|
case BARCODE_LOGMARS:
|
|
case BARCODE_PHARMA:
|
|
case BARCODE_PZN:
|
|
case BARCODE_PHARMA_TWO:
|
|
case BARCODE_PDF417:
|
|
case BARCODE_PDF417TRUNC:
|
|
case BARCODE_MAXICODE:
|
|
case BARCODE_QRCODE:
|
|
case BARCODE_CODE128B:
|
|
case BARCODE_AUSPOST:
|
|
case BARCODE_AUSREPLY:
|
|
case BARCODE_AUSROUTE:
|
|
case BARCODE_AUSREDIRECT:
|
|
case BARCODE_ISBNX:
|
|
case BARCODE_RM4SCC:
|
|
case BARCODE_DATAMATRIX:
|
|
case BARCODE_EAN14:
|
|
case BARCODE_NVE18:
|
|
case BARCODE_JAPANPOST:
|
|
case BARCODE_KOREAPOST:
|
|
case BARCODE_RSS14STACK:
|
|
case BARCODE_RSS14STACK_OMNI:
|
|
case BARCODE_RSS_EXPSTACK:
|
|
case BARCODE_PLANET:
|
|
case BARCODE_MICROPDF417:
|
|
case BARCODE_ONECODE:
|
|
case BARCODE_PLESSEY:
|
|
case BARCODE_TELEPEN_NUM:
|
|
case BARCODE_ITF14:
|
|
case BARCODE_KIX:
|
|
case BARCODE_AZTEC:
|
|
case BARCODE_DAFT:
|
|
case BARCODE_MICROQR:
|
|
case BARCODE_HIBC_128:
|
|
case BARCODE_HIBC_39:
|
|
case BARCODE_HIBC_DM:
|
|
case BARCODE_HIBC_QR:
|
|
case BARCODE_HIBC_PDF:
|
|
case BARCODE_HIBC_MICPDF:
|
|
case BARCODE_HIBC_AZTEC:
|
|
case BARCODE_AZRUNE:
|
|
case BARCODE_CODE32:
|
|
case BARCODE_EANX_CC:
|
|
case BARCODE_EAN128_CC:
|
|
case BARCODE_RSS14_CC:
|
|
case BARCODE_RSS_LTD_CC:
|
|
case BARCODE_RSS_EXP_CC:
|
|
case BARCODE_UPCA_CC:
|
|
case BARCODE_UPCE_CC:
|
|
case BARCODE_RSS14STACK_CC:
|
|
case BARCODE_RSS14_OMNI_CC:
|
|
case BARCODE_RSS_EXPSTACK_CC:
|
|
case BARCODE_CHANNEL:
|
|
case BARCODE_CODEONE:
|
|
case BARCODE_GRIDMATRIX:
|
|
result = 1;
|
|
break;
|
|
}
|
|
|
|
return result;
|
|
}
|
|
|
|
int extended_charset(struct zint_symbol *symbol, unsigned char *source, int length)
|
|
{
|
|
int error_number = 0;
|
|
|
|
/* These are the "elite" standards which can support multiple character sets */
|
|
switch(symbol->symbology) {
|
|
case BARCODE_QRCODE: error_number = qr_code(symbol, source, length); break;
|
|
case BARCODE_MICROQR: error_number = microqr(symbol, source, length); break;
|
|
case BARCODE_GRIDMATRIX: error_number = grid_matrix(symbol, source, length); break;
|
|
}
|
|
|
|
return error_number;
|
|
}
|
|
|
|
int reduced_charset(struct zint_symbol *symbol, unsigned char *source, int length)
|
|
{
|
|
/* These are the "norm" standards which only support Latin-1 at most */
|
|
int error_number = 0;
|
|
|
|
#ifndef _MSC_VER
|
|
unsigned char preprocessed[length + 1];
|
|
#else
|
|
unsigned char* preprocessed = (unsigned char*)_alloca(length + 1);
|
|
#endif
|
|
|
|
if(symbol->symbology == BARCODE_CODE16K) {
|
|
symbol->whitespace_width = 16;
|
|
symbol->border_width = 2;
|
|
symbol->output_options = BARCODE_BIND;
|
|
}
|
|
|
|
if(symbol->symbology == BARCODE_ITF14) {
|
|
symbol->whitespace_width = 20;
|
|
symbol->border_width = 8;
|
|
symbol->output_options = BARCODE_BOX;
|
|
}
|
|
|
|
switch(symbol->input_mode) {
|
|
case DATA_MODE:
|
|
case GS1_MODE:
|
|
memcpy(preprocessed, source, length);
|
|
preprocessed[length] = '\0';
|
|
break;
|
|
case UNICODE_MODE:
|
|
error_number = latin1_process(symbol, source, preprocessed, &length);
|
|
if(error_number != 0) { return error_number; }
|
|
break;
|
|
}
|
|
|
|
switch(symbol->symbology) {
|
|
case BARCODE_C25MATRIX: error_number = matrix_two_of_five(symbol, preprocessed, length); break;
|
|
case BARCODE_C25IND: error_number = industrial_two_of_five(symbol, preprocessed, length); break;
|
|
case BARCODE_C25INTER: error_number = interleaved_two_of_five(symbol, preprocessed, length); break;
|
|
case BARCODE_C25IATA: error_number = iata_two_of_five(symbol, preprocessed, length); break;
|
|
case BARCODE_C25LOGIC: error_number = logic_two_of_five(symbol, preprocessed, length); break;
|
|
case BARCODE_DPLEIT: error_number = dpleit(symbol, preprocessed, length); break;
|
|
case BARCODE_DPIDENT: error_number = dpident(symbol, preprocessed, length); break;
|
|
case BARCODE_UPCA: error_number = eanx(symbol, preprocessed, length); break;
|
|
case BARCODE_UPCE: error_number = eanx(symbol, preprocessed, length); break;
|
|
case BARCODE_EANX: error_number = eanx(symbol, preprocessed, length); break;
|
|
case BARCODE_EAN128: error_number = ean_128(symbol, preprocessed, length); break;
|
|
case BARCODE_CODE39: error_number = c39(symbol, preprocessed, length); break;
|
|
case BARCODE_PZN: error_number = pharmazentral(symbol, preprocessed, length); break;
|
|
case BARCODE_EXCODE39: error_number = ec39(symbol, preprocessed, length); break;
|
|
case BARCODE_CODABAR: error_number = codabar(symbol, preprocessed, length); break;
|
|
case BARCODE_CODE93: error_number = c93(symbol, preprocessed, length); break;
|
|
case BARCODE_LOGMARS: error_number = c39(symbol, preprocessed, length); break;
|
|
case BARCODE_CODE128: error_number = code_128(symbol, preprocessed, length); break;
|
|
case BARCODE_CODE128B: error_number = code_128(symbol, preprocessed, length); break;
|
|
case BARCODE_NVE18: error_number = nve_18(symbol, preprocessed, length); break;
|
|
case BARCODE_CODE11: error_number = code_11(symbol, preprocessed, length); break;
|
|
case BARCODE_MSI_PLESSEY: error_number = msi_handle(symbol, preprocessed, length); break;
|
|
case BARCODE_TELEPEN: error_number = telepen(symbol, preprocessed, length); break;
|
|
case BARCODE_TELEPEN_NUM: error_number = telepen_num(symbol, preprocessed, length); break;
|
|
case BARCODE_PHARMA: error_number = pharma_one(symbol, preprocessed, length); break;
|
|
case BARCODE_PLESSEY: error_number = plessey(symbol, preprocessed, length); break;
|
|
case BARCODE_ITF14: error_number = itf14(symbol, preprocessed, length); break;
|
|
case BARCODE_FLAT: error_number = flattermarken(symbol, preprocessed, length); break;
|
|
case BARCODE_FIM: error_number = fim(symbol, preprocessed, length); break;
|
|
case BARCODE_POSTNET: error_number = post_plot(symbol, preprocessed, length); break;
|
|
case BARCODE_PLANET: error_number = planet_plot(symbol, preprocessed, length); break;
|
|
case BARCODE_RM4SCC: error_number = royal_plot(symbol, preprocessed, length); break;
|
|
case BARCODE_AUSPOST: error_number = australia_post(symbol, preprocessed, length); break;
|
|
case BARCODE_AUSREPLY: error_number = australia_post(symbol, preprocessed, length); break;
|
|
case BARCODE_AUSROUTE: error_number = australia_post(symbol, preprocessed, length); break;
|
|
case BARCODE_AUSREDIRECT: error_number = australia_post(symbol, preprocessed, length); break;
|
|
case BARCODE_CODE16K: error_number = code16k(symbol, preprocessed, length); break;
|
|
case BARCODE_PHARMA_TWO: error_number = pharma_two(symbol, preprocessed, length); break;
|
|
case BARCODE_ONECODE: error_number = imail(symbol, preprocessed, length); break;
|
|
case BARCODE_ISBNX: error_number = eanx(symbol, preprocessed, length); break;
|
|
case BARCODE_RSS14: error_number = rss14(symbol, preprocessed, length); break;
|
|
case BARCODE_RSS14STACK: error_number = rss14(symbol, preprocessed, length); break;
|
|
case BARCODE_RSS14STACK_OMNI: error_number = rss14(symbol, preprocessed, length); break;
|
|
case BARCODE_RSS_LTD: error_number = rsslimited(symbol, preprocessed, length); break;
|
|
case BARCODE_RSS_EXP: error_number = rssexpanded(symbol, preprocessed, length); break;
|
|
case BARCODE_RSS_EXPSTACK: error_number = rssexpanded(symbol, preprocessed, length); break;
|
|
case BARCODE_EANX_CC: error_number = composite(symbol, preprocessed, length); break;
|
|
case BARCODE_EAN128_CC: error_number = composite(symbol, preprocessed, length); break;
|
|
case BARCODE_RSS14_CC: error_number = composite(symbol, preprocessed, length); break;
|
|
case BARCODE_RSS_LTD_CC: error_number = composite(symbol, preprocessed, length); break;
|
|
case BARCODE_RSS_EXP_CC: error_number = composite(symbol, preprocessed, length); break;
|
|
case BARCODE_UPCA_CC: error_number = composite(symbol, preprocessed, length); break;
|
|
case BARCODE_UPCE_CC: error_number = composite(symbol, preprocessed, length); break;
|
|
case BARCODE_RSS14STACK_CC: error_number = composite(symbol, preprocessed, length); break;
|
|
case BARCODE_RSS14_OMNI_CC: error_number = composite(symbol, preprocessed, length); break;
|
|
case BARCODE_RSS_EXPSTACK_CC: error_number = composite(symbol, preprocessed, length); break;
|
|
case BARCODE_KIX: error_number = kix_code(symbol, preprocessed, length); break;
|
|
case BARCODE_CODE32: error_number = code32(symbol, preprocessed, length); break;
|
|
case BARCODE_DAFT: error_number = daft_code(symbol, preprocessed, length); break;
|
|
case BARCODE_EAN14: error_number = ean_14(symbol, preprocessed, length); break;
|
|
case BARCODE_AZRUNE: error_number = aztec_runes(symbol, preprocessed, length); break;
|
|
case BARCODE_KOREAPOST: error_number = korea_post(symbol, preprocessed, length); break;
|
|
case BARCODE_HIBC_128: error_number = hibc(symbol, preprocessed, length); break;
|
|
case BARCODE_HIBC_39: error_number = hibc(symbol, preprocessed, length); break;
|
|
case BARCODE_HIBC_DM: error_number = hibc(symbol, preprocessed, length); break;
|
|
case BARCODE_HIBC_QR: error_number = hibc(symbol, preprocessed, length); break;
|
|
case BARCODE_HIBC_PDF: error_number = hibc(symbol, preprocessed, length); break;
|
|
case BARCODE_HIBC_MICPDF: error_number = hibc(symbol, preprocessed, length); break;
|
|
case BARCODE_HIBC_AZTEC: error_number = hibc(symbol, preprocessed, length); break;
|
|
case BARCODE_JAPANPOST: error_number = japan_post(symbol, preprocessed, length); break;
|
|
case BARCODE_CODE49: error_number = code_49(symbol, preprocessed, length); break;
|
|
case BARCODE_CHANNEL: error_number = channel_code(symbol, preprocessed, length); break;
|
|
case BARCODE_CODEONE: error_number = code_one(symbol, preprocessed, length); break;
|
|
case BARCODE_DATAMATRIX: error_number = dmatrix(symbol, preprocessed, length); break;
|
|
case BARCODE_PDF417: error_number = pdf417enc(symbol, preprocessed, length); break;
|
|
case BARCODE_PDF417TRUNC: error_number = pdf417enc(symbol, preprocessed, length); break;
|
|
case BARCODE_MICROPDF417: error_number = micro_pdf417(symbol, preprocessed, length); break;
|
|
case BARCODE_MAXICODE: error_number = maxicode(symbol, preprocessed, length); break;
|
|
case BARCODE_AZTEC: error_number = aztec(symbol, preprocessed, length); break;
|
|
}
|
|
|
|
return error_number;
|
|
}
|
|
|
|
int ZBarcode_Encode(struct zint_symbol *symbol, unsigned char *source, int length)
|
|
{
|
|
#ifdef _MSC_VER
|
|
unsigned char* local_source;
|
|
#endif
|
|
int error_number, error_buffer, i;
|
|
error_number = 0;
|
|
|
|
if(length == 0) {
|
|
length = ustrlen(source);
|
|
}
|
|
if(length == 0) {
|
|
strcpy(symbol->errtxt, "No input data");
|
|
error_tag(symbol->errtxt, ERROR_INVALID_DATA1);
|
|
return ERROR_INVALID_DATA1;
|
|
}
|
|
|
|
if(strcmp(symbol->outfile, "") == 0) {
|
|
strcpy(symbol->outfile, "out.png");
|
|
}
|
|
#ifndef _MSC_VER
|
|
unsigned char local_source[length + 1];
|
|
#else
|
|
local_source = (unsigned char*)_alloca(length + 1);
|
|
#endif
|
|
|
|
/* First check the symbology field */
|
|
if(symbol->symbology < 1) { strcpy(symbol->errtxt, "Symbology out of range, using Code 128"); symbol->symbology = BARCODE_CODE128; error_number = WARN_INVALID_OPTION; }
|
|
|
|
/* symbol->symbologys 1 to 86 are defined by tbarcode */
|
|
if(symbol->symbology == 5) { symbol->symbology = BARCODE_C25MATRIX; }
|
|
if((symbol->symbology >= 10) && (symbol->symbology <= 12)) { symbol->symbology = BARCODE_EANX; }
|
|
if((symbol->symbology == 14) || (symbol->symbology == 15)) { symbol->symbology = BARCODE_EANX; }
|
|
if(symbol->symbology == 17) { symbol->symbology = BARCODE_UPCA; }
|
|
if(symbol->symbology == 19) { strcpy(symbol->errtxt, "Codabar 18 not supported, using Codabar"); symbol->symbology = BARCODE_CODABAR; error_number = WARN_INVALID_OPTION; }
|
|
if(symbol->symbology == 26) { symbol->symbology = BARCODE_UPCA; }
|
|
if(symbol->symbology == 27) { strcpy(symbol->errtxt, "UPCD1 not supported"); error_number = ERROR_INVALID_OPTION; }
|
|
if(symbol->symbology == 33) { symbol->symbology = BARCODE_EAN128; }
|
|
if((symbol->symbology == 35) || (symbol->symbology == 36)) { symbol->symbology = BARCODE_UPCA; }
|
|
if((symbol->symbology == 38) || (symbol->symbology == 39)) { symbol->symbology = BARCODE_UPCE; }
|
|
if((symbol->symbology >= 41) && (symbol->symbology <= 45)) { symbol->symbology = BARCODE_POSTNET; }
|
|
if(symbol->symbology == 46) { symbol->symbology = BARCODE_PLESSEY; }
|
|
if(symbol->symbology == 48) { symbol->symbology = BARCODE_NVE18; }
|
|
if(symbol->symbology == 54) { strcpy(symbol->errtxt, "General Parcel Code not supported, using Code 128"); symbol->symbology = BARCODE_CODE128; error_number = WARN_INVALID_OPTION; }
|
|
if((symbol->symbology == 59) || (symbol->symbology == 61)) { symbol->symbology = BARCODE_CODE128; }
|
|
if(symbol->symbology == 62) { symbol->symbology = BARCODE_CODE93; }
|
|
if((symbol->symbology == 64) || (symbol->symbology == 65)) { symbol->symbology = BARCODE_AUSPOST; }
|
|
if(symbol->symbology == 73) { strcpy(symbol->errtxt, "Codablock E not supported"); error_number = ERROR_INVALID_OPTION; }
|
|
if(symbol->symbology == 78) { symbol->symbology = BARCODE_RSS14; }
|
|
if(symbol->symbology == 83) { symbol->symbology = BARCODE_PLANET; }
|
|
if(symbol->symbology == 88) { symbol->symbology = BARCODE_EAN128; }
|
|
if(symbol->symbology == 91) { strcpy(symbol->errtxt, "Symbology out of range, using Code 128"); symbol->symbology = BARCODE_CODE128; error_number = WARN_INVALID_OPTION; }
|
|
if((symbol->symbology >= 94) && (symbol->symbology <= 96)) { strcpy(symbol->errtxt, "Symbology out of range, using Code 128"); symbol->symbology = BARCODE_CODE128; error_number = WARN_INVALID_OPTION; }
|
|
if(symbol->symbology == 100) { symbol->symbology = BARCODE_HIBC_128; }
|
|
if(symbol->symbology == 101) { symbol->symbology = BARCODE_HIBC_39; }
|
|
if(symbol->symbology == 103) { symbol->symbology = BARCODE_HIBC_DM; }
|
|
if(symbol->symbology == 105) { symbol->symbology = BARCODE_HIBC_QR; }
|
|
if(symbol->symbology == 107) { symbol->symbology = BARCODE_HIBC_PDF; }
|
|
if(symbol->symbology == 109) { symbol->symbology = BARCODE_HIBC_MICPDF; }
|
|
if(symbol->symbology == 111) { symbol->symbology = BARCODE_HIBC_BLOCKF; }
|
|
if((symbol->symbology >= 113) && (symbol->symbology <= 127)) { strcpy(symbol->errtxt, "Symbology out of range, using Code 128"); symbol->symbology = BARCODE_CODE128; error_number = WARN_INVALID_OPTION; }
|
|
/* Everything from 128 up is Zint-specific */
|
|
if(symbol->symbology >= 143) { strcpy(symbol->errtxt, "Symbology out of range, using Code 128"); symbol->symbology = BARCODE_CODE128; error_number = WARN_INVALID_OPTION; }
|
|
if((symbol->symbology == BARCODE_CODABLOCKF) || (symbol->symbology == BARCODE_HIBC_BLOCKF)) { strcpy(symbol->errtxt, "Codablock F not supported"); error_number = ERROR_INVALID_OPTION; }
|
|
|
|
if(error_number > 4) {
|
|
error_tag(symbol->errtxt, error_number);
|
|
return error_number;
|
|
} else {
|
|
error_buffer = error_number;
|
|
}
|
|
|
|
if((symbol->input_mode < 0) || (symbol->input_mode > 2)) { symbol->input_mode = DATA_MODE; }
|
|
|
|
if(symbol->input_mode == GS1_MODE) {
|
|
for(i = 0; i < length; i++) {
|
|
if(source[i] == '\0') {
|
|
strcpy(symbol->errtxt, "NULL characters not permitted in GS1 mode");
|
|
return ERROR_INVALID_DATA1;
|
|
}
|
|
}
|
|
if(gs1_compliant(symbol->symbology) == 1) {
|
|
error_number = ugs1_verify(symbol, source, length, local_source);
|
|
if(error_number != 0) { return error_number; }
|
|
length = ustrlen(local_source);
|
|
} else {
|
|
strcpy(symbol->errtxt, "Selected symbology does not support GS1 mode");
|
|
return ERROR_INVALID_OPTION;
|
|
}
|
|
} else {
|
|
memcpy(local_source, source, length);
|
|
local_source[length] = '\0';
|
|
}
|
|
|
|
switch(symbol->symbology) {
|
|
case BARCODE_QRCODE:
|
|
case BARCODE_MICROQR:
|
|
case BARCODE_GRIDMATRIX:
|
|
error_number = extended_charset(symbol, local_source, length);
|
|
break;
|
|
default:
|
|
error_number = reduced_charset(symbol, local_source, length);
|
|
break;
|
|
}
|
|
|
|
if((symbol->symbology == BARCODE_CODE128) || (symbol->symbology == BARCODE_CODE128B)) {
|
|
for(i = 0; i < length; i++) {
|
|
if(local_source[i] == '\0') {
|
|
symbol->text[i] = ' ';
|
|
} else {
|
|
symbol->text[i] = local_source[i];
|
|
}
|
|
}
|
|
}
|
|
|
|
if(error_number == 0) {
|
|
error_number = error_buffer;
|
|
}
|
|
error_tag(symbol->errtxt, error_number);
|
|
/*printf("%s\n",symbol->text);*/
|
|
return error_number;
|
|
}
|
|
|
|
int ZBarcode_Print(struct zint_symbol *symbol, int rotate_angle)
|
|
{
|
|
int error_number;
|
|
char output[4];
|
|
|
|
switch(rotate_angle) {
|
|
case 0:
|
|
case 90:
|
|
case 180:
|
|
case 270:
|
|
break;
|
|
default:
|
|
strcpy(symbol->errtxt, "Invalid rotation angle");
|
|
return ERROR_INVALID_OPTION;
|
|
break;
|
|
}
|
|
|
|
if(strlen(symbol->outfile) > 3) {
|
|
output[0] = symbol->outfile[strlen(symbol->outfile) - 3];
|
|
output[1] = symbol->outfile[strlen(symbol->outfile) - 2];
|
|
output[2] = symbol->outfile[strlen(symbol->outfile) - 1];
|
|
output[3] = '\0';
|
|
to_upper((unsigned char*)output);
|
|
|
|
#ifndef NO_PNG
|
|
if(!(strcmp(output, "PNG"))) {
|
|
if(symbol->scale < 1.0) { symbol->text[0] = '\0'; }
|
|
error_number = png_handle(symbol, rotate_angle);
|
|
} else
|
|
#endif
|
|
if(!(strcmp(output, "TXT"))) {
|
|
error_number = dump_plot(symbol);
|
|
} else
|
|
if(!(strcmp(output, "EPS"))) {
|
|
error_number = ps_plot(symbol);
|
|
} else
|
|
if(!(strcmp(output, "SVG"))) {
|
|
error_number = svg_plot(symbol);
|
|
} else
|
|
{
|
|
strcpy(symbol->errtxt, "Unknown output format");
|
|
error_tag(symbol->errtxt, ERROR_INVALID_OPTION);
|
|
return ERROR_INVALID_OPTION;
|
|
}
|
|
} else {
|
|
strcpy(symbol->errtxt, "Unknown output format");
|
|
error_tag(symbol->errtxt, ERROR_INVALID_OPTION);
|
|
return ERROR_INVALID_OPTION;
|
|
}
|
|
|
|
error_tag(symbol->errtxt, error_number);
|
|
return error_number;
|
|
}
|
|
|
|
int ZBarcode_Buffer(struct zint_symbol *symbol, int rotate_angle)
|
|
{
|
|
int error_number;
|
|
|
|
switch(rotate_angle) {
|
|
case 0:
|
|
case 90:
|
|
case 180:
|
|
case 270:
|
|
break;
|
|
default:
|
|
strcpy(symbol->errtxt, "Invalid rotation angle");
|
|
return ERROR_INVALID_OPTION;
|
|
break;
|
|
}
|
|
|
|
error_number = bmp_handle(symbol, rotate_angle);
|
|
error_tag(symbol->errtxt, error_number);
|
|
return error_number;
|
|
}
|
|
|
|
int ZBarcode_Encode_and_Print(struct zint_symbol *symbol, unsigned char *input, int length, int rotate_angle)
|
|
{
|
|
int error_number;
|
|
|
|
error_number = 0;
|
|
|
|
error_number = ZBarcode_Encode(symbol, input, length);
|
|
if(error_number != 0) {
|
|
return error_number;
|
|
}
|
|
|
|
error_number = ZBarcode_Print(symbol, rotate_angle);
|
|
return error_number;
|
|
}
|
|
|
|
int ZBarcode_Encode_and_Buffer(struct zint_symbol *symbol, unsigned char *input, int length, int rotate_angle)
|
|
{
|
|
int error_number;
|
|
|
|
error_number = 0;
|
|
|
|
error_number = ZBarcode_Encode(symbol, input, length);
|
|
if(error_number != 0) {
|
|
return error_number;
|
|
}
|
|
|
|
error_number = ZBarcode_Buffer(symbol, rotate_angle);
|
|
return error_number;
|
|
}
|
|
|
|
int ZBarcode_Encode_File(struct zint_symbol *symbol, char *filename)
|
|
{
|
|
FILE *file;
|
|
unsigned char *buffer;
|
|
unsigned long fileLen;
|
|
unsigned int nRead = 0, n = 0;
|
|
int ret;
|
|
|
|
if (!strcmp(filename, "-")) {
|
|
file = stdin;
|
|
fileLen = 7100;
|
|
} else {
|
|
file = fopen(filename, "rb");
|
|
if (!file) {
|
|
strcpy(symbol->errtxt, "Unable to read input file");
|
|
return ERROR_INVALID_DATA1;
|
|
}
|
|
|
|
/* Get file length */
|
|
fseek(file, 0, SEEK_END);
|
|
fileLen = ftell(file);
|
|
fseek(file, 0, SEEK_SET);
|
|
|
|
if(fileLen > 7100) {
|
|
/* The largest amount of data that can be encoded is 7089 numeric digits in QR Code */
|
|
strcpy(symbol->errtxt, "Input file too long");
|
|
fclose(file);
|
|
return ERROR_INVALID_DATA1;
|
|
}
|
|
}
|
|
|
|
/* Allocate memory */
|
|
buffer = (unsigned char *)malloc(fileLen * sizeof(unsigned char));
|
|
if(!buffer) {
|
|
strcpy(symbol->errtxt, "Internal memory error");
|
|
fclose(file);
|
|
return ERROR_MEMORY;
|
|
}
|
|
|
|
/* Read file contents into buffer */
|
|
|
|
do
|
|
{
|
|
n = fread(buffer + nRead, 1, fileLen - nRead, file);
|
|
if (ferror(file))
|
|
{
|
|
strcpy(symbol->errtxt, strerror(errno));
|
|
nRead = 0;
|
|
return ERROR_INVALID_DATA1;
|
|
}
|
|
nRead += n;
|
|
} while (!feof(file) && (0 < n) && (nRead < fileLen));
|
|
|
|
fclose(file);
|
|
ret = ZBarcode_Encode(symbol, buffer, nRead);
|
|
free(buffer);
|
|
return ret;
|
|
}
|
|
|
|
int ZBarcode_Encode_File_and_Print(struct zint_symbol *symbol, char *filename, int rotate_angle)
|
|
{
|
|
int error_number;
|
|
|
|
error_number = 0;
|
|
|
|
error_number = ZBarcode_Encode_File(symbol, filename);
|
|
if(error_number != 0) {
|
|
return error_number;
|
|
}
|
|
|
|
return ZBarcode_Print(symbol, rotate_angle);
|
|
}
|
|
|
|
int ZBarcode_Encode_File_and_Buffer(struct zint_symbol *symbol, char *filename, int rotate_angle)
|
|
{
|
|
int error_number;
|
|
|
|
error_number = 0;
|
|
|
|
error_number = ZBarcode_Encode_File(symbol, filename);
|
|
if(error_number != 0) {
|
|
return error_number;
|
|
}
|
|
|
|
return ZBarcode_Buffer(symbol, rotate_angle);
|
|
}
|
|
|
|
/*
|
|
* Rendering support, initially added by Sam Lown.
|
|
*
|
|
* Converts encoded data into an intermediate format to be interpreted
|
|
* in other applications using this library.
|
|
*
|
|
* If the width and height are not set to zero, the barcode will be resized to those
|
|
* dimensions. The symbol->scale and symbol->height values are totally ignored in this case.
|
|
*
|
|
*/
|
|
int ZBarcode_Render(struct zint_symbol *symbol, float width, float height)
|
|
{
|
|
// Send the request to the render_plot method
|
|
return render_plot(symbol, width, height);
|
|
}
|