Merge CV, ver=5.1; ops/methods from HV, and interface from CV where possible
[goodguy/history.git] / cinelerra-5.1 / cinelerra / bdwrite.C
diff --git a/cinelerra-5.1/cinelerra/bdwrite.C b/cinelerra-5.1/cinelerra/bdwrite.C
new file mode 100644 (file)
index 0000000..93b6569
--- /dev/null
@@ -0,0 +1,3038 @@
+//#include "bd.h"
+//This program was created by inverting libbluray, without any docs,
+//  so it is probably got problems.  Still, works on my Samsung player.
+//  thanks to: Petri Hintukainen, William Hahne, John Stebbinsm, et.al.
+//
+//Usage:
+// ./bd <tgt_dir_path> <playlist-0> <sep> <playlistp1> <sep> ... <sep> <playlist-n>
+//    <sep> == -<pgm_pid> | --<pgm_pid> | ---<pgm_pid>
+//    <pgm_pid> may be empty string, or a numeric pgm_pid for curr title clip
+//    <pgm_pid> defaults to first pgm probed.
+//    <playlist-x> == <clip-0.m2ts> <clip-1.m2ts> ... <clip-n.m2ts>
+// eg:
+// ./brwrite /tmp/dir /path/menu.m2ts --- /path/clip0.m2ts /path/clip1.m2ts -- /path/clip2.m2ts
+//
+// one title is built for each playlist
+// playlist-0 is used as first-play item
+//
+// the basic idea is to use playlist-0 as a menu / directions to
+// use the bluray player remote-control to select the desired title
+// and start the play, avoiding the need for a menu system.
+//
+// if the first play item is the main title, that is ok also.
+// ./brwrite /tmp/dir /path/title.m2ts
+//
+//
+//To use a bluray bd-re rewriteable: (such as for /dev/sr1)
+// dvd+rw-format /dev/sr1  (only done once to init the media)
+// mkudffs /dev/sr1 $((`cat /sys/block/sr1/size`*512/2048-1))
+// mount /dev/sr1 /mnt1
+// cp -av <tgd_dir_path>/BDMV /mnt1/.
+// umount /mnt1
+// eject sr1
+//
+#ifndef __BD_H__
+#define __BD_H__
+#include <stdio.h>
+#include <unistd.h>
+#include <stdint.h>
+#include <stdlib.h>
+#include <string.h>
+#include <endian.h>
+#include <limits.h>
+#include <sys/stat.h>
+// work arounds (centos)
+#ifndef INT64_MAX
+#define INT64_MAX 9223372036854775807LL
+#endif
+#ifndef INT64_MIN
+#define INT64_MIN (-INT64_MAX-1)
+#endif
+
+#include "arraylist.h"
+#include "cstrdup.h"
+#define BCTEXTLEN 1024
+#define BLURAY_TS_PKTSZ 192L
+
+
+extern "C" {
+#include "libavfilter/buffersrc.h"
+#include "libavfilter/buffersink.h"
+#include "libavformat/avformat.h"
+#include "libavformat/avio.h"
+#include "libavcodec/avcodec.h"
+#include "libavfilter/avfilter.h"
+#include "libavutil/avutil.h"
+#include "libavutil/opt.h"
+#include "libavutil/pixdesc.h"
+#include "libswresample/swresample.h"
+#include "libswscale/swscale.h"
+}
+
+class stream;
+
+enum {
+  obj_hdmv = 1,
+  obj_bdj = 2,
+  title_len = 20,
+  pb_typ_movie = 0,
+  pb_typ_iactv = 1,
+  pb_len = 16,
+
+  BLURAY_APP_TYPE_MAIN_MOVIE = 1,
+  BLURAY_APP_TYPE_MAIN_TIMED_SLIDE_SHOW = 2,
+  BLURAY_APP_TYPE_MAIN_BROWSED_SLIDE_SHOW = 3,
+  BLURAY_APP_TYPE_SUBPATH_BROWSED_SLIDE_SHOW = 4,
+  BLURAY_APP_TYPE_SUBPATH_IG_MENU = 5,
+  BLURAY_APP_TYPE_SUBPATH_TEXT_SUBTITLE = 6,
+  BLURAY_APP_TYPE_SUBPATH_ELEMENTARY_STREAM = 7,
+
+  BLURAY_STREAM_TYPE_VIDEO_MPEG1 = 0x01,
+  BLURAY_STREAM_TYPE_VIDEO_MPEG2 = 0x02,
+  BLURAY_STREAM_TYPE_AUDIO_MPEG1 = 0x03,
+  BLURAY_STREAM_TYPE_AUDIO_MPEG2 = 0x04,
+  BLURAY_STREAM_TYPE_AUDIO_LPCM = 0x80,
+  BLURAY_STREAM_TYPE_AUDIO_AC3 = 0x81,
+  BLURAY_STREAM_TYPE_AUDIO_DTS = 0x82,
+  BLURAY_STREAM_TYPE_AUDIO_TRUHD = 0x83,
+  BLURAY_STREAM_TYPE_AUDIO_AC3PLUS = 0x84,
+  BLURAY_STREAM_TYPE_AUDIO_DTSHD = 0x85,
+  BLURAY_STREAM_TYPE_AUDIO_DTSHD_MASTER = 0x86,
+  BLURAY_STREAM_TYPE_VIDEO_VC1 = 0xea,
+  BLURAY_STREAM_TYPE_VIDEO_H264 = 0x1b,
+  BLURAY_STREAM_TYPE_VIDEO_H264_MVC = 0x20,
+  BLURAY_STREAM_TYPE_SUB_PG = 0x90,
+  BLURAY_STREAM_TYPE_SUB_IG = 0x91,
+  BLURAY_STREAM_TYPE_SUB_TEXT = 0x92,
+  BLURAY_STREAM_TYPE_AUDIO_AC3PLUS_SECONDARY = 0xa1,
+  BLURAY_STREAM_TYPE_AUDIO_DTSHD_SECONDARY = 0xa2,
+
+  BLURAY_MARK_TYPE_ENTRY = 0x01,
+  BLURAY_MARK_TYPE_LINK  = 0x02,
+
+  BLURAY_PLAYBACK_TYPE_SEQUENTIAL = 1,
+  BLURAY_PLAYBACK_TYPE_RANDOM = 2,
+  BLURAY_PLAYBACK_TYPE_SHUFFLE = 3,
+
+  BLURAY_VIDEO_FORMAT_480I = 1,  // ITU-R BT.601-5
+  BLURAY_VIDEO_FORMAT_576I = 2,  // ITU-R BT.601-4
+  BLURAY_VIDEO_FORMAT_480P = 3,  // SMPTE 293M
+  BLURAY_VIDEO_FORMAT_1080I = 4, // SMPTE 274M
+  BLURAY_VIDEO_FORMAT_720P = 5,  // SMPTE 296M
+  BLURAY_VIDEO_FORMAT_1080P = 6, // SMPTE 274M
+  BLURAY_VIDEO_FORMAT_576P = 7,  // ITU-R BT.1358
+
+  BLURAY_VIDEO_RATE_24000_1001 = 1, // 23.976
+  BLURAY_VIDEO_RATE_24 = 2,
+  BLURAY_VIDEO_RATE_25 = 3,
+  BLURAY_VIDEO_RATE_30000_1001 = 4, // 29.97
+  BLURAY_VIDEO_RATE_50 = 6,
+  BLURAY_VIDEO_RATE_60000_1001 = 7, // 59.94
+
+  BLURAY_ASPECT_RATIO_4_3 = 2,
+  BLURAY_ASPECT_RATIO_16_9 = 3,
+
+  BLURAY_AUDIO_FORMAT_MONO = 1,
+  BLURAY_AUDIO_FORMAT_STEREO = 3,
+  BLURAY_AUDIO_FORMAT_MULTI_CHAN = 6,
+  BLURAY_AUDIO_FORMAT_COMBO = 12,   // Stereo ac3/dts, 
+
+  BLURAY_AUDIO_RATE_48 = 1,
+  BLURAY_AUDIO_RATE_96 = 4,
+  BLURAY_AUDIO_RATE_192 = 5,
+  BLURAY_AUDIO_RATE_192_COMBO = 12, // 48 or 96 ac3/dts, 192 mpl/dts-hd
+  BLURAY_AUDIO_RATE_96_COMBO = 14,  // 48 ac3/dts, 96 mpl/dts-hd
+  BLURAY_TEXT_CHAR_CODE_UTF8 = 0x01,
+  BLURAY_TEXT_CHAR_CODE_UTF16BE = 0x02,
+  BLURAY_TEXT_CHAR_CODE_SHIFT_JIS = 0x03,
+  BLURAY_TEXT_CHAR_CODE_EUC_KR = 0x04,
+  BLURAY_TEXT_CHAR_CODE_GB18030_20001 = 0x05,
+  BLURAY_TEXT_CHAR_CODE_CN_GB = 0x06,
+  BLURAY_TEXT_CHAR_CODE_BIG5 = 0x07,
+
+  BLURAY_STILL_NONE = 0x00,
+  BLURAY_STILL_TIME = 0x01,
+  BLURAY_STILL_INFINITE = 0x02,
+
+  BLURAY_PG_TEXTST_STREAM = 0x01,
+  BLURAY_SECONDARY_VIDEO_STREAM = 0x02,
+  BLURAY_SECONDARY_AUDIO_STREAM = 0x03,
+};
+
+class bs_file {
+  FILE *fp;
+  uint32_t reg, len;
+  int64_t fpos, fsz;
+public:
+  bs_file() { fp = 0; }
+  ~bs_file() {}
+
+  void init();
+  int  open(const char *fn);
+  void close();
+  void write(uint32_t v, int n);
+  void pad(int n);
+  void padb(int n) { pad(n*8); }
+  int64_t posb() { return fpos; }
+  void posb(int64_t n);
+  int64_t pos() { return posb()*8 + len; }
+  void writeb(uint8_t * bp, int n);
+  void writeb(const char *cp, int n) {
+    writeb((uint8_t *) cp, n);
+  }
+};
+
+class bs_length {
+  int64_t fpos, len;
+public:
+  bs_length() { fpos = len = 0; }
+  void bs_len(bs_file &bs, int n) {
+    bs.write(len, n);  fpos = bs.posb();
+  }
+  void bs_end(bs_file &bs) {
+    len = bs.posb() - fpos;
+  }
+  void bs_ofs(bs_file &bs, int n) {
+    bs.write(fpos-n/8, n);
+  }
+};
+
+class _bd_stream_info {
+public:
+  uint8_t coding_type;
+  uint8_t format;
+  uint8_t rate;
+  uint8_t char_code;
+  uint8_t lang[4];
+  uint16_t pid;
+  uint8_t aspect;
+  uint8_t subpath_id;
+
+  _bd_stream_info() { memset(this, 0, sizeof(*this)); }
+  ~_bd_stream_info() {}
+};
+
+class bd_stream_info : public _bd_stream_info {
+public:
+  bd_stream_info() {}
+  ~bd_stream_info() {}
+};
+
+class _bd_clip_info {
+public:
+  uint32_t pkt_count;
+  uint8_t still_mode;
+  uint16_t still_time;          /* seconds */
+  uint64_t start_time;
+  uint64_t in_time;
+  uint64_t out_time;
+
+  _bd_clip_info() { memset(this, 0, sizeof(*this)); }
+  ~_bd_clip_info() {}
+};
+
+class bd_clip_info : public _bd_clip_info {
+public:
+  ArrayList<bd_stream_info *> video_streams;
+  ArrayList<bd_stream_info *> audio_streams;
+  ArrayList<bd_stream_info *> pg_streams;
+  ArrayList<bd_stream_info *> ig_streams;
+  ArrayList<bd_stream_info *> sec_audio_streams;
+  ArrayList<bd_stream_info *> sec_video_streams;
+
+  bd_clip_info() {}
+  ~bd_clip_info() {
+    video_streams.remove_all_objects();
+    audio_streams.remove_all_objects();
+    pg_streams.remove_all_objects();
+    ig_streams.remove_all_objects();
+    sec_audio_streams.remove_all_objects();
+    sec_video_streams.remove_all_objects();
+  }
+};
+
+class _bd_title_chapter {
+public:
+  uint32_t idx;
+  uint64_t start;
+  uint64_t duration;
+  uint64_t offset;
+  unsigned clip_ref;
+
+  _bd_title_chapter() { memset(this, 0, sizeof(*this)); }
+  ~_bd_title_chapter() {}
+};
+
+class bd_title_chapter : public _bd_title_chapter {
+public:
+  bd_title_chapter() {}
+  ~bd_title_chapter() {}
+};
+
+class _bd_title_mark {
+public:
+  uint32_t idx;
+  int type;
+  uint64_t start;
+  uint64_t duration;
+  uint64_t offset;
+  unsigned clip_ref;
+
+  _bd_title_mark() { memset(this, 0, sizeof(*this)); }
+  ~_bd_title_mark() {}
+};
+
+class bd_title_mark : public _bd_title_mark {
+public:
+  bd_title_mark() {}
+  ~bd_title_mark() {}
+};
+
+class _bd_title_info {
+public:
+  uint32_t idx;
+  uint32_t playlist;
+  uint64_t duration;
+  uint8_t angle_count;
+
+  _bd_title_info() { memset(this, 0, sizeof(*this)); }
+  ~_bd_title_info() {}
+};
+
+class bd_title_info : public _bd_title_info {
+public:
+  ArrayList<bd_clip_info *> clips;
+  ArrayList<bd_title_chapter *> chapters;
+  ArrayList<bd_title_mark *> marks;
+
+  bd_title_info() {}
+  ~bd_title_info() {
+    clips.remove_all_objects();
+    chapters.remove_all_objects();
+    marks.remove_all_objects();
+  }
+};
+
+class _clpi_stc_seq {
+public:
+  uint16_t pcr_pid;
+  uint32_t spn_stc_start;
+  uint32_t presentation_start_time;
+  uint32_t presentation_end_time;
+
+  _clpi_stc_seq() { memset(this, 0, sizeof(*this)); }
+  ~_clpi_stc_seq() {}
+};
+
+class clpi_stc_seq : public _clpi_stc_seq {
+public:
+  int write();
+
+  clpi_stc_seq() {}
+  ~clpi_stc_seq() {}
+};
+
+class _clpi_atc_seq {
+public:
+  uint32_t spn_atc_start;
+  uint8_t offset_stc_id;
+
+  _clpi_atc_seq() { memset(this, 0, sizeof(*this)); }
+  ~_clpi_atc_seq() {}
+};
+
+class clpi_atc_seq : public _clpi_atc_seq {
+public:
+  ArrayList<clpi_stc_seq *> stc_seq;
+  int write();
+
+  clpi_atc_seq() {}
+  ~clpi_atc_seq() {
+    stc_seq.remove_all_objects();
+  }
+};
+
+class clpi_sequences : public bs_length,
+                       public ArrayList<clpi_atc_seq *> {
+public:
+  int write();
+
+  clpi_sequences() {}
+  ~clpi_sequences() { remove_all_objects(); }
+};
+
+class _clpi_ts_type {
+public:
+  uint8_t validity;
+  char format_id[5];
+
+  _clpi_ts_type() { memset(this, 0, sizeof(*this)); }
+  ~_clpi_ts_type() {}
+};
+
+class clpi_ts_type : public _clpi_ts_type {
+public:
+  clpi_ts_type() {}
+  ~clpi_ts_type() {}
+};
+
+class _clpi_atc_delta {
+public:
+  uint32_t delta;
+  char file_id[6];
+  char file_code[5];
+
+  _clpi_atc_delta() { memset(this, 0, sizeof(*this)); }
+  ~_clpi_atc_delta() {}
+};
+
+class clpi_atc_delta : public _clpi_atc_delta {
+public:
+  int write();
+
+  clpi_atc_delta() {}
+  ~clpi_atc_delta() {}
+};
+
+class _clpi_font {
+public:
+  char file_id[6];
+
+  _clpi_font() { memset(this, 0, sizeof(*this)); }
+  ~_clpi_font() {}
+};
+
+class clpi_font : public _clpi_font {
+public:
+  clpi_font() {}
+  ~clpi_font() {}
+};
+
+class clpi_font_info {
+public:
+  ArrayList<clpi_font *> font;
+
+  clpi_font_info() {}
+  ~clpi_font_info() {
+    font.remove_all_objects();
+  }
+};
+
+class _clpi_clip_info {
+public:
+  uint8_t clip_stream_type;
+  uint8_t application_type;
+  uint8_t is_atc_delta;
+  uint32_t ts_recording_rate;
+  uint32_t num_source_packets;
+
+  _clpi_clip_info() { memset(this, 0, sizeof(*this)); }
+  ~_clpi_clip_info() {}
+};
+
+class clpi_clip_info : public bs_length, public _clpi_clip_info {
+public:
+  clpi_ts_type ts_type_info;
+  clpi_font_info font_info;
+  ArrayList<clpi_atc_delta *> atc_delta;
+  int write();
+
+  clpi_clip_info() {}
+  ~clpi_clip_info() {
+    atc_delta.remove_all_objects();
+  }
+};
+
+class _clpi_prog_stream {
+public:
+  uint16_t pid;
+  uint8_t coding_type;
+  uint8_t format;
+  uint8_t rate;
+  uint8_t aspect;
+  uint8_t oc_flag;
+  uint8_t char_code;
+  char lang[4];
+
+  _clpi_prog_stream() { memset(this, 0, sizeof(*this)); }
+  ~_clpi_prog_stream() {}
+};
+
+class clpi_prog_stream : public bs_length, public _clpi_prog_stream {
+public:
+  int write();
+
+  clpi_prog_stream() {}
+  ~clpi_prog_stream() {}
+};
+
+class _clpi_ep_coarse {
+public:
+  int ref_ep_fine_id;
+  int pts_ep;
+  uint32_t spn_ep;
+
+  _clpi_ep_coarse() { memset(this, 0, sizeof(*this)); }
+  ~_clpi_ep_coarse() {}
+};
+
+class clpi_ep_coarse : public _clpi_ep_coarse {
+public:
+  int write();
+
+  clpi_ep_coarse() {}
+  ~clpi_ep_coarse() {}
+};
+
+class _clpi_ep_fine {
+public:
+  uint8_t is_angle_change_point;
+  uint8_t i_end_position_offset;
+  int pts_ep;
+  int spn_ep;
+
+  _clpi_ep_fine() { memset(this, 0, sizeof(*this)); }
+  ~_clpi_ep_fine() {}
+};
+
+class clpi_ep_fine : public _clpi_ep_fine {
+public:
+  int write();
+
+  clpi_ep_fine() {}
+  ~clpi_ep_fine() {}
+};
+
+class _clpi_ep_map_entry {
+public:
+  uint8_t ep_stream_type;
+  uint32_t ep_map_stream_start_addr;
+
+  _clpi_ep_map_entry() { memset(this, 0, sizeof(*this)); }
+  ~_clpi_ep_map_entry() {}
+};
+
+class clpi_ep_map_entry : public _clpi_ep_map_entry {
+public:
+  uint32_t fine_start;
+  uint16_t pid;
+  ArrayList<clpi_ep_coarse *> coarse;
+  ArrayList<clpi_ep_fine *> fine;
+  int write(uint32_t ep_map_pos);
+  int write_map();
+
+  clpi_ep_map_entry(int id) { fine_start = 0;  pid = id; }
+  ~clpi_ep_map_entry() {
+    coarse.remove_all_objects();
+    fine.remove_all_objects();
+  }
+};
+
+class _clpi_prog {
+public:
+  uint32_t spn_program_sequence_start;
+  uint8_t num_groups;
+  _clpi_prog() { memset(this, 0, sizeof(*this)); }
+  ~_clpi_prog() {}
+};
+
+class clpi_prog : public _clpi_prog {
+public:
+  ArrayList<clpi_prog_stream *> streams;
+  uint16_t program_map_pid;
+
+  int write();
+  clpi_prog(int pmt_pid) { program_map_pid = pmt_pid; }
+  ~clpi_prog() { streams.remove_all_objects(); }
+};
+
+class clpi_programs : public bs_length,
+                       public ArrayList<clpi_prog *> {
+public:
+  int write();
+
+  clpi_programs() {}
+  ~clpi_programs() { remove_all_objects(); }
+};
+
+class clpi_extents : public bs_length,
+                       public ArrayList<uint32_t> {
+public:
+  int write();
+
+  clpi_extents() {}
+  ~clpi_extents() {}
+};
+class _clpi_cpi {
+public:
+  uint8_t type;
+
+  _clpi_cpi() { type = 0; }
+  ~_clpi_cpi() {}
+};
+
+class clpi_cpi : public bs_length, public _clpi_cpi,
+                       public ArrayList<clpi_ep_map_entry *> {
+public:
+  int write();
+
+  clpi_cpi() {}
+  ~clpi_cpi() { remove_all_objects(); }
+};
+
+class bd_uo_mask {
+public:
+  unsigned int menu_call : 1;
+  unsigned int title_search : 1;
+  unsigned int chapter_search : 1;
+  unsigned int time_search : 1;
+  unsigned int skip_to_next_point : 1;
+  unsigned int skip_to_prev_point : 1;
+  unsigned int play_firstplay : 1;
+  unsigned int stop : 1;
+  unsigned int pause_on : 1;
+  unsigned int pause_off : 1;
+  unsigned int still_off : 1;
+  unsigned int forward : 1;
+  unsigned int backward : 1;
+  unsigned int resume : 1;
+  unsigned int move_up : 1;
+  unsigned int move_down : 1;
+  unsigned int move_left : 1;
+  unsigned int move_right : 1;
+  unsigned int select : 1;
+  unsigned int activate : 1;
+  unsigned int select_and_activate : 1;
+  unsigned int primary_audio_change : 1;
+  unsigned int reserved0 : 1;
+  unsigned int angle_change : 1;
+  unsigned int popup_on : 1;
+  unsigned int popup_off : 1;
+  unsigned int pg_enable_disable : 1;
+  unsigned int pg_change : 1;
+  unsigned int secondary_video_enable_disable : 1;
+  unsigned int secondary_video_change : 1;
+  unsigned int secondary_audio_enable_disable : 1;
+  unsigned int secondary_audio_change : 1;
+  unsigned int reserved1 : 1;
+  unsigned int pip_pg_change : 1;
+
+  int write();
+  bd_uo_mask() {
+    memset(this, 0, sizeof(*this));
+  }
+  ~bd_uo_mask() {
+  }
+};
+
+class _mpls_stream {
+public:
+  uint8_t stream_type;
+  uint8_t coding_type;
+  uint16_t pid;
+  uint8_t subpath_id;
+  uint8_t subclip_id;
+  uint8_t format;
+  uint8_t rate;
+  uint8_t char_code;
+  char lang[4];
+
+  _mpls_stream() { memset(this, 0, sizeof(*this)); }
+  ~_mpls_stream() {}
+};
+
+class mpls_stream : public _mpls_stream {
+public:
+  bs_length strm, code;
+  int write();
+
+  mpls_stream() {}
+  ~mpls_stream() {}
+};
+
+class _mpls_stn {
+public:
+  uint8_t num_pip_pg;
+  _mpls_stn() {
+    num_pip_pg = 0;
+  }
+  ~_mpls_stn() {}
+};
+
+class mpls_stn : public bs_length, public _mpls_stn {
+public:
+  ArrayList<mpls_stream *> video;
+  ArrayList<mpls_stream *> audio;
+  ArrayList<mpls_stream *> pg;
+  ArrayList<mpls_stream *> ig;
+  ArrayList<mpls_stream *> secondary_audio;
+  ArrayList<mpls_stream *> secondary_video;
+  // Secondary audio specific fields
+  ArrayList<uint8_t> sa_primary_audio_ref;
+  // Secondary video specific fields
+  ArrayList<uint8_t> sv_secondary_audio_ref;
+  ArrayList<uint8_t> sv_pip_pg_ref;
+
+  int write();
+  mpls_stn() {}
+  ~mpls_stn() {
+    video.remove_all_objects();
+    audio.remove_all_objects();
+    pg.remove_all_objects();
+    ig.remove_all_objects();
+    secondary_audio.remove_all_objects();
+    secondary_video.remove_all_objects();
+  }
+};
+
+class _mpls_clip {
+public:
+  char clip_id[6];
+  char codec_id[5];
+  uint8_t stc_id;
+
+  _mpls_clip() { memset(this, 0, sizeof(*this)); }
+  ~_mpls_clip() {}
+};
+
+class mpls_clip : public _mpls_clip {
+public:
+  mpls_clip() { strcpy(codec_id, "M2TS"); }
+  ~mpls_clip() {}
+};
+
+class _mpls_pi {
+public:
+  uint8_t is_multi_angle;
+  uint8_t connection_condition;
+  uint32_t in_time;
+  uint32_t out_time;
+  uint8_t random_access_flag;
+  uint8_t still_mode;
+  uint16_t still_time;
+  uint8_t is_different_audio;
+  uint8_t is_seamless_angle;
+
+  _mpls_pi() { memset(this, 0, sizeof(*this)); }
+  ~_mpls_pi() {}
+};
+
+class mpls_pi : public bs_length, public _mpls_pi {
+public:
+  bd_uo_mask uo_mask;
+  ArrayList<mpls_clip *> clip;
+  mpls_stn stn;
+
+  int write();
+
+  mpls_pi() {}
+  ~mpls_pi() {
+    clip.remove_all_objects();
+  }
+};
+
+class _mpls_plm {
+public:
+  uint8_t mark_id;
+  uint8_t mark_type;
+  uint16_t play_item_ref;
+  uint32_t time;
+  uint16_t entry_es_pid;
+  uint32_t duration;
+
+  _mpls_plm() { memset(this, 0, sizeof(*this)); }
+  ~_mpls_plm() {}
+};
+
+class mpls_plm : public _mpls_plm {
+public:
+  int write();
+
+  mpls_plm() {}
+  ~mpls_plm() {}
+};
+
+class _mpls_ai {
+public:
+  uint8_t playback_type;
+  uint16_t playback_count;
+  uint8_t random_access_flag;
+  uint8_t audio_mix_flag;
+  uint8_t lossless_bypass_flag;
+
+  _mpls_ai() { memset(this, 0, sizeof(*this)); }
+  ~_mpls_ai() {}
+};
+
+class mpls_ai : public bs_length, public _mpls_ai {
+public:
+  bd_uo_mask uo_mask;
+  int write();
+
+  mpls_ai() {}
+  ~mpls_ai() {}
+};
+
+class _mpls_sub_pi {
+public:
+  uint8_t connection_condition;
+  uint8_t is_multi_clip;
+  uint32_t in_time;
+  uint32_t out_time;
+  uint16_t sync_play_item_id;
+  uint32_t sync_pts;
+
+  _mpls_sub_pi() { memset(this, 0, sizeof(*this)); }
+  ~_mpls_sub_pi() {}
+};
+
+class mpls_sub_pi : public bs_length, public _mpls_sub_pi {
+public:
+  ArrayList<mpls_clip *> clip;
+  int write();
+
+  mpls_sub_pi() {}
+  ~mpls_sub_pi() {
+    clip.remove_all_objects();
+  }
+};
+
+class _mpls_sub {
+public:
+  uint8_t type;
+  uint8_t is_repeat;
+
+  _mpls_sub() { memset(this, 0, sizeof(*this)); }
+  ~_mpls_sub() {}
+};
+
+class mpls_sub : public bs_length, public _mpls_sub {
+public:
+  ArrayList<mpls_sub_pi *> sub_play_item;
+
+  int write();
+  mpls_sub() {}
+  ~mpls_sub() {
+   sub_play_item.remove_all_objects();
+  }
+};
+
+class _mpls_pip_data {
+public:
+  uint32_t time;
+  uint16_t xpos;
+  uint16_t ypos;
+  uint8_t scale_factor;
+
+  _mpls_pip_data() { memset(this, 0, sizeof(*this)); }
+  ~_mpls_pip_data() {}
+};
+
+class mpls_pip_data : public _mpls_pip_data {
+public:
+  int write();
+
+  mpls_pip_data() {}
+  ~mpls_pip_data() {}
+};
+
+class _mpls_pip_metadata {
+public:
+  uint16_t clip_ref;
+  uint8_t secondary_video_ref;
+  uint8_t timeline_type;
+  uint8_t luma_key_flag;
+  uint8_t upper_limit_luma_key;
+  uint8_t trick_play_flag;
+
+  _mpls_pip_metadata() { memset(this, 0, sizeof(*this)); }
+  ~_mpls_pip_metadata() {}
+};
+
+class mpls_pip_metadata : public _mpls_pip_metadata {
+public:
+  ArrayList<mpls_pip_data *> data;
+
+  int write(uint32_t start_address);
+  mpls_pip_metadata() {}
+  ~mpls_pip_metadata() {
+    data.remove_all_objects();
+  }
+};
+
+class _mpls_pl {
+public:
+  uint32_t list_pos;
+  uint32_t mark_pos;
+  uint32_t ext_pos;
+
+  _mpls_pl() { memset(this, 0, sizeof(*this)); }
+  ~_mpls_pl() {}
+};
+
+class mpls_pl : public _mpls_pl {
+public:
+  int sig;
+  bs_length play, mark, subx, pipm;
+  mpls_ai app_info;
+  ArrayList<mpls_pi *> play_item;
+  ArrayList<mpls_sub *> sub_path;
+  ArrayList<mpls_plm *> play_mark;
+  // extension data (profile 5, version 2.4)
+  ArrayList<mpls_sub *> ext_sub_path;
+  // extension data (Picture-In-Picture metadata)
+  ArrayList<mpls_pip_metadata *> ext_pip_data;
+
+  int write_header();
+  int write_playlist();
+  int write_playlistmark();
+  int write_subpath_extension();
+  int write_pip_metadata_extension();
+  int write();
+
+  mpls_pl() { sig = 1; }
+  ~mpls_pl() {
+    play_item.remove_all_objects();
+    sub_path.remove_all_objects();
+    play_mark.remove_all_objects();
+    ext_sub_path.remove_all_objects();
+    ext_pip_data.remove_all_objects();
+  }
+};
+
+class _clpi_cl {
+public:
+  uint32_t sequence_info_start_addr;
+  uint32_t program_info_start_addr;
+  uint32_t cpi_start_addr;
+  uint32_t clip_mark_start_addr;
+  uint32_t ext_data_start_addr;
+
+  _clpi_cl() { memset(this, 0, sizeof(*this)); }
+  ~_clpi_cl() {}
+};
+
+class clpi_cl : public _clpi_cl {
+public:
+  int sig;
+  clpi_clip_info clip;
+  clpi_sequences sequences;
+  clpi_programs programs;
+  clpi_cpi cpi;
+  clpi_extents extents;
+  clpi_programs programs_ss;
+  clpi_cpi cpi_ss;
+
+  int write_header();
+  int write();
+
+  int write_clpi_extension(int id1, int id2, void *handle);
+  int write_mpls_extension(int id1, int id2, void *handle);
+
+  clpi_cl() { sig = 1; }
+  ~clpi_cl() {}
+};
+
+class command_obj {
+public:
+  union {
+    uint32_t cmd;
+    struct {
+      uint32_t sub_grp:3;       /* command sub-group */
+      uint32_t grp:2;           /* command group */
+      uint32_t op_cnt:3;        /* operand count */
+      uint32_t branch_opt:4;    /* branch option */
+      uint32_t rsvd1:2;
+      uint32_t imm_op2:1;       /* I-flag for operand 2 */
+      uint32_t imm_op1:1;       /* I-flag for operand 1 */
+      uint32_t cmp_opt:4;       /* compare option */
+      uint32_t rsvd2:4;
+      uint32_t set_opt:5;       /* set option */
+      uint32_t rsvd3:3;
+    };
+  };
+  uint32_t dst;
+  uint32_t src;
+
+  command_obj() { cmd = dst = src = 0; }
+  ~command_obj() {}
+};
+
+class _movie_obj {
+public:
+  int resume_intention_flag;
+  int menu_call_mask;
+  int title_search_mask;
+
+  _movie_obj() { memset(this, 0, sizeof(*this)); }
+  ~_movie_obj() {}
+};
+
+class movie_obj : public _movie_obj {
+public:
+  ArrayList<command_obj *> cmds;
+
+  movie_obj() {}
+  ~movie_obj() {
+    cmds.remove_all_objects();
+  }
+};
+
+class movie_file : public bs_length {
+public:
+  int sig;
+  ArrayList<movie_obj *> movies;
+
+  movie_file() { sig = 1; }
+  ~movie_file() {
+    movies.remove_all_objects();
+  }
+
+  int write();
+};
+
+class _pb_obj {
+public:
+  int obj_typ;
+  int pb_typ;
+  int hdmv_id;
+
+  _pb_obj() { memset(this, 0, sizeof(*this)); }
+  ~_pb_obj() {}
+};
+
+class pb_obj : public _pb_obj {
+public:
+  int last;
+  char *bdj_name;
+  void write_obj();
+
+  pb_obj() {
+    last = 0;
+    bdj_name = 0;
+  }
+  ~pb_obj() {
+    delete [] bdj_name;
+  }
+
+  void set_hdmv(int id, int pt);
+  void set_bdj(char *nm, int pt);
+  void write_hdmv_obj(int id_ref);
+  void write_bdj_obj(char *name);
+};
+
+class _title_obj {
+public:
+  int acc_typ;
+  _title_obj() { acc_typ = 0; }
+  ~_title_obj() {}
+};
+
+class title_obj : public pb_obj, public _title_obj {
+public:
+  title_obj() {}
+  ~title_obj() {}
+
+  void write_obj();
+};
+
+class _index_file {
+public:
+  int sig;
+  int initial_output_mode_preference;
+  int content_exist_flag;
+  int video_format;
+  int frame_rate;
+
+  _index_file() { memset(this, 0, sizeof(*this)); }
+  ~_index_file() {}
+};
+
+class index_file : public bs_length, public _index_file {
+public:
+  ArrayList<title_obj *> titles;
+  pb_obj first_play;
+  pb_obj top_menu;
+  char user_data[32];
+  bs_length exten, appinf;
+
+  void write_hdmv_obj(int hdmv_typ, int id_ref);
+  void write_bdj_obj(int bdj_typ, char *name);
+  void write_pb_obj(pb_obj * pb);
+  int write();
+
+  index_file() {
+    sig = 1;
+    memset(user_data, 0, sizeof(user_data));
+  }
+  ~index_file() {
+    titles.remove_all_objects();
+  }
+};
+
+class _bdid {
+public:
+  uint32_t data_start;
+  uint32_t extension_data_start;
+  char org_id[4];
+  char disc_id[16];
+
+  _bdid() { memset(this, 0, sizeof(*this)); }
+  ~_bdid() {}
+};
+
+class bdid : public _bdid {
+public:
+  int sig;
+  int write();
+
+  bdid() { sig = 1; }
+  ~bdid() {}
+};
+
+class stream : public bd_stream_info {
+public:
+  int av_idx;
+  AVMediaType type;
+  AVCodecID codec_id;
+  int64_t start_pts;
+  int64_t end_pts;
+  int64_t last_pts;
+  int64_t duration;
+
+  stream(AVMediaType ty, int i) {
+    type = ty;  av_idx = i;
+    start_pts = INT64_MAX; end_pts = INT64_MIN;
+    last_pts = -1;
+  }
+  ~stream() {}
+};
+
+class mark {
+public:
+  static int cmpr(mark **, mark **);
+  int64_t sample, pos, pts;
+  uint32_t pkt, pid;
+  mark(int64_t s, int64_t p, int64_t ts, uint32_t pk, int id) {
+    sample = s;  pos = p;  pts = ts; pkt = pk;  pid = id;
+  }
+};
+
+int mark::cmpr(mark **a, mark **b)
+{
+  mark *ap = *(mark **)a,  *bp = *(mark **)b;
+  return ap->pts > bp->pts ? 1 : ap->pts < bp->pts ? -1 : 0;
+}
+
+class _program {
+public:
+  int pmt_pid, pcr_pid, ep_pid;
+  int64_t start_time, end_time;
+  int64_t duration;
+  _program() {
+    memset(this, 0, sizeof(*this));
+    start_time = INT64_MAX; end_time = INT64_MIN;
+  }
+  ~_program() {}
+};
+
+class program : public _program {
+public:
+  int idx;
+  uint16_t pid;
+  ArrayList<int> strm_idx;
+  ArrayList<mark*> marks;
+  int64_t curr_pos;
+  int build_toc(clpi_ep_map_entry *map);
+  void add_label(uint32_t pk, int64_t p, int64_t ts, int id) {
+    marks.append(new mark(curr_pos, p, ts, pk, id));
+  }
+
+  program(int i, int id) { idx = i;  pid = id;  curr_pos = 0; }
+  ~program() { marks.remove_all_objects(); }
+};
+
+class _media_info {
+public:
+  int bit_rate;
+  int64_t file_size;
+
+  _media_info() {
+    memset(this, 0, sizeof(*this));
+  }
+  ~_media_info() {}
+};
+
+class media_info : public _media_info {
+public:
+  static const AVRational clk45k;
+  char filename[BCTEXTLEN];
+  int pgm_pid;
+  int brk, pidx, still;
+  ArrayList<stream *> streams;
+  ArrayList<program *> programs;
+  program *prog()  { return programs[pidx]; }
+
+  media_info(const char *fn) {
+    strcpy(filename, fn);
+    brk = 0;  pidx = 0;  pgm_pid = -1;  still = 0;
+  }
+  ~media_info() {
+    streams.remove_all_objects();
+    programs.remove_all_objects();
+  }
+
+  int scan();
+  int scan(AVFormatContext *fmt_ctx);
+};
+
+class Media : public ArrayList<media_info *> {
+public:
+  char *path;
+  char filename[BCTEXTLEN];
+  int bd_path(const char *bp, const char *fmt, va_list ap);
+  int bd_open(const char *fmt, ...);
+  int bd_backup(const char *fmt, ...);
+  int bd_copy(const char *ifn, const char *fmt, ...);
+
+  index_file idx;
+  movie_file mov;
+  ArrayList<clpi_cl *> cl;
+  ArrayList<mpls_pl *> pl;
+
+  int compose();
+  int write(char *fn);
+
+  Media() { path = 0;  filename[0] = 0; }
+  ~Media() {
+    remove_all_objects();
+    cl.remove_all_objects();
+    pl.remove_all_objects();
+  }
+};
+
+#endif
+
+void bs_file::init()
+{
+  fp = 0;
+  reg = len = 0;
+  fpos = fsz = 0;
+}
+
+int
+bs_file::open(const char *fn)
+{
+  fp = fopen(fn,"w");
+  if( !fp ) perror(fn);
+  return fp != 0 ? 0 : 1;
+}
+
+void
+bs_file::close()
+{
+  if( fp ) { fclose(fp); fp = 0; }
+}
+
+void
+bs_file::write(uint32_t v, int n)
+{
+  uint64_t vv = reg;
+  vv <<= n;  vv |= v;
+  reg = vv;  len += n;
+  while( len >= 8 ) {
+    len -= 8;
+    if( fp ) fputc((vv >> len), fp);
+    if( ++fpos > fsz ) fsz = fpos;
+  }
+}
+
+void
+bs_file::writeb(uint8_t * bp, int n)
+{
+  while( --n >= 0 ) write(*bp++, 8);
+}
+
+void
+bs_file::pad(int n)
+{
+  while( n > 32 ) { write(0, 32);  n -= 32; }
+  if( n > 0 ) write(0, n);
+}
+
+void
+bs_file::posb(int64_t n)
+{
+  if( fpos == fsz && n > fpos ) {
+    padb(n-fpos);
+    return;
+  }
+  fpos = n;
+  if( fp ) fseek(fp, fpos, SEEK_SET);
+}
+
+static bs_file bs;
+
+
+int
+movie_file::write()
+{
+  // output header
+  bs.writeb("MOBJ", 4);
+  bs.writeb(sig == 1 ? "0100" : "0200", 4);
+  int movie_start = 0x0028;
+  bs.posb(movie_start);
+  bs_len(bs, 32);
+  bs.write(0, 32);
+  bs.write(movies.size(), 16);
+
+  for (int i = 0; i < movies.size(); ++i) {
+    movie_obj *mov = movies[i];
+    bs.write(mov->resume_intention_flag, 1);
+    bs.write(mov->menu_call_mask, 1);
+    bs.write(mov->title_search_mask, 1);
+    bs.write(0, 13);
+    ArrayList<command_obj *> &cmds = mov->cmds;
+    int num_cmds = cmds.size();
+    bs.write(num_cmds, 16);
+    for (int j = 0; j < num_cmds; ++j) {
+      command_obj *cmd = cmds[j];
+      bs.write(cmd->op_cnt, 3);
+      bs.write(cmd->grp, 2);
+      bs.write(cmd->sub_grp, 3);
+      bs.write(cmd->imm_op1, 1);
+      bs.write(cmd->imm_op2, 1);
+      bs.write(0, 2);
+      bs.write(cmd->branch_opt, 4);
+      bs.write(0, 4);
+      bs.write(cmd->cmp_opt, 4);
+      bs.write(0, 3);
+      bs.write(cmd->set_opt, 5);
+      //bs.write(cmd->cmd, 32);
+      bs.write(cmd->dst, 32);
+      bs.write(cmd->src, 32);
+    }
+  }
+//in sony AVCHD
+//  bs.write('l', 8);
+//  bs.writebcd(year, 16);
+//  bs.writebcd(month, 8);
+//  bs.writebcd(day, 8);
+//  bs.writebcd(hour, 8);
+//  bs.writebcd(min, 8);
+//  bs.writebcd(sec, 8);
+  bs_end(bs);
+  return 0;
+}
+
+void
+pb_obj::set_hdmv(int id, int pt)
+{
+  obj_typ = obj_hdmv;
+  pb_typ = pt;
+  delete [] bdj_name;
+  bdj_name = 0;
+  hdmv_id = id;
+}
+
+void
+pb_obj::set_bdj(char *nm, int pt)
+{
+  obj_typ = obj_bdj;
+  pb_typ = pt;
+  delete [] bdj_name;
+  bdj_name = 0;
+  bdj_name = cstrdup(nm);
+}
+
+void 
+pb_obj::write_hdmv_obj(int id_ref)
+{
+  bs.write(pb_typ, 2);
+  bs.write(0, 14);
+  bs.write(id_ref, 16);
+  bs.write(0, 32);
+}
+
+void
+pb_obj::write_bdj_obj(char *name)
+{
+  bs.write(pb_typ, 2);
+  bs.write(0, 14);
+  bs.writeb(name, 5);
+  bs.write(0, 8);
+}
+
+void
+pb_obj::write_obj()
+{
+  switch (obj_typ) {
+  case obj_bdj:
+    write_bdj_obj(bdj_name);
+    break;
+  case obj_hdmv:
+  default:
+    write_hdmv_obj(hdmv_id);
+    break;
+  }
+}
+
+void
+title_obj::write_obj()
+{
+  bs.write(obj_typ, 2);
+  bs.write(acc_typ, 2);
+  bs.write(0, 28);
+  pb_obj::write_obj();
+}
+
+
+void
+index_file::write_pb_obj(pb_obj * pb)
+{
+  bs.write(pb->obj_typ, 2);
+  bs.write(0, 30);
+  pb->write_obj();
+}
+
+int
+index_file::write()
+{
+  // output header
+  bs.writeb("INDX", 4);
+  bs.writeb(sig == 1 ? "0100" : "0200", 4);
+  bs_ofs(bs, 32);
+  exten.bs_ofs(bs, 32);
+  int appinfo_start = 0x28;
+  bs.posb(appinfo_start);
+  appinf.bs_len(bs, 32);
+  bs.write(1, 1);
+  bs.write(initial_output_mode_preference, 1);
+  bs.write(content_exist_flag, 1);
+  bs.write(0, 5);
+  bs.write(video_format, 4);
+  bs.write(frame_rate, 4);
+  bs.writeb(user_data, 32);
+  appinf.bs_end(bs);
+
+  // output index
+  bs_len(bs, 32);
+  write_pb_obj(&first_play);
+  write_pb_obj(&top_menu);
+  bs.write(titles.size(), 16);
+
+  for (int i = 0; i < titles.size(); ++i)
+    titles[i]->write_obj();
+  bs_end(bs);
+  exten.bs_len(bs,32);
+  exten.bs_end(bs);
+  return 0;
+}
+
+
+
+int
+bdid::write()
+{
+  bs.writeb("BDID",4);
+  bs.writeb(sig == 1 ? "0100" : "0200", 4);
+  bs.write(data_start, 32);
+  bs.write(extension_data_start, 32);
+  bs.posb(40 - 16);
+  bs.writeb(org_id, sizeof(org_id));
+  bs.writeb(disc_id, sizeof(disc_id));
+  return 0;
+}
+
+// XXX - not current referenced
+#if 0
+int
+bdmv_write_extension_data(int start_address,
+       int (*handler) (int, int, void *), void *handle)
+{
+  int64_t length;
+  int num_entries, n;
+
+  bs.write(length, 32);   /* length of extension data block */
+  if( length < 1 )
+    return 1;
+
+  bs.pad(32);             /* relative start address of extension data */
+  bs.pad(24);             /* padding */
+  bs.write(num_entries, 8);
+
+  for (n = 0; n < num_entries; n++) {
+    bs.write(id1, 16);
+    bs.write(id2, 16);
+    bs.write(ext_start, 32);
+    bs.write(ext_len, 32);
+    saved_pos = bs.pos() >> 3;
+    bs.posb(start_address + ext_start);
+    handler(id1, id2, handle);
+    bs.posb(saved_pos);
+  }
+
+  return 0;
+}
+#endif
+
+int
+clpi_prog_stream::write()
+{
+  bs.write(pid, 16);
+  bs_len(bs, 8);
+
+  bs.write(coding_type, 8);
+  switch (coding_type) {
+  case BLURAY_STREAM_TYPE_VIDEO_MPEG1:
+  case BLURAY_STREAM_TYPE_VIDEO_MPEG2:
+  case BLURAY_STREAM_TYPE_VIDEO_VC1:
+  case BLURAY_STREAM_TYPE_VIDEO_H264:
+  case 0x20:
+    bs.write(format, 4);
+    bs.write(rate, 4);
+    bs.write(aspect, 4);
+    bs.pad(2);
+    bs.write(oc_flag, 1);
+    bs.pad(1);
+    break;
+
+  case BLURAY_STREAM_TYPE_AUDIO_MPEG1:
+  case BLURAY_STREAM_TYPE_AUDIO_MPEG2:
+  case BLURAY_STREAM_TYPE_AUDIO_LPCM:
+  case BLURAY_STREAM_TYPE_AUDIO_AC3:
+  case BLURAY_STREAM_TYPE_AUDIO_DTS:
+  case BLURAY_STREAM_TYPE_AUDIO_TRUHD:
+  case BLURAY_STREAM_TYPE_AUDIO_AC3PLUS:
+  case BLURAY_STREAM_TYPE_AUDIO_DTSHD:
+  case BLURAY_STREAM_TYPE_AUDIO_DTSHD_MASTER:
+  case BLURAY_STREAM_TYPE_AUDIO_AC3PLUS_SECONDARY:
+  case BLURAY_STREAM_TYPE_AUDIO_DTSHD_SECONDARY:
+    bs.write(format, 4);
+    bs.write(rate, 4);
+    bs.writeb(lang, 3);
+    break;
+
+  case BLURAY_STREAM_TYPE_SUB_PG:
+  case BLURAY_STREAM_TYPE_SUB_IG:
+  case 0xa0:
+    bs.writeb(lang, 3);
+    break;
+
+  case BLURAY_STREAM_TYPE_SUB_TEXT:
+    bs.write(char_code, 8);
+    bs.writeb(lang, 3);
+    break;
+
+  default:
+    fprintf(stderr, "clpi_prog_stream: unrecognized coding type %02x\n",
+            coding_type);
+    return 1;
+  };
+
+  bs_end(bs);
+  return 0;
+}
+
+int
+clpi_cl::write_header()
+{
+  bs.writeb("HDMV", 4);
+  bs.writeb(sig == 1 ? "0100" : "0200", 4);
+  bs.write(sequence_info_start_addr, 32);
+  bs.write(program_info_start_addr, 32);
+  bs.write(cpi_start_addr, 32);
+  bs.write(clip_mark_start_addr, 32);
+  bs.write(ext_data_start_addr, 32);
+  return 0;
+}
+
+int
+clpi_atc_delta::write()
+{
+  bs.write(delta, 32);
+  bs.writeb(file_id, 5);
+  bs.writeb(file_code, 4);
+  bs.pad(8);
+  return 0;
+}
+
+int
+clpi_clip_info::write()
+{
+  bs.posb(40);
+  bs_len(bs, 32);
+
+  bs.pad(16);                   // reserved
+  bs.write(clip_stream_type, 8);
+  bs.write(application_type, 8);
+  bs.pad(31);                   // skip reserved 31 bits
+  bs.write(is_atc_delta, 1);
+  bs.write(ts_recording_rate, 32);
+  bs.write(num_source_packets, 32);
+
+  bs.padb(128);                 // Skip reserved 128 bytes
+
+  // ts type info block
+  int ts_len = 30;
+  bs.write(ts_len, 16);
+  int64_t pos = bs.posb();
+  if( ts_len ) {
+    bs.write(ts_type_info.validity, 8);
+    bs.writeb(ts_type_info.format_id, 4);
+    // pad the stuff we don't know anything about
+    bs.padb(ts_len - (bs.posb() - pos));
+  }
+
+  if( is_atc_delta ) {
+    bs.pad(8);                  // Skip reserved byte
+    bs.write(atc_delta.size(), 8);
+    for( int ii=0; ii < atc_delta.size(); ++ii )
+      if( atc_delta[ii]->write() ) return 1;
+  }
+
+  // font info
+  if( application_type == 6 /* Sub TS for a sub-path of Text subtitle */  ) {
+    bs.pad(8);
+    bs.write(font_info.font.size(), 8);
+    if( font_info.font.size() ) {
+      for( int ii=0; ii < font_info.font.size(); ++ii ) {
+        bs.writeb(font_info.font[ii]->file_id, 5);
+        bs.pad(8);
+      }
+    }
+  }
+
+  bs_end(bs);
+  return 0;
+}
+
+int
+clpi_stc_seq::write()
+{
+  bs.write(pcr_pid, 16);
+  bs.write(spn_stc_start, 32);
+  bs.write(presentation_start_time, 32);
+  bs.write(presentation_end_time, 32);
+  return 0;
+}
+
+int
+clpi_atc_seq::write()
+{
+  bs.write(spn_atc_start, 32);
+  bs.write(stc_seq.size(), 8);
+  bs.write(offset_stc_id, 8);
+
+  for( int ii=0; ii < stc_seq.size(); ++ii )
+    if( stc_seq[ii]->write() ) return 1;
+  return 0;
+}
+
+int
+clpi_sequences::write()
+{
+  bs_len(bs, 32);
+  bs.padb(1);                   // reserved byte
+  bs.write(size(), 8);
+  for( int ii=0; ii < size(); ++ii )
+    if( get(ii)->write() ) return 1;
+  bs_end(bs);
+  return 0;
+}
+
+int
+clpi_prog::write()
+{
+  bs.write(spn_program_sequence_start, 32);
+  bs.write(program_map_pid, 16);
+  bs.write(streams.size(), 8);
+  bs.write(num_groups, 8);
+  for( int ii=0; ii < streams.size(); ++ii )
+    if( streams[ii]->write() ) return 1;
+  return 0;
+}
+
+int
+clpi_programs::write()
+{
+  bs_len(bs, 32);
+  bs.padb(1);                   // reserved byte
+  bs.write(size(), 8);
+  for( int ii=0; ii < size(); ++ii )
+    if( get(ii)->write() ) return 1;
+  bs_end(bs);
+  return 0;
+}
+
+int
+clpi_ep_coarse::write()
+{
+  bs.write(ref_ep_fine_id, 18);
+  bs.write(pts_ep, 14);
+  bs.write(spn_ep, 32);
+  return 0;
+}
+
+int
+clpi_ep_fine::write()
+{
+  bs.write(is_angle_change_point, 1);
+  bs.write(i_end_position_offset, 3);
+  bs.write(pts_ep, 11);
+  bs.write(spn_ep, 17);
+  return 0;
+}
+
+int
+clpi_ep_map_entry::write(uint32_t ep_map_pos)
+{
+  bs.write(pid, 16);
+  bs.pad(10);
+  bs.write(ep_stream_type, 4);
+  bs.write(coarse.size(), 16);
+  bs.write(fine.size(), 18);
+  bs.write(ep_map_stream_start_addr - ep_map_pos, 32);
+  return 0;
+}
+
+int
+clpi_ep_map_entry::write_map()
+{
+  ep_map_stream_start_addr = bs.posb();
+  bs.write(fine_start, 32);
+
+  for( int ii=0; ii < coarse.size(); ++ii )
+    if( coarse[ii]->write() ) return 1;
+
+  fine_start = bs.posb() - ep_map_stream_start_addr;
+  for( int ii=0; ii < fine.size(); ++ii )
+    if( fine[ii]->write() ) return 1;
+
+  return 0;
+}
+
+int
+clpi_cpi::write()
+{
+  bs_len(bs, 32);
+  bs.pad(12);
+  bs.write(type, 4);
+  uint32_t ep_map_pos = bs.posb();
+
+  // EP Map starts here
+  bs.pad(8);
+  bs.write(size(), 8);
+
+  for( int ii=0; ii < size(); ++ii )
+    if( get(ii)->write(ep_map_pos) ) return 1;
+
+  for( int ii=0; ii < size(); ++ii )
+    if( get(ii)->write_map() ) return 1;
+
+  bs_end(bs);
+  return 0;
+}
+
+int
+clpi_extents::write()
+{
+  bs_len(bs, 32);
+  bs.write(size(), 32);
+  for( int ii=0; ii < size(); ++ii )
+    bs.write(get(ii), 32);
+  return 0;
+}
+
+int
+clpi_cl::write_clpi_extension(int id1, int id2, void *handle)
+{
+  clpi_cl *cl = (clpi_cl *) handle;
+
+  if( id1 == 1 ) {
+    if( id2 == 2 ) {
+      // LPCM down mix coefficient
+      //write_lpcm_down_mix_coeff(&cl->lpcm_down_mix_coeff);
+      return 0;
+    }
+  }
+
+  if( id1 == 2 ) {
+    if( id2 == 4 ) {
+      // Extent start point
+      return cl->extents.write();
+    }
+    if( id2 == 5 ) {
+      // ProgramInfo SS
+      return cl->programs_ss.write();
+    }
+    if( id2 == 6 ) {
+      // CPI SS
+      return cl->cpi_ss.write();
+    }
+  }
+
+  fprintf(stderr, "write_clpi_extension(): unhandled extension %d.%d\n", id1, id2);
+  return 1;
+}
+
+int
+clpi_cl::write()
+{
+  if( write_header() ) return 1;
+  if( clip.write() ) return 1;
+  sequence_info_start_addr = bs.posb();
+  if( sequences.write() ) return 1;
+  program_info_start_addr = bs.posb();
+  if( programs.write() ) return 1;
+  cpi_start_addr = bs.posb();
+  if( cpi.write() ) return 1;
+//if( has_ext_data ) {
+//  ext_data_start_addr = bs.pos();
+//  bdmv_write_extension_data(write_clpi_extension, this);
+//}
+  return 0;
+}
+
+int
+bd_uo_mask::write()
+{
+  bs.write(menu_call, 1);
+  bs.write(title_search, 1);
+  bs.write(chapter_search, 1);
+  bs.write(time_search, 1);
+  bs.write(skip_to_next_point, 1);
+  bs.write(skip_to_prev_point, 1);
+  bs.write(play_firstplay, 1);
+  bs.write(stop, 1);
+  bs.write(pause_on, 1);
+  bs.write(pause_off, 1);
+  bs.write(still_off, 1);
+  bs.write(forward, 1);
+  bs.write(backward, 1);
+  bs.write(resume, 1);
+  bs.write(move_up, 1);
+  bs.write(move_down, 1);
+  bs.write(move_left, 1);
+  bs.write(move_right, 1);
+  bs.write(select, 1);
+  bs.write(activate, 1);
+  bs.write(select_and_activate, 1);
+  bs.write(primary_audio_change, 1);
+  bs.pad(1);
+  bs.write(angle_change, 1);
+  bs.write(popup_on, 1);
+  bs.write(popup_off, 1);
+  bs.write(pg_enable_disable, 1);
+  bs.write(pg_change, 1);
+  bs.write(secondary_video_enable_disable, 1);
+  bs.write(secondary_video_change, 1);
+  bs.write(secondary_audio_enable_disable, 1);
+  bs.write(secondary_audio_change, 1);
+  bs.pad(1);
+  bs.write(pip_pg_change, 1);
+  bs.pad(30);
+  return 0;
+}
+
+int
+mpls_ai::write()
+{
+  bs_len(bs, 32);
+  bs.pad(8);              // Reserved
+  bs.write(playback_type, 8);
+  if (playback_type == BLURAY_PLAYBACK_TYPE_RANDOM ||
+      playback_type == BLURAY_PLAYBACK_TYPE_SHUFFLE ) {
+    bs.write(playback_count, 16);
+  }
+  else {
+    bs.pad(16);           // Reserved
+  }
+  uo_mask.write();
+  bs.write(random_access_flag, 1);
+  bs.write(audio_mix_flag, 1);
+  bs.write(lossless_bypass_flag, 1);
+  bs.pad(13);             // Reserved
+  bs_end(bs);
+  return 0;
+}
+
+int
+mpls_pl::write_header()
+{
+  bs.writeb("MPLS", 4);
+  bs.writeb(sig == 1 ? "0100" : "0200", 4);
+  bs.write(list_pos, 32);
+  bs.write(mark_pos, 32);
+  bs.write(ext_pos, 32);
+  bs.pad(160);            // Skip 160 reserved bits
+  app_info.write();
+  return 0;
+}
+
+int mpls_stream::
+write()
+{
+  strm.bs_len(bs, 8);
+
+  bs.write(stream_type, 8);
+  switch (stream_type) {
+  case 0x01:
+    bs.write(pid, 16);
+    break;
+
+  case 0x02:
+  case 0x04:
+    bs.write(subpath_id, 8);
+    bs.write(subclip_id, 8);
+    bs.write(pid, 16);
+    break;
+
+  case 0x03:
+    bs.write(subpath_id, 8);
+    bs.write(pid, 16);
+    break;
+
+  default:
+    fprintf(stderr, "unrecognized stream type %02x\n", stream_type);
+    break;
+  };
+  strm.bs_end(bs);
+
+  code.bs_len(bs, 8);
+  bs.write(coding_type, 8);
+  switch (coding_type) {
+  case BLURAY_STREAM_TYPE_VIDEO_MPEG1:
+  case BLURAY_STREAM_TYPE_VIDEO_MPEG2:
+  case BLURAY_STREAM_TYPE_VIDEO_VC1:
+  case BLURAY_STREAM_TYPE_VIDEO_H264:
+    bs.write(format, 4);
+    bs.write(rate, 4);
+    break;
+
+  case BLURAY_STREAM_TYPE_AUDIO_MPEG1:
+  case BLURAY_STREAM_TYPE_AUDIO_MPEG2:
+  case BLURAY_STREAM_TYPE_AUDIO_LPCM:
+  case BLURAY_STREAM_TYPE_AUDIO_AC3:
+  case BLURAY_STREAM_TYPE_AUDIO_DTS:
+  case BLURAY_STREAM_TYPE_AUDIO_TRUHD:
+  case BLURAY_STREAM_TYPE_AUDIO_AC3PLUS:
+  case BLURAY_STREAM_TYPE_AUDIO_DTSHD:
+  case BLURAY_STREAM_TYPE_AUDIO_DTSHD_MASTER:
+  case BLURAY_STREAM_TYPE_AUDIO_AC3PLUS_SECONDARY:
+  case BLURAY_STREAM_TYPE_AUDIO_DTSHD_SECONDARY:
+    bs.write(format, 4);
+    bs.write(rate, 4);
+    bs.writeb(lang, 3);
+    break;
+
+  case BLURAY_STREAM_TYPE_SUB_PG:
+  case BLURAY_STREAM_TYPE_SUB_IG:
+    bs.writeb(lang, 3);
+    break;
+
+  case BLURAY_STREAM_TYPE_SUB_TEXT:
+    bs.write(char_code, 8);
+    bs.writeb(lang, 3);
+    break;
+
+  default:
+    fprintf(stderr, "mpls_stream: unrecognized coding type %02x\n", coding_type);
+    break;
+  };
+  code.bs_end(bs);
+  return 0;
+}
+
+int
+mpls_stn::write()
+{
+  bs_len(bs, 16);
+  bs.pad(16);             // Skip 2 reserved bytes
+
+  bs.write(video.size(), 8);
+  bs.write(audio.size(), 8);
+  bs.write(pg.size() - num_pip_pg, 8);
+  bs.write(ig.size(), 8);
+  bs.write(secondary_audio.size(), 8);
+  bs.write(secondary_video.size(), 8);
+  bs.write(num_pip_pg, 8);
+
+  // 5 reserve bytes
+  bs.pad(5 * 8);
+
+  // Primary Video Streams
+  for( int ii=0; ii < video.size(); ++ii )
+    if( video[ii]->write() ) return 1;
+
+  // Primary Audio Streams
+  for( int ii=0; ii < audio.size(); ++ii )
+    if( audio[ii]->write() ) return 1;
+
+  // Presentation Graphic Streams
+  for( int ii=0; ii < pg.size(); ++ii )
+    if( pg[ii]->write() ) return 1;
+
+  // Interactive Graphic Streams
+  for( int ii=0; ii < ig.size(); ++ii )
+    if( ig[ii]->write() ) return 1;
+
+  // Secondary Audio Streams
+  for( int ii=0; ii < secondary_audio.size(); ++ii ) {
+    if( secondary_audio[ii]->write() ) return 1;
+    // Read Secondary Audio Extra Attributes
+    bs.write(sa_primary_audio_ref.size(), 8);
+    bs.pad(8);
+    for( int jj=0; jj < sa_primary_audio_ref.size(); ++jj )
+      bs.write(sa_primary_audio_ref[jj], 8);
+    if( sa_primary_audio_ref.size() % 2) bs.pad(8 );
+  }
+
+  // Secondary Video Streams
+  for( int ii=0; ii < secondary_video.size(); ++ii ) {
+    if( secondary_video[ii]->write() ) return 1;
+    // Read Secondary Video Extra Attributes
+    bs.write(sv_secondary_audio_ref.size(), 8);
+    bs.pad(8);
+    for( int jj=0; jj < sv_secondary_audio_ref.size(); ++jj )
+      bs.write(sv_secondary_audio_ref[jj], 8);
+    if( sv_secondary_audio_ref.size() % 2) bs.pad(8 );
+    bs.write(sv_pip_pg_ref.size(), 8);
+    bs.pad(8);
+    for( int jj=0; jj < sv_pip_pg_ref.size(); ++jj )
+      bs.write(sv_pip_pg_ref[jj], 8);
+    if( sv_pip_pg_ref.size() % 2) bs.pad(8 );
+  }
+
+  bs_end(bs);
+  return 0;
+}
+
+int
+mpls_pi::write()
+{
+  bs_len(bs, 16);
+  // Primary Clip identifer
+  bs.writeb(clip[0]->clip_id, 5);
+  bs.writeb(clip[0]->codec_id, 4); // "M2TS"
+  bs.pad(11); // Skip reserved 11 bits
+
+  bs.write(is_multi_angle, 1);
+  bs.write(connection_condition, 4);  // 0x01, 0x05, 0x06
+
+  bs.write(clip[0]->stc_id, 8);
+  bs.write(in_time, 32);
+  bs.write(out_time, 32);
+
+  uo_mask.write();
+  bs.write(random_access_flag, 1);
+  bs.pad(7);
+  bs.write(still_mode, 8);
+  if( still_mode == 0x01 ) {
+    bs.write(still_time, 16);
+  }
+  else {
+    bs.pad(16);
+  }
+
+  if( is_multi_angle ) {
+    bs.write(clip.size(), 8);
+    bs.pad(6);
+    bs.write(is_different_audio, 1);
+    bs.write(is_seamless_angle, 1);
+  }
+
+  for( int ii=1; ii < clip.size(); ++ii ) {
+    bs.writeb(clip[ii]->clip_id, 5);
+    bs.writeb(clip[ii]->codec_id, 4); // "M2TS"
+    bs.write(clip[ii]->stc_id, 8);
+  }
+
+  if( stn.write() ) return 1;
+
+  bs_end(bs);
+  return 0;
+}
+
+int
+mpls_sub_pi::write()
+{
+  bs_len(bs, 16);
+  // Primary Clip identifer
+  bs.writeb(clip[0]->clip_id, 5);
+  bs.writeb(clip[0]->codec_id, 4); // "M2TS"
+  bs.pad(27);
+
+  bs.write(connection_condition, 4); // 0x01, 0x05, 0x06
+
+  bs.write(is_multi_clip, 1);
+  bs.write(clip[0]->stc_id, 8);
+  bs.write(in_time, 32);
+  bs.write(out_time, 32);
+  bs.write(sync_play_item_id, 16);
+  bs.write(sync_pts, 32);
+
+  if( is_multi_clip )
+    bs.write(clip.size(), 8);
+
+  for( int ii=1; ii < clip.size(); ++ii ) {
+    // Primary Clip identifer
+    bs.writeb(clip[ii]->clip_id, 5);
+    bs.writeb(clip[ii]->codec_id, 4); // "M2TS"
+    bs.write(clip[ii]->stc_id, 8);
+  }
+
+  bs_end(bs);
+  return 0;
+}
+
+int
+mpls_sub::write()
+{
+  bs_len(bs, 32);
+  bs.pad(8);
+  bs.write(type, 8);
+  bs.pad(15);
+  bs.write(is_repeat, 1);
+  bs.pad(8);
+  bs.write(sub_play_item.size(), 8);
+
+  for( int ii=0; ii < sub_play_item.size(); ++ii )
+    if( sub_play_item[ii]->write() ) return 1;
+
+  bs_end(bs);
+  return 0;
+}
+
+int
+mpls_plm::write()
+{
+  bs.write(mark_id, 8);
+  bs.write(mark_type, 8);
+  bs.write(play_item_ref, 16);
+  bs.write(time, 32);
+  bs.write(entry_es_pid, 16);
+  bs.write(duration, 32);
+  return 0;
+}
+
+int
+mpls_pl::write_playlistmark()
+{
+  mark.bs_len(bs, 32);
+  // Then get the number of marks
+  bs.write(play_mark.size(), 16);
+
+  for( int ii=0; ii < play_mark.size(); ++ii )
+    if( play_mark[ii]->write() ) return 1;
+
+  mark.bs_end(bs);
+  return 0;
+}
+
+int
+mpls_pl::write_playlist()
+{
+  play.bs_len(bs,32);
+
+  // Skip reserved bytes
+  bs.pad(16);
+
+  bs.write(play_item.size(), 16);
+  bs.write(sub_path.size(), 16);
+
+  for( int ii=0; ii < play_item.size(); ++ii )
+    if( play_item[ii]->write() ) return 1;
+
+  for( int ii=0; ii < sub_path.size(); ++ii )
+    if( sub_path[ii]->write() ) return 1;
+
+  play.bs_end(bs);
+  return 0;
+}
+
+int
+mpls_pip_data::write()
+{
+  bs.write(time, 32);
+  bs.write(xpos, 12);
+  bs.write(ypos, 12);
+  bs.write(scale_factor, 4);
+  bs.pad(4);
+  return 0;
+}
+
+int
+mpls_pip_metadata::write(uint32_t start_address)
+{
+
+  bs.write(clip_ref, 16);
+  bs.write(secondary_video_ref, 8);
+  bs.pad(8);
+  bs.write(timeline_type, 4);
+  bs.write(luma_key_flag, 1);
+  bs.write(trick_play_flag, 1);
+  bs.pad(10);
+  if( luma_key_flag ) {
+    bs.pad(8);
+    bs.write(upper_limit_luma_key, 8);
+  }
+  else {
+    bs.pad(16);
+  }
+  bs.pad(16);
+
+  uint32_t data_address = 0;  // XXX
+  bs.write(data_address, 32);
+
+  int64_t pos = bs.pos() / 8;
+  bs.posb(start_address + data_address);
+
+  bs.write(data.size(), 16);
+  if( data.size() < 1 ) return 1;
+
+  for( int ii=0; ii < data.size(); ++ii )
+    if( data[ii]->write() ) return 1;
+
+  bs.posb(pos);
+  return 0;
+}
+
+int
+mpls_pl::write_pip_metadata_extension()
+{
+  uint32_t pos = bs.posb();
+  pipm.bs_len(bs, 32);
+
+  bs.write(ext_pip_data.size(), 16);
+  for( int ii=0; ii < ext_pip_data.size(); ++ii )
+    if( ext_pip_data[ii]->write(pos) ) return 1;
+
+  pipm.bs_end(bs);
+  return 0;
+}
+
+int
+mpls_pl::write_subpath_extension()
+{
+  subx.bs_len(bs, 32);
+
+  bs.write(ext_sub_path.size(), 16);
+  for( int ii=0; ii < ext_sub_path.size(); ++ii )
+    if( ext_sub_path[ii]->write() ) return 1;
+
+  subx.bs_end(bs);
+  return 0;
+}
+
+int
+clpi_cl::write_mpls_extension(int id1, int id2, void *handle)
+{
+  mpls_pl *pl = (mpls_pl *) handle;
+
+  if( id1 == 1 ) {
+    if( id2 == 1 ) {
+      // PiP metadata extension
+      return pl->write_pip_metadata_extension();
+    }
+  }
+
+  if( id1 == 2 ) {
+    if( id2 == 1 ) {
+      return 0;
+    }
+    if( id2 == 2 ) {
+      // SubPath entries extension
+      return pl->write_subpath_extension();
+    }
+  }
+
+  return 0;
+}
+
+int mpls_pl::
+write()
+{
+  int ret = write_header();
+  list_pos = bs.posb();;
+  if( !ret ) ret = write_playlist();
+  mark_pos = bs.posb();
+  if( !ret ) ret = write_playlistmark();
+//if( has_pls_extension ) {
+//  ext_pos = bs.posb();
+//  bdmv_write_extension_data(write_mpls_extension, pl);
+  return ret;
+}
+
+static int
+mk_dir(char *path)
+{
+  if( !mkdir(path, 0777) )
+    return 0;
+  perror(path);
+  return 1;
+}
+
+static int
+mk_bdmv_dir(char *bdmv_path)
+{
+  if( mk_dir(bdmv_path) )
+    return 1;
+  char bdjo_path[BCTEXTLEN];
+  sprintf(bdjo_path, "%s/BDJO", bdmv_path);
+  if( mk_dir(bdjo_path) )
+    return 1;
+  char clipinf_path[BCTEXTLEN];
+  sprintf(clipinf_path, "%s/CLIPINF", bdmv_path);
+  if( mk_dir(clipinf_path) )
+    return 1;
+  char jar_path[BCTEXTLEN];
+  sprintf(jar_path, "%s/JAR", bdmv_path);
+  if( mk_dir(jar_path) )
+    return 1;
+  char playlist_path[BCTEXTLEN];
+  sprintf(playlist_path, "%s/PLAYLIST", bdmv_path);
+  if( mk_dir(playlist_path) )
+    return 1;
+  return 0;
+}
+
+static int
+mkbdmv(char *path)
+{
+  char bdmv_path[BCTEXTLEN];
+  sprintf(bdmv_path, "%s/BDMV", path);
+  if( mk_bdmv_dir(bdmv_path) ) return 1;
+  char stream_path[BCTEXTLEN];
+  sprintf(stream_path, "%s/BDMV/STREAM", path);
+  if( mk_dir(stream_path) ) return 1;
+  char auxdata_path[BCTEXTLEN];
+  sprintf(auxdata_path, "%s/BDMV/AUXDATA", path);
+  if( mk_dir(auxdata_path) ) return 1;
+  char meta_path[BCTEXTLEN];
+  sprintf(meta_path, "%s/BDMV/META", path);
+  if( mk_dir(meta_path) ) return 1;
+  char backup_path[BCTEXTLEN];
+  sprintf(backup_path, "%s/BACKUP", bdmv_path);
+  if( mk_bdmv_dir(backup_path) ) return 1;
+  return 0;
+}
+
+int program::
+build_toc(clpi_ep_map_entry *map)
+{
+  clpi_ep_coarse *cp = 0;
+  marks.sort(mark::cmpr);
+  uint16_t ep_pid = map->pid;
+  int64_t last_pts = -1, last_pkt = -1;
+  for( int ii=0; ii<marks.size(); ++ii ) {
+    mark *mp = marks[ii];
+    if( mp->pid != ep_pid ) continue;
+    int64_t pts = mp->pts;
+    if( last_pts >= pts ) continue;
+    last_pts = pts;
+    uint32_t pkt = mp->pos / BLURAY_TS_PKTSZ;
+    if( last_pkt >= pkt ) continue;
+    last_pkt = pkt;
+    int64_t coarse_pts = (pts >> 18) & ~0x01;
+    int64_t fine_pts = (pts & 0x7ffff) >> 8;
+    uint32_t mpkt = pkt & ~0x1ffff;
+    if( !cp || cp->pts_ep != coarse_pts || cp->spn_ep != mpkt ) {
+      cp = new clpi_ep_coarse();
+      map->coarse.append(cp);
+      cp->ref_ep_fine_id = map->fine.size();
+      cp->pts_ep = coarse_pts;
+      cp->spn_ep = mpkt;
+    }
+    clpi_ep_fine *fp = new clpi_ep_fine();
+    map->fine.append(fp);
+    fp->is_angle_change_point = 0;
+// XXX - dont know what this is
+    fp->i_end_position_offset = 1;
+    fp->pts_ep = fine_pts;
+    fp->spn_ep = pkt & 0x1ffff;
+  }
+  return 0;
+}
+
+const AVRational media_info::clk45k = { 1, 45000 };
+
+static int bd_stream_type(AVCodecID codec_id)
+{
+  int stream_type = 0;
+  switch (codec_id) {
+  case AV_CODEC_ID_MPEG1VIDEO:
+  case AV_CODEC_ID_MPEG2VIDEO:
+    stream_type = BLURAY_STREAM_TYPE_VIDEO_MPEG2;
+    break;
+  case AV_CODEC_ID_H264:
+    stream_type = BLURAY_STREAM_TYPE_VIDEO_H264;
+    break;
+  case AV_CODEC_ID_MP2:
+  case AV_CODEC_ID_MP3:
+    stream_type = BLURAY_STREAM_TYPE_AUDIO_MPEG1;
+    break;
+  case AV_CODEC_ID_AC3:
+    stream_type = BLURAY_STREAM_TYPE_AUDIO_AC3;
+    break;
+  case AV_CODEC_ID_DTS:
+    stream_type = BLURAY_STREAM_TYPE_AUDIO_DTS;
+    break;
+  case AV_CODEC_ID_TRUEHD:
+    stream_type = BLURAY_STREAM_TYPE_AUDIO_TRUHD;
+    break;
+  default:
+    fprintf(stderr, "unknown bluray stream type %s\n", avcodec_get_name(codec_id));
+    exit(1);
+  }
+  return stream_type;
+}
+
+static int bd_audio_format(int channels)
+{
+  int audio_format = 0;
+  switch( channels ) {
+  case 1:
+    audio_format = BLURAY_AUDIO_FORMAT_MONO;
+    break;
+  case 2:
+    audio_format = BLURAY_AUDIO_FORMAT_STEREO;
+    break;
+  case 6:
+    audio_format = BLURAY_AUDIO_FORMAT_MULTI_CHAN;
+    break;
+  default:
+    fprintf(stderr, "unknown bluray audio format %d ch\n", channels);
+    exit(1);
+  }
+  return audio_format;
+}
+
+static int bd_audio_rate(int rate)
+{
+  int audio_rate = 0;
+  switch( rate ) {
+  case 48000:  audio_rate = BLURAY_AUDIO_RATE_48;  break;
+  case 96000:  audio_rate = BLURAY_AUDIO_RATE_96;  break;
+  case 192000: audio_rate = BLURAY_AUDIO_RATE_192; break;
+  default:
+    fprintf(stderr, "unknown bluray audio rate %d\n", rate);
+    exit(1);
+  }
+  return audio_rate;
+}
+
+static int bd_video_format(int w, int h, int ilace)
+{
+  if( w == 720 && h == 480 && ilace ) return BLURAY_VIDEO_FORMAT_480I;
+  if( w == 720 && h == 576 && ilace ) return BLURAY_VIDEO_FORMAT_576I;
+  if( w == 720 && h == 480 && !ilace ) return BLURAY_VIDEO_FORMAT_480P;
+  if( w == 1920 && h == 1080 && ilace ) return BLURAY_VIDEO_FORMAT_1080I;
+  if( w == 1280 && h == 720 && !ilace ) return BLURAY_VIDEO_FORMAT_720P;
+  if( w == 1920 && h == 1080 && !ilace ) return BLURAY_VIDEO_FORMAT_1080P;
+  if( w == 720 && h == 576 && !ilace ) return BLURAY_VIDEO_FORMAT_576P;
+  fprintf(stderr, "unknown bluray video format %dx%d %silace\n",
+    w, h, !ilace ? "not " : "");
+  exit(1);
+}
+
+static int bd_video_rate(double rate)
+{
+  if( fabs(rate-23.976) < 0.01 ) return BLURAY_VIDEO_RATE_24000_1001;
+  if( fabs(rate-24.000) < 0.01 ) return BLURAY_VIDEO_RATE_24;
+  if( fabs(rate-25.000) < 0.01 ) return BLURAY_VIDEO_RATE_25;
+  if( fabs(rate-29.970) < 0.01 ) return BLURAY_VIDEO_RATE_30000_1001;
+  if( fabs(rate-50.000) < 0.01 ) return BLURAY_VIDEO_RATE_50;
+  if( fabs(rate-59.940) < 0.01 ) return BLURAY_VIDEO_RATE_60000_1001;
+  fprintf(stderr, "unknown bluray video framerate %5.2f\n",rate);
+  exit(1);
+}
+
+static int bd_aspect_ratio(int w, int h, double ratio)
+{
+  double aspect = (w * ratio) / h;
+  if( fabs(aspect-1.333) < 0.01 ) return BLURAY_ASPECT_RATIO_4_3;
+  if( fabs(aspect-1.777) < 0.01 ) return BLURAY_ASPECT_RATIO_16_9;
+  return w == 720 ? BLURAY_ASPECT_RATIO_4_3 : BLURAY_ASPECT_RATIO_16_9; 
+  fprintf(stderr, "unknown bluray aspect ratio %5.3f\n",aspect);
+  exit(1);
+}
+
+int media_info::scan()
+{
+  struct stat st;
+  if( stat(filename, &st) ) return 1;
+  file_size = st.st_size;
+
+  AVFormatContext *fmt_ctx = 0;
+  AVDictionary *fopts = 0;
+  av_dict_set(&fopts, "formatprobesize", "5000000", 0);
+  av_dict_set(&fopts, "scan_all_pmts", "1", 0);
+  av_dict_set(&fopts, "threads", "auto", 0);
+  int ret = avformat_open_input(&fmt_ctx, filename, NULL, &fopts);
+  av_dict_free(&fopts);
+  if( ret < 0 ) return ret;
+  ret = avformat_find_stream_info(fmt_ctx, NULL);
+
+  bit_rate = fmt_ctx->bit_rate;
+
+  int ep_pid = -1;
+  for( int i=0; ret>=0 && i<(int)fmt_ctx->nb_streams; ++i ) {
+    AVStream *st = fmt_ctx->streams[i];
+    AVMediaType type = st->codec->codec_type;
+    switch( type ) {
+    case AVMEDIA_TYPE_VIDEO: break;
+    case AVMEDIA_TYPE_AUDIO: break;
+    default: continue;
+    }
+    stream *s = new stream(type, i);
+    s->pid = st->id;
+    AVCodecID codec_id = st->codec->codec_id;
+    switch( type ) {
+    case AVMEDIA_TYPE_VIDEO: {
+      if( ep_pid < 0 ) ep_pid = st->id;
+      s->coding_type = bd_stream_type(codec_id);
+      s->format = bd_video_format(st->codec->width, st->codec->height,
+               st->codec->flags & CODEC_FLAG_INTERLACED_ME);
+      s->rate = bd_video_rate(!st->codec->framerate.den ? 0 :
+               (double)st->codec->framerate.num / st->codec->framerate.den);
+      s->aspect = bd_aspect_ratio(st->codec->width, st->codec->height,
+               !st->sample_aspect_ratio.num || !st->sample_aspect_ratio.den ? 1. :
+                (double)st->sample_aspect_ratio.num / st->sample_aspect_ratio.den);
+      break; }
+    case AVMEDIA_TYPE_AUDIO: {
+      s->coding_type = bd_stream_type(codec_id);
+      s->format = bd_audio_format(st->codec->channels);
+      s->rate = bd_audio_rate(st->codec->sample_rate);
+      strcpy((char*)s->lang, "und");
+      break; }
+    default:
+      break;
+    }
+    if( bit_rate > 0 && st->duration == AV_NOPTS_VALUE &&
+        st->time_base.num < INT64_MAX / bit_rate ) {
+      st->duration = av_rescale(8*file_size, st->time_base.den,
+          bit_rate * (int64_t) st->time_base.num);
+    }
+    s->duration = av_rescale_q(st->duration, st->time_base, clk45k);
+    streams.append(s);
+
+    AVCodec *decoder = avcodec_find_decoder(codec_id);
+    AVDictionary *copts = 0;
+    ret = avcodec_open2(st->codec, decoder, &copts);
+  }
+  if( ep_pid < 0 )
+    ep_pid = fmt_ctx->nb_streams > 0 ? fmt_ctx->streams[0]->id : 0;
+
+  int npgm = fmt_ctx->nb_programs;
+  if( npgm < 1 ) {
+    program *pgm = new program(-1, 1);
+    pgm->ep_pid = ep_pid;
+    pgm->pmt_pid = 0x1000;
+    pgm->pcr_pid = 0x100;
+    pgm->duration = 0;
+    for( int jj=0; jj<streams.size(); ++jj ) {
+      AVStream *st = fmt_ctx->streams[jj];
+      AVMediaType type = st->codec->codec_type;
+      switch( type ) {
+      case AVMEDIA_TYPE_VIDEO:
+      case AVMEDIA_TYPE_AUDIO:
+        break;
+      default:
+        continue;
+      }
+      pgm->strm_idx.append(jj);
+      if( pgm->duration < st->duration )
+        pgm->duration = av_rescale_q(st->duration, st->time_base, clk45k);
+    }
+    programs.append(pgm);
+  }
+
+  for( int ii=0; ii<npgm; ++ii ) {
+    AVProgram *pgrm = fmt_ctx->programs[ii];
+    program *pgm = new program(ii, pgrm->id);
+    pgm->pmt_pid = pgrm->pmt_pid;
+    pgm->pcr_pid = pgrm->pcr_pid;
+    pgm->duration = 0;
+    ep_pid = -1;
+    for( int jj=0; jj<(int)pgrm->nb_stream_indexes; ++jj ) {
+      int av_idx = pgrm->stream_index[jj];
+      AVStream *st = fmt_ctx->streams[av_idx];
+      AVMediaType type = st->codec->codec_type;
+      switch( type ) {
+      case AVMEDIA_TYPE_VIDEO:
+        if( ep_pid < 0 ) ep_pid = st->id;
+        break;
+      case AVMEDIA_TYPE_AUDIO:
+        break;
+      default:
+        continue;
+      }
+      int sidx = streams.size();
+      while( --sidx>=0 && streams[sidx]->av_idx!=av_idx );
+      if( sidx < 0 ) {
+        fprintf(stderr, "bad stream idx %d in pgm %d\n",av_idx, ii);
+        continue;
+      }
+      if( pgm->duration < st->duration )
+        pgm->duration = av_rescale_q(st->duration, st->time_base, clk45k);
+      pgm->strm_idx.append(sidx);
+    }
+    if( ep_pid < 0 ) {
+      AVProgram *pgrm = fmt_ctx->programs[0];
+      ep_pid = pgrm->nb_stream_indexes > 0 ?
+          fmt_ctx->streams[pgrm->stream_index[0]]->id : 0;
+    }
+    pgm->ep_pid = ep_pid;
+    programs.append(pgm);
+  }
+
+  if( ret >= 0 )
+    ret = scan(fmt_ctx);
+
+  for( int i=0; i<(int)fmt_ctx->nb_streams; ++i )
+    avcodec_close(fmt_ctx->streams[i]->codec);
+  avformat_close_input(&fmt_ctx);
+
+  return ret;
+}
+
+int media_info::scan(AVFormatContext *fmt_ctx)
+{
+  int ret = 0;
+  AVPacket ipkt;
+  av_init_packet(&ipkt);
+
+  for( int64_t count=0; ret>=0; ++count ) {
+    av_packet_unref(&ipkt);
+    ipkt.data = 0; ipkt.size = 0;
+
+    ret = av_read_frame(fmt_ctx, &ipkt);
+    if( ret < 0 ) {
+      if( ret == AVERROR_EOF ) break;
+      ret = 0;
+      continue;
+    }
+    if( !ipkt.data ) continue;
+    if( (ipkt.flags & AV_PKT_FLAG_CORRUPT) ) continue;
+    if( ipkt.pts == AV_NOPTS_VALUE ) continue;
+    int i = ipkt.stream_index;
+    if( i < 0 || i >= streams.size() ) continue;
+
+    stream *sp = 0;
+    program *pgm = 0;
+    for( int ii=0; !pgm && ii<programs.size(); ++ii ) {
+      program *p = programs[ii];
+      for( int jj=0; jj<p->strm_idx.size(); ++jj ) {
+        sp = streams[p->strm_idx[jj]];
+        if( sp->av_idx == i ) { pgm = p;  break; }
+      }
+    }
+    if( !pgm ) continue;
+    AVStream *st = fmt_ctx->streams[i];
+    if( pgm->ep_pid != st->id ) continue;
+    int64_t pts45k = av_rescale_q(ipkt.pts, st->time_base, clk45k);
+    if( sp->start_pts > pts45k ) sp->start_pts = pts45k;
+    if( sp->end_pts < pts45k ) sp->end_pts = pts45k;
+    if( pgm->start_time > pts45k ) pgm->start_time = pts45k;
+    if( pgm->end_time < pts45k ) pgm->end_time = pts45k;
+
+    if( !(ipkt.flags & AV_PKT_FLAG_KEY) ) continue;
+
+    if( sp->last_pts != pts45k ) {
+      sp->last_pts = pts45k;
+      pgm->add_label(count, ipkt.pos, pts45k, st->id);
+    }
+  }
+
+  for( int ii=0; ii<programs.size(); ++ii ) {
+    program *pgm = programs[ii];
+    if( pgm->end_time > pgm->start_time )
+      pgm->duration = pgm->end_time - pgm->start_time;
+  }
+
+  return ret != AVERROR_EOF ? -1 : 0;
+}
+
+int
+Media::compose()
+{
+// index
+  bs.init();
+  idx.sig = 1;
+  idx.first_play.set_hdmv(0, pb_typ_movie);
+  idx.top_menu.set_hdmv(0xffff, pb_typ_iactv);
+
+// movie
+  bs.init();
+  mov.sig = 1;
+  movie_obj *mp = new movie_obj();
+  mp->resume_intention_flag = 1;
+  command_obj *cmd = new command_obj();
+  cmd->cmd = htobe32(0x21810000); cmd->dst = 1; cmd->src = 0;
+  mp->cmds.append(cmd);  // JUMP_TITLE 1
+  cmd = new command_obj();
+  cmd->cmd = htobe32(0x00020000); cmd->dst = 0; cmd->src = 0;
+  mp->cmds.append(cmd);
+  mov.movies.append(mp); // BREAK
+
+  
+  for( int ii=0; ii<size(); ++ii ) {
+    mp = new movie_obj();
+    mp->resume_intention_flag = 1;
+    cmd = new command_obj();
+    cmd->cmd = htobe32(0x22800000); cmd->dst = ii; cmd->src = 0;
+    mp->cmds.append(cmd);  // PLAY_PL   ii
+    cmd = new command_obj();
+    cmd->cmd = htobe32(0x00020000); cmd->dst = 0; cmd->src = 0;
+    mp->cmds.append(cmd);
+    mov.movies.append(mp); // BREAK
+  }
+
+  mp = new movie_obj();
+  mp->resume_intention_flag = 1;
+  cmd = new command_obj();
+  cmd->cmd = htobe32(0x21810000); cmd->dst = 1; cmd->src = 0;
+  mp->cmds.append(cmd);  // JUMP_TITLE 1
+  cmd = new command_obj();
+  cmd->cmd = htobe32(0x00020000); cmd->dst = 0; cmd->src = 0;
+  mp->cmds.append(cmd);
+  mov.movies.append(mp); // BREAK
+
+  title_obj *tp = 0;
+// clips
+  for( int ii=0; ii<size(); ++ii ) {
+    if( !tp ) {
+      tp = new title_obj();
+      tp->set_hdmv(idx.titles.size()+1, pb_typ_movie);
+      idx.titles.append(tp);
+    }
+    bs.init();
+    media_info *ip = get(ii);
+// clip program, if specified
+    int pidx = ip->programs.size();
+    while( --pidx>=0 && ip->programs[pidx]->pid != ip->pgm_pid );
+    if( pidx < 0 ) pidx = 0;
+    ip->pidx = pidx;
+    ip->pgm_pid = ip->prog()->pid;
+
+    clpi_cl *cp = new clpi_cl();
+    cp->clip.clip_stream_type = 1;
+    cp->clip.application_type = BLURAY_APP_TYPE_MAIN_MOVIE;
+    cp->clip.ts_recording_rate = ip->bit_rate;
+    uint32_t ts_pkt_count = ip->file_size / BLURAY_TS_PKTSZ + 1;
+    cp->clip.num_source_packets = ts_pkt_count;
+    cp->clip.ts_type_info.validity = 0x80;
+    strcpy(cp->clip.ts_type_info.format_id, "HDMV");
+    cp->cpi.type = 1;
+
+    for( int jj=0; jj<ip->programs.size(); ++jj ) {
+      program *pgm = ip->programs[jj];
+      clpi_prog *p = new clpi_prog(pgm->pmt_pid);
+      for( int kk=0; kk<pgm->strm_idx.size(); ++kk ) {
+        int k = pgm->strm_idx[kk];
+        stream *sp = ip->streams[k];
+        clpi_prog_stream *s = new clpi_prog_stream();
+        s->pid = sp->pid;
+        s->coding_type = sp->coding_type;
+        s->format = sp->format;
+//use unspecified (0)
+//      if( !idx.video_format ) idx.video_format = s->format;
+        s->rate = sp->rate;
+//      if( !idx.frame_rate ) idx.frame_rate = s->rate;
+        switch( sp->type ) {
+        case AVMEDIA_TYPE_VIDEO:
+          s->aspect = sp->aspect;
+          break;
+        case AVMEDIA_TYPE_AUDIO:
+          memcpy(s->lang,sp->lang,sizeof(s->lang));
+          break;
+        default:
+          break;
+        }
+        p->streams.append(s);
+      }
+      clpi_ep_map_entry *map = new clpi_ep_map_entry(pgm->ep_pid);
+      pgm->build_toc(map);
+      cp->cpi.append(map);
+      cp->programs.append(p);
+
+      clpi_atc_seq *atc_seq = new clpi_atc_seq();
+      clpi_stc_seq *stc_seq = new clpi_stc_seq();
+      stc_seq->pcr_pid = pgm->pcr_pid;
+      stc_seq->presentation_start_time = pgm->start_time;
+      stc_seq->presentation_end_time = pgm->end_time;
+      atc_seq->stc_seq.append(stc_seq);
+      cp->sequences.append(atc_seq);
+    }
+
+    cl.append(cp);
+    tp->last = ii;
+    if( ip->brk ) tp = 0;
+  }
+
+// playlists, one per title
+//   one playitem per media clip
+  int clip_id = 0;
+  for( int ii=0; ii<idx.titles.size(); ++ii ) {
+    bs.init();
+    media_info *ip = get(clip_id);
+    program *pgm = ip->prog();
+    mpls_pl *pp = new mpls_pl();
+    pp->app_info.playback_type = BLURAY_PLAYBACK_TYPE_SEQUENTIAL;
+//  pp->app_info.uo_mask.xxx = 1;
+    int last = idx.titles[ii]->last;
+    for( ; clip_id<=last; ++clip_id ) {
+      ip = get(clip_id);
+      pgm = ip->prog();
+      mpls_pi *pi = new mpls_pi();
+      pi->connection_condition = 1; // seamless
+      pi->in_time = pgm->start_time;
+      pi->out_time = pgm->end_time;
+      if( ip->still )
+        pi->still_mode = BLURAY_STILL_INFINITE;
+      int64_t end_time = pgm->start_time + pgm->duration;
+      if( pi->out_time < end_time ) pi->out_time = end_time;
+      mpls_clip *cp = new mpls_clip();
+      sprintf(cp->clip_id,"%05d", clip_id);
+      pi->clip.append(cp);
+      for( int kk=0; kk<ip->streams.size(); ++kk ) {
+        stream *sp = ip->streams[kk];
+        switch( sp->type ) {
+        case AVMEDIA_TYPE_VIDEO: break;
+        case AVMEDIA_TYPE_AUDIO: break;
+        default: continue;
+        }
+        mpls_stream *ps = new mpls_stream();
+        ps->pid = sp->pid;
+        ps->stream_type = BLURAY_PG_TEXTST_STREAM;
+        ps->coding_type = sp->coding_type;
+        ps->format = sp->format;
+        ps->rate = sp->rate;
+        switch( sp->type ) {
+        case AVMEDIA_TYPE_VIDEO:
+          pi->stn.video.append(ps);
+          break;
+        case AVMEDIA_TYPE_AUDIO:
+          memcpy(ps->lang, sp->lang, sizeof(ps->lang));
+          pi->stn.audio.append(ps);
+          break;
+        default:
+          break;
+        }
+      }
+      pp->play_item.append(pi);
+    }
+// chapter marks every ch_duration ticks
+    int64_t ch_duration = 45000 * 60*10;
+    int64_t mrktm = ch_duration;
+    int64_t plytm = 0;
+    int pmark = 0, pitem = 0;
+    mpls_pi *pi = pp->play_item[pitem];
+    mpls_plm *pm = new mpls_plm();
+    pm->mark_id = pmark++;
+    pm->mark_type = BLURAY_MARK_TYPE_ENTRY;
+    pm->play_item_ref = pitem;
+    pm->time = pi->in_time;
+    pm->entry_es_pid = 0;
+    pp->play_mark.append(pm);
+    for( int jj=0; jj < pp->play_item.size(); ++jj ) {
+      pitem = jj;
+      pi = pp->play_item[pitem];
+      int64_t pi_duration = pi->out_time - pi->in_time;
+      int64_t endtm = plytm + pi_duration;
+      while( mrktm < endtm ) {
+        pm = new mpls_plm();
+        pm->mark_id = pmark++;
+        pm->mark_type = BLURAY_MARK_TYPE_ENTRY;
+        pm->play_item_ref = pitem;
+        pm->time = pi->in_time + mrktm - plytm;
+        pm->entry_es_pid = 0;
+        pp->play_mark.append(pm);
+        mrktm += ch_duration;
+      }
+      plytm = endtm;
+    }
+    pm = new mpls_plm();
+    pm->mark_id = pmark;
+    pm->mark_type = BLURAY_MARK_TYPE_ENTRY;
+    pm->play_item_ref = pitem;
+    pm->time = pi->out_time;
+    pm->entry_es_pid = 0;
+    pp->play_mark.append(pm);
+
+    pl.append(pp);
+  }
+  return 0;
+}
+
+int Media::
+bd_path(const char *bp, const char *fmt, va_list ap)
+{
+  int n = sizeof(filename)-1;
+  char *cp = filename;
+  const char *pp = path;
+  while( n>0 && (*cp=*pp)!=0 ) { --n;  ++cp;  ++pp; }
+  while( n>0 && (*cp=*bp)!=0 ) { --n;  ++cp;  ++bp; }
+  n -= vsnprintf(cp, n, fmt, ap);
+  va_end(ap);
+  return n > 0 ? 0 : 1;
+}
+
+int Media::
+bd_copy(const char *ifn, const char *fmt, ...)
+{
+  int n, ret = 1;
+  char bfr[0x40000];
+  FILE *ifp = fopen(ifn,"r");
+  if( ifp ) {
+    va_list ap;
+    va_start(ap, fmt);
+    if( bd_path("/BDMV/", fmt, ap) ) return 1;
+    va_end(ap);
+    FILE *ofp = fopen(filename,"w");
+    if( ofp ) {
+      setvbuf(ifp, 0, _IOFBF, 0x80000);
+      setvbuf(ofp, 0, _IOFBF, 0x80000);
+      while( (n=fread(bfr,1,sizeof(bfr),ifp)) > 0 ) fwrite(bfr,1,n,ofp);
+      fclose(ofp);
+      ret = 0;
+    }
+    fclose(ifp);
+  }
+  if( ret )
+    fprintf(stderr, "cant copy clip %s\n",ifn);
+  return ret;
+}
+
+int Media::
+bd_open(const char *fmt, ...)
+{
+  bs.init();
+  if( !path ) return 0;
+  va_list ap;
+  va_start(ap, fmt);
+  if( bd_path("/BDMV/", fmt, ap) ) return 1;
+  va_end(ap);
+  if( bs.open(filename) ) {
+    fprintf(stderr, "cant open file %s\n",filename);
+    return 1;
+  }
+  return 0;
+}
+
+int Media::
+bd_backup(const char *fmt, ...)
+{
+  bs.close();
+  if( !path ) return 0;
+  int n, ret = 1;
+  char bfr[0x10000];
+  FILE *ifp = fopen(filename,"r");
+  if( ifp ) {
+    va_list ap;
+    va_start(ap, fmt);
+    if( bd_path("/BDMV/BACKUP/", fmt, ap) ) return 1;
+    va_end(ap);
+    FILE *ofp = fopen(filename,"w");
+    if( ofp ) {
+      while( (n=fread(bfr,1,sizeof(bfr),ifp)) > 0 ) fwrite(bfr,1,n,ofp);
+      fclose(ofp);
+      ret = 0;
+    }
+    fclose(ifp);
+  }
+  if( ret )
+    fprintf(stderr, "cant backup %s\n",filename);
+  return ret;
+}
+
+int Media::write(char *fn)
+{
+  this->path = fn;
+// index
+  if( bd_open("index.bdmv") ) return 1;
+  if( idx.write() ) return 1;
+  if( bd_backup("index.bdmv") ) return 1;
+// movie
+  if( bd_open("MovieObject.bdmv") ) return 1;
+  if( mov.write() ) return 1;
+  if( bd_backup("MovieObject.bdmv") ) return 1;
+// clips
+  for( int ii=0; ii<cl.size(); ++ii ) {
+    if( bd_open("CLIPINF/%05d.clpi", ii) ) return 1;
+    if( cl[ii]->write() ) return 1;
+    if( bd_backup("CLIPINF/%05d.clpi", ii) ) return 1;
+  }
+// playlists
+  for( int ii=0; ii<pl.size(); ++ii ) {
+    if( bd_open("PLAYLIST/%05d.mpls", ii) ) return 1;
+    if( pl[ii]->write() ) return 1;
+    if( bd_backup("PLAYLIST/%05d.mpls", ii) ) return 1;
+  }
+  return 0;
+}
+
+int
+main(int ac, char **av)
+{
+  char *path = av[1];
+  if( mkbdmv(path) ) return 1;
+  av_register_all();
+  av_log_set_level(AV_LOG_FATAL);
+  //av_log_set_level(AV_LOG_VERBOSE);
+  //av_log_set_level(AV_LOG_DEBUG);
+  Media media;
+  media_info *mp = 0;
+
+  for( int ii=2; ii<ac; ++ii ) {
+    char *ap = av[ii];
+    // any dash seq followed by number sets curr title pgm_pid
+    // single dash only sets title pgm_pid
+    // double dash ends curr title, starts a new title
+    // triple dash ends curr title as infinite still
+    if( *ap == '-' ) {
+      if( !mp ) continue;
+      if( *++ap == '-' ) {
+        mp->brk = 1;
+        if( *++ap == '-' ) { ++ap;  mp->still = 1; }
+      }
+      if( *ap >= '0' && *ap <= '9' )
+        mp->pgm_pid = strtoul(ap,&ap,0);
+      if( mp->brk ) mp = 0;
+      if( !ap || *ap ) {
+        fprintf(stderr, "err arg %d: %s\n",ii,av[ii]);
+        return 1;
+      }
+      continue;
+    }
+    mp = new media_info(av[ii]);
+    media.append(mp);
+    if( mp->scan() ) {
+      fprintf(stderr, "cant scan media: %s\n", av[ii]);
+      return 1;
+    }
+  }
+
+  if( mp ) mp->brk = 1;
+
+  if( media.compose() ) {
+    fprintf(stderr, "cant compose media\n");
+    return 1;
+  }
+  if( media.write(0) ) {
+    fprintf(stderr, "cant prepare media\n");
+    return 1;
+  }
+  if( media.write(path) ) {
+    fprintf(stderr, "cant write media\n");
+    return 1;
+  }
+
+  for( int ii=0; ii<media.size(); ++ii )
+    if( media.bd_copy(media[ii]->filename, "STREAM/%05d.m2ts", ii) )
+      return 1;
+
+  return 0;
+}
+