From 700c47d9d0519308b3c8024d918206f9228f386e Mon Sep 17 00:00:00 2001
From: hooper114 <hooper114>
Date: Tue, 13 Jan 2009 17:49:00 +0000
Subject: [PATCH] Add GS1 support to Code 16k

---
 backend/code16k.c | 50 +++++++++++++++++++++++++++++++++++------------
 backend/library.c |  1 +
 2 files changed, 39 insertions(+), 12 deletions(-)

diff --git a/backend/code16k.c b/backend/code16k.c
index 938a84b7..3f138318 100644
--- a/backend/code16k.c
+++ b/backend/code16k.c
@@ -125,10 +125,13 @@ int code16k(struct zint_symbol *symbol, unsigned char source[])
 	float glyph_count;
 	int errornum, first_sum, second_sum;
 	int input_length;
+	int gs1;
 
 	errornum = 0;
 	input_length = ustrlen(source);
 	
+	if(symbol->input_mode == GS1_MODE) { gs1 = 1; } else { gs1 = 0; }
+	
 	if(input_length > 157) {
 		strcpy(symbol->errtxt, "Input too long [231]");
 		return ERROR_TOO_LONG;
@@ -171,6 +174,7 @@ int code16k(struct zint_symbol *symbol, unsigned char source[])
 	indexchaine = 0;
 	
 	mode = parunmodd(source[indexchaine], symbol->nullchar);
+	if((gs1) && (source[indexchaine] == '[')) { mode = ABORC; } /* FNC1 */
 	
 	for(i = 0; i < 160; i++) {
 		list[0][i] = 0;
@@ -182,6 +186,7 @@ int code16k(struct zint_symbol *symbol, unsigned char source[])
 			list[0][indexliste]++;
 			indexchaine++;
 			mode = parunmodd(source[indexchaine], symbol->nullchar);
+			if((gs1) && (source[indexchaine] == '[')) { mode = ABORC; } /* FNC1 */
 		}
 		indexliste++;
 	} while (indexchaine < input_length);
@@ -223,6 +228,21 @@ int code16k(struct zint_symbol *symbol, unsigned char source[])
 		}
 	}
 
+	/* We have a problem with FNC1 in Code Set C to resolve */
+	for(i = 0; i < read; i++) {
+		if((set[i] == 'C') && (source[i] == '[')) {
+			int c_count;
+			
+			c_count = 0;
+			for(j = 0; j < i; j++) {
+				if(set[j] == 'C') { c_count++; } else { c_count = 0; }
+			}
+			if((c_count % 2) == 1) {
+				set[i - 1] = 'B';
+			}
+		}
+	}
+	
 	/* Make sure the data will fit in the symbol */
 	last_set = ' ';
 	last_fset = ' ';
@@ -264,7 +284,7 @@ int code16k(struct zint_symbol *symbol, unsigned char source[])
 			}
 		}
 		
-		if(set[i] == 'C') {
+		if((set[i] == 'C') && (!((gs1) && (source[i] == '[')))) {
 			glyph_count = glyph_count + 0.5;
 		} else {
 			glyph_count = glyph_count + 1.0;
@@ -389,17 +409,23 @@ int code16k(struct zint_symbol *symbol, unsigned char source[])
 			bar_characters++;
 		}
 
-		switch(set[read])
-		{ /* Encode data characters */
-			case 'A': c16k_set_a(source[read], values, &bar_characters, symbol->nullchar);
-				read++;
-				break;
-			case 'B': c16k_set_b(source[read], values, &bar_characters);
-				read++;
-				break;
-			case 'C': c16k_set_c(source[read], source[read + 1], values, &bar_characters);
-				read += 2;
-				break;
+		if(!((gs1) && (source[read] == '['))) {
+			switch(set[read])
+			{ /* Encode data characters */
+				case 'A': c16k_set_a(source[read], values, &bar_characters, symbol->nullchar);
+					read++;
+					break;
+				case 'B': c16k_set_b(source[read], values, &bar_characters);
+					read++;
+					break;
+				case 'C': c16k_set_c(source[read], source[read + 1], values, &bar_characters);
+					read += 2;
+					break;
+			}
+		} else {
+			values[bar_characters] = 102;
+			bar_characters++;
+			read++;
 		}
 	} while (read < ustrlen(source));
 
diff --git a/backend/library.c b/backend/library.c
index 1e817f9a..25ac1c60 100644
--- a/backend/library.c
+++ b/backend/library.c
@@ -200,6 +200,7 @@ int gs1_compliant(int symbology)
 		case BARCODE_RSS14STACK_CC:
 		case BARCODE_RSS14_OMNI_CC:
 		case BARCODE_RSS_EXPSTACK_CC:
+		case BARCODE_CODE16K:
 			result = 1;
 			break;
 	}