libtsfuncs is a library for mpeg PSI parsing and generation. https://georgi.unixsol.org/programs/libtsfuncs/

pmt.c 9.1KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298
  1. /*
  2. * PMT table parser and generator
  3. * Copyright (C) 2010-2011 Unix Solutions Ltd.
  4. *
  5. * Released under MIT license.
  6. * See LICENSE-MIT.txt for license terms.
  7. */
  8. #include <stdio.h>
  9. #include <unistd.h>
  10. #include <netdb.h>
  11. #include <stdlib.h>
  12. #include <string.h>
  13. #include "tsfuncs.h"
  14. struct ts_pmt *ts_pmt_alloc() {
  15. struct ts_pmt *pmt = calloc(1, sizeof(struct ts_pmt));
  16. pmt->section_header = ts_section_data_alloc();
  17. pmt->streams_max = 128;
  18. pmt->streams = calloc(pmt->streams_max, sizeof(void *));
  19. return pmt;
  20. }
  21. static void ts_pmt_streams_data_free(struct ts_pmt *pmt) {
  22. int i;
  23. for (i=0;i<pmt->streams_num;i++) {
  24. if (pmt->streams[i]) {
  25. FREE(pmt->streams[i]->ES_info);
  26. FREE(pmt->streams[i]);
  27. }
  28. }
  29. }
  30. void ts_pmt_clear(struct ts_pmt *pmt) {
  31. if (!pmt)
  32. return;
  33. // save
  34. struct ts_section_header *section_header = pmt->section_header;
  35. struct ts_pmt_stream **streams = pmt->streams;
  36. int streams_max = pmt->streams_max;
  37. // free
  38. FREE(pmt->program_info);
  39. ts_pmt_streams_data_free(pmt);
  40. // clear
  41. ts_section_data_clear(section_header);
  42. memset(pmt, 0, sizeof(struct ts_pmt));
  43. // restore
  44. pmt->section_header = section_header;
  45. pmt->streams = streams;
  46. pmt->streams_max = streams_max;
  47. }
  48. void ts_pmt_free(struct ts_pmt **ppmt) {
  49. struct ts_pmt *pmt = *ppmt;
  50. if (pmt) {
  51. ts_section_data_free(&pmt->section_header);
  52. ts_pmt_streams_data_free(pmt);
  53. FREE(pmt->program_info);
  54. FREE(pmt->streams);
  55. FREE(*ppmt);
  56. }
  57. }
  58. struct ts_pmt *ts_pmt_push_packet(struct ts_pmt *pmt, uint8_t *ts_packet) {
  59. struct ts_header ts_header;
  60. memset(&ts_header, 0, sizeof(struct ts_header));
  61. if (ts_packet_header_parse(ts_packet, &ts_header)) {
  62. if (!pmt->ts_header.pusi)
  63. pmt->ts_header = ts_header;
  64. }
  65. if (ts_header.pusi) {
  66. struct ts_section_header section_header;
  67. memset(&section_header, 0, sizeof(struct ts_section_header));
  68. uint8_t *section_data = ts_section_header_parse(ts_packet, &pmt->ts_header, &section_header);
  69. if (!section_data) {
  70. memset(&pmt->ts_header, 0, sizeof(struct ts_header));
  71. goto OUT;
  72. }
  73. // table_id should be 0x02 (program_map_section)
  74. if (section_header.table_id != 0x02) {
  75. memset(&pmt->ts_header, 0, sizeof(struct ts_header));
  76. goto OUT;
  77. }
  78. // Set correct section_header
  79. ts_section_header_parse(ts_packet, &pmt->ts_header, pmt->section_header);
  80. }
  81. if (!pmt->initialized) {
  82. ts_section_add_packet(pmt->section_header, &ts_header, ts_packet);
  83. if (pmt->section_header->initialized) {
  84. if (!ts_pmt_parse(pmt))
  85. goto ERROR;
  86. }
  87. }
  88. OUT:
  89. return pmt;
  90. ERROR:
  91. ts_pmt_clear(pmt);
  92. return pmt;
  93. }
  94. int ts_pmt_parse(struct ts_pmt *pmt) {
  95. uint8_t *section_data = pmt->section_header->data;
  96. int section_len = pmt->section_header->data_len;
  97. pmt->reserved1 = (section_data[0] &~ 0x1F) >> 5; // xxx11111
  98. pmt->PCR_pid = ((section_data[0] &~ 0xE0) << 8) | section_data[1]; // 111xxxxx xxxxxxxx
  99. pmt->reserved2 = (section_data[2] &~ 0x0F) >> 4; // xxxx1111
  100. pmt->program_info_size = ((section_data[2] &~ 0xF0) << 8) | section_data[3]; // 1111xxxx xxxxxxxx
  101. /* Handle streams */
  102. uint8_t *stream_data = section_data + 4 + pmt->program_info_size; // +4 is to compensate for reserved1,PCR,reserved2,program_info_size
  103. int stream_len = section_len - pmt->program_info_size - 4; // -4 for the CRC at the end
  104. pmt->program_info = NULL;
  105. if (pmt->program_info_size) {
  106. pmt->program_info = malloc(pmt->program_info_size);
  107. if (pmt->program_info) {
  108. memcpy(pmt->program_info, stream_data - pmt->program_info_size, pmt->program_info_size);
  109. }
  110. }
  111. while (stream_len > 0) {
  112. if (pmt->streams_num == pmt->streams_max) {
  113. ts_LOGf("PMT contains too many streams (>%d), not all are initialized!\n", pmt->streams_max);
  114. break;
  115. }
  116. struct ts_pmt_stream *sinfo = calloc(1, sizeof(struct ts_pmt_stream));
  117. sinfo->stream_type = stream_data[0];
  118. sinfo->reserved1 = (stream_data[1] &~ 0x1F) >> 5; // xxx11111
  119. sinfo->pid = ((stream_data[1] &~ 0xE0) << 8) | stream_data[2]; // 111xxxxx xxxxxxxx
  120. sinfo->reserved2 = (stream_data[3] &~ 0x0F) >> 4; // xxxx1111
  121. sinfo->ES_info_size = ((stream_data[3] &~ 0xF0) << 8) | stream_data[4]; // 1111xxxx xxxxxxxx
  122. sinfo->ES_info = NULL;
  123. if (sinfo->ES_info_size > 0) {
  124. sinfo->ES_info = malloc(sinfo->ES_info_size);
  125. memcpy(sinfo->ES_info, &stream_data[5], sinfo->ES_info_size);
  126. }
  127. pmt->streams[pmt->streams_num] = sinfo;
  128. pmt->streams_num++;
  129. stream_data += 5 + sinfo->ES_info_size;
  130. stream_len -= 5 + sinfo->ES_info_size;
  131. }
  132. if (!ts_crc32_section_check(pmt->section_header, "PMT"))
  133. return 0;
  134. pmt->initialized = 1;
  135. return 1;
  136. }
  137. void ts_pmt_generate(struct ts_pmt *pmt, uint8_t **ts_packets, int *num_packets) {
  138. uint8_t *secdata = ts_section_data_alloc_section();
  139. ts_section_header_generate(secdata, pmt->section_header, 0);
  140. int curpos = 8; // Compensate for the section header, frist data byte is at offset 8
  141. secdata[curpos + 0] = pmt->reserved1 << 5; // xxx11111
  142. secdata[curpos + 0] |= pmt->PCR_pid >> 8; // 111xxxxx xxxxxxxx
  143. secdata[curpos + 1] = pmt->PCR_pid &~ 0xff00;
  144. secdata[curpos + 2] = pmt->reserved2 << 4; // xxxx1111
  145. secdata[curpos + 2] |= pmt->program_info_size >> 8; // 1111xxxx xxxxxxxx
  146. secdata[curpos + 3] = pmt->program_info_size &~ 0xff00;
  147. curpos += 4; // For thje fields above
  148. if (pmt->program_info_size) {
  149. memcpy(secdata + curpos, pmt->program_info, pmt->program_info_size);
  150. curpos += pmt->program_info_size;
  151. }
  152. int i;
  153. for(i=0;i<pmt->streams_num;i++) {
  154. struct ts_pmt_stream *stream = pmt->streams[i];
  155. secdata[curpos + 0] = stream->stream_type;
  156. secdata[curpos + 1] = stream->reserved1 << 5; // xxx11111
  157. secdata[curpos + 1] |= stream->pid >> 8; // 111xxxxx xxxxxxxx
  158. secdata[curpos + 2] = stream->pid &~ 0xff00;
  159. secdata[curpos + 3] = stream->reserved2 << 4; // xxxx1111
  160. secdata[curpos + 3] |= stream->ES_info_size >> 8; // 1111xxxx xxxxxxxx
  161. secdata[curpos + 4] = stream->ES_info_size &~ 0xff00;
  162. curpos += 5; // Compensate for the above
  163. if (stream->ES_info_size > 0) {
  164. memcpy(secdata + curpos, stream->ES_info, stream->ES_info_size);
  165. curpos += stream->ES_info_size;
  166. }
  167. }
  168. pmt->section_header->CRC = ts_section_data_calculate_crc(secdata, curpos);
  169. curpos += 4; // CRC
  170. ts_section_data_gen_ts_packets(&pmt->ts_header, secdata, curpos, pmt->section_header->pointer_field, ts_packets, num_packets);
  171. FREE(secdata);
  172. }
  173. void ts_pmt_regenerate_packets(struct ts_pmt *pmt) {
  174. uint8_t *ts_packets;
  175. int num_packets;
  176. ts_pmt_generate(pmt, &ts_packets, &num_packets);
  177. FREE(pmt->section_header->packet_data);
  178. pmt->section_header->packet_data = ts_packets;
  179. pmt->section_header->num_packets = num_packets;
  180. }
  181. struct ts_pmt *ts_pmt_copy(struct ts_pmt *pmt) {
  182. struct ts_pmt *newpmt = ts_pmt_alloc();
  183. int i;
  184. for (i=0;i<pmt->section_header->num_packets; i++) {
  185. newpmt = ts_pmt_push_packet(newpmt, pmt->section_header->packet_data + (i * TS_PACKET_SIZE));
  186. }
  187. if (newpmt->initialized) {
  188. return newpmt;
  189. } else {
  190. ts_LOGf("Error copying PMT!\n");
  191. ts_pmt_free(&newpmt);
  192. return NULL;
  193. }
  194. }
  195. void ts_pmt_check_generator(struct ts_pmt *pmt) {
  196. struct ts_pmt *pmt1 = ts_pmt_copy(pmt);
  197. if (pmt1) {
  198. ts_compare_data("PMT (tspacket->struct)",
  199. pmt1->section_header->packet_data,
  200. pmt->section_header->packet_data,
  201. pmt->section_header->num_packets * TS_PACKET_SIZE);
  202. ts_pmt_free(&pmt1);
  203. }
  204. uint8_t *ts_packets;
  205. int num_packets;
  206. ts_pmt_generate(pmt, &ts_packets, &num_packets);
  207. if (num_packets != pmt->section_header->num_packets) {
  208. ts_LOGf("ERROR: num_packets:%d != sec->num_packets:%d\n", num_packets, pmt->section_header->num_packets);
  209. }
  210. ts_compare_data("PMT (struct->tspacket)", pmt->section_header->packet_data, ts_packets, num_packets * TS_PACKET_SIZE);
  211. free(ts_packets);
  212. }
  213. void ts_pmt_dump(struct ts_pmt *pmt) {
  214. struct ts_section_header *sec = pmt->section_header;
  215. int i;
  216. ts_section_dump(sec);
  217. ts_LOGf(" * PMT data\n");
  218. ts_LOGf(" * PID : %04x (%d)\n", pmt->ts_header.pid, pmt->ts_header.pid);
  219. ts_LOGf(" * reserved1 : %d\n", pmt->reserved1);
  220. ts_LOGf(" * PCR PID : %04x (%d)\n", pmt->PCR_pid, pmt->PCR_pid);
  221. ts_LOGf(" * reserved2 : %d\n", pmt->reserved2);
  222. ts_LOGf(" * program_len : %d\n", pmt->program_info_size);
  223. ts_LOGf(" * num_streams : %d\n", pmt->streams_num);
  224. if (pmt->program_info_size > 0) {
  225. ts_LOGf(" * Program info:\n");
  226. ts_LOGf(" * program info size: %d\n", pmt->program_info_size);
  227. ts_descriptor_dump(pmt->program_info, pmt->program_info_size);
  228. }
  229. for(i=0;i<pmt->streams_num;i++) {
  230. struct ts_pmt_stream *stream = pmt->streams[i];
  231. ts_LOGf(" * [%02d/%02d] PID %04x (%d) -> Stream type: 0x%02x (%d) /es_info_size: %d/ %s\n",
  232. i+1, pmt->streams_num,
  233. stream->pid, stream->pid,
  234. stream->stream_type, stream->stream_type,
  235. stream->ES_info_size,
  236. h222_stream_type_desc(stream->stream_type)
  237. );
  238. if (stream->ES_info) {
  239. ts_descriptor_dump(stream->ES_info, stream->ES_info_size);
  240. }
  241. }
  242. ts_pmt_check_generator(pmt);
  243. }
  244. int ts_pmt_is_same(struct ts_pmt *pmt1, struct ts_pmt *pmt2) {
  245. if (pmt1 == pmt2) return 1; // Same
  246. if ((!pmt1 && pmt2) || (pmt1 && !pmt2)) return 0; // Not same (one is NULL)
  247. return ts_section_is_same(pmt1->section_header, pmt2->section_header);
  248. }