lint_csumalpha.c File Reference

Purpose

The csumalpha linter ensures that the data has a valid alphanumeric check character pair.

Remarks

The process for validating the GS1 alphanumeric check character pair is described in the GS1 General Specifications section "Check character calculation (for alphanumeric keys)".

Functional Description

gs1_lint_csumalpha()

GS1_SYNTAX_DICTIONARY_API gs1_lint_err_t gs1_lint_csumalpha	(	const char *const	data,
		size_t *const	err_pos,
		size_t *const	err_len
	)

Used to ensure that the AI component has a valid alphanumeric check character pair.

Parameters

[in]	data	Pointer to the null-terminated data to be linted. Must not be NULL.
[out]	err_pos	To facilitate error highlighting, the start position of the bad data is written to this pointer, if not NULL.
[out]	err_len	The length of the bad data is written to this pointer, if not NULL.

Returns

GS1_LINTER_OK if okay.

GS1_LINTER_INCORRECT_CHECK_PAIR if the data contains an incorrect check character pair.

GS1_LINTER_TOO_SHORT_FOR_CHECK_PAIR if the data is too short.

GS1_LINTER_TOO_LONG_FOR_CHECK_PAIR_IMPLEMENTATION if the data is too long for this implementation of the check character pair algorithm. GS1_LINTER_INVALID_CSET82_CHARACTER if any of the data characters are not in CSET 82. GS1_LINTER_INVALID_CSET32_CHARACTER if any of the data characters are not in CSET 32.

Note

The return value GS1_LINTER_TOO_LONG_FOR_CHECK_PAIR_IMPLEMENTATION represents exceeding an implementation-specific limit. Some implmenetations may choose to support longer data inputs.

{
 
        /*
         *  Set of prime weights used to derive alpha check characters.
         *
         *  Here we have the first 97 since that is the maximum length of any
         *  AI is currently 99. Implementations may choose to support longer
         *  data inputs.
         *
         */
        static const unsigned int primes[] = {
                  2,   3,   5,   7,  11,  13,  17,  19,  23,  29,  31,  37,
                 41,  43,  47,  53,  59,  61,  67,  71,  73,  79,  83,  89,
                 97, 101, 103, 107, 109, 113, 127, 131, 137, 139, 149, 151,
                157, 163, 167, 173, 179, 181, 191, 193, 197, 199, 211, 223,
                227, 229, 233, 239, 241, 251, 257, 263, 269, 271, 277, 281,
                283, 293, 307, 311, 313, 317, 331, 337, 347, 349, 353, 359,
                367, 373, 379, 383, 389, 397, 401, 409, 419, 421, 431, 433,
                439, 443, 449, 457, 461, 463, 467, 479, 487, 491, 499, 503,
                509
        };
 
        /*
         * Sequence of all characters in CSET 82, ordered by weight.
         *
         */
        static const char* const cset82 =
                "!\"%&'()*+,-./0123456789:;<=>?ABCDEFGHIJKLMNOPQRSTUVWXYZ_"
                "abcdefghijklmnopqrstuvwxyz";
 
        /*
         * Sequence of all characters in CSET 32, ordered by weight.
         *
         */
        static const char* const cset32 = "23456789ABCDEFGHJKLMNPQRSTUVWXYZ";
 
        size_t i, pos, len;
        unsigned int sum = 0;
        const unsigned int *p;
 
        assert(data);
 
        len = strlen(data);
 
        /*
         * Data must include at least the check character pair.
         *
         */
        if (len < 2)
                GS1_LINTER_RETURN_ERROR(
                        GS1_LINTER_TOO_SHORT_FOR_CHECK_PAIR,
                        0,
                        len
                );
 
        /*
         * Constrain the length of the data to the number of primes that we
         * have.
         *
         */
        if (len > sizeof(primes) / sizeof(primes[0]))
                GS1_LINTER_RETURN_ERROR(
                        GS1_LINTER_TOO_LONG_FOR_CHECK_PAIR_IMPLEMENTATION,
                        0,
                        len
                );
 
        /*
         * Ensure that the data characters are in CSET 82
         *
         */
        if ((pos = strspn(data, cset82)) < len - 2)
                GS1_LINTER_RETURN_ERROR(
                        GS1_LINTER_INVALID_CSET82_CHARACTER,
                        pos,
                        1
                );
 
        /*
         * Ensure that the check characters are in CSET 32
         *
         */
        if ((pos = strspn(&data[len - 2], cset32)) != 2)
                GS1_LINTER_RETURN_ERROR(
                        GS1_LINTER_INVALID_CSET32_CHARACTER,
                        len - 2 + pos,
                        1
                );
 
        /*
         * Sum of data-character values weighted by increasing prime values,
         * from right to left, modulo 1021.
         *
         * The check characters are valid when their values match the above
         * data checksum with its 10-bit value split evenly into two 5-bit
         * values.
         *
         * The data character values are defined by their respective positions
         * in CSET 82.
         *
         * The check character pair values are defined by their respective
         * positions in CSET 32.
         *
         */
        p = primes + len - 3;
        for (i = 0; i < len - 2; i++)
                sum += (unsigned int)(strchr(cset82, data[i]) - cset82) * *p--;
        sum %= 1021;
 
        if (data[i] != cset32[sum >> 5] || data[i+1] != cset32[sum & 31])
                GS1_LINTER_RETURN_ERROR(
                        GS1_LINTER_INCORRECT_CHECK_PAIR,
                        len - 2,
                        2
                );
 
        GS1_LINTER_RETURN_OK;
 
}