/* library.c - external functions of libzint libzint - the open source barcode library Copyright (C) 2009 Robin Stuart 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 #include #include #include #ifdef _MSC_VER #include #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 its 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); if(symbol->output_options & BARCODE_STDOUT) { fflush(f); } else { 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_DATA) { 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) { 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_DATA); return ERROR_INVALID_DATA; } if(strcmp(symbol->outfile, "") == 0) { strcpy(symbol->outfile, "out.png"); } #ifndef _MSC_VER unsigned char local_source[length + 1]; #else unsigned char* 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_DATA; } } 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_DATA; } /* 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_DATA; } } /* Allocate memory */ buffer = (unsigned char *)malloc(fileLen * sizeof(unsigned char)); if(!buffer) { strcpy(symbol->errtxt, "Internal memory error"); if (strcmp(filename, "-")) 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_DATA; } 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); }