/**********************************************************************************************/ /* The MIT License */ /* */ /* Copyright 2016-2017 Twitch Interactive, Inc. or its affiliates. All Rights Reserved. */ /* */ /* Permission is hereby granted, free of charge, to any person obtaining a copy */ /* of this software and associated documentation files (the "Software"), to deal */ /* in the Software without restriction, including without limitation the rights */ /* to use, copy, modify, merge, publish, distribute, sublicense, and/or sell */ /* copies of the Software, and to permit persons to whom the Software is */ /* furnished to do so, subject to the following conditions: */ /* */ /* The above copyright notice and this permission notice shall be included in */ /* all copies or substantial portions of the Software. */ /* */ /* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR */ /* IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, */ /* FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE */ /* AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER */ /* LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, */ /* OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN */ /* THE SOFTWARE. */ /**********************************************************************************************/ #include "eia608.h" #include #include #include #include // all possible utf8 valies, including invalid ones void encode_utf8ish(int32_t in, char out[7]) { if (0 > in) { out[0] = 0; return; } // 0xxxxxxx, 7 bits if (0x80 > in) { out[0] = in; out[1] = 0; return; } // 110xxxxx 10xxxxxx, 11 bits if (0x800 > in) { out[0] = 0xC0 | ((in >> (6 * 1)) & 0x1F); out[1] = 0x80 | ((in >> (6 * 0)) & 0x3F); out[2] = 0; return; } // 1110xxxx 10xxxxxx 10xxxxxx, 16 bits if (0x10000 > in) { out[0] = 0xE0 | ((in >> (6 * 2)) & 0x0F); out[1] = 0x80 | ((in >> (6 * 1)) & 0x3F); out[2] = 0x80 | ((in >> (6 * 0)) & 0x3F); out[3] = 0; return; } // 11110xxx 10xxxxxx 10xxxxxx 10xxxxxx, 21 bits if (0x200000 > in) { out[0] = 0xF0 | ((in >> (6 * 3)) & 0x07); out[1] = 0x80 | ((in >> (6 * 2)) & 0x3F); out[2] = 0x80 | ((in >> (6 * 1)) & 0x3F); out[3] = 0x80 | ((in >> (6 * 0)) & 0x3F); out[4] = 0; return; } // 111110xx 10xxxxxx 10xxxxxx 10xxxxxx 10xxxxxx, 26 bits if (0x4000000 > in) { out[0] = 0xF8 | ((in >> (6 * 4)) & 0x03); out[1] = 0x80 | ((in >> (6 * 3)) & 0x3F); out[2] = 0x80 | ((in >> (6 * 2)) & 0x3F); out[3] = 0x80 | ((in >> (6 * 1)) & 0x3F); out[4] = 0x80 | ((in >> (6 * 0)) & 0x3F); out[5] = 0; return; } // 1111110x 10xxxxxx 10xxxxxx 10xxxxxx 10xxxxxx 10xxxxxx, 31 bits if (0x80000000 > in) { out[0] = 0xFC | ((in >> (6 * 5)) & 0x01); out[1] = 0x80 | ((in >> (6 * 4)) & 0x3F); out[2] = 0x80 | ((in >> (6 * 3)) & 0x3F); out[3] = 0x80 | ((in >> (6 * 2)) & 0x3F); out[4] = 0x80 | ((in >> (6 * 1)) & 0x3F); out[5] = 0x80 | ((in >> (6 * 0)) & 0x3F); out[6] = 0; return; } } void test_all_utf8() { char s[7]; size_t size, count = 0; uint16_t code1, code2; for (int i = 0; i < 0x80000000; ++i) { encode_utf8ish(i, &s[0]); code1 = eia608_from_utf8((const char*)&s[0], 0, &size); // code2 = eia608_from_utf8 ( (const char*) &s[0], 1, &size); if (code1) { ++count; printf("%d: string: '%s' code: %04X\n", count, &s[0], code1); } } // Count must be 177 // 176 charcters, pile we have two mapping for left quote mark } #define BIN "%d%d%d%d%d%d%d%d %d%d%d%d%d%d%d%d" #define BIND(D) ((D) >> 15) & 0x01, ((D) >> 14) & 0x01, ((D) >> 13) & 0x01, ((D) >> 12) & 0x01, ((D) >> 11) & 0x01, ((D) >> 10) & 0x01, ((D) >> 9) & 0x01, ((D) >> 8) & 0x01, ((D) >> 7) & 0x01, ((D) >> 6) & 0x01, ((D) >> 5) & 0x01, ((D) >> 4) & 0x01, ((D) >> 3) & 0x01, ((D) >> 2) & 0x01, ((D) >> 1) & 0x01, ((D) >> 0) & 0x01 void print_bin(int n) { int mask = 0x80; for (int mask = 0x80; mask; mask >>= 1) { printf("%s", n & mask ? "1" : "0"); } printf("\n"); } void void_test_all_possible_code_words() { for (int i = 0; i <= 0x3FFF; ++i) { int16_t code = eia608_parity(((i << 1) & 0x7F00) | (i & 0x7F)); int count = eia608_cc_data_is_extended_data_service(code) + eia608_cc_data_is_basic_north_american_character(code) + eia608_cc_data_is_special_north_american_character(code) + eia608_cc_data_is_extended_western_european_character(code) + eia608_cc_data_is_nonwestern_norpak_character(code) + eia608_cc_data_is_row_preamble(code) + eia608_cc_data_is_control_command(code); if (1 < count) { printf("code 0x%04X matched >1\n", code & 0x7F7F); } // if (0 == count) { // printf ("code 0x%04X not matched %d\n",eia608_strip_parity_bits (code), i); // } } } void print_charmap() { for (int i = 0; i < EIA608_CHAR_COUNT; ++i) { printf("%s", eia608_char_map[i]); } printf("\n"); } void dance() { for (int i = 0; i < 100; ++i) { const char* l = 0 == rand() % 2 ? EIA608_CHAR_BOX_DRAWINGS_LIGHT_UP_AND_RIGHT : EIA608_CHAR_BOX_DRAWINGS_LIGHT_DOWN_AND_RIGHT; const char* r = 0 == rand() % 2 ? EIA608_CHAR_BOX_DRAWINGS_LIGHT_DOWN_AND_LEFT : EIA608_CHAR_BOX_DRAWINGS_LIGHT_UP_AND_LEFT; printf("%s %s%s%s%s%s%s%s %s ", EIA608_CHAR_EIGHTH_NOTE, l, EIA608_CHAR_LEFT_PARENTHESIS, EIA608_CHAR_EM_DASH, EIA608_CHAR_LOW_LINE, EIA608_CHAR_EM_DASH, EIA608_CHAR_RIGHT_PARENTHESIS, r, EIA608_CHAR_EIGHTH_NOTE); } } int main(int argc, const char** arg) { // print_charmap(); // // return 0; // srand (time (0)); // // test_all_utf8(); // // void_test_all_possible_code_words(); // // return 0; // // print_charmap(); // dance(); // return 0; for (int i = 0; i <= 0x3FFF; ++i) { uint16_t code1 = eia608_parity(((i << 1) & 0x7F00) | (i & 0x7F)); switch (eia608_cc_data_type(code1)) { default: case EIA608_CC_DATA_UNKNOWN: // printf ("Unknown code %04X\n",code); break; case EIA608_CC_DATA_CONTROL_COMMAND: { int cc; eia608_control_t cmd = eia608_parse_control(code1, &cc); uint16_t code2 = eia608_control_command(cmd, cc); if (code1 != code2) { printf(BIN " != " BIN " (0x%04x != 0x%04x) cc: %d\n", BIND(code1), BIND(code2), code1, code2, cc); } } break; case EIA608_CC_DATA_BASIC_NORTH_AMERICAN_CHARACTER: { char char1[5], char2[5]; int chan; size_t size; if (eia608_to_utf8(code1, &chan, &char1[0], &char2[0])) { uint16_t code2 = eia608_from_utf8_2(&char1[0], &char2[0]); // if the second char is invalid, mask it off, we will accept the first if (0x80 < (code1 & 0x007F) || 0x20 > (code1 & 0x007F)) { code1 = (code1 & 0xFF00) | 0x0080; } if (code1 == code2) { // printf ("%s " BIN " == " BIN " (0x%04x == 0x%04x)\n", &char1[0], BIND (code1), BIND (code2),code1,code2); } else { printf("%s %s " BIN " != " BIN " (0x%04x != 0x%04x)\n", &char1[0], &char2[0], BIND(code1), BIND(code2), code1, code2); } } } break; case EIA608_CC_DATA_SPECIAL_NORTH_AMERICAN_CHARACTER: case EIA608_CC_DATA_EXTENDED_WESTERN_EUROPEAN_CHARACTER: { char char1[5], char2[5]; int chan; size_t size; if (eia608_to_utf8(code1, &chan, &char1[0], &char2[0])) { uint16_t code2 = eia608_from_utf8(&char1[0], chan, &size); if (code1 == code2) { // printf ("%s " BIN " == " BIN " (0x%04x == 0x%04x)\n", &char1[0], BIND (code1), BIND (code2),code1,code2); } else { printf("%s " BIN " != " BIN " (0x%04x != 0x%04x)\n", &char1[0], BIND(code1), BIND(code2), code1, code2); } } } break; // #define EIA608_CODE_ROW_PREAMBLE 4 // #define EIA608_CODE_EXTENDED_DATA_SERVICE 5 // #define EIA608_CODE_CONTROL_COMMAND 6 } } return 0; } // for (uint16_t i = 0 ; i < 0x4000; ++i) { // int chan; // char str[7]; // uint16_t code = ( (i<<1) &0x7F00) | (i & 0x007F); // // if (eia608_to_utf8 (code,&chan,str)) { // printf ("code: 0x%04X str: '%s'\n", code,str); // } // } // // // for(int i = 0 ; i < cie608_char_count ; ++i) // // { // // cie608_char_map[i] // // // // } // // // for (int i = 0 ; i < 128 ; ++i) { // // print_bin( B7( i ) ); // // print_bin( eia608_parity_table[i] ); // printf ("%d %d %d\n", i, 0x7F & eia608_parity_table[i], eia608_parity_table[i]); // // if ( i != eia608_parity_table[i] ) // // { // // printf( "ERROR\n" ); // // // // } // } // // }