Organized master branch to be top-level directory for glabels, instead of

[glabels] / glabels1 / barcode-0.98 / codabar.c

diff --git a/glabels1/barcode-0.98/codabar.c b/glabels1/barcode-0.98/codabar.c
deleted file mode 100644 (file)
index 7065b9e..0000000
--- a/glabels1/barcode-0.98/codabar.c
+++ /dev/null
@@ -1,182 +0,0 @@
-/*
- * codabar.c -- encoding for Codabar
- *
- * Copyright (c) 2000 Leonid A. Broukhis (leob@mailcom.com)
- *
- *   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 2 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., 59 Temple Place, Suite 330, Boston, MA 02111-1307, USA.
- */
-
-#include <stdio.h>
-#include <stdlib.h>
-#include <string.h>
-#include <ctype.h>
-#include <errno.h>
-
-#include "barcode.h"
-
-
-/* this is ordered in decades to simplify encoding */
-static char alphabet[] = 
-   "0123456789" "-$:/.+ABCD";
-
-#define CODE_A 16
-#define CODE_B 17
-
-#define NARROW 12
-#define WIDE   14
-
-/* Patterns */
-static char *patterns[] = {
-"1111133","1111331","1113113","3311111","1131131",
-"3111131","1311113","1311311","1331111","3113111",
-"1113311","1133111","3111313","3131113","3131311",
-"1131313","1133131","1313113","1113133","1113331" };
-
-/*
- * Check that the text can be encoded. Returns 0 or -1.
- * If it's all lowecase convert to uppercase and accept it.
- * If the first character is a letter (A to D), the last one must be too;
- * no other character should be a letter.
- */
-int Barcode_cbr_verify(unsigned char *text)
-{
-    int i, lower=0, upper=0;
-    int startpresent = 0;
-
-    if (!strlen(text))
-       return -1;
-    for (i=0; text[i]; i++) {
-       char * pos;
-        if (isupper(text[i])) upper++;
-        if (islower(text[i])) lower++;
-       pos = strchr(alphabet,toupper(text[i]));
-        if (!pos)
-            return -1;
-       if (i == 0 && pos - alphabet >= CODE_A)
-           startpresent = 1;
-       else if (pos - alphabet >= CODE_A &&
-                (!startpresent || i != strlen(text) - 1))
-           return -1;  
-    }
-    if (lower && upper)
-        return -1;
-    return 0;
-}
-
-static int add_one(char *ptr, int code)
-{
-    sprintf(ptr,"1%s", /* separator */ patterns[code]);
-    return 0;
-}
-
-/*
- * The encoding functions fills the "partial" and "textinfo" fields.
- * Lowercase chars are converted to uppercase
- */
-int Barcode_cbr_encode(struct Barcode_Item *bc)
-{
-    static char *text;
-    static char *partial;  /* dynamic */
-    static char *textinfo; /* dynamic */
-    char *c, *ptr, *textptr;
-    int i, code, textpos, usesum, checksum = 0, startpresent;
-
-    if (bc->partial)
-       free(bc->partial);
-    if (bc->textinfo)
-       free(bc->textinfo);
-    bc->partial = bc->textinfo = NULL; /* safe */
-
-    if (!bc->encoding)
-       bc->encoding = strdup("codabar");
-
-    text = bc->ascii;
-    if (!text) {
-        bc->error = EINVAL;
-        return -1;
-    }
-    /* the partial code is 8 * (head + text + check + tail) + margin + term. */
-    partial = malloc( (strlen(text) + 3) * 8 + 2);
-    if (!partial) {
-        bc->error = errno;
-        return -1;
-    }
-
-    /* the text information is at most "nnn:fff:c " * (strlen + check) +term */
-    textinfo = malloc(10*(strlen(text) + 1) + 2);
-    if (!textinfo) {
-        bc->error = errno;
-        free(partial);
-        return -1;
-    }
-
-    ptr = partial;
-    textptr = textinfo;
-    textpos = 0;
-    usesum = bc->flags & BARCODE_NO_CHECKSUM ? 0 : 1;
-    /* if no start character specified, A is used as a start character */
-    if (!isalpha(text[0])) {
-       add_one(ptr, CODE_A);
-       ptr += strlen(ptr);
-       textpos = WIDE;
-       checksum = CODE_A;
-       startpresent = 0;
-    } else {
-       startpresent = 1;
-    }
-    for (i=0; i<strlen(text); i++) {
-        c = strchr(alphabet, toupper(text[i]));
-        if (!c) {
-            bc->error = EINVAL; /* impossible if text is verified */
-            free(partial);
-            free(textinfo);
-            return -1;
-        }
-        code = c - alphabet;
-        add_one(ptr, code);
-        sprintf(textptr, "%i:12:%c ", textpos, toupper(text[i]));
-        textpos += code < 12 ? NARROW : WIDE;
-        textptr += strlen(textptr);
-        ptr += strlen(ptr); 
-       checksum += code;
-       if (startpresent && usesum && i == strlen(text) - 2) {
-           /* stuff a check symbol before the stop */
-           c = strchr(alphabet, toupper(text[i+1]));
-           if (!c) /* impossible */
-               continue;
-           code = c - alphabet;
-           checksum += code;
-
-           /* Complement to a multiple of 16 */
-           checksum = (checksum + 15) / 16 * 16 - checksum;
-           add_one(ptr, checksum);
-           ptr += strlen(ptr);
-       }
-    }
-    if (!startpresent) {
-       if (usesum) {
-           /* if no start character specified, B is used as a stop char */
-           checksum += CODE_B;
-           checksum = (checksum + 15) / 16 * 16 - checksum;
-           add_one(ptr, checksum);
-           ptr += strlen(ptr);
-       }
-       add_one(ptr, CODE_B);
-    }
-    bc->partial = partial;
-    bc->textinfo = textinfo;
-
-    return 0;
-}