libtsfuncs is a library for mpeg PSI parsing and generation. https://georgi.unixsol.org/programs/libtsfuncs/
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

eit.c 10KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305
  1. #include <stdio.h>
  2. #include <unistd.h>
  3. #include <netdb.h>
  4. #include <stdlib.h>
  5. #include <string.h>
  6. #include "tsfuncs.h"
  7. struct ts_eit *ts_eit_alloc() {
  8. struct ts_eit *eit = calloc(1, sizeof(struct ts_eit));
  9. eit->section_header = ts_section_data_alloc();
  10. eit->streams_max = 128;
  11. eit->streams = calloc(eit->streams_max, sizeof(void *));
  12. return eit;
  13. }
  14. static void ts_eit_streams_data_free(struct ts_eit *eit) {
  15. int i;
  16. for (i=0;i<eit->streams_num;i++) {
  17. if (eit->streams[i]) {
  18. FREE(eit->streams[i]->descriptor_data);
  19. FREE(eit->streams[i]);
  20. }
  21. }
  22. }
  23. void ts_eit_clear(struct ts_eit *eit) {
  24. if (!eit)
  25. return;
  26. // save
  27. struct ts_section_header *section_header = eit->section_header;
  28. struct ts_eit_stream **streams = eit->streams;
  29. int streams_max = eit->streams_max;
  30. // free
  31. ts_eit_streams_data_free(eit);
  32. // clear
  33. ts_section_data_clear(section_header);
  34. memset(eit, 0, sizeof(struct ts_eit));
  35. // restore
  36. eit->section_header = section_header;
  37. eit->streams = streams;
  38. eit->streams_max = streams_max;
  39. }
  40. void ts_eit_free(struct ts_eit **peit) {
  41. struct ts_eit *eit = *peit;
  42. if (eit) {
  43. ts_section_data_free(&eit->section_header);
  44. ts_eit_streams_data_free(eit);
  45. FREE(eit->streams);
  46. FREE(*peit);
  47. }
  48. }
  49. struct ts_eit *ts_eit_push_packet(struct ts_eit *eit, uint8_t *ts_packet) {
  50. struct ts_header ts_header;
  51. memset(&ts_header, 0, sizeof(struct ts_header));
  52. if (ts_packet_header_parse(ts_packet, &ts_header)) {
  53. // EIT should be with PID 0x12
  54. if (ts_header.pid != 0x12)
  55. goto OUT;
  56. if (!eit->ts_header.pusi)
  57. eit->ts_header = ts_header;
  58. }
  59. if (ts_header.pusi) {
  60. struct ts_section_header section_header;
  61. memset(&section_header, 0, sizeof(struct ts_section_header));
  62. uint8_t *section_data = ts_section_header_parse(ts_packet, &eit->ts_header, &section_header);
  63. if (!section_data) {
  64. memset(&eit->ts_header, 0, sizeof(struct ts_header));
  65. goto OUT;
  66. }
  67. // table_id should be 0x4e (event_information_section - actual_transport_stream, present/following)
  68. // table_id 0x50 - 0x5f (event_information_section - actual_transport_stream, schedule)
  69. if (section_header.table_id != 0x4e && (section_header.table_id < 0x50 && section_header.table_id > 0x5f)) {
  70. memset(&eit->ts_header, 0, sizeof(struct ts_header));
  71. goto OUT;
  72. }
  73. // Set correct section_header
  74. ts_section_header_parse(ts_packet, &eit->ts_header, eit->section_header);
  75. }
  76. if (!eit->initialized) {
  77. ts_section_add_packet(eit->section_header, &ts_header, ts_packet);
  78. if (eit->section_header->initialized) {
  79. if (!ts_eit_parse(eit))
  80. goto ERROR;
  81. }
  82. }
  83. OUT:
  84. return eit;
  85. ERROR:
  86. ts_eit_clear(eit);
  87. return eit;
  88. }
  89. int ts_eit_parse(struct ts_eit *eit) {
  90. uint8_t *section_data = eit->section_header->data;
  91. int section_len = eit->section_header->data_len;
  92. /* Table data (6 bytes) */
  93. eit->transport_stream_id = (section_data[0] << 8) | section_data[1]; // 11111111 11111111
  94. eit->original_network_id = (section_data[2] << 8) | section_data[3]; // 11111111 11111111
  95. eit->segment_last_section_number = section_data[4];
  96. eit->last_table_id = section_data[5];
  97. uint8_t *stream_data = section_data + 6; // +5 is to compensate for the above
  98. int stream_len = section_len - 6 - 4; // -4 for the CRC at the end
  99. while (stream_len > 0) {
  100. if (eit->streams_num == eit->streams_max) {
  101. ts_LOGf("!!! Too many streams in EIT, max %d\n", eit->streams_max);
  102. break;
  103. }
  104. struct ts_eit_stream *sinfo = calloc(1, sizeof(struct ts_eit_stream));
  105. sinfo->event_id = (stream_data[0] << 8) | stream_data[1];
  106. sinfo->start_time_mjd = (stream_data[2] << 8) | stream_data[3];
  107. sinfo->start_time_bcd = stream_data[4] << 16;
  108. sinfo->start_time_bcd |= stream_data[5] << 8;
  109. sinfo->start_time_bcd |= stream_data[6];
  110. sinfo->duration_bcd = stream_data[7] << 16;
  111. sinfo->duration_bcd |= stream_data[8] << 8;
  112. sinfo->duration_bcd |= stream_data[9];
  113. sinfo->running_status = stream_data[10] >> 5; // 111xxxxx
  114. sinfo->free_CA_mode = (stream_data[10] &~ 0xE0) >> 4; // xxx1xxxx
  115. sinfo->descriptor_size = ((stream_data[10] &~ 0xF0) << 8) | stream_data[11]; // 1111xxxx xxxxxxxx
  116. stream_data += 12; // Compensate for the the above vars
  117. stream_len -= 12 + sinfo->descriptor_size;
  118. sinfo->descriptor_data = NULL;
  119. if (sinfo->descriptor_size > 0) {
  120. sinfo->descriptor_data = malloc(sinfo->descriptor_size);
  121. memcpy(sinfo->descriptor_data, stream_data, sinfo->descriptor_size);
  122. }
  123. eit->streams[eit->streams_num] = sinfo;
  124. eit->streams_num++;
  125. stream_data += sinfo->descriptor_size;
  126. }
  127. if (!ts_crc32_section_check(eit->section_header, "EIT"))
  128. return 0;
  129. eit->initialized = 1;
  130. return 1;
  131. }
  132. void ts_eit_generate(struct ts_eit *eit, uint8_t **ts_packets, int *num_packets) {
  133. uint8_t *secdata = ts_section_data_alloc_section();
  134. ts_section_header_generate(secdata, eit->section_header, 0);
  135. int curpos = 8; // Compensate for the section header, frist data byte is at offset 8
  136. secdata[curpos + 0] = eit->transport_stream_id >> 8; // xxxxxxxx xxxxxxxx
  137. secdata[curpos + 1] = eit->transport_stream_id &~ 0xff00;
  138. secdata[curpos + 2] = eit->original_network_id >> 8; // xxxxxxxx xxxxxxxx
  139. secdata[curpos + 3] = eit->original_network_id &~ 0xff00;
  140. secdata[curpos + 4] = eit->segment_last_section_number;
  141. secdata[curpos + 5] = eit->last_table_id;
  142. curpos += 6; // For the fields above
  143. int i;
  144. for(i=0;i<eit->streams_num;i++) {
  145. struct ts_eit_stream *stream = eit->streams[i];
  146. secdata[curpos + 0] = stream->event_id >> 8; // xxxxxxxx xxxxxxxx
  147. secdata[curpos + 1] = stream->event_id &~ 0xff00;
  148. secdata[curpos + 2] = stream->start_time_mjd >> 8; // xxxxxxxx xxxxxxxx
  149. secdata[curpos + 3] = stream->start_time_mjd &~ 0xff00;
  150. secdata[curpos + 4] = stream->start_time_bcd >> 16;
  151. secdata[curpos + 5] =(stream->start_time_bcd >> 8) &~ 0xff00;
  152. secdata[curpos + 6] = stream->start_time_bcd &~ 0xffff00;
  153. secdata[curpos + 7] = stream->duration_bcd >> 16;
  154. secdata[curpos + 8] =(stream->duration_bcd >> 8) &~ 0xff00;
  155. secdata[curpos + 9] = stream->duration_bcd &~ 0xffff00;
  156. secdata[curpos +10] = stream->running_status << 5; // 111xxxxx
  157. secdata[curpos +10] |= stream->free_CA_mode << 4; // xxx1xxxx
  158. secdata[curpos +10] |= stream->descriptor_size >> 8; // 1111xxxx xxxxxxxx
  159. secdata[curpos +11] = stream->descriptor_size &~ 0xff00;
  160. curpos += 12; // Compensate for the above
  161. if (stream->descriptor_size > 0) {
  162. memcpy(secdata + curpos, stream->descriptor_data, stream->descriptor_size);
  163. curpos += stream->descriptor_size;
  164. }
  165. }
  166. eit->section_header->CRC = ts_section_data_calculate_crc(secdata, curpos);
  167. curpos += 4; // CRC
  168. ts_section_data_gen_ts_packets(&eit->ts_header, secdata, curpos, eit->section_header->pointer_field, ts_packets, num_packets);
  169. FREE(secdata);
  170. }
  171. void ts_eit_check_generator(struct ts_eit *eit) {
  172. struct ts_eit *eit1 = ts_eit_alloc();
  173. int i;
  174. for (i=0;i<eit->section_header->num_packets;i++) {
  175. eit1 = ts_eit_push_packet(eit1, eit->section_header->packet_data + (i * TS_PACKET_SIZE));
  176. }
  177. ts_compare_data("EIT (tspacket->struct)",
  178. eit1->section_header->packet_data,
  179. eit->section_header->packet_data,
  180. eit->section_header->num_packets * TS_PACKET_SIZE);
  181. ts_eit_free(&eit1);
  182. uint8_t *ts_packets;
  183. int num_packets;
  184. ts_eit_generate(eit, &ts_packets, &num_packets);
  185. if (num_packets != eit->section_header->num_packets) {
  186. ts_LOGf("ERROR: num_packets:%d != sec->num_packets:%d\n", num_packets, eit->section_header->num_packets);
  187. }
  188. ts_compare_data("EIT (struct->tspacket)", eit->section_header->packet_data, ts_packets, num_packets * TS_PACKET_SIZE);
  189. free(ts_packets);
  190. }
  191. void ts_eit_regenerate_packets(struct ts_eit *eit) {
  192. uint8_t *ts_packets;
  193. int num_packets;
  194. ts_eit_generate(eit, &ts_packets, &num_packets);
  195. FREE(eit->section_header->packet_data);
  196. eit->section_header->packet_data = ts_packets;
  197. eit->section_header->num_packets = num_packets;
  198. }
  199. struct ts_eit *ts_eit_copy(struct ts_eit *eit) {
  200. struct ts_eit *neweit = ts_eit_alloc();
  201. int i;
  202. for (i=0;i<eit->section_header->num_packets; i++) {
  203. neweit = ts_eit_push_packet(neweit, eit->section_header->packet_data + (i * TS_PACKET_SIZE));
  204. }
  205. if (neweit->initialized) {
  206. return neweit;
  207. } else {
  208. ts_LOGf("Error copying EIT!\n");
  209. ts_eit_free(&neweit);
  210. return NULL;
  211. }
  212. }
  213. void ts_eit_dump(struct ts_eit *eit) {
  214. struct ts_section_header *sect = eit->section_header;
  215. int i;
  216. ts_section_dump(sect);
  217. ts_LOGf(" * EIT data\n");
  218. ts_LOGf(" * PID : 0x%04x (%d)\n", eit->ts_header.pid, eit->ts_header.pid);
  219. ts_LOGf(" * ts_stream_id : 0x%04x (%d)\n", eit->transport_stream_id, eit->transport_stream_id);
  220. ts_LOGf(" * org_network_id : 0x%04x (%d)\n", eit->original_network_id, eit->original_network_id);
  221. ts_LOGf(" * seg_last_sec_num: %d\n", eit->segment_last_section_number);
  222. ts_LOGf(" * last_table_id : 0x%02x (%d)\n", eit->last_table_id, eit->last_table_id);
  223. ts_LOGf(" * num_streams : %d\n", eit->streams_num);
  224. for(i=0;i<eit->streams_num;i++) {
  225. struct ts_eit_stream *stream = eit->streams[i];
  226. int hour, min, sec;
  227. struct tm tm;
  228. ts_time_decode_mjd(stream->start_time_mjd, stream->start_time_bcd, &tm);
  229. ts_time_decode_bcd(stream->duration_bcd, NULL, &hour, &min, &sec);
  230. ts_LOGf(" * Event_id [%02d/%02d]\n", i+1, eit->streams_num);
  231. ts_LOGf(" - Event_id : 0x%04x (%d)\n", stream->event_id, stream->event_id);
  232. ts_LOGf(" - Start_time: %04d-%02d-%02d %02d:%02d:%02d (0x%04x%06x) ts: %ld\n",
  233. tm.tm_year+1900, tm.tm_mon+1, tm.tm_mday, tm.tm_hour, tm.tm_min, tm.tm_sec,
  234. stream->start_time_mjd,
  235. stream->start_time_bcd, timegm(&tm));
  236. ts_LOGf(" - Duration : %02d:%02d:%02d (0x%06x)\n",
  237. hour, min, sec,
  238. stream->duration_bcd);
  239. ts_LOGf(" - Running_status: %d free_CA_mode: %d /desc_size: %d/\n",
  240. stream->running_status,
  241. stream->free_CA_mode,
  242. stream->descriptor_size);
  243. if (stream->descriptor_data) {
  244. ts_descriptor_dump(stream->descriptor_data, stream->descriptor_size);
  245. }
  246. }
  247. ts_eit_check_generator(eit);
  248. }
  249. int ts_eit_is_same(struct ts_eit *eit1, struct ts_eit *eit2) {
  250. if (eit1 == eit2) return 1; // Same
  251. if ((!eit1 && eit2) || (eit1 && !eit2)) return 0; // Not same (one is NULL)
  252. return ts_section_is_same(eit1->section_header, eit2->section_header);
  253. }