5a2a287752
* *
* partial sync with the 3.4 fork codebase. These are the things
synces for the most part:
- copyright headers
- grammar/typos in comments and some readmes
- comment/whitespace/decorations
- variable scoping in C files
- DO CASE/SWITCH and some other alternate syntax usage
- minimal amount of human readable text in strings
- minor code updates
- HB_TRACE() void * casts for pointers and few other changes to
avoid C compiler warnings
- various other, minor code cleanups
- only Harbour/C code/headers were touched in src, utils, contrib,
include. No 3rd party code, no make files, and with just a few
exceptions, no 'tests' code was touched.
- certain components were not touched were 3.4 diverged too much
already, like f.e. hbmk2, hbssl, hbcurl, hbexpat
- the goal was that no actual program logic should be altered by
these changes. Except some possible minor exceptions, any such
change is probably a bug in this patch.
It's a massive patch, if you find anything broken after it, please
open an Issue with the details. Build test was done on macOS.
The goal is make it easier to see what actual code/logic was changed
in 3.4 compared to 3.2 and to make patches easier to apply in both
ways.
1403 lines
56 KiB
C
1403 lines
56 KiB
C
/*
|
|
* Zebra barcode library
|
|
*
|
|
* Copyright 2010 Mindaugas Kavaliauskas <dbtopas at dbtopas.lt>
|
|
*
|
|
* 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, 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; see the file LICENSE.txt. If not, write to
|
|
* the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
|
|
* Boston, MA 02110-1301 USA (or visit https://www.gnu.org/licenses/).
|
|
*
|
|
* As a special exception, the Harbour Project gives permission for
|
|
* additional uses of the text contained in its release of Harbour.
|
|
*
|
|
* The exception is that, if you link the Harbour libraries with other
|
|
* files to produce an executable, this does not by itself cause the
|
|
* resulting executable to be covered by the GNU General Public License.
|
|
* Your use of that executable is in no way restricted on account of
|
|
* linking the Harbour library code into it.
|
|
*
|
|
* This exception does not however invalidate any other reasons why
|
|
* the executable file might be covered by the GNU General Public License.
|
|
*
|
|
* This exception applies only to the code released by the Harbour
|
|
* Project under the name Harbour. If you copy code from other
|
|
* Harbour Project or Free Software Foundation releases into a copy of
|
|
* Harbour, as the General Public License permits, the exception does
|
|
* not apply to the code that you add in this way. To avoid misleading
|
|
* anyone as to the status of such modified files, you must delete
|
|
* this exception notice from them.
|
|
*
|
|
* If you write modifications of your own for Harbour, it is your choice
|
|
* whether to permit this exception to apply to your modifications.
|
|
* If you do not wish that, delete this exception notice.
|
|
*
|
|
*/
|
|
|
|
/*
|
|
PDF417 is ISO/IEC 15438:2006
|
|
|
|
Good short PDF417 description:
|
|
https://grandzebu.net/informatique/codbar-en/pdf417.htm
|
|
|
|
Free PDF417 specification (in Russian):
|
|
[LOST LINK] protect.gost.ru/v.aspx?control=8&baseC=-1&page=0&month=-1&year=-1&search=&RegNum=1&DocOnPageCount=15&id=122345&pageK=D11DCCF9-B540-4CB2-A514-C3547043FC68
|
|
|
|
Online generator:
|
|
https://www.barcodetools.com/generator/index.html
|
|
https://www.terryburton.co.uk/barcodewriter/generator/
|
|
|
|
Online decoder:
|
|
https://www.datasymbol.com/barcode-recognition-sdk/barcode-reader/online-barcode-decoder.html
|
|
*/
|
|
|
|
#include "hbzebra.h"
|
|
|
|
#define CODE_START 0x2AFF /* 17-bit width */
|
|
#define CODE_STOP 0x2517F /* 18-bit width */
|
|
|
|
#define LATCH_TEXT 900
|
|
#define LATCH_BYTE 901
|
|
#define LATCH_BYTE_FULL 924
|
|
#define LATCH_NUMERIC 902
|
|
#define SHIFT_BYTE 913
|
|
|
|
#define SUBMODE_UPPER 1
|
|
#define SUBMODE_LOWER 2
|
|
#define SUBMODE_MIXED 3
|
|
#define SUBMODE_PUNCT 4
|
|
|
|
#define MAX_COL_COUNT 30
|
|
#define MIN_ROW_COUNT 3
|
|
#define MAX_ROW_COUNT 90
|
|
#define MAX_CODEWORD_COUNT 928
|
|
|
|
|
|
static const short s_code[ 3 ][ 929 ] = {
|
|
{
|
|
0x03AB, 0x0F57, 0x3EAF, 0x072B, 0x1E57, 0x7CAF, 0x0315, 0x0E2B,
|
|
0x0615, 0x020A, 0x0C15, 0x040A, 0x03B5, 0x0F6B, 0x3ED7, 0x0735,
|
|
0x1E6B, 0x7CD7, 0x031A, 0x0E35, 0x061A, 0x03BA, 0x0F75, 0x3EEB,
|
|
0x073A, 0x1E75, 0x7CEB, 0x0E3A, 0x3C75, 0x0F7A, 0x3EF5, 0x1E7A,
|
|
0x7CF5, 0x3EFA, 0x5FAF, 0x074B, 0x1E97, 0x7D2F, 0x0325, 0x0E4B,
|
|
0x3C97, 0x0625, 0x1C4B, 0x0212, 0x0C25, 0x384B, 0x0412, 0x1825,
|
|
0x0812, 0x0765, 0x1ECB, 0x7D97, 0x0332, 0x0E65, 0x3CCB, 0x0632,
|
|
0x1C65, 0x78CB, 0x0C32, 0x3865, 0x0772, 0x1EE5, 0x7DCB, 0x0E72,
|
|
0x3CE5, 0x1C72, 0x78E5, 0x1EF2, 0x7DE5, 0x3CF2, 0x78F2, 0x0345,
|
|
0x0E8B, 0x3D17, 0x0645, 0x1C8B, 0x7917, 0x0222, 0x0C45, 0x388B,
|
|
0x0422, 0x1845, 0x0822, 0x1022, 0x0362, 0x0EC5, 0x3D8B, 0x0662,
|
|
0x1CC5, 0x798B, 0x0C62, 0x38C5, 0x1862, 0x3062, 0x0EE2, 0x3DC5,
|
|
0x1CE2, 0x79C5, 0x38E2, 0x3DE2, 0x0685, 0x1D0B, 0x7A17, 0x0242,
|
|
0x0C85, 0x390B, 0x0442, 0x1885, 0x710B, 0x0842, 0x3085, 0x1042,
|
|
0x6085, 0x06C2, 0x1D85, 0x7B0B, 0x0CC2, 0x3985, 0x18C2, 0x7185,
|
|
0x30C2, 0x60C2, 0x7B85, 0x71C2, 0x0282, 0x0D05, 0x3A0B, 0x0482,
|
|
0x1905, 0x720B, 0x0882, 0x3105, 0x1082, 0x6105, 0x2082, 0x0D82,
|
|
0x1982, 0x3182, 0x0502, 0x740B, 0x3205, 0x6205, 0x4102, 0x0753,
|
|
0x1EA7, 0x7D4F, 0x0329, 0x0E53, 0x3CA7, 0x0629, 0x1C53, 0x78A7,
|
|
0x0214, 0x0C29, 0x0414, 0x0769, 0x1ED3, 0x7DA7, 0x0334, 0x0E69,
|
|
0x3CD3, 0x0634, 0x1C69, 0x0C34, 0x1834, 0x0774, 0x1EE9, 0x7DD3,
|
|
0x0E74, 0x3CE9, 0x1C74, 0x3874, 0x1EF4, 0x7DE9, 0x3CF4, 0x7DF4,
|
|
0x035B, 0x0EB7, 0x3D6F, 0x065B, 0x1CB7, 0x796F, 0x022D, 0x0C5B,
|
|
0x38B7, 0x042D, 0x185B, 0x70B7, 0x082D, 0x305B, 0x0349, 0x0E93,
|
|
0x3D27, 0x036D, 0x0649, 0x1C93, 0x7927, 0x066D, 0x1CDB, 0x79B7,
|
|
0x0236, 0x0424, 0x1849, 0x7093, 0x0436, 0x186D, 0x0836, 0x0364,
|
|
0x0EC9, 0x3D93, 0x0376, 0x0664, 0x1CC9, 0x7993, 0x0676, 0x1CED,
|
|
0x79DB, 0x0C76, 0x1864, 0x1876, 0x0EE4, 0x3DC9, 0x0EF6, 0x1CE4,
|
|
0x79C9, 0x1CF6, 0x79ED, 0x38F6, 0x3DE4, 0x3DF6, 0x79E4, 0x79F6,
|
|
0x069B, 0x1D37, 0x7A6F, 0x024D, 0x0C9B, 0x3937, 0x044D, 0x189B,
|
|
0x7137, 0x084D, 0x309B, 0x104D, 0x204D, 0x0689, 0x1D13, 0x7A27,
|
|
0x06CD, 0x0C89, 0x3913, 0x0266, 0x0444, 0x399B, 0x7113, 0x0466,
|
|
0x0844, 0x3089, 0x0866, 0x30CD, 0x6089, 0x2044, 0x06C4, 0x1D89,
|
|
0x7B13, 0x06E6, 0x0CC4, 0x3989, 0x0CE6, 0x39CD, 0x7189, 0x18E6,
|
|
0x30C4, 0x60C4, 0x1DC4, 0x7B89, 0x1DE6, 0x39C4, 0x39E6, 0x71C4,
|
|
0x71E6, 0x7BE6, 0x028D, 0x0D1B, 0x3A37, 0x048D, 0x191B, 0x7237,
|
|
0x088D, 0x311B, 0x108D, 0x611B, 0x208D, 0x408D, 0x0284, 0x0D09,
|
|
0x3A13, 0x02C6, 0x0484, 0x1909, 0x7213, 0x04C6, 0x198D, 0x731B,
|
|
0x08C6, 0x1084, 0x6109, 0x10C6, 0x618D, 0x20C6, 0x0D84, 0x3B09,
|
|
0x0DC6, 0x1984, 0x7309, 0x19C6, 0x738D, 0x31C6, 0x6184, 0x61C6,
|
|
0x3BC6, 0x73C6, 0x050D, 0x1A1B, 0x7437, 0x090D, 0x321B, 0x110D,
|
|
0x621B, 0x210D, 0x410D, 0x0504, 0x1A09, 0x7413, 0x0586, 0x0904,
|
|
0x3209, 0x0986, 0x330D, 0x6209, 0x1186, 0x2104, 0x2186, 0x4104,
|
|
0x1B04, 0x1B86, 0x3386, 0x6386, 0x341B, 0x641B, 0x420D, 0x3409,
|
|
0x1204, 0x1306, 0x2306, 0x4306, 0x0351, 0x0EA3, 0x3D47, 0x0651,
|
|
0x1CA3, 0x0228, 0x0C51, 0x38A3, 0x0428, 0x1851, 0x0828, 0x1028,
|
|
0x0368, 0x0ED1, 0x3DA3, 0x0668, 0x1CD1, 0x79A3, 0x0C68, 0x38D1,
|
|
0x1868, 0x3068, 0x0EE8, 0x3DD1, 0x1CE8, 0x79D1, 0x38E8, 0x3DE8,
|
|
0x79E8, 0x06B3, 0x1D67, 0x7ACF, 0x0259, 0x0CB3, 0x3967, 0x0459,
|
|
0x18B3, 0x7167, 0x0859, 0x30B3, 0x1059, 0x60B3, 0x0691, 0x1D23,
|
|
0x7A47, 0x06D9, 0x0C91, 0x3923, 0x026C, 0x0448, 0x39B3, 0x7123,
|
|
0x046C, 0x18D9, 0x3091, 0x086C, 0x1048, 0x106C, 0x06C8, 0x1D91,
|
|
0x7B23, 0x06EC, 0x0CC8, 0x7BB3, 0x0CEC, 0x39D9, 0x7191, 0x18EC,
|
|
0x30C8, 0x30EC, 0x1DC8, 0x7B91, 0x1DEC, 0x39C8, 0x39EC, 0x71C8,
|
|
0x7BC8, 0x7BEC, 0x02BB, 0x0D77, 0x3AEF, 0x04BB, 0x1977, 0x72EF,
|
|
0x08BB, 0x3177, 0x10BB, 0x6177, 0x20BB, 0x0299, 0x0D33, 0x3A67,
|
|
0x02DD, 0x0499, 0x3B77, 0x7267, 0x04DD, 0x19BB, 0x7377, 0x08DD,
|
|
0x1099, 0x6133, 0x10DD, 0x61BB, 0x4099, 0x0288, 0x0D11, 0x3A23,
|
|
0x02CC, 0x0488, 0x1911, 0x7223, 0x02EE, 0x04CC, 0x1999, 0x7333,
|
|
0x04EE, 0x19DD, 0x73BB, 0x6111, 0x08EE, 0x10CC, 0x6199, 0x10EE,
|
|
0x4088, 0x0D88, 0x3B11, 0x0DCC, 0x1988, 0x7311, 0x0DEE, 0x19CC,
|
|
0x7399, 0x19EE, 0x73DD, 0x6188, 0x61CC, 0x3B88, 0x3BCC, 0x7388,
|
|
0x3BEE, 0x73CC, 0x053B, 0x1A77, 0x74EF, 0x093B, 0x3277, 0x113B,
|
|
0x6277, 0x213B, 0x413B, 0x0519, 0x1A33, 0x7467, 0x059D, 0x0919,
|
|
0x7677, 0x099D, 0x333B, 0x6233, 0x119D, 0x2119, 0x219D, 0x4119,
|
|
0x419D, 0x0508, 0x1A11, 0x7423, 0x058C, 0x0908, 0x3211, 0x05CE,
|
|
0x098C, 0x3319, 0x6211, 0x09CE, 0x339D, 0x2108, 0x11CE, 0x218C,
|
|
0x4108, 0x418C, 0x1B08, 0x7611, 0x1B8C, 0x3308, 0x1BCE, 0x338C,
|
|
0x6308, 0x33CE, 0x638C, 0x7708, 0x77CE, 0x0A3B, 0x3477, 0x123B,
|
|
0x6477, 0x223B, 0x423B, 0x0A19, 0x3433, 0x0B1D, 0x1219, 0x6433,
|
|
0x131D, 0x663B, 0x231D, 0x4219, 0x431D, 0x0A08, 0x3411, 0x0B0C,
|
|
0x1208, 0x6411, 0x0B8E, 0x130C, 0x6619, 0x138E, 0x671D, 0x4208,
|
|
0x238E, 0x430C, 0x438E, 0x370C, 0x378E, 0x678E, 0x6877, 0x443B,
|
|
0x6833, 0x2419, 0x4419, 0x1408, 0x160C, 0x170E, 0x4408, 0x460C,
|
|
0x06A1, 0x0250, 0x0CA1, 0x0450, 0x18A1, 0x7143, 0x0850, 0x30A1,
|
|
0x1050, 0x60A1, 0x06D0, 0x1DA1, 0x7B43, 0x0CD0, 0x39A1, 0x18D0,
|
|
0x71A1, 0x30D0, 0x60D0, 0x1DD0, 0x7BA1, 0x39D0, 0x71D0, 0x7BD0,
|
|
0x02B1, 0x0D63, 0x3AC7, 0x04B1, 0x1963, 0x08B1, 0x3163, 0x10B1,
|
|
0x6163, 0x20B1, 0x0290, 0x0D21, 0x3A43, 0x02D8, 0x0490, 0x3B63,
|
|
0x7243, 0x04D8, 0x19B1, 0x7363, 0x08D8, 0x1090, 0x6121, 0x10D8,
|
|
0x61B1, 0x4090, 0x0D90, 0x3B21, 0x0DD8, 0x1990, 0x7321, 0x19D8,
|
|
0x73B1, 0x31D8, 0x6190, 0x3B90, 0x3BD8, 0x7390, 0x73D8, 0x0573,
|
|
0x1AE7, 0x75CF, 0x0973, 0x32E7, 0x1173, 0x62E7, 0x2173, 0x4173,
|
|
0x0531, 0x1A63, 0x05B9, 0x0931, 0x3263, 0x09B9, 0x3373, 0x6263,
|
|
0x11B9, 0x2131, 0x21B9, 0x4131, 0x41B9, 0x0510, 0x1A21, 0x0598,
|
|
0x0910, 0x7663, 0x05DC, 0x0998, 0x3331, 0x6221, 0x09DC, 0x33B9,
|
|
0x2110, 0x11DC, 0x2198, 0x4110, 0x4198, 0x1B10, 0x7621, 0x1B98,
|
|
0x3310, 0x1BDC, 0x3398, 0x6310, 0x33DC, 0x6398, 0x7710, 0x7798,
|
|
0x77DC, 0x0AF7, 0x35EF, 0x12F7, 0x65EF, 0x22F7, 0x42F7, 0x0A73,
|
|
0x34E7, 0x0B7B, 0x36F7, 0x64E7, 0x137B, 0x66F7, 0x237B, 0x4273,
|
|
0x437B, 0x0A31, 0x3463, 0x0B39, 0x1231, 0x6463, 0x0BBD, 0x1339,
|
|
0x6673, 0x13BD, 0x677B, 0x4231, 0x23BD, 0x4339, 0x43BD, 0x0A10,
|
|
0x3421, 0x0B18, 0x1210, 0x6421, 0x0B9C, 0x1318, 0x6631, 0x0BDE,
|
|
0x139C, 0x6739, 0x4210, 0x13DE, 0x67BD, 0x4318, 0x23DE, 0x3610,
|
|
0x3718, 0x6610, 0x379C, 0x6718, 0x37DE, 0x679C, 0x67DE, 0x14F7,
|
|
0x69EF, 0x24F7, 0x44F7, 0x1473, 0x68E7, 0x167B, 0x6CF7, 0x267B,
|
|
0x4473, 0x467B, 0x1431, 0x6863, 0x1639, 0x2431, 0x173D, 0x2639,
|
|
0x4431, 0x273D, 0x4639, 0x473D, 0x1410, 0x6821, 0x1618, 0x6C31,
|
|
0x171C, 0x2618, 0x4410, 0x179E, 0x271C, 0x4618, 0x279E, 0x471C,
|
|
0x479E, 0x6E18, 0x6F9E, 0x48F7, 0x2C7B, 0x4C7B, 0x2C39, 0x2E3D,
|
|
0x4E3D, 0x2C18, 0x2E1C, 0x2F1E, 0x4F1E, 0x02A0, 0x04A0, 0x1941,
|
|
0x08A0, 0x10A0, 0x20A0, 0x0DA0, 0x19A0, 0x31A0, 0x61A0, 0x3BA0,
|
|
0x73A0, 0x0561, 0x0961, 0x32C3, 0x1161, 0x62C3, 0x2161, 0x4161,
|
|
0x0520, 0x1A41, 0x05B0, 0x1B61, 0x3241, 0x09B0, 0x3361, 0x11B0,
|
|
0x6361, 0x21B0, 0x4120, 0x41B0, 0x1B20, 0x7641, 0x1BB0, 0x7761,
|
|
0x33B0, 0x6320, 0x63B0, 0x7720, 0x77B0, 0x0AE3, 0x12E3, 0x22E3,
|
|
0x42E3, 0x0A61, 0x0B71, 0x36E3, 0x64C3, 0x1371, 0x66E3, 0x2371,
|
|
0x4261, 0x4371, 0x0A20, 0x0B30, 0x1220, 0x6441, 0x0BB8, 0x1330,
|
|
0x2220, 0x13B8, 0x2330, 0x4220, 0x23B8, 0x4330, 0x3620, 0x3730,
|
|
0x6620, 0x37B8, 0x6730, 0x67B8, 0x15E7, 0x25E7, 0x45E7, 0x14E3,
|
|
0x16F3, 0x6DE7, 0x26F3, 0x44E3, 0x46F3, 0x1461, 0x68C3, 0x1671,
|
|
0x6CE3, 0x1779, 0x2671, 0x4461, 0x2779, 0x4671, 0x4779, 0x1420,
|
|
0x6841, 0x1630, 0x6C61, 0x1738, 0x2630, 0x4420, 0x17BC, 0x2738,
|
|
0x4630, 0x27BC, 0x4738, 0x6C20, 0x6E30, 0x6F38, 0x6FBC, 0x2BEF,
|
|
0x4BEF, 0x29E7, 0x2DF7, 0x49E7, 0x4DF7, 0x28E3, 0x2CF3, 0x48E3,
|
|
0x2EFB, 0x4CF3, 0x4EFB, 0x2861, 0x2C71, 0x4861, 0x2E79, 0x4C71,
|
|
0x2F7D
|
|
},
|
|
{
|
|
0x06AF, 0x1D5F, 0x0257, 0x0CAF, 0x395F, 0x0457, 0x18AF, 0x715F,
|
|
0x0857, 0x30AF, 0x1057, 0x60AF, 0x2057, 0x06D7, 0x1DAF, 0x7B5F,
|
|
0x026B, 0x0CD7, 0x39AF, 0x046B, 0x18D7, 0x71AF, 0x086B, 0x30D7,
|
|
0x106B, 0x60D7, 0x206B, 0x06EB, 0x1DD7, 0x7BAF, 0x0275, 0x0CEB,
|
|
0x39D7, 0x0475, 0x18EB, 0x71D7, 0x0875, 0x30EB, 0x1075, 0x60EB,
|
|
0x2075, 0x06F5, 0x1DEB, 0x7BD7, 0x027A, 0x0CF5, 0x39EB, 0x047A,
|
|
0x18F5, 0x71EB, 0x087A, 0x30F5, 0x107A, 0x60F5, 0x06FA, 0x1DF5,
|
|
0x7BEB, 0x0CFA, 0x39F5, 0x18FA, 0x71F5, 0x30FA, 0x1DFA, 0x7BF5,
|
|
0x39FA, 0x71FA, 0x0297, 0x0D2F, 0x3A5F, 0x0497, 0x192F, 0x725F,
|
|
0x0897, 0x312F, 0x1097, 0x612F, 0x2097, 0x4097, 0x02CB, 0x0D97,
|
|
0x3B2F, 0x04CB, 0x1997, 0x732F, 0x08CB, 0x3197, 0x10CB, 0x6197,
|
|
0x20CB, 0x40CB, 0x02E5, 0x0DCB, 0x3B97, 0x04E5, 0x19CB, 0x7397,
|
|
0x08E5, 0x31CB, 0x10E5, 0x61CB, 0x20E5, 0x40E5, 0x02F2, 0x0DE5,
|
|
0x3BCB, 0x04F2, 0x19E5, 0x73CB, 0x08F2, 0x31E5, 0x10F2, 0x61E5,
|
|
0x20F2, 0x0DF2, 0x3BE5, 0x19F2, 0x73E5, 0x31F2, 0x61F2, 0x3BF2,
|
|
0x73F2, 0x0517, 0x1A2F, 0x745F, 0x0917, 0x322F, 0x1117, 0x622F,
|
|
0x2117, 0x4117, 0x058B, 0x1B17, 0x762F, 0x098B, 0x3317, 0x118B,
|
|
0x6317, 0x218B, 0x418B, 0x05C5, 0x1B8B, 0x7717, 0x09C5, 0x338B,
|
|
0x11C5, 0x638B, 0x21C5, 0x41C5, 0x05E2, 0x1BC5, 0x778B, 0x09E2,
|
|
0x33C5, 0x11E2, 0x63C5, 0x21E2, 0x41E2, 0x1BE2, 0x77C5, 0x33E2,
|
|
0x63E2, 0x77E2, 0x0A17, 0x342F, 0x1217, 0x642F, 0x2217, 0x4217,
|
|
0x0B0B, 0x3617, 0x130B, 0x6617, 0x230B, 0x430B, 0x0B85, 0x370B,
|
|
0x1385, 0x670B, 0x2385, 0x4385, 0x0BC2, 0x3785, 0x13C2, 0x6785,
|
|
0x23C2, 0x43C2, 0x37C2, 0x67C2, 0x1417, 0x682F, 0x2417, 0x4417,
|
|
0x160B, 0x6C17, 0x260B, 0x460B, 0x1705, 0x6E0B, 0x2705, 0x4705,
|
|
0x1782, 0x6F05, 0x2782, 0x4782, 0x2817, 0x4817, 0x2C0B, 0x4C0B,
|
|
0x2E05, 0x4E05, 0x02A7, 0x0D4F, 0x3A9F, 0x04A7, 0x194F, 0x729F,
|
|
0x08A7, 0x314F, 0x10A7, 0x614F, 0x20A7, 0x40A7, 0x02D3, 0x0DA7,
|
|
0x3B4F, 0x04D3, 0x19A7, 0x734F, 0x08D3, 0x31A7, 0x10D3, 0x61A7,
|
|
0x20D3, 0x40D3, 0x02E9, 0x0DD3, 0x3BA7, 0x04E9, 0x19D3, 0x73A7,
|
|
0x08E9, 0x31D3, 0x10E9, 0x61D3, 0x20E9, 0x40E9, 0x02F4, 0x0DE9,
|
|
0x3BD3, 0x04F4, 0x19E9, 0x73D3, 0x08F4, 0x31E9, 0x10F4, 0x61E9,
|
|
0x20F4, 0x0DF4, 0x3BE9, 0x19F4, 0x73E9, 0x31F4, 0x61F4, 0x3BF4,
|
|
0x73F4, 0x056F, 0x1ADF, 0x0FD6, 0x096F, 0x32DF, 0x1F96, 0x116F,
|
|
0x62DF, 0x3F16, 0x216F, 0x416F, 0x0527, 0x1A4F, 0x749F, 0x05B7,
|
|
0x0927, 0x76DF, 0x09B7, 0x336F, 0x624F, 0x11B7, 0x2127, 0x21B7,
|
|
0x4127, 0x41B7, 0x0593, 0x1B27, 0x764F, 0x05DB, 0x0993, 0x3327,
|
|
0x09DB, 0x33B7, 0x6327, 0x11DB, 0x2193, 0x21DB, 0x4193, 0x41DB,
|
|
0x05C9, 0x1B93, 0x7727, 0x05ED, 0x09C9, 0x3393, 0x09ED, 0x33DB,
|
|
0x6393, 0x11ED, 0x21C9, 0x21ED, 0x41C9, 0x41ED, 0x05E4, 0x1BC9,
|
|
0x7793, 0x05F6, 0x09E4, 0x33C9, 0x09F6, 0x33ED, 0x63C9, 0x11F6,
|
|
0x21E4, 0x21F6, 0x41E4, 0x1BE4, 0x77C9, 0x1BF6, 0x33E4, 0x33F6,
|
|
0x63E4, 0x63F6, 0x77E4, 0x0A6F, 0x34DF, 0x1FA6, 0x126F, 0x64DF,
|
|
0x3F26, 0x226F, 0x7E26, 0x426F, 0x0A27, 0x344F, 0x0B37, 0x1227,
|
|
0x644F, 0x1337, 0x666F, 0x2337, 0x4227, 0x4337, 0x0B13, 0x3627,
|
|
0x0B9B, 0x1313, 0x6627, 0x139B, 0x6737, 0x239B, 0x4313, 0x439B,
|
|
0x0B89, 0x3713, 0x0BCD, 0x1389, 0x6713, 0x13CD, 0x679B, 0x23CD,
|
|
0x4389, 0x43CD, 0x0BC4, 0x3789, 0x0BE6, 0x13C4, 0x6789, 0x13E6,
|
|
0x67CD, 0x23E6, 0x43C4, 0x43E6, 0x37C4, 0x37E6, 0x67C4, 0x67E6,
|
|
0x146F, 0x68DF, 0x3F46, 0x246F, 0x7E46, 0x446F, 0x1427, 0x684F,
|
|
0x1637, 0x6C6F, 0x2637, 0x4427, 0x4637, 0x1613, 0x6C27, 0x171B,
|
|
0x2613, 0x271B, 0x4613, 0x471B, 0x1709, 0x6E13, 0x178D, 0x6F1B,
|
|
0x278D, 0x4709, 0x478D, 0x1784, 0x6F09, 0x17C6, 0x2784, 0x27C6,
|
|
0x4784, 0x47C6, 0x6F84, 0x6FC6, 0x286F, 0x7E86, 0x486F, 0x2827,
|
|
0x2C37, 0x4827, 0x4C37, 0x2C13, 0x2E1B, 0x4C13, 0x4E1B, 0x2E09,
|
|
0x2F0D, 0x4E09, 0x4F0D, 0x2F04, 0x2F86, 0x4F04, 0x4F86, 0x506F,
|
|
0x5027, 0x5837, 0x5813, 0x5C1B, 0x5C09, 0x5E0D, 0x0547, 0x1A8F,
|
|
0x751F, 0x0947, 0x328F, 0x1147, 0x628F, 0x2147, 0x4147, 0x05A3,
|
|
0x1B47, 0x768F, 0x09A3, 0x3347, 0x11A3, 0x6347, 0x21A3, 0x41A3,
|
|
0x05D1, 0x1BA3, 0x7747, 0x09D1, 0x33A3, 0x11D1, 0x63A3, 0x21D1,
|
|
0x41D1, 0x05E8, 0x1BD1, 0x77A3, 0x09E8, 0x33D1, 0x11E8, 0x63D1,
|
|
0x21E8, 0x41E8, 0x1BE8, 0x77D1, 0x33E8, 0x63E8, 0x77E8, 0x0ACF,
|
|
0x359F, 0x1FAC, 0x12CF, 0x659F, 0x3F2C, 0x22CF, 0x7E2C, 0x42CF,
|
|
0x0A47, 0x348F, 0x0B67, 0x1247, 0x648F, 0x1367, 0x66CF, 0x2367,
|
|
0x4247, 0x4367, 0x0B23, 0x3647, 0x0BB3, 0x1323, 0x6647, 0x13B3,
|
|
0x6767, 0x23B3, 0x4323, 0x43B3, 0x0B91, 0x3723, 0x0BD9, 0x1391,
|
|
0x6723, 0x13D9, 0x67B3, 0x23D9, 0x4391, 0x43D9, 0x0BC8, 0x3791,
|
|
0x0BEC, 0x13C8, 0x6791, 0x13EC, 0x67D9, 0x23EC, 0x43C8, 0x43EC,
|
|
0x37C8, 0x37EC, 0x67C8, 0x67EC, 0x15DF, 0x0FAE, 0x3F5D, 0x25DF,
|
|
0x1F2E, 0x7E5D, 0x45DF, 0x3E2E, 0x7C2E, 0x14CF, 0x699F, 0x3F4C,
|
|
0x16EF, 0x6DDF, 0x3F6E, 0x7E4C, 0x26EF, 0x44CF, 0x7E6E, 0x46EF,
|
|
0x1447, 0x688F, 0x1667, 0x2447, 0x1777, 0x6EEF, 0x4447, 0x2777,
|
|
0x4667, 0x4777, 0x1623, 0x6C47, 0x1733, 0x2623, 0x17BB, 0x2733,
|
|
0x4623, 0x27BB, 0x4733, 0x47BB, 0x1711, 0x6E23, 0x1799, 0x2711,
|
|
0x17DD, 0x2799, 0x4711, 0x27DD, 0x4799, 0x47DD, 0x1788, 0x6F11,
|
|
0x17CC, 0x2788, 0x17EE, 0x27CC, 0x4788, 0x27EE, 0x47CC, 0x47EE,
|
|
0x6F88, 0x6FCC, 0x29DF, 0x1F4E, 0x7E9D, 0x49DF, 0x3E4E, 0x7C4E,
|
|
0x28CF, 0x7E8C, 0x2CEF, 0x48CF, 0x7ECE, 0x4CEF, 0x2847, 0x2C67,
|
|
0x4847, 0x2E77, 0x4C67, 0x4E77, 0x2C23, 0x2E33, 0x4C23, 0x2F3B,
|
|
0x4E33, 0x4F3B, 0x2E11, 0x2F19, 0x4E11, 0x2F9D, 0x4F19, 0x4F9D,
|
|
0x2F08, 0x2F8C, 0x4F08, 0x2FCE, 0x4F8C, 0x4FCE, 0x51DF, 0x3E8E,
|
|
0x7C8E, 0x50CF, 0x58EF, 0x5047, 0x5867, 0x5C77, 0x5823, 0x5C33,
|
|
0x5E3B, 0x5C11, 0x5E19, 0x5F1D, 0x5E08, 0x5F0C, 0x5F8E, 0x7D0E,
|
|
0x0A87, 0x350F, 0x1287, 0x650F, 0x2287, 0x4287, 0x0B43, 0x3687,
|
|
0x1343, 0x6687, 0x2343, 0x4343, 0x0BA1, 0x3743, 0x13A1, 0x6743,
|
|
0x23A1, 0x43A1, 0x0BD0, 0x37A1, 0x13D0, 0x67A1, 0x23D0, 0x43D0,
|
|
0x37D0, 0x67D0, 0x158F, 0x6B1F, 0x3F58, 0x258F, 0x7E58, 0x458F,
|
|
0x1487, 0x690F, 0x16C7, 0x2487, 0x26C7, 0x4487, 0x46C7, 0x1643,
|
|
0x6C87, 0x1763, 0x2643, 0x2763, 0x4643, 0x4763, 0x1721, 0x6E43,
|
|
0x17B1, 0x2721, 0x27B1, 0x4721, 0x47B1, 0x1790, 0x6F21, 0x17D8,
|
|
0x2790, 0x27D8, 0x4790, 0x47D8, 0x6F90, 0x6FD8, 0x2B9F, 0x1F5C,
|
|
0x7EB9, 0x4B9F, 0x3E5C, 0x7C5C, 0x298F, 0x7E98, 0x2DCF, 0x498F,
|
|
0x7EDC, 0x4DCF, 0x2887, 0x2CC7, 0x4887, 0x2EE7, 0x4CC7, 0x4EE7,
|
|
0x2C43, 0x2E63, 0x4C43, 0x2F73, 0x4E63, 0x4F73, 0x2E21, 0x2F31,
|
|
0x4E21, 0x2FB9, 0x4F31, 0x4FB9, 0x2F10, 0x2F98, 0x4F10, 0x2FDC,
|
|
0x4F98, 0x4FDC, 0x0F5E, 0x3EBD, 0x1E5E, 0x7CBD, 0x3C5E, 0x785E,
|
|
0x539F, 0x3E9C, 0x5BDF, 0x3EDE, 0x7C9C, 0x7CDE, 0x518F, 0x59CF,
|
|
0x5DEF, 0x5087, 0x58C7, 0x5CE7, 0x5EF7, 0x5843, 0x5C63, 0x5E73,
|
|
0x5F7B, 0x5C21, 0x5E31, 0x5F39, 0x5FBD, 0x5E10, 0x5F18, 0x5F9C,
|
|
0x1E9E, 0x7D3D, 0x3C9E, 0x789E, 0x7D1C, 0x7D9E, 0x3D1E, 0x791E,
|
|
0x7A1E, 0x1507, 0x2507, 0x4507, 0x1683, 0x6D07, 0x2683, 0x4683,
|
|
0x1741, 0x6E83, 0x2741, 0x4741, 0x17A0, 0x6F41, 0x27A0, 0x47A0,
|
|
0x6FA0, 0x2B0F, 0x7EB0, 0x4B0F, 0x2907, 0x2D87, 0x4907, 0x4D87,
|
|
0x2C83, 0x2EC3, 0x4C83, 0x4EC3, 0x2E41, 0x2F61, 0x4E41, 0x4F61,
|
|
0x2F20, 0x2FB0, 0x4F20, 0x4FB0, 0x571F, 0x3EB8, 0x7CB8, 0x530F,
|
|
0x5B8F, 0x5107, 0x5987, 0x5DC7, 0x5883, 0x5CC3, 0x5EE3, 0x5C41,
|
|
0x5E61, 0x5F71, 0x5E20, 0x5F30, 0x5FB8, 0x1EBC, 0x7D79, 0x3CBC,
|
|
0x78BC, 0x7D38, 0x7DBC, 0x0EBE, 0x3D7D, 0x1CBE, 0x797D, 0x38BE,
|
|
0x70BE, 0x3D3C, 0x3DBE, 0x793C, 0x79BE, 0x1D3E, 0x7A7D, 0x393E,
|
|
0x713E, 0x7A3C, 0x7B3E, 0x3A3E, 0x723E, 0x743E, 0x2D03, 0x4D03,
|
|
0x2E81, 0x4E81, 0x2F40, 0x4F40, 0x5B07, 0x5903, 0x5D83, 0x5C81,
|
|
0x5EC1, 0x5E40, 0x5F60, 0x7D70, 0x3D78, 0x7978, 0x1D7C, 0x7AF9,
|
|
0x397C, 0x717C, 0x7A78, 0x7B7C, 0x0D7E, 0x3AFD, 0x197E, 0x72FD,
|
|
0x317E, 0x617E, 0x3A7C, 0x3B7E, 0x727C, 0x737E, 0x1A7E, 0x74FD,
|
|
0x327E, 0x627E, 0x747C, 0x767E, 0x347E, 0x647E, 0x7AF0, 0x3AF8,
|
|
0x72F8, 0x1AFC, 0x75F9, 0x32FC, 0x62FC, 0x74F8, 0x76FC, 0x34FC,
|
|
0x64FC
|
|
},
|
|
{
|
|
0x07D5, 0x1FAB, 0x03CA, 0x0F95, 0x3F2B, 0x078A, 0x1F15, 0x7E2B,
|
|
0x0F0A, 0x3E15, 0x1E0A, 0x0B5F, 0x07DA, 0x1FB5, 0x135F, 0x0F9A,
|
|
0x3F35, 0x235F, 0x1F1A, 0x7E35, 0x435F, 0x3E1A, 0x0BAF, 0x375F,
|
|
0x1FBA, 0x13AF, 0x675F, 0x3F3A, 0x23AF, 0x7E3A, 0x43AF, 0x0BD7,
|
|
0x37AF, 0x13D7, 0x67AF, 0x23D7, 0x43D7, 0x0BEB, 0x37D7, 0x13EB,
|
|
0x67D7, 0x23EB, 0x43EB, 0x0BF5, 0x37EB, 0x13F5, 0x67EB, 0x23F5,
|
|
0x03D2, 0x0FA5, 0x3F4B, 0x0792, 0x1F25, 0x7E4B, 0x0F12, 0x3E25,
|
|
0x1E12, 0x7C25, 0x3C12, 0x165F, 0x0FB2, 0x3F65, 0x265F, 0x1F32,
|
|
0x7E65, 0x465F, 0x3E32, 0x7C32, 0x172F, 0x6E5F, 0x3F72, 0x272F,
|
|
0x7E72, 0x472F, 0x1797, 0x6F2F, 0x2797, 0x4797, 0x17CB, 0x6F97,
|
|
0x27CB, 0x47CB, 0x17E5, 0x6FCB, 0x27E5, 0x47E5, 0x07A2, 0x1F45,
|
|
0x7E8B, 0x0F22, 0x3E45, 0x1E22, 0x7C45, 0x3C22, 0x7822, 0x2C5F,
|
|
0x1F62, 0x7EC5, 0x4C5F, 0x3E62, 0x7C62, 0x2E2F, 0x7EE2, 0x4E2F,
|
|
0x2F17, 0x4F17, 0x2F8B, 0x4F8B, 0x2FC5, 0x4FC5, 0x0F42, 0x3E85,
|
|
0x1E42, 0x7C85, 0x3C42, 0x7842, 0x585F, 0x3EC2, 0x7CC2, 0x5C2F,
|
|
0x5E17, 0x5F0B, 0x1E82, 0x7D05, 0x3C82, 0x7882, 0x7D82, 0x3D02,
|
|
0x7902, 0x03D4, 0x0FA9, 0x3F53, 0x0794, 0x1F29, 0x7E53, 0x0F14,
|
|
0x3E29, 0x1E14, 0x7C29, 0x3C14, 0x169F, 0x0FB4, 0x3F69, 0x269F,
|
|
0x1F34, 0x7E69, 0x469F, 0x3E34, 0x7C34, 0x174F, 0x6E9F, 0x3F74,
|
|
0x274F, 0x7E74, 0x474F, 0x17A7, 0x6F4F, 0x27A7, 0x47A7, 0x17D3,
|
|
0x6FA7, 0x27D3, 0x47D3, 0x17E9, 0x6FD3, 0x27E9, 0x47E9, 0x07AD,
|
|
0x1F5B, 0x7EB7, 0x0396, 0x0F2D, 0x3E5B, 0x0716, 0x1E2D, 0x7C5B,
|
|
0x0E16, 0x3C2D, 0x1C16, 0x782D, 0x3816, 0x07A4, 0x1F49, 0x7E93,
|
|
0x07B6, 0x0F24, 0x3E49, 0x0F36, 0x3E6D, 0x7C49, 0x1E36, 0x3C24,
|
|
0x3C36, 0x7824, 0x7836, 0x2C9F, 0x1F64, 0x7EC9, 0x2EDF, 0x4C9F,
|
|
0x1F76, 0x3E64, 0x4EDF, 0x3E76, 0x7C64, 0x7C76, 0x2E4F, 0x7EE4,
|
|
0x2F6F, 0x4E4F, 0x7EF6, 0x4F6F, 0x2F27, 0x2FB7, 0x4F27, 0x4FB7,
|
|
0x2F93, 0x2FDB, 0x4F93, 0x4FDB, 0x2FC9, 0x4FC9, 0x03A6, 0x0F4D,
|
|
0x3E9B, 0x0726, 0x1E4D, 0x7C9B, 0x0E26, 0x3C4D, 0x1C26, 0x784D,
|
|
0x3826, 0x7026, 0x0F44, 0x3E89, 0x0F66, 0x1E44, 0x7C89, 0x1E66,
|
|
0x7CCD, 0x3C66, 0x7844, 0x7866, 0x589F, 0x3EC4, 0x5CDF, 0x3EE6,
|
|
0x7CC4, 0x7CE6, 0x5C4F, 0x5E6F, 0x5E27, 0x5F37, 0x5F13, 0x5F9B,
|
|
0x5F89, 0x0746, 0x1E8D, 0x7D1B, 0x0E46, 0x3C8D, 0x1C46, 0x788D,
|
|
0x3846, 0x7046, 0x1E84, 0x7D09, 0x1EC6, 0x3C84, 0x3CC6, 0x7884,
|
|
0x78C6, 0x7D84, 0x7DC6, 0x0E86, 0x3D0D, 0x1C86, 0x790D, 0x3886,
|
|
0x7086, 0x3D04, 0x3D86, 0x7904, 0x7986, 0x1D06, 0x7A0D, 0x3906,
|
|
0x7106, 0x7A04, 0x7B06, 0x3A06, 0x7206, 0x07A8, 0x1F51, 0x7EA3,
|
|
0x0F28, 0x3E51, 0x1E28, 0x7C51, 0x3C28, 0x7828, 0x2D1F, 0x1F68,
|
|
0x7ED1, 0x4D1F, 0x3E68, 0x7C68, 0x2E8F, 0x7EE8, 0x4E8F, 0x2F47,
|
|
0x4F47, 0x2FA3, 0x4FA3, 0x2FD1, 0x4FD1, 0x03AC, 0x0F59, 0x3EB3,
|
|
0x072C, 0x1E59, 0x7CB3, 0x0E2C, 0x3C59, 0x1C2C, 0x7859, 0x382C,
|
|
0x702C, 0x0F48, 0x3E91, 0x0F6C, 0x1E48, 0x7C91, 0x1E6C, 0x7CD9,
|
|
0x3C6C, 0x7848, 0x786C, 0x591F, 0x3EC8, 0x5D9F, 0x3EEC, 0x7CC8,
|
|
0x7CEC, 0x5C8F, 0x5ECF, 0x5E47, 0x5F67, 0x5F23, 0x5FB3, 0x5F91,
|
|
0x075D, 0x1EBB, 0x7D77, 0x032E, 0x0E5D, 0x3CBB, 0x062E, 0x1C5D,
|
|
0x78BB, 0x0C2E, 0x385D, 0x182E, 0x705D, 0x302E, 0x074C, 0x1E99,
|
|
0x7D33, 0x076E, 0x0E4C, 0x3C99, 0x0E6E, 0x3CDD, 0x7899, 0x1C6E,
|
|
0x384C, 0x386E, 0x704C, 0x706E, 0x1E88, 0x7D11, 0x1ECC, 0x3C88,
|
|
0x1EEE, 0x3CCC, 0x7888, 0x3CEE, 0x78CC, 0x78EE, 0x7D88, 0x7DCC,
|
|
0x7DEE, 0x034E, 0x0E9D, 0x3D3B, 0x064E, 0x1C9D, 0x793B, 0x0C4E,
|
|
0x389D, 0x184E, 0x709D, 0x304E, 0x604E, 0x0E8C, 0x3D19, 0x0ECE,
|
|
0x1C8C, 0x7919, 0x1CCE, 0x799D, 0x38CE, 0x708C, 0x70CE, 0x3D08,
|
|
0x3D8C, 0x7908, 0x3DCE, 0x798C, 0x79CE, 0x068E, 0x1D1D, 0x7A3B,
|
|
0x0C8E, 0x391D, 0x188E, 0x711D, 0x308E, 0x608E, 0x1D0C, 0x7A19,
|
|
0x1D8E, 0x390C, 0x398E, 0x710C, 0x718E, 0x7A08, 0x7B0C, 0x7B8E,
|
|
0x0D0E, 0x3A1D, 0x190E, 0x721D, 0x310E, 0x610E, 0x3A0C, 0x3B0E,
|
|
0x720C, 0x730E, 0x1A0E, 0x741D, 0x320E, 0x620E, 0x740C, 0x760E,
|
|
0x340E, 0x640E, 0x0F50, 0x3EA1, 0x1E50, 0x7CA1, 0x3C50, 0x7850,
|
|
0x3ED0, 0x7CD0, 0x5D0F, 0x5E87, 0x5F43, 0x5FA1, 0x0758, 0x1EB1,
|
|
0x7D63, 0x0E58, 0x3CB1, 0x1C58, 0x78B1, 0x3858, 0x7058, 0x1E90,
|
|
0x7D21, 0x1ED8, 0x3C90, 0x3CD8, 0x7890, 0x78D8, 0x7D90, 0x7DD8,
|
|
0x035C, 0x0EB9, 0x3D73, 0x065C, 0x1CB9, 0x7973, 0x0C5C, 0x38B9,
|
|
0x185C, 0x70B9, 0x305C, 0x605C, 0x0E98, 0x3D31, 0x0EDC, 0x1C98,
|
|
0x7931, 0x1CDC, 0x3898, 0x38DC, 0x7098, 0x70DC, 0x3D10, 0x3D98,
|
|
0x7910, 0x3DDC, 0x7998, 0x79DC, 0x06BD, 0x1D7B, 0x7AF7, 0x025E,
|
|
0x0CBD, 0x397B, 0x045E, 0x18BD, 0x717B, 0x085E, 0x30BD, 0x105E,
|
|
0x60BD, 0x205E, 0x069C, 0x1D39, 0x7A73, 0x06DE, 0x0C9C, 0x3939,
|
|
0x0CDE, 0x39BD, 0x7139, 0x18DE, 0x309C, 0x30DE, 0x609C, 0x60DE,
|
|
0x1D18, 0x7A31, 0x1D9C, 0x3918, 0x1DDE, 0x399C, 0x7118, 0x39DE,
|
|
0x719C, 0x71DE, 0x7A10, 0x7B18, 0x7B9C, 0x7BDE, 0x029E, 0x0D3D,
|
|
0x3A7B, 0x049E, 0x193D, 0x727B, 0x089E, 0x313D, 0x109E, 0x613D,
|
|
0x209E, 0x409E, 0x0D1C, 0x3A39, 0x0D9E, 0x191C, 0x7239, 0x199E,
|
|
0x733D, 0x319E, 0x611C, 0x619E, 0x3A18, 0x3B1C, 0x7218, 0x3B9E,
|
|
0x731C, 0x739E, 0x051E, 0x1A3D, 0x747B, 0x091E, 0x323D, 0x111E,
|
|
0x623D, 0x211E, 0x411E, 0x1A1C, 0x7439, 0x1B1E, 0x321C, 0x331E,
|
|
0x621C, 0x631E, 0x7418, 0x761C, 0x771E, 0x0A1E, 0x343D, 0x121E,
|
|
0x643D, 0x221E, 0x421E, 0x341C, 0x361E, 0x641C, 0x661E, 0x141E,
|
|
0x683D, 0x241E, 0x441E, 0x681C, 0x6C1E, 0x1EA0, 0x7D41, 0x3CA0,
|
|
0x78A0, 0x7DA0, 0x0EB0, 0x3D61, 0x1CB0, 0x7961, 0x38B0, 0x70B0,
|
|
0x3D20, 0x3DB0, 0x7920, 0x79B0, 0x06B8, 0x1D71, 0x7AE3, 0x0CB8,
|
|
0x3971, 0x18B8, 0x7171, 0x30B8, 0x60B8, 0x1D30, 0x7A61, 0x1DB8,
|
|
0x3930, 0x39B8, 0x7130, 0x71B8, 0x7A20, 0x7B30, 0x7BB8, 0x02BC,
|
|
0x0D79, 0x3AF3, 0x04BC, 0x1979, 0x72F3, 0x08BC, 0x3179, 0x10BC,
|
|
0x6179, 0x20BC, 0x40BC, 0x0D38, 0x3A71, 0x0DBC, 0x1938, 0x7271,
|
|
0x19BC, 0x7379, 0x31BC, 0x6138, 0x61BC, 0x3A30, 0x3B38, 0x7230,
|
|
0x3BBC, 0x7338, 0x73BC, 0x057D, 0x1AFB, 0x75F7, 0x097D, 0x32FB,
|
|
0x117D, 0x62FB, 0x217D, 0x417D, 0x053C, 0x1A79, 0x74F3, 0x05BE,
|
|
0x093C, 0x3279, 0x09BE, 0x337D, 0x6279, 0x11BE, 0x213C, 0x21BE,
|
|
0x413C, 0x41BE, 0x1A38, 0x7471, 0x1B3C, 0x3238, 0x1BBE, 0x333C,
|
|
0x6238, 0x33BE, 0x633C, 0x63BE, 0x7430, 0x7638, 0x773C, 0x77BE,
|
|
0x0A7D, 0x34FB, 0x127D, 0x64FB, 0x227D, 0x427D, 0x0A3C, 0x3479,
|
|
0x0B3E, 0x123C, 0x6479, 0x133E, 0x667D, 0x233E, 0x423C, 0x433E,
|
|
0x3438, 0x363C, 0x6438, 0x373E, 0x663C, 0x673E, 0x147D, 0x68FB,
|
|
0x247D, 0x447D, 0x143C, 0x6879, 0x163E, 0x243C, 0x263E, 0x443C,
|
|
0x463E, 0x6838, 0x6C3C, 0x6E3E, 0x287D, 0x487D, 0x283C, 0x2C3E,
|
|
0x483C, 0x4C3E, 0x3D40, 0x7940, 0x1D60, 0x7AC1, 0x3960, 0x7160,
|
|
0x7A40, 0x7B60, 0x0D70, 0x3AE1, 0x1970, 0x72E1, 0x3170, 0x6170,
|
|
0x3A60, 0x3B70, 0x7260, 0x7370, 0x0578, 0x1AF1, 0x75E3, 0x0978,
|
|
0x32F1, 0x1178, 0x62F1, 0x2178, 0x4178, 0x1A70, 0x74E1, 0x1B78,
|
|
0x76F1, 0x3378, 0x6270, 0x6378, 0x7460, 0x7670, 0x7778, 0x0AF9,
|
|
0x35F3, 0x12F9, 0x65F3, 0x22F9, 0x42F9, 0x0A78, 0x34F1, 0x0B7C,
|
|
0x36F9, 0x64F1, 0x137C, 0x2278, 0x237C, 0x4278, 0x437C, 0x3470,
|
|
0x3678, 0x6470, 0x377C, 0x6678, 0x677C, 0x15FB, 0x6BF7, 0x25FB,
|
|
0x45FB, 0x14F9, 0x69F3, 0x16FD, 0x24F9, 0x26FD, 0x44F9, 0x46FD,
|
|
0x1478, 0x68F1, 0x167C, 0x2478, 0x177E, 0x267C, 0x4478, 0x277E,
|
|
0x467C, 0x477E, 0x6870, 0x6C78, 0x6E7C, 0x6F7E, 0x29FB, 0x49FB,
|
|
0x28F9, 0x2CFD, 0x48F9, 0x4CFD, 0x2878, 0x2C7C, 0x4878, 0x2E7E,
|
|
0x4C7C, 0x4E7E, 0x51FB, 0x50F9, 0x58FD, 0x5078, 0x587C, 0x5C7E,
|
|
0x3AC0, 0x72C0, 0x1AE0, 0x75C1, 0x32E0, 0x62E0, 0x74C0, 0x76E0,
|
|
0x0AF0, 0x35E1, 0x12F0, 0x65E1, 0x22F0, 0x42F0, 0x34E0, 0x36F0,
|
|
0x64E0, 0x66F0, 0x15F1, 0x6BE3, 0x25F1, 0x45F1, 0x14F0, 0x69E1,
|
|
0x16F8, 0x6DF1, 0x26F8, 0x44F0, 0x46F8, 0x68E0, 0x6CF0, 0x6EF8,
|
|
0x2BF3, 0x4BF3, 0x29F1, 0x2DF9, 0x49F1, 0x4DF9, 0x28F0, 0x2CF8,
|
|
0x48F0, 0x2EFC, 0x4CF8, 0x4EFC, 0x53F3, 0x51F1, 0x59F9, 0x50F0,
|
|
0x58F8, 0x5CFC, 0x35C0, 0x65C0, 0x15E0, 0x6BC1, 0x25E0, 0x45E0,
|
|
0x69C0, 0x6DE0, 0x2BE1, 0x4BE1, 0x29E0, 0x2DF0, 0x49E0, 0x4DF0,
|
|
0x57E3
|
|
}
|
|
};
|
|
|
|
static const unsigned short s_rs0[] = {
|
|
27, 917 };
|
|
|
|
static const unsigned short s_rs1[] = {
|
|
522, 568, 723, 809 };
|
|
|
|
static const unsigned short s_rs2[] = {
|
|
237, 308, 436, 284, 646, 653, 428, 379 };
|
|
|
|
static const unsigned short s_rs3[] = {
|
|
274, 562, 232, 755, 599, 524, 801, 132, 295, 116, 442, 428, 295, 42, 176, 65 };
|
|
|
|
static const unsigned short s_rs4[] = {
|
|
361, 575, 922, 525, 176, 586, 640, 321, 536, 742, 677, 742, 687, 284, 193, 517,
|
|
273, 494, 263, 147, 593, 800, 571, 320, 803, 133, 231, 390, 685, 330, 63, 410 };
|
|
|
|
static const unsigned short s_rs5[] = {
|
|
539, 422, 6, 93, 862, 771, 453, 106, 610, 287, 107, 505, 733, 877, 381, 612,
|
|
723, 476, 462, 172, 430, 609, 858, 822, 543, 376, 511, 400, 672, 762, 283, 184,
|
|
440, 35, 519, 31, 460, 594, 225, 535, 517, 352, 605, 158, 651, 201, 488, 502,
|
|
648, 733, 717, 83, 404, 97, 280, 771, 840, 629, 4, 381, 843, 623, 264, 543 };
|
|
|
|
static const unsigned short s_rs6[] = {
|
|
521, 310, 864, 547, 858, 580, 296, 379, 53, 779, 897, 444, 400, 925, 749, 415,
|
|
822, 93, 217, 208, 928, 244, 583, 620, 246, 148, 447, 631, 292, 908, 490, 704,
|
|
516, 258, 457, 907, 594, 723, 674, 292, 272, 96, 684, 432, 686, 606, 860, 569,
|
|
193, 219, 129, 186, 236, 287, 192, 775, 278, 173, 40, 379, 712, 463, 646, 776,
|
|
171, 491, 297, 763, 156, 732, 95, 270, 447, 90, 507, 48, 228, 821, 808, 898,
|
|
784, 663, 627, 378, 382, 262, 380, 602, 754, 336, 89, 614, 87, 432, 670, 616,
|
|
157, 374, 242, 726, 600, 269, 375, 898, 845, 454, 354, 130, 814, 587, 804, 34,
|
|
211, 330, 539, 297, 827, 865, 37, 517, 834, 315, 550, 86, 801, 4, 108, 539 };
|
|
|
|
static const unsigned short s_rs7[] = {
|
|
524, 894, 75, 766, 882, 857, 74, 204, 82, 586, 708, 250, 905, 786, 138, 720,
|
|
858, 194, 311, 913, 275, 190, 375, 850, 438, 733, 194, 280, 201, 280, 828, 757,
|
|
710, 814, 919, 89, 68, 569, 11, 204, 796, 605, 540, 913, 801, 700, 799, 137,
|
|
439, 418, 592, 668, 353, 859, 370, 694, 325, 240, 216, 257, 284, 549, 209, 884,
|
|
315, 70, 329, 793, 490, 274, 877, 162, 749, 812, 684, 461, 334, 376, 849, 521,
|
|
307, 291, 803, 712, 19, 358, 399, 908, 103, 511, 51, 8, 517, 225, 289, 470,
|
|
637, 731, 66, 255, 917, 269, 463, 830, 730, 433, 848, 585, 136, 538, 906, 90,
|
|
2, 290, 743, 199, 655, 903, 329, 49, 802, 580, 355, 588, 188, 462, 10, 134,
|
|
628, 320, 479, 130, 739, 71, 263, 318, 374, 601, 192, 605, 142, 673, 687, 234,
|
|
722, 384, 177, 752, 607, 640, 455, 193, 689, 707, 805, 641, 48, 60, 732, 621,
|
|
895, 544, 261, 852, 655, 309, 697, 755, 756, 60, 231, 773, 434, 421, 726, 528,
|
|
503, 118, 49, 795, 32, 144, 500, 238, 836, 394, 280, 566, 319, 9, 647, 550,
|
|
73, 914, 342, 126, 32, 681, 331, 792, 620, 60, 609, 441, 180, 791, 893, 754,
|
|
605, 383, 228, 749, 760, 213, 54, 297, 134, 54, 834, 299, 922, 191, 910, 532,
|
|
609, 829, 189, 20, 167, 29, 872, 449, 83, 402, 41, 656, 505, 579, 481, 173,
|
|
404, 251, 688, 95, 497, 555, 642, 543, 307, 159, 924, 558, 648, 55, 497, 10 };
|
|
|
|
static const unsigned short s_rs8[] = {
|
|
352, 77, 373, 504, 35, 599, 428, 207, 409, 574, 118, 498, 285, 380, 350, 492,
|
|
197, 265, 920, 155, 914, 299, 229, 643, 294, 871, 306, 88, 87, 193, 352, 781,
|
|
846, 75, 327, 520, 435, 543, 203, 666, 249, 346, 781, 621, 640, 268, 794, 534,
|
|
539, 781, 408, 390, 644, 102, 476, 499, 290, 632, 545, 37, 858, 916, 552, 41,
|
|
542, 289, 122, 272, 383, 800, 485, 98, 752, 472, 761, 107, 784, 860, 658, 741,
|
|
290, 204, 681, 407, 855, 85, 99, 62, 482, 180, 20, 297, 451, 593, 913, 142,
|
|
808, 684, 287, 536, 561, 76, 653, 899, 729, 567, 744, 390, 513, 192, 516, 258,
|
|
240, 518, 794, 395, 768, 848, 51, 610, 384, 168, 190, 826, 328, 596, 786, 303,
|
|
570, 381, 415, 641, 156, 237, 151, 429, 531, 207, 676, 710, 89, 168, 304, 402,
|
|
40, 708, 575, 162, 864, 229, 65, 861, 841, 512, 164, 477, 221, 92, 358, 785,
|
|
288, 357, 850, 836, 827, 736, 707, 94, 8, 494, 114, 521, 2, 499, 851, 543,
|
|
152, 729, 771, 95, 248, 361, 578, 323, 856, 797, 289, 51, 684, 466, 533, 820,
|
|
669, 45, 902, 452, 167, 342, 244, 173, 35, 463, 651, 51, 699, 591, 452, 578,
|
|
37, 124, 298, 332, 552, 43, 427, 119, 662, 777, 475, 850, 764, 364, 578, 911,
|
|
283, 711, 472, 420, 245, 288, 594, 394, 511, 327, 589, 777, 699, 688, 43, 408,
|
|
842, 383, 721, 521, 560, 644, 714, 559, 62, 145, 873, 663, 713, 159, 672, 729,
|
|
624, 59, 193, 417, 158, 209, 563, 564, 343, 693, 109, 608, 563, 365, 181, 772,
|
|
677, 310, 248, 353, 708, 410, 579, 870, 617, 841, 632, 860, 289, 536, 35, 777,
|
|
618, 586, 424, 833, 77, 597, 346, 269, 757, 632, 695, 751, 331, 247, 184, 45,
|
|
787, 680, 18, 66, 407, 369, 54, 492, 228, 613, 830, 922, 437, 519, 644, 905,
|
|
789, 420, 305, 441, 207, 300, 892, 827, 141, 537, 381, 662, 513, 56, 252, 341,
|
|
242, 797, 838, 837, 720, 224, 307, 631, 61, 87, 560, 310, 756, 665, 397, 808,
|
|
851, 309, 473, 795, 378, 31, 647, 915, 459, 806, 590, 731, 425, 216, 548, 249,
|
|
321, 881, 699, 535, 673, 782, 210, 815, 905, 303, 843, 922, 281, 73, 469, 791,
|
|
660, 162, 498, 308, 155, 422, 907, 817, 187, 62, 16, 425, 535, 336, 286, 437,
|
|
375, 273, 610, 296, 183, 923, 116, 667, 751, 353, 62, 366, 691, 379, 687, 842,
|
|
37, 357, 720, 742, 330, 5, 39, 923, 311, 424, 242, 749, 321, 54, 669, 316,
|
|
342, 299, 534, 105, 667, 488, 640, 672, 576, 540, 316, 486, 721, 610, 46, 656,
|
|
447, 171, 616, 464, 190, 531, 297, 321, 762, 752, 533, 175, 134, 14, 381, 433,
|
|
717, 45, 111, 20, 596, 284, 736, 138, 646, 411, 877, 669, 141, 919, 45, 780,
|
|
407, 164, 332, 899, 165, 726, 600, 325, 498, 655, 357, 752, 768, 223, 849, 647,
|
|
63, 310, 863, 251, 366, 304, 282, 738, 675, 410, 389, 244, 31, 121, 303, 263 };
|
|
|
|
|
|
static int _pdf417_ec_size( int iLevel )
|
|
{
|
|
return 2 << iLevel;
|
|
}
|
|
|
|
static int _pdf417_default_ec_level( int iDataSize )
|
|
{
|
|
/* https://www.idautomation.com/barcode-faq/2d/pdf417/ */
|
|
if( iDataSize <= 40 )
|
|
return 2;
|
|
if( iDataSize <= 160 )
|
|
return 3;
|
|
if( iDataSize <= 320 )
|
|
return 4;
|
|
return 5; /* <= 863 */
|
|
}
|
|
|
|
static int _pdf417_width( int iColCount, int iFlags )
|
|
{
|
|
return 17 + ( iColCount + 2 ) * 17 + 18 - ( ( iFlags & HB_ZEBRA_FLAG_PDF417_TRUNCATED ) ? 34 : 0 );
|
|
}
|
|
|
|
static int _pdf417_left_codeword( int iRow, int iRowCount, int iColCount, int iLevel )
|
|
{
|
|
if( iRow % 3 == 0 )
|
|
return ( iRow / 3 ) * 30 + ( iRowCount - 1 ) / 3;
|
|
else if( iRow % 3 == 1 )
|
|
return ( iRow / 3 ) * 30 + iLevel * 3 + ( iRowCount - 1 ) % 3;
|
|
return ( iRow / 3 ) * 30 + iColCount - 1;
|
|
}
|
|
|
|
static int _pdf417_right_codeword( int iRow, int iRowCount, int iColCount, int iLevel )
|
|
{
|
|
if( iRow % 3 == 0 )
|
|
return ( iRow / 3 ) * 30 + iColCount - 1;
|
|
else if( iRow % 3 == 1 )
|
|
return ( iRow / 3 ) * 30 + ( iRowCount - 1 ) / 3;
|
|
return ( iRow / 3 ) * 30 + iLevel * 3 + ( iRowCount - 1 ) % 3;
|
|
}
|
|
|
|
static int _pdf417_isdigit( char ch )
|
|
{
|
|
return '0' <= ch && ch <= '9';
|
|
}
|
|
|
|
static int _pdf417_isalpha( char ch )
|
|
{
|
|
return ( ' ' <= ch && ( unsigned char ) ch <= 127 ) || ch == '\t' || ch == '\n' || ch == '\r';
|
|
}
|
|
|
|
static int _pdf417_upperno( char ch )
|
|
{
|
|
if( 'A' <= ch && ch <= 'Z' )
|
|
return ch - 'A';
|
|
else if( ch == ' ' )
|
|
return 26;
|
|
|
|
return -1;
|
|
}
|
|
|
|
static int _pdf417_lowerno( char ch )
|
|
{
|
|
if( 'a' <= ch && ch <= 'z' )
|
|
return ch - 'a';
|
|
else if( ch == ' ' )
|
|
return 26;
|
|
|
|
return -1;
|
|
}
|
|
|
|
static int _pdf417_mixedno( char ch )
|
|
{
|
|
if( '0' <= ch && ch <= '9' )
|
|
return ch - '0';
|
|
|
|
switch( ch )
|
|
{
|
|
case '&':
|
|
return 10;
|
|
case '\r':
|
|
return 11;
|
|
case '\t':
|
|
return 12;
|
|
case ',':
|
|
return 13;
|
|
case ':':
|
|
return 14;
|
|
case '#':
|
|
return 15;
|
|
case '-':
|
|
return 16;
|
|
case '.':
|
|
return 17;
|
|
case '$':
|
|
return 18;
|
|
case '/':
|
|
return 19;
|
|
case '+':
|
|
return 20;
|
|
case '%':
|
|
return 21;
|
|
case '*':
|
|
return 22;
|
|
case '=':
|
|
return 23;
|
|
case '^':
|
|
return 24;
|
|
case ' ':
|
|
return 26;
|
|
}
|
|
return -1;
|
|
}
|
|
|
|
static int _pdf417_punctno( char ch )
|
|
{
|
|
switch( ch )
|
|
{
|
|
case ';':
|
|
return 0;
|
|
case '<':
|
|
return 1;
|
|
case '>':
|
|
return 2;
|
|
case '@':
|
|
return 3;
|
|
case '[':
|
|
return 4;
|
|
case '\\':
|
|
return 5;
|
|
case ']':
|
|
return 6;
|
|
case '_':
|
|
return 7;
|
|
case '`':
|
|
return 8;
|
|
case '~':
|
|
return 9;
|
|
case '!':
|
|
return 10;
|
|
case '\r':
|
|
return 11;
|
|
case '\t':
|
|
return 12;
|
|
case ',':
|
|
return 13;
|
|
case ':':
|
|
return 14;
|
|
case '\n':
|
|
return 15;
|
|
case '-':
|
|
return 16;
|
|
case '.':
|
|
return 17;
|
|
case '$':
|
|
return 18;
|
|
case '/':
|
|
return 19;
|
|
case '"':
|
|
return 20;
|
|
case '|':
|
|
return 21;
|
|
case '*':
|
|
return 22;
|
|
case '(':
|
|
return 23;
|
|
case ')':
|
|
return 24;
|
|
case '?':
|
|
return 25;
|
|
case '{':
|
|
return 26;
|
|
case '}':
|
|
return 27;
|
|
case '\'':
|
|
return 28;
|
|
}
|
|
return -1;
|
|
}
|
|
|
|
static int _pdf417_encode_byte( const char * szCode, int iLen, int * pCW, int iPos )
|
|
{
|
|
HB_LONGLONG ill;
|
|
int i;
|
|
|
|
HB_TRACE( HB_TR_DEBUG, ( "encode byte len=%d", iLen ) );
|
|
if( iLen == 0 )
|
|
return iPos;
|
|
|
|
if( iPos + 2 > MAX_CODEWORD_COUNT )
|
|
return -1;
|
|
|
|
if( iLen % 6 == 0 )
|
|
pCW[ iPos++ ] = LATCH_BYTE_FULL;
|
|
else
|
|
pCW[ iPos++ ] = LATCH_BYTE;
|
|
|
|
i = 0;
|
|
while( i < iLen )
|
|
{
|
|
if( iLen - i >= 6 )
|
|
{
|
|
ill = ( unsigned char ) szCode[ i++ ];
|
|
ill <<= 8;
|
|
ill += ( unsigned char ) szCode[ i++ ];
|
|
ill <<= 8;
|
|
ill += ( unsigned char ) szCode[ i++ ];
|
|
ill <<= 8;
|
|
ill += ( unsigned char ) szCode[ i++ ];
|
|
ill <<= 8;
|
|
ill += ( unsigned char ) szCode[ i++ ];
|
|
ill <<= 8;
|
|
ill += ( unsigned char ) szCode[ i++ ];
|
|
|
|
if( iPos + 5 > MAX_CODEWORD_COUNT )
|
|
return -1;
|
|
|
|
pCW[ iPos + 4 ] = ill % 900;
|
|
ill /= 900;
|
|
pCW[ iPos + 3 ] = ill % 900;
|
|
ill /= 900;
|
|
pCW[ iPos + 2 ] = ill % 900;
|
|
ill /= 900;
|
|
pCW[ iPos + 1 ] = ill % 900;
|
|
pCW[ iPos ] = ( int ) ( ill / 900 );
|
|
iPos += 5;
|
|
}
|
|
else
|
|
{
|
|
if( iPos + iLen - i > MAX_CODEWORD_COUNT )
|
|
return -1;
|
|
|
|
for( ; i < iLen; i++ )
|
|
pCW[ iPos++ ] = szCode[ i ];
|
|
}
|
|
}
|
|
return iPos;
|
|
}
|
|
|
|
static int _pdf417_encode_text_add( int * pCW, int iPos, int * i1, int * i2, int no )
|
|
{
|
|
*i1 = *i2;
|
|
*i2 = no;
|
|
HB_TRACE( HB_TR_DEBUG, ( "text halfcodeword %d", no ) );
|
|
if( *i1 != -1 )
|
|
{
|
|
if( iPos >= MAX_CODEWORD_COUNT )
|
|
return -1;
|
|
pCW[ iPos++ ] = *i1 * 30 + *i2;
|
|
*i1 = -1;
|
|
*i2 = -1;
|
|
}
|
|
return iPos;
|
|
}
|
|
|
|
static int _pdf417_encode_text( const char * szCode, int iLen, int * pCW, int iPos )
|
|
{
|
|
int i, j, i1, i2, no, iSubMode;
|
|
|
|
HB_TRACE( HB_TR_DEBUG, ( "encode text len=%d", iLen ) );
|
|
iSubMode = SUBMODE_UPPER;
|
|
i1 = i2 = -1;
|
|
for( i = 0; i < iLen; i++ )
|
|
{
|
|
HB_TRACE( HB_TR_DEBUG, ( "submode=%d char=%c", iSubMode, szCode[ i ] ) );
|
|
if( iSubMode == SUBMODE_UPPER )
|
|
{
|
|
if( ( no = _pdf417_upperno( szCode[ i ] ) ) != -1 )
|
|
{
|
|
}
|
|
else if( ( no = _pdf417_lowerno( szCode[ i ] ) ) != -1 )
|
|
{
|
|
iPos = _pdf417_encode_text_add( pCW, iPos, &i1, &i2, 27 /* UPPER->LOWER */ );
|
|
if( iPos == -1 )
|
|
return -1;
|
|
|
|
iSubMode = SUBMODE_LOWER;
|
|
}
|
|
else if( ( no = _pdf417_mixedno( szCode[ i ] ) ) != -1 )
|
|
{
|
|
iPos = _pdf417_encode_text_add( pCW, iPos, &i1, &i2, 28 /* UPPER->MIXED */ );
|
|
if( iPos == -1 )
|
|
return -1;
|
|
|
|
iSubMode = SUBMODE_MIXED;
|
|
}
|
|
else /* if( ( no = _pdf417_punctno( szCode[ i ] ) ) != -1 ) */
|
|
{
|
|
no = _pdf417_punctno( szCode[ i ] );
|
|
|
|
for( j = i + 1; j < iLen &&
|
|
_pdf417_punctno( szCode[ j ] ) != -1 &&
|
|
_pdf417_mixedno( szCode[ j ] ) == -1; j++ )
|
|
;
|
|
|
|
if( j - i >= 5 )
|
|
{
|
|
iPos = _pdf417_encode_text_add( pCW, iPos, &i1, &i2, 28 /* UPPER->MIXED */ );
|
|
if( iPos == -1 )
|
|
return -1;
|
|
|
|
iPos = _pdf417_encode_text_add( pCW, iPos, &i1, &i2, 25 /* MIXED->PUNCT */ );
|
|
if( iPos == -1 )
|
|
return -1;
|
|
|
|
iSubMode = SUBMODE_PUNCT;
|
|
}
|
|
else
|
|
{
|
|
iPos = _pdf417_encode_text_add( pCW, iPos, &i1, &i2, 29 /* UPPER->1PUNCT */ );
|
|
if( iPos == -1 )
|
|
return -1;
|
|
}
|
|
}
|
|
}
|
|
else if( iSubMode == SUBMODE_LOWER )
|
|
{
|
|
if( ( no = _pdf417_lowerno( szCode[ i ] ) ) != -1 )
|
|
{
|
|
}
|
|
else if( ( no = _pdf417_upperno( szCode[ i ] ) ) != -1 )
|
|
{
|
|
for( j = i + 1; j < iLen &&
|
|
_pdf417_upperno( szCode[ j ] ) != -1 &&
|
|
szCode[ j ] != ' '; j++ )
|
|
;
|
|
|
|
if( j - i >= 4 )
|
|
{
|
|
iPos = _pdf417_encode_text_add( pCW, iPos, &i1, &i2, 28 /* LOWER->MIXED */ );
|
|
if( iPos == -1 )
|
|
return -1;
|
|
|
|
iPos = _pdf417_encode_text_add( pCW, iPos, &i1, &i2, 28 /* MIXED->UPPER */ );
|
|
if( iPos == -1 )
|
|
return -1;
|
|
|
|
iSubMode = SUBMODE_UPPER;
|
|
}
|
|
else
|
|
{
|
|
iPos = _pdf417_encode_text_add( pCW, iPos, &i1, &i2, 27 /* LOWER->1UPPER */ );
|
|
if( iPos == -1 )
|
|
return -1;
|
|
}
|
|
}
|
|
else if( ( no = _pdf417_mixedno( szCode[ i ] ) ) != -1 )
|
|
{
|
|
iPos = _pdf417_encode_text_add( pCW, iPos, &i1, &i2, 28 /* LOWER->MIXED */ );
|
|
if( iPos == -1 )
|
|
return -1;
|
|
|
|
iSubMode = SUBMODE_MIXED;
|
|
}
|
|
else /* if( ( no = _pdf417_punctno( szCode[ i ] ) ) != -1 ) */
|
|
{
|
|
no = _pdf417_punctno( szCode[ i ] );
|
|
|
|
for( j = i + 1; j < iLen &&
|
|
_pdf417_punctno( szCode[ j ] ) != -1 &&
|
|
_pdf417_mixedno( szCode[ j ] ) == -1; j++ )
|
|
;
|
|
|
|
if( j - i >= 5 )
|
|
{
|
|
iPos = _pdf417_encode_text_add( pCW, iPos, &i1, &i2, 28 /* LOWER->MIXED */ );
|
|
if( iPos == -1 )
|
|
return -1;
|
|
|
|
iPos = _pdf417_encode_text_add( pCW, iPos, &i1, &i2, 25 /* MIXED->PUNCT */ );
|
|
if( iPos == -1 )
|
|
return -1;
|
|
|
|
iSubMode = SUBMODE_PUNCT;
|
|
}
|
|
else
|
|
{
|
|
iPos = _pdf417_encode_text_add( pCW, iPos, &i1, &i2, 29 /* LOWER->1PUNCT */ );
|
|
if( iPos == -1 )
|
|
return -1;
|
|
}
|
|
}
|
|
}
|
|
else if( iSubMode == SUBMODE_MIXED )
|
|
{
|
|
if( ( no = _pdf417_mixedno( szCode[ i ] ) ) != -1 )
|
|
{
|
|
}
|
|
else if( ( no = _pdf417_upperno( szCode[ i ] ) ) != -1 )
|
|
{
|
|
iPos = _pdf417_encode_text_add( pCW, iPos, &i1, &i2, 28 /* MIXED->UPPER */ );
|
|
if( iPos == -1 )
|
|
return -1;
|
|
|
|
iSubMode = SUBMODE_UPPER;
|
|
}
|
|
else if( ( no = _pdf417_lowerno( szCode[ i ] ) ) != -1 )
|
|
{
|
|
iPos = _pdf417_encode_text_add( pCW, iPos, &i1, &i2, 27 /* MIXED->LOWER */ );
|
|
if( iPos == -1 )
|
|
return -1;
|
|
|
|
iSubMode = SUBMODE_LOWER;
|
|
}
|
|
else /* if( ( no = _pdf417_punctno( szCode[ i ] ) ) != -1 ) */
|
|
{
|
|
no = _pdf417_punctno( szCode[ i ] );
|
|
|
|
for( j = i + 1; j < iLen &&
|
|
_pdf417_punctno( szCode[ j ] ) != -1 &&
|
|
_pdf417_mixedno( szCode[ j ] ) == -1; j++ )
|
|
;
|
|
|
|
if( j - i >= 4 )
|
|
{
|
|
iPos = _pdf417_encode_text_add( pCW, iPos, &i1, &i2, 25 /* MIXED->PUNCT */ );
|
|
if( iPos == -1 )
|
|
return -1;
|
|
|
|
iSubMode = SUBMODE_PUNCT;
|
|
}
|
|
else
|
|
{
|
|
iPos = _pdf417_encode_text_add( pCW, iPos, &i1, &i2, 29 /* MIXED->1PUNCT */ );
|
|
if( iPos == -1 )
|
|
return -1;
|
|
}
|
|
}
|
|
}
|
|
else /* if( iSubMode == SUBMODE_PUNCT ) */
|
|
{
|
|
if( ( no = _pdf417_punctno( szCode[ i ] ) ) != -1 )
|
|
{
|
|
}
|
|
else if( ( no = _pdf417_upperno( szCode[ i ] ) ) != -1 )
|
|
{
|
|
iPos = _pdf417_encode_text_add( pCW, iPos, &i1, &i2, 29 /* PUNCT->UPPER */ );
|
|
if( iPos == -1 )
|
|
return -1;
|
|
|
|
iSubMode = SUBMODE_UPPER;
|
|
}
|
|
else if( ( no = _pdf417_lowerno( szCode[ i ] ) ) != -1 )
|
|
{
|
|
iPos = _pdf417_encode_text_add( pCW, iPos, &i1, &i2, 29 /* PUNCT->UPPER */ );
|
|
if( iPos == -1 )
|
|
return -1;
|
|
|
|
iPos = _pdf417_encode_text_add( pCW, iPos, &i1, &i2, 27 /* UPPER->LOWER */ );
|
|
if( iPos == -1 )
|
|
return -1;
|
|
|
|
iSubMode = SUBMODE_LOWER;
|
|
}
|
|
else /* if( ( no = _pdf417_mixedno( szCode[ i ] ) ) != -1 ) */
|
|
{
|
|
no = _pdf417_mixedno( szCode[ i ] );
|
|
iPos = _pdf417_encode_text_add( pCW, iPos, &i1, &i2, 29 /* PUNCT->UPPER */ );
|
|
if( iPos == -1 )
|
|
return -1;
|
|
|
|
iPos = _pdf417_encode_text_add( pCW, iPos, &i1, &i2, 28 /* UPPER->MIXED */ );
|
|
if( iPos == -1 )
|
|
return -1;
|
|
|
|
iSubMode = SUBMODE_MIXED;
|
|
}
|
|
}
|
|
|
|
iPos = _pdf417_encode_text_add( pCW, iPos, &i1, &i2, no );
|
|
if( iPos == -1 )
|
|
return -1;
|
|
}
|
|
|
|
if( i2 != -1 )
|
|
{
|
|
/* Dummy submode switch to flush half of codeword */
|
|
iPos = _pdf417_encode_text_add( pCW, iPos, &i1, &i2, 29 );
|
|
if( iPos == -1 )
|
|
return -1;
|
|
}
|
|
return iPos;
|
|
}
|
|
|
|
static int _pdf417_encode_numeric( const char * szCode, int iLen, int * pCW, int iPos )
|
|
{
|
|
/* Some very long integer (147-bit) arithmetics should be implemented to encode
|
|
digits in an effective way. I use more simple way and encode digits in groups
|
|
not longer that 18 digits. 64-bit integer arithmetics do this job */
|
|
|
|
int i, j;
|
|
|
|
HB_TRACE( HB_TR_DEBUG, ( "encode numeric len=%d", iLen ) );
|
|
if( iLen == 0 )
|
|
return iPos;
|
|
|
|
i = 0;
|
|
while( i < iLen )
|
|
{
|
|
HB_LONGLONG ill;
|
|
int k = iLen - i;
|
|
if( k > 18 )
|
|
k = 18;
|
|
|
|
if( iPos + 1 + k / 3 + 1 > MAX_CODEWORD_COUNT )
|
|
return -1;
|
|
|
|
pCW[ iPos++ ] = LATCH_NUMERIC;
|
|
ill = 1;
|
|
for( j = 0; j < k; j++ )
|
|
{
|
|
ill *= 10;
|
|
ill += szCode[ i++ ] - '0';
|
|
}
|
|
k = k / 3 + 1;
|
|
for( j = k - 1; j >= 0; j-- )
|
|
{
|
|
pCW[ iPos + j ] = ill % 900;
|
|
ill /= 900;
|
|
}
|
|
iPos += k;
|
|
}
|
|
return iPos;
|
|
}
|
|
|
|
static int _pdf417_encode( const char * szCode, int iLen, int * pCW )
|
|
{
|
|
int i, j, iMode, iPos, iStart;
|
|
|
|
/*
|
|
Byte: 6 bytes -> 5 CW 1.2
|
|
Text: 2 characters -> 1 CW 2
|
|
Numeric: 44 digits -> 15 CW 2.933333
|
|
*/
|
|
iMode = LATCH_TEXT;
|
|
iStart = 0;
|
|
iPos = 1; /* 0 is reserved for length */
|
|
for( i = 0; i < iLen; i++ )
|
|
{
|
|
if( iMode == LATCH_TEXT )
|
|
{
|
|
if( _pdf417_isdigit( szCode[ i ] ) )
|
|
{
|
|
/*
|
|
Digit in text mode uses 0.5 CW, in numeric mode 0.3409 CW.
|
|
To save 2 CW + average remaining space in text mode we must
|
|
have 2.5 / (0.5-0.3409) = 15.71 digits
|
|
*/
|
|
for( j = i + 1; j < iLen && _pdf417_isdigit( szCode[ j ] ); j++ )
|
|
;
|
|
if( j - i >= 16 )
|
|
{
|
|
iPos = _pdf417_encode_text( szCode + iStart, i - iStart, pCW, iPos );
|
|
if( iPos == -1 || iPos >= MAX_CODEWORD_COUNT - 2 )
|
|
return -1;
|
|
|
|
iMode = LATCH_NUMERIC;
|
|
iStart = i;
|
|
}
|
|
}
|
|
else if( ! _pdf417_isalpha( szCode[ i ] ) )
|
|
{
|
|
iPos = _pdf417_encode_text( szCode + iStart, i - iStart, pCW, iPos );
|
|
if( iPos == -1 || iPos >= MAX_CODEWORD_COUNT - 2 )
|
|
return -1;
|
|
|
|
/* Switch if we have 3 or more non-alphanumeric values */
|
|
for( j = i + 1; j < iLen && ! _pdf417_isalpha( szCode[ j ] ); j++ )
|
|
;
|
|
if( j - i >= 3 )
|
|
{
|
|
iMode = LATCH_BYTE;
|
|
iStart = i;
|
|
}
|
|
else
|
|
{
|
|
pCW[ iPos++ ] = SHIFT_BYTE;
|
|
pCW[ iPos++ ] = szCode[ i ];
|
|
}
|
|
}
|
|
}
|
|
else if( iMode == LATCH_BYTE )
|
|
{
|
|
if( _pdf417_isdigit( szCode[ i ] ) )
|
|
{
|
|
for( j = i + 1; j < iLen && _pdf417_isdigit( szCode[ i ] ); j++ )
|
|
;
|
|
if( j - i >= 4 )
|
|
{
|
|
iPos = _pdf417_encode_byte( szCode + iStart, i - iStart, pCW, iPos );
|
|
if( iPos == -1 || iPos >= MAX_CODEWORD_COUNT - 2 )
|
|
return -1;
|
|
iMode = LATCH_NUMERIC;
|
|
iStart = i;
|
|
}
|
|
}
|
|
if( iMode == LATCH_BYTE && _pdf417_isalpha( szCode[ i ] ) )
|
|
{
|
|
for( j = i + 1; j < iLen && _pdf417_isdigit( szCode[ i ] ); j++ )
|
|
;
|
|
if( j - i >= 4 )
|
|
{
|
|
iPos = _pdf417_encode_byte( szCode + iStart, i - iStart, pCW, iPos );
|
|
if( iPos == -1 || iPos >= MAX_CODEWORD_COUNT - 2 )
|
|
return -1;
|
|
iMode = LATCH_TEXT;
|
|
iStart = i;
|
|
}
|
|
}
|
|
}
|
|
else /* if( iMode == LATCH_NUMERIC ) */
|
|
{
|
|
if( _pdf417_isdigit( szCode[ i ] ) )
|
|
{
|
|
}
|
|
else if( ! _pdf417_isalpha( szCode[ i ] ) )
|
|
{
|
|
iPos = _pdf417_encode_numeric( szCode + iStart, i - iStart, pCW, iPos );
|
|
if( iPos == -1 || iPos >= MAX_CODEWORD_COUNT - 2 )
|
|
return -1;
|
|
|
|
for( j = i + 1; j < iLen && ! _pdf417_isalpha( szCode[ j ] ); j++ )
|
|
;
|
|
if( j - i >= 2 )
|
|
{
|
|
iMode = LATCH_BYTE;
|
|
iStart = i;
|
|
}
|
|
else
|
|
{
|
|
for( j = i + 2; j < iLen && _pdf417_isdigit( szCode[ j ] ); j++ )
|
|
;
|
|
if( j - i >= 16 )
|
|
{
|
|
pCW[ iPos++ ] = SHIFT_BYTE;
|
|
pCW[ iPos++ ] = szCode[ i ];
|
|
}
|
|
else
|
|
{
|
|
iMode = LATCH_BYTE;
|
|
iStart = i;
|
|
}
|
|
}
|
|
}
|
|
else /* if( _pdf417_isalpha( szCode[ i ] ) ) */
|
|
{
|
|
iPos = _pdf417_encode_numeric( szCode + iStart, i - iStart, pCW, iPos );
|
|
if( iPos == -1 || iPos >= MAX_CODEWORD_COUNT - 2 )
|
|
return -1;
|
|
iMode = LATCH_TEXT;
|
|
iStart = i;
|
|
}
|
|
}
|
|
}
|
|
if( iMode == LATCH_TEXT )
|
|
iPos = _pdf417_encode_text( szCode + iStart, i - iStart, pCW, iPos );
|
|
else if( iMode == LATCH_BYTE )
|
|
iPos = _pdf417_encode_byte( szCode + iStart, i - iStart, pCW, iPos );
|
|
else /* if( iMode == LATCH_NUMERIC ) */
|
|
iPos = _pdf417_encode_numeric( szCode + iStart, i - iStart, pCW, iPos );
|
|
return iPos;
|
|
}
|
|
|
|
static void _pdf417_reed_solomon( int * pCW, int iLen, int iLevel )
|
|
{
|
|
int * pEC;
|
|
const unsigned short * coef;
|
|
int i, j, iECLen;
|
|
|
|
iECLen = _pdf417_ec_size( iLevel );
|
|
|
|
pEC = pCW + iLen;
|
|
|
|
switch( iLevel )
|
|
{
|
|
case 1:
|
|
coef = s_rs1;
|
|
break;
|
|
case 2:
|
|
coef = s_rs2;
|
|
break;
|
|
case 3:
|
|
coef = s_rs3;
|
|
break;
|
|
case 4:
|
|
coef = s_rs4;
|
|
break;
|
|
case 5:
|
|
coef = s_rs5;
|
|
break;
|
|
case 6:
|
|
coef = s_rs6;
|
|
break;
|
|
case 7:
|
|
coef = s_rs7;
|
|
break;
|
|
case 8:
|
|
coef = s_rs8;
|
|
break;
|
|
default:
|
|
coef = s_rs0;
|
|
break;
|
|
}
|
|
|
|
for( i = 0; i < iECLen; i++ )
|
|
pEC[ i ] = 0;
|
|
|
|
for( i = 0; i < iLen; i++ )
|
|
{
|
|
int iM = ( pCW[ i ] + pEC[ iECLen - 1 ] ) % 929;
|
|
for( j = iECLen - 1; j >= 0; j-- )
|
|
{
|
|
if( j )
|
|
pEC[ j ] = ( pEC[ j - 1 ] + 929 - ( iM * coef[ j ] ) % 929 ) % 929;
|
|
else
|
|
pEC[ j ] = ( 929 - ( iM * coef[ j ] ) % 929 ) % 929;
|
|
}
|
|
}
|
|
for( i = 0; i < iECLen; i++ )
|
|
{
|
|
if( pEC[ i ] )
|
|
pEC[ i ] = 929 - pEC[ i ];
|
|
}
|
|
for( i = 0; i < iECLen / 2; i++ )
|
|
{
|
|
j = pEC[ i ];
|
|
pEC[ i ] = pEC[ iECLen - 1 - i ];
|
|
pEC[ iECLen - 1 - i ] = j;
|
|
}
|
|
}
|
|
|
|
PHB_ZEBRA hb_zebra_create_pdf417( const char * szCode, HB_SIZE nLen, int iFlags, int iColCount )
|
|
{
|
|
PHB_ZEBRA pZebra;
|
|
int * pCW;
|
|
int i, j, iLevel, iRowCount, iDataCount, iCount, iLen = ( int ) nLen;
|
|
|
|
pZebra = hb_zebra_create();
|
|
pZebra->iType = HB_ZEBRA_TYPE_PDF417;
|
|
|
|
pCW = ( int * ) hb_xgrab( sizeof( int ) * MAX_CODEWORD_COUNT );
|
|
iDataCount = _pdf417_encode( szCode, iLen, pCW );
|
|
if( iDataCount == -1 )
|
|
{
|
|
hb_xfree( pCW );
|
|
pZebra->iError = HB_ZEBRA_ERROR_INVALIDCODE;
|
|
return pZebra;
|
|
}
|
|
|
|
iLevel = iFlags & HB_ZEBRA_FLAG_PDF417_LEVEL_MASK;
|
|
if( iLevel != 0 )
|
|
{
|
|
i = HB_ZEBRA_FLAG_PDF417_LEVEL_MASK;
|
|
while( ( i & 1 ) == 0 )
|
|
{
|
|
iLevel >>= 1;
|
|
i >>= 1;
|
|
}
|
|
|
|
iLevel--;
|
|
|
|
if( iLevel > 8 )
|
|
iLevel = 8;
|
|
}
|
|
else
|
|
iLevel = _pdf417_default_ec_level( iDataCount );
|
|
|
|
if( iDataCount + _pdf417_ec_size( iLevel ) > MAX_CODEWORD_COUNT )
|
|
{
|
|
hb_xfree( pCW );
|
|
pZebra->iError = HB_ZEBRA_ERROR_TOOLARGE;
|
|
return pZebra;
|
|
}
|
|
|
|
if( iColCount <= 0 )
|
|
{
|
|
iRowCount = MIN_ROW_COUNT;
|
|
for( ;; )
|
|
{
|
|
iColCount = ( iDataCount + _pdf417_ec_size( iLevel ) + iRowCount - 1 ) / iRowCount;
|
|
/* w:h aspect ration is less than 2:1 for default 3x module height */
|
|
HB_TRACE( HB_TR_DEBUG, ( "iDataCount=%d iRowCount=%d iColCount=%d", iDataCount, iRowCount, iColCount ) );
|
|
if( ( _pdf417_width( iColCount, iFlags ) < iRowCount * 3 * 2 || iColCount == 1 ) &&
|
|
iColCount <= MAX_COL_COUNT &&
|
|
iColCount * iRowCount <= MAX_CODEWORD_COUNT ) /* This should solve 928 (= 29 columns * 32 rows) problem */
|
|
{
|
|
HB_TRACE( HB_TR_DEBUG, ( "tinka" ) );
|
|
break;
|
|
}
|
|
iRowCount++;
|
|
}
|
|
}
|
|
else
|
|
{
|
|
if( iColCount > MAX_COL_COUNT )
|
|
iColCount = MAX_COL_COUNT;
|
|
iRowCount = ( iDataCount + _pdf417_ec_size( iLevel ) + iColCount - 1 ) / iColCount;
|
|
if( iRowCount < MIN_ROW_COUNT )
|
|
iRowCount = MIN_ROW_COUNT;
|
|
}
|
|
|
|
iCount = iRowCount * iColCount;
|
|
if( iRowCount > MAX_ROW_COUNT || iCount > MAX_CODEWORD_COUNT )
|
|
{
|
|
hb_xfree( pCW );
|
|
pZebra->iError = HB_ZEBRA_ERROR_ARGUMENT;
|
|
return pZebra;
|
|
}
|
|
|
|
pCW[ 0 ] = iCount - _pdf417_ec_size( iLevel );
|
|
|
|
/* Padding */
|
|
for( ; iDataCount < iCount - _pdf417_ec_size( iLevel ); iDataCount++ )
|
|
pCW[ iDataCount ] = LATCH_TEXT;
|
|
|
|
/* Reed-Solomon error correction */
|
|
_pdf417_reed_solomon( pCW, iDataCount, iLevel );
|
|
|
|
pZebra->iCol = _pdf417_width( iColCount, iFlags );
|
|
pZebra->szCode = hb_strdup( "" );
|
|
pZebra->pBits = hb_bitbuffer_create();
|
|
|
|
HB_TRACE( HB_TR_DEBUG, ( "iColCount=%d iRowCount=%d ECCount=%d", iColCount, iRowCount, _pdf417_ec_size( iLevel ) ) );
|
|
for( i = 0; i < iCount; i++ )
|
|
HB_TRACE( HB_TR_DEBUG, ( "%d", pCW[ i ] ) );
|
|
|
|
|
|
for( i = 0; i < iRowCount; i++ )
|
|
{
|
|
hb_bitbuffer_cat_int( pZebra->pBits, CODE_START, 17 );
|
|
hb_bitbuffer_cat_int( pZebra->pBits, 1, 1 );
|
|
hb_bitbuffer_cat_int( pZebra->pBits,
|
|
s_code[ i % 3 ][ _pdf417_left_codeword( i, iRowCount, iColCount, iLevel ) ],
|
|
15 );
|
|
hb_bitbuffer_cat_int( pZebra->pBits, 0, 1 );
|
|
|
|
for( j = 0; j < iColCount; j++ )
|
|
{
|
|
hb_bitbuffer_cat_int( pZebra->pBits, 1, 1 );
|
|
hb_bitbuffer_cat_int( pZebra->pBits,
|
|
s_code[ i % 3 ][ pCW[ i * iColCount + j ] ],
|
|
15 );
|
|
hb_bitbuffer_cat_int( pZebra->pBits, 0, 1 );
|
|
}
|
|
|
|
if( iFlags & HB_ZEBRA_FLAG_PDF417_TRUNCATED )
|
|
{
|
|
hb_bitbuffer_cat_int( pZebra->pBits, 1, 1 );
|
|
}
|
|
else
|
|
{
|
|
hb_bitbuffer_cat_int( pZebra->pBits, 1, 1 );
|
|
hb_bitbuffer_cat_int( pZebra->pBits,
|
|
s_code[ i % 3 ][ _pdf417_right_codeword( i, iRowCount, iColCount, iLevel ) ],
|
|
15 );
|
|
hb_bitbuffer_cat_int( pZebra->pBits, 0, 1 );
|
|
hb_bitbuffer_cat_int( pZebra->pBits, CODE_STOP, 18 );
|
|
}
|
|
}
|
|
hb_xfree( pCW );
|
|
return pZebra;
|
|
}
|
|
|
|
|
|
HB_FUNC( HB_ZEBRA_CREATE_PDF417 )
|
|
{
|
|
PHB_ITEM pItem = hb_param( 1, HB_IT_STRING );
|
|
|
|
if( pItem )
|
|
hb_zebra_ret( hb_zebra_create_pdf417( hb_itemGetCPtr( pItem ), hb_itemGetCLen( pItem ), hb_parni( 2 ), hb_parni( 3 ) ) );
|
|
else
|
|
hb_errRT_BASE( EG_ARG, 3012, NULL, HB_ERR_FUNCNAME, HB_ERR_ARGS_BASEPARAMS );
|
|
}
|