/* Copyright (c) 2011 Thomas Schmitt Provided under GPL version 2 or later. */ #ifdef HAVE_CONFIG_H #include "../config.h" #endif #include #include #include #include #include #include #include #include #include "libburn.h" #include "init.h" #include "structure.h" #include "options.h" #include "util.h" #include "libdax_msgs.h" extern struct libdax_msgs *libdax_messenger; /* --------------------- Production of CD-TEXT packs -------------------- */ struct burn_pack_cursor { unsigned char *packs; int num_packs; int td_used; int hiseq[8]; int pack_count[16]; }; /* @param flag bit0= double_byte characters */ int burn_create_new_pack(int pack_type, int track_no, int double_byte, int block, int char_pos, struct burn_pack_cursor *crs, int flag) { int idx; if (crs->num_packs >= Libburn_leadin_cdtext_packs_maX) { libdax_msgs_submit(libdax_messenger, -1, 0x0002018b, LIBDAX_MSGS_SEV_FAILURE, LIBDAX_MSGS_PRIO_HIGH, "Too many CD-TEXT packs", 0, 0); return 0; } if (crs->hiseq[block] >= 255) { libdax_msgs_submit(libdax_messenger, -1, 0x0002018e, LIBDAX_MSGS_SEV_FAILURE, LIBDAX_MSGS_PRIO_HIGH, "Too many CD-TEXT packs in block", 0, 0); return 0; } if (char_pos > 15) char_pos = 15; else if (char_pos < 0) char_pos = 0; idx = crs->num_packs * 18; crs->packs[idx++] = pack_type; crs->packs[idx++] = track_no; crs->packs[idx++] = crs->hiseq[block]; crs->packs[idx++] = ((flag & 1) << 7) | (block << 4) | char_pos; crs->hiseq[block]++; crs->td_used = 0; crs->pack_count[pack_type - Libburn_pack_type_basE]++; return 1; } /* Plain implementation of polynomial division on a Galois field, where addition and subtraction both are binary exor. Euclidian algorithm. Divisor is x^16 + x^12 + x^5 + 1 = 0x11021. */ static int crc_11021(unsigned char *data, int count, int flag) { int acc = 0, i; for (i = 0; i < count * 8 + 16; i++) { acc = (acc << 1); if (i < count * 8) acc |= ((data[i / 8] >> (7 - (i % 8))) & 1); if (acc & 0x10000) acc ^= 0x11021; } return acc; } /* @param flag bit0= repair mismatching checksums bit1= repair checksums if all pack CRCs are 0 @return 0= no mismatch , >0 number of unrepaired mismatches <0 number of repaired mismatches that were not 0 */ int burn_cdtext_crc_mismatches(unsigned char *packs, int num_packs, int flag) { int i, residue, count = 0, repair; unsigned char crc[2]; repair = flag & 1; if (flag & 2) { for (i = 0; i < num_packs * 18; i += 18) if (packs[i + 16] || packs[i + 17]) break; if (i == num_packs * 18) repair = 1; } for (i = 0; i < num_packs * 18; i += 18) { residue = crc_11021(packs + i, 16, 0); crc[0] = ((residue >> 8) & 0xff) ^ 0xff; crc[1] = ((residue ) & 0xff) ^ 0xff; if(crc[0] != packs[i + 16] || crc[1] != packs[i + 17]) { if (repair) { if (packs[i + 16] || packs[i + 17]) count--; packs[i + 16] = crc[0]; packs[i + 17] = crc[1]; } else count++; } } return count; } static int burn_finalize_text_pack(struct burn_pack_cursor *crs, int flag) { int residue = 0, i, idx; idx = 18 * crs->num_packs; for(i = 4 + crs->td_used; i < 16; i++) crs->packs[idx + i] = 0; crs->td_used = 12; /* MMC-3 Annex J : CRC Field consists of 2 bytes. The polynomial is X16 + X12 + X5 + 1. All bits shall be inverted. */ residue = crc_11021(crs->packs + idx, 16, 0) ^ 0xffff; crs->packs[idx + 16] = (residue >> 8) & 0xff; crs->packs[idx + 17] = residue & 0xff; crs->num_packs++; crs->td_used = 0; return 1; } /* @param flag bit0= double_byte characters */ static int burn_create_tybl_packs(unsigned char *payload, int length, int track_no, int pack_type, int block, struct burn_pack_cursor *crs, int flag) { int i, ret, binary_part = 0, char_pos; if (pack_type == 0x87) binary_part = 2; else if ((pack_type >= 0x88 && pack_type <= 0x8c) || pack_type == 0x8f) binary_part = length; for(i = 0; i < length; i++) { if (crs->td_used == 0 || crs->td_used >= 12) { if (crs->td_used > 0) { ret = burn_finalize_text_pack(crs, 0); if (ret <= 0) return ret; } char_pos = (i - binary_part) / (1 + (flag & 1)); ret = burn_create_new_pack(pack_type, track_no, (flag & 1), block, char_pos, crs, flag & 1); if (ret <= 0) return ret; } crs->packs[crs->num_packs * 18 + 4 + crs->td_used] = payload[i]; crs->td_used++; } return 1; } /* Finalize block by 0x8f. Set bytes 20 to 27 to 0 for now. */ static int burn_create_bl_size_packs(int block, unsigned char *char_codes, unsigned char *copyrights, unsigned char *languages, int num_tracks, struct burn_pack_cursor *crs, int flag) { int i, ret; unsigned char payload[12]; /* Normal is track_offset = 0. But if the CUE sheet supports offset, then it is needed here too */ int track_offset = 0; payload[0] = char_codes[block]; payload[1] = 1 + track_offset; payload[2] = num_tracks + track_offset; payload[3] = copyrights[block]; for (i = 0; i < 8; i++) payload[i + 4] = crs->pack_count[i]; ret = burn_create_tybl_packs(payload, 12, 0, 0x8f, block, crs, 0); if (ret <= 0) return ret; for (i = 0; i < 7; i++) payload[i] = crs->pack_count[i + 8]; payload[7] = 3; /* always 3 packs of type 0x8f */ for (i = 0; i < 4; i++) { /* Will be set when all blocks are done */ payload[i + 8] = 0; } ret = burn_create_tybl_packs(payload, 12, 1, 0x8f, block, crs, 0); if (ret <= 0) return ret; for (i = 0; i < 4; i++) { /* Will be set when all blocks are done */ payload[i] = 0; } for (i = 0; i < 8; i++) { payload[i + 4] = languages[i]; } ret = burn_create_tybl_packs(payload, 12, 2, 0x8f, block, crs, 0); if (ret <= 0) return ret; ret = burn_finalize_text_pack(crs, 0); if (ret <= 0) return ret; for (i = 0; i < 16; i++) crs->pack_count[i] = 0; return 1; } /* Text packs of track for type and block @param flag bit0= write TAB, because content is identical to previous track */ static int burn_create_tybl_t_packs(struct burn_track *t, int track_no, int pack_type, int block, struct burn_pack_cursor *crs, int flag) { int ret, length = 0, idx, double_byte, flags= 0; unsigned char *payload = NULL, dummy[8]; struct burn_cdtext *cdt; cdt = t->cdtext[block]; idx = pack_type - Libburn_pack_type_basE; if (cdt != NULL) { if (cdt->length[idx] > 0) { payload = cdt->payload[idx]; length = cdt->length[idx]; } flags = cdt->flags; } if (payload == NULL) { dummy[0]= 0; payload = dummy; length = strlen((char *) dummy) + 1; } double_byte = !!(flags & (1 <<(pack_type - Libburn_pack_type_basE))); if (flag & 1) { length = 0; dummy[length++] = 9; if (double_byte) dummy[length++] = 9; dummy[length++] = 0; if (double_byte) dummy[length++] = 0; payload = dummy; } ret = burn_create_tybl_packs(payload, length, track_no, pack_type, block, crs, double_byte); return ret; } /* Check whether the content is the same as in the previous pack. If so, advise to use the TAB abbreviation. */ static int burn_decide_cdtext_tab(int block, int pack_type, struct burn_cdtext *cdt_curr, struct burn_cdtext *cdt_prev, int flag) { int length, j, idx; idx = pack_type - Libburn_pack_type_basE; if (cdt_curr == NULL || cdt_prev == NULL) return 0; if (((cdt_curr->flags >> idx) & 1) != ((cdt_prev->flags >> idx) & 1)) return 0; length = cdt_curr->length[idx]; if (length != cdt_prev->length[idx] || length <= 1 + ((cdt_curr->flags >> idx) & 1)) return 0; for (j = 0; j < length; j++) if (cdt_curr->payload[idx][j] != cdt_prev->payload[idx][j]) break; if (j < length) return 0; return 1; } /* Text packs of session and of tracks (if applicable), for type and block */ static int burn_create_tybl_s_packs(struct burn_session *s, int pack_type, int block, struct burn_pack_cursor *crs, int flag) { int i, ret, idx, double_byte, use_tab; struct burn_cdtext *cdt; /* Normal is track_offset = 0. But if the CUE sheet supports offset, then it is needed here too */ int track_offset = 0; cdt = s->cdtext[block]; idx = pack_type - Libburn_pack_type_basE; if (cdt->length[idx] == 0 || cdt->payload[idx] == NULL) return 1; double_byte = !!(cdt->flags & (1 <<(pack_type - Libburn_pack_type_basE))); ret = burn_create_tybl_packs(cdt->payload[idx], cdt->length[idx], 0, pack_type, block, crs, double_byte); if (ret <= 0) return ret; if ((pack_type < 0x80 || pack_type > 0x85) && pack_type != 0x8e) { ret = burn_finalize_text_pack(crs, 0); return ret; } for (i = 0; i < s->tracks; i++) { if (i > 0) use_tab = burn_decide_cdtext_tab(block, pack_type, s->track[i]->cdtext[block], s->track[i - 1]->cdtext[block], 0); else use_tab = 0; ret = burn_create_tybl_t_packs(s->track[i], i + 1 + track_offset, pack_type, block, crs, use_tab); if (ret <= 0) return ret; } /* Fill up last pack with 0s */ ret = burn_finalize_text_pack(crs, 0); return ret; } /* ts B11210 : API */ /* @param flag bit0= do not return CD-TEXT packs, but return number of packs */ int burn_cdtext_from_session(struct burn_session *s, unsigned char **text_packs, int *num_packs, int flag) { int pack_type, block, ret, i, idx, j, residue; struct burn_pack_cursor crs; if (text_packs == NULL || num_packs == NULL) { flag |= 1; } else if (!(flag & 1)) { *text_packs = NULL; *num_packs = 0; } memset(&crs, 0, sizeof(struct burn_pack_cursor)); BURN_ALLOC_MEM(crs.packs, unsigned char, Libburn_leadin_cdtext_packs_maX * 18); for (block = 0; block < 8; block++) if (s->cdtext[block] != NULL) break; if (block == 8) {ret = 1; goto ex;} for (block= 0; block < 8; block++) { if (s->cdtext[block] == NULL) continue; for (pack_type = 0x80; pack_type < 0x80 + Libburn_pack_num_typeS; pack_type++) { if (pack_type == 0x8f) continue; ret = burn_create_tybl_s_packs(s, pack_type, block, &crs, 0); if (ret <= 0) goto ex; } ret = burn_create_bl_size_packs(block, s->cdtext_char_code, s->cdtext_copyright, s->cdtext_language, s->tracks, &crs, 0); if (ret <= 0) goto ex; } /* Insert the highest sequence numbers of each block into the 0x8f packs 2 and 3 (bytes 20 to 27) */ for (i = 0; i < crs.num_packs; i++) { idx = i * 18; if (crs.packs[idx] == 0x8f && crs.packs[idx + 1] == 1) { for (j = 0; j < 4; j++) if (crs.hiseq[j] > 0) crs.packs[idx + 4 + 8 + j] = crs.hiseq[j] - 1; else crs.packs[idx + 4 + 8 + j] = 0; } else if (crs.packs[idx] == 0x8f && crs.packs[idx + 1] == 2) { for (j = 0; j < 4; j++) if (crs.hiseq[j + 4] > 0) crs.packs[idx + 4 + j] = crs.hiseq[j + 4] - 1; else crs.packs[idx + 4 + j] = 0; } else continue; /* Re-compute checksum */ residue = crc_11021(crs.packs + idx, 16, 0) ^ 0xffff; crs.packs[idx + 16] = (residue >> 8) & 0xff; crs.packs[idx + 17] = residue & 0xff; } ret = 1; ex:; if (ret <= 0 || (flag & 1)) { if (ret > 0) ret = crs.num_packs; else if (flag & 1) ret = -1; BURN_FREE_MEM(crs.packs); } else { if (crs.num_packs > 0) *text_packs = crs.packs; else BURN_FREE_MEM(crs.packs); *num_packs = crs.num_packs; } return(ret); } /* ---------------- Reader of Sony Input Sheet Version 0.7T ------------- */ /* @param flag bit0= allow two byte codes 0xNNNN or 0xNN 0xNN */ static int v07t_hexcode(char *payload, int flag) { unsigned int x; int lo, hi, l; char buf[10], *cpt; l = strlen(payload); if (strncmp(payload, "0x", 2) != 0) return -1; if ((l == 6 || l == 9) && (flag & 1)) goto double_byte; if (strlen(payload) != 4) return -1; if (!(isxdigit(payload[2]) && isxdigit(payload[3]))) return -1; sscanf(payload + 2, "%x", &x); return x; double_byte:; strcpy(buf, payload); buf[4] = 0; hi = v07t_hexcode(buf, 0); if (strlen(payload) == 6) { buf[4] = payload[4]; buf[2] = '0'; buf[3] = 'x'; cpt = buf + 2; } else { if(payload[4] != 32 && payload[4] != 9) return(-1); cpt = buf + 5; } lo = v07t_hexcode(cpt, 0); if (lo < 0 || hi < 0) return -1; return ((hi << 8) | lo); } static int v07t_cdtext_char_code(char *payload, int flag) { int ret; char *msg = NULL; ret = v07t_hexcode(payload, 0); if (ret >= 0) return ret; if (strstr(payload, "8859") != NULL) return 0x00; else if(strstr(payload, "ASCII") != NULL) return 0x01; else if(strstr(payload, "JIS") != NULL) return 0x80; BURN_ALLOC_MEM(msg, char, 160); sprintf(msg, "Unknown v07t Text Code '%.80s'", payload); libdax_msgs_submit(libdax_messenger, -1, 0x00020191, LIBDAX_MSGS_SEV_FAILURE, LIBDAX_MSGS_PRIO_HIGH, burn_printify(msg), 0, 0); ret = -1; ex:; BURN_FREE_MEM(msg); return ret; } static int v07t_cdtext_lang_code(char *payload, int flag) { int i, ret; static char *languages[128] = { BURN_CDTEXT_LANGUAGES_0X00, BURN_CDTEXT_FILLER, BURN_CDTEXT_LANGUAGES_0X45 }; char *msg = NULL; ret = v07t_hexcode(payload, 0); if (ret >= 0) return ret; if (payload[0] != 0) for(i = 0; i < 128; i++) if(strcmp(languages[i], payload) == 0) return i; BURN_ALLOC_MEM(msg, char, 160); sprintf(msg, "Unknown v07t Language Code '%.80s'", payload); libdax_msgs_submit(libdax_messenger, -1, 0x00020191, LIBDAX_MSGS_SEV_FAILURE, LIBDAX_MSGS_PRIO_HIGH, burn_printify(msg), 0, 0); ret = -1; ex:; BURN_FREE_MEM(msg); return ret; } static int v07t_cdtext_genre_code(char *payload, int flag) { int i, ret; static char *genres[BURN_CDTEXT_NUM_GENRES] = { BURN_CDTEXT_GENRE_LIST }; char *msg = NULL; ret = v07t_hexcode(payload, 1); if(ret >= 0) return ret; for (i= 0; i < BURN_CDTEXT_NUM_GENRES; i++) if (strcmp(genres[i], payload) == 0) return i; BURN_ALLOC_MEM(msg, char, 160); sprintf(msg, "Unknown v07t Genre Code '%.80s'", payload); libdax_msgs_submit(libdax_messenger, -1, 0x00020191, LIBDAX_MSGS_SEV_FAILURE, LIBDAX_MSGS_PRIO_HIGH, burn_printify(msg), 0, 0); ret = -1; ex:; BURN_FREE_MEM(msg); return ret; } static int v07t_cdtext_len_db(char *payload, int *char_code, int *length, int *double_byte, int flag) { if (*char_code < 0) *char_code = 0x00; *double_byte = (*char_code == 0x80); *length = strlen(payload) + 1 + *double_byte; return 1; } static int v07t_cdtext_to_session(struct burn_session *session, int block, char *payload, int *char_code, int pack_type, char *pack_type_name, int flag) { int length, double_byte, ret; ret = v07t_cdtext_len_db(payload, char_code, &length, &double_byte, 0); if (ret <= 0) return ret; ret = burn_session_set_cdtext(session, block, pack_type, pack_type_name, (unsigned char *) payload, length, double_byte); return ret; } static int v07t_cdtext_to_track(struct burn_track *track, int block, char *payload, int *char_code, int pack_type, char *pack_type_name, int flag) { int length, double_byte, ret; ret = v07t_cdtext_len_db(payload, char_code, &length, &double_byte, 0); if (ret <= 0) return ret; ret = burn_track_set_cdtext(track, block, pack_type, pack_type_name, (unsigned char *) payload, length, double_byte); return ret; } /* ts B11215 API */ /* @param flag bit1= do not attach CATALOG to session or ISRC to track for writing to Q sub-channel */ int burn_session_input_sheet_v07t(struct burn_session *session, char *path, int block, int flag) { int ret = 0, num_tracks, char_codes[8], copyrights[8], languages[8], i; int genre_code = -1, track_offset = 1, length, pack_type, tno; int session_attr_seen[16], track_attr_seen[16]; int int0x00 = 0x00, int0x01 = 0x01; struct stat stbuf; FILE *fp = NULL; char *line = NULL, *eq_pos, *payload, *genre_text = NULL, track_txt[3]; char *msg = NULL; struct burn_track **tracks; BURN_ALLOC_MEM(msg, char, 4096); BURN_ALLOC_MEM(line, char, 4096); BURN_ALLOC_MEM(genre_text, char, 160); for (i = 0; i < 8; i++) char_codes[i] = copyrights[i] = languages[i]= -1; for (i = 0; i < 16; i++) session_attr_seen[i] = track_attr_seen[i] = 0; genre_text[0] = 0; tracks = burn_session_get_tracks(session, &num_tracks); if (stat(path, &stbuf) == -1) { cannot_open:; sprintf(msg, "Cannot open CD-TEXT input sheet v07t '%.4000s'", path); libdax_msgs_submit(libdax_messenger, -1, 0x00020193, LIBDAX_MSGS_SEV_FAILURE, LIBDAX_MSGS_PRIO_HIGH, burn_printify(msg), errno, 0); ret = 0; goto ex; } if (!S_ISREG(stbuf.st_mode)) { sprintf(msg, "File is not of usable type: CD-TEXT input sheet v07t '%s'", path); libdax_msgs_submit(libdax_messenger, -1, 0x00020193, LIBDAX_MSGS_SEV_FAILURE, LIBDAX_MSGS_PRIO_HIGH, burn_printify(msg), 0, 0); ret = 0; goto ex; } fp = fopen(path, "rb"); if (fp == NULL) goto cannot_open; while (1) { if (burn_sfile_fgets(line, 4095, fp) == NULL) { if (!ferror(fp)) break; sprintf(msg, "Cannot read all bytes from CD-TEXT input sheet v07t '%.4000s'", path); libdax_msgs_submit(libdax_messenger, -1, 0x00020193, LIBDAX_MSGS_SEV_FAILURE, LIBDAX_MSGS_PRIO_HIGH, burn_printify(msg), 0, 0); ret = 0; goto ex; } if (strlen(line) == 0) continue; eq_pos = strchr(line, '='); if (eq_pos == NULL) { sprintf(msg, "CD-TEXT v07t input sheet line without '=' : '%.4000s'", line); libdax_msgs_submit(libdax_messenger, -1, 0x00020194, LIBDAX_MSGS_SEV_FAILURE, LIBDAX_MSGS_PRIO_HIGH, burn_printify(msg), 0, 0); ret = 0; goto ex; } for (payload = eq_pos + 1; *payload == 32 || *payload == 9; payload++); *eq_pos = 0; for (eq_pos--; (*eq_pos == 32 || *eq_pos == 9) && eq_pos > line; eq_pos--) *eq_pos= 0; if (payload[0] == 0) continue; if (strcmp(line, "Text Code") == 0) { ret = v07t_cdtext_char_code(payload, 0); if (ret < 0) goto ex; if (char_codes[block] >= 0 && char_codes[block] != ret) { libdax_msgs_submit(libdax_messenger, -1, 0x00020192, LIBDAX_MSGS_SEV_FAILURE, LIBDAX_MSGS_PRIO_HIGH, "Unexpected v07t Text Code change", 0, 0); ret = 0; goto ex; } char_codes[block] = ret; } else if (strcmp(line, "Language Code") == 0) { ret = v07t_cdtext_lang_code(payload, 0); if(ret < 0) goto ex; languages[block] = ret; } else if (strcmp(line, "0x80") == 0 || strcmp(line, "Album Title") == 0) { ret = v07t_cdtext_to_session(session, block, payload, char_codes + block, 0, "TITLE", 0); if (ret <= 0) goto ex; session_attr_seen[0x0] = 1; } else if (strcmp(line, "0x81") == 0 || strcmp(line, "Artist Name") == 0) { ret = v07t_cdtext_to_session(session, block, payload, char_codes + block, 0, "PERFORMER", 0); if (ret <= 0) goto ex; session_attr_seen[0x1] = 1; } else if (strcmp(line, "0x82") == 0 || strcmp(line, "Songwriter") == 0) { ret = v07t_cdtext_to_session(session, block, payload, char_codes + block, 0, "SONGWRITER", 0); if (ret <= 0) goto ex; session_attr_seen[0x2] = 1; } else if (strcmp(line, "0x83") == 0 || strcmp(line, "Composer") == 0) { ret = v07t_cdtext_to_session(session, block, payload, char_codes + block, 0, "COMPOSER", 0); if (ret <= 0) goto ex; session_attr_seen[0x3] = 1; } else if (strcmp(line, "0x84") == 0 || strcmp(line, "Arranger") == 0) { ret = v07t_cdtext_to_session(session, block, payload, char_codes + block, 0, "ARRANGER", 0); if (ret <= 0) goto ex; session_attr_seen[0x4] = 1; } else if (strcmp(line, "0x85") == 0 || strcmp(line, "Album Message") == 0) { ret = v07t_cdtext_to_session(session, block, payload, char_codes + block, 0, "MESSAGE", 0); if (ret <= 0) goto ex; session_attr_seen[0x5] = 1; } else if (strcmp(line, "0x86") == 0 || strcmp(line, "Catalog Number") == 0) { ret = v07t_cdtext_to_session(session, block, payload, &int0x01, 0, "DISCID", 0); if(ret <= 0) goto ex; } else if (strcmp(line, "Genre Code") == 0) { genre_code = v07t_cdtext_genre_code(payload, 0); if (genre_code < 0) { ret = 0; goto ex; } } else if (strcmp(line, "Genre Information") == 0) { strncpy(genre_text, payload, 159); genre_text[159] = 0; } else if (strcmp(line, "0x8d") == 0 || strcmp(line, "Closed Information") == 0) { ret = v07t_cdtext_to_session(session, block, payload, &int0x00, 0, "CLOSED", 0); if (ret <= 0) goto ex; } else if(strcmp(line, "0x8e") == 0 || strcmp(line, "UPC / EAN") == 0) { ret = v07t_cdtext_to_session(session, block, payload, &int0x01, 0, "UPC_ISRC", 0); if (ret <= 0) goto ex; if (!(flag & 2)) { memcpy(session->mediacatalog, payload, 13); session->mediacatalog[13] = 0; } session_attr_seen[0xe] = 1; } else if (strncmp(line, "Disc Information ", 17) == 0) { /* >>> ??? is this good for anything ? */; } else if (strcmp(line, "Input Sheet Version") == 0) { if (strcmp(payload, "0.7T") != 0) { sprintf(msg, "Wrong Input Sheet Version '%.4000s'. Expected '0.7T'.", payload); libdax_msgs_submit(libdax_messenger, -1, 0x00020194, LIBDAX_MSGS_SEV_FAILURE, LIBDAX_MSGS_PRIO_HIGH, burn_printify(msg), 0, 0); ret = 0; goto ex; } } else if (strcmp(line, "Remarks") == 0) { ; } else if (strcmp(line, "Text Data Copy Protection") == 0) { ret = v07t_hexcode(payload, 0); if (ret >= 0) copyrights[block] = ret; else if (strcmp(payload, "ON") == 0) copyrights[block] = 0x03; else if (strcmp(payload, "OFF") == 0) copyrights[block] = 0x00; else { sprintf(msg, "Unknown v07t Text Data Copy Protection '%.4000s'", payload); libdax_msgs_submit(libdax_messenger, -1, 0x00020191, LIBDAX_MSGS_SEV_FAILURE, LIBDAX_MSGS_PRIO_HIGH, burn_printify(msg), 0, 0); ret = 0; goto ex; } } else if (strcmp(line, "First Track Number") == 0) { ret = -1; sscanf(payload, "%d", &ret); if (ret <= 0 || ret > 99) { bad_tno:; sprintf(msg, "Inappropriate v07t First Track Number '%.4000s'", payload); libdax_msgs_submit(libdax_messenger, -1, 0x00020194, LIBDAX_MSGS_SEV_FAILURE, LIBDAX_MSGS_PRIO_HIGH, burn_printify(msg), 0, 0); ret = 0; goto ex; } else { track_offset = ret; if (ret != 1) { sprintf(msg, "First Track Number '%s' will be mapped to 1", payload); libdax_msgs_submit(libdax_messenger,-1, 0x00020195, LIBDAX_MSGS_SEV_WARNING, LIBDAX_MSGS_PRIO_HIGH, burn_printify(msg), 0, 0); } } } else if (strcmp(line, "Last Track Number") == 0) { ret = -1; sscanf(payload, "%d", &ret); if (ret < 0) { goto bad_tno; } else { /* >>> ??? Is it good for anything ? */; } } else if (strncmp(line, "Track ", 6) == 0) { tno = -1; sscanf(line + 6, "%d", &tno); if (tno < 0 || tno - track_offset < 0 || tno - track_offset >= num_tracks) { track_txt[0] = line[6]; track_txt[1] = line[7]; track_txt[2] = 0; bad_track_no:; if (track_offset != 1) sprintf(msg, "Inappropriate v07t Track number '%.3900s' (mapped to %2.2d)", track_txt, tno - track_offset + 1); else sprintf(msg, "Inappropriate v07t Track number '%.3900s'", track_txt); sprintf(msg + strlen(msg), " (acceptable range: %2.2d to %2.2d)", track_offset, num_tracks + track_offset - 1); libdax_msgs_submit(libdax_messenger, -1, 0x00020194, LIBDAX_MSGS_SEV_FAILURE, LIBDAX_MSGS_PRIO_HIGH, burn_printify(msg), 0, 0); ret = 0; goto ex; } tno -= track_offset; if (strcmp(line, "0x80") == 0 || strcmp(line + 9, "Title") == 0) pack_type = 0x80; else if (strcmp(line + 9, "0x81") == 0 || strcmp(line + 9, "Artist") == 0) pack_type = 0x81; else if (strcmp(line + 9, "0x82") == 0 || strcmp(line + 9, "Songwriter") == 0) pack_type = 0x82; else if (strcmp(line + 9, "0x83") == 0 || strcmp(line + 9, "Composer") == 0) pack_type = 0x83; else if (strcmp(line + 9, "0x84") == 0 || strcmp(line + 9, "Arranger") == 0) pack_type = 0x84; else if (strcmp(line + 9, "0x85") == 0 || strcmp(line + 9, "Message") == 0) pack_type = 0x85; else if (strcmp(line + 9, "0x8e") == 0 || strcmp(line + 9, "ISRC") == 0) { pack_type = 0x8e; if (!(flag & 2)) { ret = burn_track_set_isrc_string( tracks[tno], payload, 0); if (ret <= 0) goto ex; } } else { sprintf(msg, "Unknown v07t Track purpose specifier '%s'", line + 9); libdax_msgs_submit(libdax_messenger, -1, 0x00020191, LIBDAX_MSGS_SEV_FAILURE, LIBDAX_MSGS_PRIO_HIGH, burn_printify(msg), 0, 0); ret = 0; goto ex; } ret = v07t_cdtext_to_track(tracks[tno], block, payload, &int0x00, pack_type, "", 0); if (ret <= 0) goto ex; track_attr_seen[pack_type - 0x80] = 1; } else if (strncmp(line, "ISRC ", 5) == 0) { /* Track variation of UPC EAN = 0x8e */ tno = -1; sscanf(line + 5, "%d", &tno); if (tno < 0 || tno - track_offset < 0 || tno - track_offset >= num_tracks) { track_txt[0] = line[5]; track_txt[1] = line[6]; track_txt[2] = 0; goto bad_track_no; } tno -= track_offset; if (!(flag & 2)) { ret = burn_track_set_isrc_string( tracks[tno], payload, 0); if (ret <= 0) goto ex; } ret = v07t_cdtext_to_track(tracks[tno], block, payload, &int0x00, 0x8e, "", 0); if (ret <= 0) goto ex; track_attr_seen[0xe] = 1; } else { sprintf(msg, "Unknown v07t purpose specifier '%.4000s'", line); libdax_msgs_submit(libdax_messenger, -1, 0x00020191, LIBDAX_MSGS_SEV_FAILURE, LIBDAX_MSGS_PRIO_HIGH, burn_printify(msg), 0, 0); ret = 0; goto ex; } } for (i= 0x80; i <= 0x8e; i++) { if (i > 0x85 && i != 0x8e) continue; if (session_attr_seen[i - 0x80] || !track_attr_seen[i - 0x80]) continue; ret = v07t_cdtext_to_session(session, block, "", char_codes + block, i, NULL, 0); if (ret <= 0) goto ex; } if (genre_code >= 0 && genre_text[0]) { line[0] = (genre_code >> 8) & 0xff; line[1] = genre_code & 0xff; strcpy(line + 2, genre_text); length = 2 + strlen(line + 2) + 1; ret = burn_session_set_cdtext(session, block, 0, "GENRE", (unsigned char *) line, length, 0); if (ret <= 0) goto ex; } ret = burn_session_set_cdtext_par(session, char_codes, copyrights, languages, 0); if (ret <= 0) goto ex; ret = 1; ex:; if(fp != NULL) fclose(fp); BURN_FREE_MEM(genre_text); BURN_FREE_MEM(line); BURN_FREE_MEM(msg); return ret; } /* ts B11221 API */ int burn_cdtext_from_packfile(char *path, unsigned char **text_packs, int *num_packs, int flag) { int ret = 0, residue = 0; struct stat stbuf; FILE *fp = NULL; unsigned char head[4], tail[1]; char *msg = NULL; BURN_ALLOC_MEM(msg, char, 4096); if (stat(path, &stbuf) == -1) { cannot_open:; sprintf(msg, "Cannot open CD-TEXT pack file '%.4000s'", path); libdax_msgs_submit(libdax_messenger, -1, 0x00020198, LIBDAX_MSGS_SEV_FAILURE, LIBDAX_MSGS_PRIO_HIGH, burn_printify(msg), errno, 0); ret = 0; goto ex; } if (!S_ISREG(stbuf.st_mode)) goto not_a_textfile; residue = (stbuf.st_size % 18); if(residue != 4 && residue != 0 && residue != 1) { not_a_textfile:; sprintf(msg, "File is not of usable type or content for CD-TEXT packs: '%.4000s'", path); libdax_msgs_submit(libdax_messenger, -1, 0x00020198, LIBDAX_MSGS_SEV_FAILURE, LIBDAX_MSGS_PRIO_HIGH, burn_printify(msg), 0, 0); ret = 0; goto ex; } if (stbuf.st_size < 18) goto not_a_textfile; fp = fopen(path, "rb"); if (fp == NULL) goto cannot_open; if (residue == 4) { /* This is for files from cdrecord -vv -toc */ ret = fread(head, 4, 1, fp); if (ret != 1) { cannot_read:; sprintf(msg, "Cannot read all bytes from CD-TEXT pack file '%.4000s'", path); libdax_msgs_submit(libdax_messenger, -1, 0x00020198, LIBDAX_MSGS_SEV_FAILURE, LIBDAX_MSGS_PRIO_HIGH, burn_printify(msg), errno, 0); ret = 0; goto ex; } if (head[0] * 256 + head[1] != stbuf.st_size - 2) goto not_a_textfile; } *num_packs = (stbuf.st_size - residue) / 18; if (*num_packs > 2048) { /* Each block can have 256 text packs. There are 8 blocks at most. */ sprintf(msg, "CD-Text pack file too large (max. 36864 bytes): '%.4000s'", path); libdax_msgs_submit(libdax_messenger, -1, 0x0002018b, LIBDAX_MSGS_SEV_FAILURE, LIBDAX_MSGS_PRIO_HIGH, burn_printify(msg), errno, 0); ret = 0; goto ex; } BURN_ALLOC_MEM(*text_packs, unsigned char, *num_packs * 18); ret = fread(*text_packs, *num_packs * 18, 1, fp); if (ret != 1) goto cannot_read; if (residue == 1) { /* This is for Sony CDTEXT files */ ret = fread(tail, 1, 1, fp); if (ret != 1) goto cannot_read; if (tail[0] != 0) goto not_a_textfile; } ret= 1; ex:; if (ret <= 0) { BURN_FREE_MEM(*text_packs); *text_packs = NULL; *num_packs = 0; } if (fp != NULL) fclose(fp); BURN_FREE_MEM(msg); return ret; }