+++ /dev/null
-#include "../libzmpeg3.h"
-
-zcc_t::
-cc_t(video_t *video)
- : svc(this)
-{
- this->video = video;
- reset();
-}
-
-zcc_t::
-~cc_t()
-{
-}
-
-void zcc_t::
-reset()
-{
-//zmsg(" cc\n");
- frs_history = 0;
- text_cb = 0;
- font_size = fsz_normal;
- video->reset_subtitles();
- int sid = video->subtitle_track+1;
- if( sid <= 0 || sid > MX_SVC ) sid = 1;
- svc.reset(sid, this);
-}
-
-void zcc_t::
-get_atsc_data(zbits_t *s)
-{
- /* xfer data to data[0], first byte = total size */
- /* <dat[1]=isz,dat[2..isz+1]=input, ...,0> */
- int b = s->get_bits(8) & 0x1f;
- int len = b & 0x1f;
- uint8_t *dat = &data[0][0];
- dat[0] = 0;
- uint8_t *bp = dat+1;
- uint8_t *cp = bp+1;
-//zmsgs(" len=%d\n",len);
- s->get_bits(8); /* rsvd */
-
- for( int i=0; i<len; ++i ) {
- int typ = s->get_bits(8);
- if( (typ & 0xf8) != 0xf8 ) return;
- int valid = typ & 0x04;
- int ch1 = s->get_bits(8);
- int ch2 = s->get_bits(8);
-//zmsgs("*** typ %02x %02x %02x\n",typ,ch1,ch2);
- int isz = cp-bp - 1;
- switch( typ &= 0x03 ) {
- case 0x02: /* dvb_data */
- if( isz == 0 ) continue; /* missed start */
- break;
- case 0x03: /* dvb_start */
- if( isz > 0 ) { *bp = isz; bp = cp++; }
- break;
- case 0x00: /* ntsc_f1 */
- case 0x01: /* ntsc_f2 */
- continue;
- }
- if( !valid ) continue;
- if( cp-dat+2 > 128 ) {
- zerr("closed caption data ovfl\n");
- return;
- }
- *cp++ = ch1;
- *cp++ = ch2;
- }
- /* terminate last recd */
- if( (*bp = cp-bp - 1) > 0 ) *cp++ = 0;
- /* dat[0] = total size */
- dat[0] = cp - dat;
-//zmsgs("***** size %d\n",dat[0]);
- if( s->get_bits(8) == 0xff ) decode();
-}
-
-void zcc_t::
-decode()
-{
- int isz = *data[0];
-//zmsgs("seq %d, isz=%d, pict_type %c, pict_struct %3.3s %d\n",
-// data[0][1]>>6,isz," IPBD"[video->pict_type],
-// &" TOP BTM FRM "[4*video->pict_struct],video->framenum);
- switch( video->pict_type ) {
- case pic_type_I:
- case pic_type_P:
- switch( video->pict_struct ) {
- case pics_TOP_FIELD:
- if( (frs_history & (frs_tf1 | frs_frm)) ) {
- decode(1);
- frs_history &= ~(frs_tf1 | frs_frm);
- }
- memcpy(&data[1],&data[0],isz);
- frs_history |= frs_tf1;
- break;
- case pics_BOTTOM_FIELD:
- if( (frs_history & frs_frm) ) {
- decode(1);
- frs_history &= ~frs_frm;
- }
- else if( (frs_history & frs_bf2) ) {
- decode(2);
- frs_history &= ~frs_bf2;
- }
- memcpy(&data[2],&data[1],isz);
- frs_history |= frs_bf2;
- break;
- case pics_FRAME_PICTURE:
- if( (frs_history & (frs_tf1 | frs_frm)) ) {
- decode(1);
- frs_history &= ~(frs_tf1 | frs_frm);
- }
- if( frs_history & frs_bf2 ) {
- decode(2);
- frs_history &= ~frs_bf2;
- }
- memcpy(&data[1],&data[0],isz);
- frs_history = frs_frm;
- break;
- }
- break;
- case pic_type_B:
- if( frs_history == frs_tf1 || frs_history == frs_bf2 )
- frs_history = 0;
- decode(0);
- break;
- }
- frs_history |= frs_prc;
- *data[0] = 0;
-}
-
-void zcc_t::
-reorder()
-{
- if( frs_history ) {
- if( !(frs_history & frs_prc) )
- decode();
- frs_history &= ~frs_prc;
- }
-}
-
-void zcc_t::
-decode(int k)
-{
- int isz;
- uint8_t *dat = &data[k][1];
- while( (isz = *dat++) > 0 ) {
- uint8_t *bp = dat;
- uint8_t b = *bp;
- int sz = 2 * (b & 0x03f);
-#if 0
- int seq = b >> 6;
- zmsgs("cc decode seq %d size %d/%d -",seq,isz,sz);
- int n = isz;
- for( int i=0; i<n; ++i ) printf(" %02x",dat[i]);
- printf(" ");
- for( int i=0; i<n; ++i ) printf(" %c",dat[i]>=0x20&&dat[i]<0x7f?dat[i]:'.');
- printf("\n");
-#endif
- if( sz > isz ) return;
- uint8_t *ep = sz + bp++;
- while( bp < ep ) {
- b = *bp++;
- if( !b ) continue;
- int svc_nr = b >> 5, blksz = b & 0x1f;
- if( svc_nr == 0x07 ) {
- if( bp >= ep ) break;
- svc_nr = *bp++;
- if( svc_nr < 7 || svc_nr > 63 ) break;
- }
- if( svc_nr == svc.id() && bp+blksz <= ep )
- svc.append(bp,blksz);
- bp += blksz;
- }
- dat += isz;
- }
- svc.decode();
-}
-
-zsvc_t::
-svc_t(zcc_t *cc)
-{
- size = 0;
- bfrs = 0;
- sid = 1;
- this->cc = cc;
-};
-
-zsvc_t::
-~svc_t()
-{
- reset(sid, cc);
-}
-
-void zsvc_t::
-reset(int sid, zcc_t *cc)
-{
-//zmsgs(" svc %d\n",sid);
- size = 0;
- this->sid = sid;
- int ctrk = sid-1;
- if( ctrk < 0 ) ctrk = MX_SVC-1;
- this->ctrk = ctrk;
- this->cc = cc;
- for( int sid=0; sid<MX_WIN; ++sid )
- win[sid].reset(sid, this);
- for( chr_t *bfr; (bfr=get_bfr()); ) delete [] bfr;
-// win[0].default_window();
-// curw = &win[0];
- curw = 0;
-}
-
-zchr_t *zsvc_t::
-get_bfr()
-{
- chr_t *bfr = bfrs;
- if( bfr ) bfrs = *(chr_t **)bfr;
- return bfr;
-}
-
-void zsvc_t::
-bfr_put(chr_t *&bfr)
-{
- if( !bfr ) return;
- *(chr_t **)bfr = bfrs;
- bfrs = bfr;
- bfr = 0;
-}
-
-void zsvc_t::
-append(uint8_t *bp, int len)
-{
- int n = size+len;
- if( n > isizeof(data) ) n = isizeof(data);
- for( int i=size; i<n; data[i++]=*bp++);
- size = n;
-}
-
-void zsvc_t::
-decode()
-{
- if( size == 0 ) return;
- bp = data; ep = bp+size; size = 0;
-//zmsgs(" size=%d,sid=%d\n",(int)(ep-bp),sid);
- while( bp < ep ) {
- int b = *bp++;
- if( (b&0x7f) >= 0x20 ) { // group G0/G1 ascii/latin chars
- if( curw && curw->st > st_unmap ) curw->store(b);
- continue;
- }
- if( b < 0x10 || b >= 0x80 ) { // group C0/C1
- if( command(b) ) break;
- continue;
- }
- if( b == 0x10 ) { // ETX1 escape C2/C3, G2/G3
- if( bp >= ep ) break;
- b = *bp++; // no valid codes, just skip rsvd bytes
- if( b < 0x08 ) continue; // 0x00-0x07 C2
- if( b < 0x10 ) { bp += 1; continue; } // 0x08-0x0f C2
- if( b < 0x18 ) { bp += 2; continue; } // 0x10-0x17 C2
- if( b < 0x20 ) { bp += 3; continue; } // 0x18-0x1f C2
- if( b < 0x80 ) continue; /* misc */ // 0x20-0x7f G2
- if( b < 0x88 ) { bp += 4; continue; } // 0x80-0x87 C3
- if( b < 0x90 ) { bp += 5; continue; } // 0x88-0x8f C3
- continue;
- }
- int bb = b & 0x07; // one byte >ETX1 0x11-0x17
- if( bp >= ep ) break;
- bb = (bb << 8) | *bp++;
- if( b >= 0x18 ) { // two byte >=P16 0x18-0x20
- if( bp >= ep ) break;
- bb = (bb << 8) | *bp++;
- }
- if( curw && curw->st > st_unmap ) curw->store(bb);
- }
- render();
-}
-
-int zsvc_t::
-render()
-{
- /* render dirty windows */
- for( int iw=0; iw<MX_WIN; ++iw ) {
- win_t *wp = &win[iw];
- if( wp->dirty ) {
- wp->render();
- wp->dirty = 0;
- }
- }
- return 0;
-}
-
-int zsvc_t::
-command(int cmd)
-{
- if( cmd == 0x00 || cmd == 0x03 || // nuisance
- cmd == 0x8d || cmd == 0x8e ) return 0;
-#define CMD(fn,args...) return fn(args)
-//zmsgs("cmd %02x svc %d ",cmd,sid);
-//#define CMD(fn,args...) printf("%s\n",#fn); return fn(args)
- switch( cmd ) {
- case 0x03: CMD(ETX); /* End of text, render */
- case 0x08: CMD(BS); /* Backspace */
- case 0x0C: CMD(FF); /* Form Feed */
- case 0x0D: CMD(CR); /* Carriage Return */
- case 0x0E: CMD(HCR); /* Horizontal Carriage Return */
- case 0x80 ... 0x87:
- CMD(CWx,cmd & 0x07); /* SetCurrentWindow */
- case 0x88: CMD(CLW); /* ClearWindows */
- case 0x89: CMD(DSW); /* DisplayWindows */
- case 0x8A: CMD(HDW); /* HideWindows */
- case 0x8B: CMD(TGW); /* ToggleWindows */
- case 0x8C: CMD(DLW); /* DeleteWindows */
- case 0x8D: CMD(DLY); /* Delay */
- case 0x8E: CMD(DLC); /* Delay Cancel */
- case 0x8F: CMD(RST); /* Reset */
- case 0x90: CMD(SPA); /* SetPenAttributes */
- case 0x91: CMD(SPC); /* SetPenColor */
- case 0x92: CMD(SPL); /* SetPenLocation */
- case 0x93 ... 0x96:
- CMD(RSVD); /* reserved */
- case 0x97: CMD(SWA); /* SetWindowAttributes */
- case 0x98 ... 0x9F:
- CMD(DFx,cmd & 0x07); /* DFx DefineWindow */
- }
- zerrs("unkn %02x\n",cmd);
- return 1;
-}
-
-static inline int RGB2Y(int r,int g,int b)
-{
- return ( 257*r+504*g+ 98*b+ 16500)/1000;
-}
-
-static inline int RGB2Cr(int r,int g,int b)
-{
- return ( 439*r-368*g- 71*b+128500)/1000;
-}
-
-static inline int RGB2Cb(int r,int g,int b)
-{
- return (-148*r-291*g+439*b+128500)/1000;
-}
-
-uint32_t zsvc_t::
-pen_yuva(int color, int opacity)
-{
- int r, g, b, y, u, v, a;
- r = ((color>>4) & 0x03) * 255 / 3;
- g = ((color>>2) & 0x03) * 255 / 3;
- b = ((color>>0) & 0x03) * 255 / 3;
- a = 255;
- switch( opacity ) {
- case oty_transparent: a = 0; break;
- case oty_translucent: a = 128; break;
- case oty_flash: a = 208; break;
- case oty_solid: a = 255; break;
- }
- y = RGB2Y(r,g,b);
- u = RGB2Cr(r,g,b);
- v = RGB2Cb(r,g,b);
- return (y<<24) | (u<<16) | (v<<8) | (a<<0);
-}
-
-static inline int put_utf8(unsigned int v, uint8_t *cp, int n)
-{
- if( v >= 0x80 ) {
- int l = v < 0x0800 ? 2 : v < 0x00010000 ? 3 :
- v < 0x00200000 ? 4 : v < 0x04000000 ? 5 : 6;
- if( l > n ) return -1;
- int m = 0xff00 >> l, i = l;
- *cp++ = (v>>(6*--i)) | m;
- for( ; --i>=0; ++cp ) *cp = ((v>>(6*i)) & 0x3f) | 0x80;
- return l;
- }
- if( n < 1 ) return -1;
- *cp = v;
- return 1;
-}
-
-zwin_t::
-win_t()
-{
- bfr = 0;
- dirty = 0;
- subtitle = 0;
-}
-
-zwin_t::
-~win_t()
-{
- delete [] bfr;
- delete subtitle;
-}
-
-void zwin_t::
-output_text()
-{
- if( st < st_visible ) return;
- end_frame = svc->cc->video->framenum;
- if( !svc->cc->text_cb ) return;
- if( !bfr ) return;
- char txt[1024];
- uint8_t *cp = (uint8_t *)txt, *ep = cp + sizeof(txt)-1;
- for( int iy=0; iy<ch; ++iy ) {
- if( iy && cp < ep ) *cp++ = '|';
- chr_t *bp = &bfr[iy * MX_CX];
- for( int ix=0; ix<cw && cp<ep; ++ix,++bp ) {
- if( !bp->glyph ) continue;
- int n = put_utf8(bp->glyph, cp, ep-cp);
- if( n < 0 ) break;
- cp += n;
- }
- }
- *cp = 0;
- svc->cc->text_cb(svc->sid, id, start_frame, end_frame, txt);
- start_frame = end_frame;
-}
-
-void zwin_t::
-set_state(int8_t st)
-{
- if( this->st == st ) return;
-//zmsgs("win %d was %d, now %d %s\n", id, this->st, st,
-// st==st_unmap ? "unmapped" : st==st_hidden ? "hidden" :
-// st==st_visible ? "visible" : "err");
- output_text();
- if( this->st < st_visible && st >= st_visible )
- start_frame = svc->cc->video->framenum;
- this->st = st;
- dirty = 1;
-}
-
-void zwin_t::
-reset(int i, zsvc_t *svc)
-{
- this->id = i;
- this->svc = svc;
-//zmsgs("win %d\n",id);
- scale = 1;
- cx = cy = cw = ch = 0;
- x = y = 0;
- pdir = dir_rt;
- sdir = dir_up;
- svc->bfr_put(bfr);
- st = st_unmap;
-}
-
-int zwin_t::
-is_breakable(int b)
-{
- return b == ' ' || b == '-' || b == '\r';
-}
-
-int zwin_t::
-wrap()
-{
- switch( pdir ) {
- case dir_rt: {
- chr_t line[MX_CX]; int ix = cx-1;
- chr_t *cp = &line[ix], *sp = cp;
- while( ix >= 0 ) {
- chr_t *bp = &bfr[cy*MX_CX + ix];
- if( is_breakable(bp->glyph) ) break;
- *cp-- = *bp; bp->glyph = 0; --ix;
- }
- if( ix >= 0 ) CR();
- for( ; cx<cw && cp<sp; ++cx )
- bfr[cy*MX_CX + cx] = *++cp;
- if( ix < 0 ) CR();
- break; }
-
- case dir_lt: {
- chr_t line[MX_CX]; int ix = cx+1;
- chr_t *cp = &line[ix], *sp = cp;
- while( ix < cw ) {
- chr_t *bp = &bfr[cy*MX_CX + ix];
- if( is_breakable(bp->glyph) ) break;
- *cp++ = *bp; bp->glyph = 0; ++ix;
- }
- if( ix < cw ) CR();
- for( ; cx>=0 && cp>sp; --cx )
- bfr[cy*MX_CX + cx] = *--cp;
- if( ix >= cw ) CR();
- break; }
-
- case dir_dn: {
- chr_t line[MX_CY]; int iy = cy-1;
- chr_t *cp = &line[iy], *sp = cp;
- while( iy >= 0 ) {
- chr_t *bp = &bfr[iy*MX_CX + cx];
- if( is_breakable(bp->glyph) ) break;
- *cp-- = *bp; bp->glyph = 0; --iy;
- }
- if( iy >= 0 ) CR();
- for( ; cy<ch && cp<sp; ++cy )
- bfr[cy*MX_CX + cx] = *++cp;
- if( iy < 0 ) CR();
- break; }
-
- case dir_up: {
- chr_t line[MX_CY]; int iy = cy+1;
- chr_t *cp = &line[iy], *sp = cp;
- while( iy < ch ) {
- chr_t *bp = &bfr[iy*MX_CX + cx];
- if( is_breakable(bp->glyph) ) break;
- *cp++ = *bp; bp->glyph = 0; ++iy;
- }
- if( iy < ch ) CR();
- for( ; cy>=0 && cp>sp; --cy )
- bfr[cy*MX_CX + cx] = *--cp;
- if( iy >= ch ) CR();
- break; }
- }
-
- return 0;
-}
-
-int zwin_t::
-ovfl()
-{
- if( !col_lock && !resize(cx+1, ch) ) return 0;
- if( !row_lock ) return 1;
- if( wordwrap ) return wrap();
- return CR();
-}
-
-int zwin_t::
-store(int b)
-{
-//zmsgs("%02x ** \"%c\" at %d,%d win %d\n",
-// b, b>=0x20 && b<0x7f ? b : '.',cx,cy,id);
- if( !bfr ) return 1;
- switch( pdir ) {
- case dir_rt: if( cx >= cw && ovfl() ) return 1; break;
- case dir_lt: if( cx < 0 && ovfl() ) return 1; break;
- case dir_dn: if( cy >= ch && ovfl() ) return 1; break;
- case dir_up: if( cy < 0 && ovfl() ) return 1; break;
- }
- if( cx >= 0 && cx < cw && cy >= 0 && cy < ch ) {
- chr_t *chr = &bfr[cy*MX_CX + cx];
- chr->glyph = b;
- chr->fg_opacity = fg_opacity;
- chr->fg_color = fg_color;
- chr->bg_opacity = bg_opacity;
- chr->bg_color = bg_color;
- chr->pen_size = pen_size;
- chr->edge_color = edge_color;
- chr->italics = italics;
- chr->edge_type = edge_type;
- chr->underline = underline;
- chr->font_style = font_style;
- chr->font_size = svc->cc->font_size;
- chr->offset = offset;
- chr->text_tag = text_tag;
- dirty = 1;
- }
- switch( pdir ) {
- case dir_rt: ++cx; break;
- case dir_lt: --cx; break;
- case dir_dn: ++cy; break;
- case dir_up: --cy; break;
- }
- return 0;
-}
-
-int zsvc_t::
-ETX() /* end of text */
-{
-//zmsgs("svc %d,win %d\n",sid, curw ? curw->id : -1);
-// if( curw ) curw->render();
- return 0;
-}
-
-int zwin_t::
-BS() /* Backspace */
-{
- switch( pdir ) {
- case dir_rt: if( cx > 0 ) --cx; break;
- case dir_lt: if( cx < cw-1 ) ++cx; break;
- case dir_dn: if( cy > 0 ) --cy; break;
- case dir_up: if( cy < ch-1 ) ++cy; break;
- }
- return 0;
-}
-
-int zsvc_t::
-BS() /* Backspace */
-{
- if( !curw || curw->st == st_unmap ) return 0;
-//zmsgs("svc %d,win %d\n",sid,curw->id);
- return curw->BS();
-}
-
-int zwin_t::
-FF() /* Form Feed */
-{
- int n = cw*sizeof(*bfr);
- for( int iy=0; iy<ch; ++iy )
- memset(&bfr[iy*MX_CX],0,n);
- cx = cy = 0;
- dirty = 1;
- return 0;
-}
-
-int zsvc_t::
-FF() /* Form Feed */
-{
- if( !curw || curw->st == st_unmap ) return 0;
-//zmsgs("svc %d,win %d\n",sid,curw->id);
- return curw->FF();
-}
-
-int zwin_t::
-CR() /* Carriage Return */
-{
- int n = (cw-1)*sizeof(*bfr);
- int m = cw*sizeof(*bfr);
- int scrolled = 0;
- switch( sdir ) {
- case dir_rt:
- cy = 0;
- if( cx > 0 ) { --cx; break; }
- for( int i=0; i<ch; ++i ) {
- memmove(&bfr[i*MX_CX+1],&bfr[i*MX_CX],n);
- memset(&bfr[i*MX_CX],0,sizeof(*bfr));
- }
- cx = 0;
- scrolled = 1;
- break;
- case dir_lt:
- cy = 0;
- if( cx+1 < cw ) { ++cx; break; }
- for( int i=0; i<ch; ++i ) {
- memmove(&bfr[i*MX_CX],&bfr[i*MX_CX+1],n);
- memset(&bfr[i*MX_CX+cw-1],0,sizeof(*bfr));
- }
- cx = cw-1;
- scrolled = 1;
- break;
- case dir_dn:
- cx = 0;
- if( cy > 0 ) { --cy; break; }
- for( int i=ch; --i>0; )
- memmove(&bfr[i*MX_CX],&bfr[(i-1)*MX_CX],m);
- memset(&bfr[0],0,m);
- cy = 0;
- scrolled = 1;
- break;
- case dir_up:
- cx = 0;
- if( cy+1 < ch ) { ++cy; break; }
- for( int i=1; i<ch; ++i )
- memmove(&bfr[(i-1)*MX_CX],&bfr[i*MX_CX],m);
- memset(&bfr[(ch-1)*MX_CX],0,m);
- cy = ch-1;
- scrolled = 1;
- break;
- }
- if( scrolled ) {
- output_text();
- dirty = 1;
- }
- return 0;
-}
-
-int zsvc_t::
-CR() /* Carriage Return */
-{
- if( !curw || curw->st == st_unmap ) return 0;
-//zmsgs("svc %d,win %d\n",sid,curw->id);
- return curw->CR();
-}
-
-int zwin_t::
-HCR() /* Horizontal Carriage Return */
-{
- switch( pdir ) {
- case dir_rt:
- case dir_lt:
- memset(&bfr[cy*MX_CX],0,cw*sizeof(*bfr));
- cy = pdir == dir_rt ? 0 : cw-1;
- dirty = 1;
- break;
- case dir_up:
- case dir_dn:
- for( int i=0; i<ch; ++i ) memset(&bfr[i*MX_CX+cx],0,sizeof(*bfr));
- cx = pdir == dir_dn ? 0 : ch-1;
- dirty = 1;
- break;
- }
- return 0;
-}
-
-int zsvc_t::
-HCR() /* Horizontal Carriage Return */
-{
- if( !curw || curw->st == st_unmap ) return 0;
-//zmsgs("svc %d,win %d\n",sid,curw->id);
- return curw->HCR();
-}
-
-int zsvc_t::
-CLW() /* ClearWindows */
-{
- if( bp >= ep ) return 1;
- int map = *bp++; // 1
-//zmsgs("map %02x svc %d\n",map,sid);
- for( int iw=0; iw<MX_WIN; ++iw ) {
- if( !(map & (1<<iw)) ) continue;
- win_t *wp = &win[iw];
- if( wp->st > st_unmap ) {
- wp->output_text();
-//zmsgs(" clear win %d\n",wp->id);
- int n = wp->cw*sizeof(*wp->bfr);
- for( int iy=0; iy<wp->ch; ++iy )
- memset(&wp->bfr[iy*MX_CX],0,n);
- wp->dirty = 1;
- }
- }
- return 0;
-}
-
-int zsvc_t::
-DSW() /* DisplayWindows */
-{
- if( bp >= ep ) return 1;
- int map = *bp++; // 1
-//zmsgs("map %02x svc %d\n",map,sid);
- for( int iw=0; iw<MX_WIN; ++iw ) {
- if( !(map & (1<<iw)) ) continue;
- win_t *wp = &win[iw];
- if( wp->st > st_unmap ) {
- wp->set_state(st_visible);
- }
- }
- return 0;
-}
-
-int zsvc_t::
-HDW() /* HideWindows */
-{
- if( bp >= ep ) return 1;
- int map = *bp++; // 1
-//zmsgs("map %02x svc %d\n",map,sid);
- for( int iw=0; iw<MX_WIN; ++iw ) {
- if( !(map & (1<<iw)) ) continue;
- win_t *wp = &win[iw];
- if( wp->st > st_unmap ) {
- wp->set_state(st_hidden);
- }
- }
- return 0;
-}
-
-int zsvc_t::
-TGW() /* ToggleWindows */
-{
- if( bp >= ep ) return 1;
- int map = *bp++; // 1
-//zmsgs("map %02x svc %d\n",map,sid);
- for( int iw=0; iw<MX_WIN; ++iw ) {
- if( !(map & (1<<iw)) ) continue;
- win_t *wp = &win[iw];
- if( wp->st > st_unmap ) {
- int8_t st = wp->st == st_visible ? st_hidden : st_visible;
- wp->set_state(st);
- }
- }
- return 0;
-}
-
-int zsvc_t::
-DLW() /* DeleteWindows */
-{
- if( bp >= ep ) return 1;
- int map = *bp++; // 1
-//zmsgs("map %02x svc %d\n",map,sid);
- for( int iw=0; iw<MX_WIN; ++iw ) {
- if( !(map & (1<<iw)) ) continue;
- win_t *wp = &win[iw];
- if( wp->st == st_unmap ) continue;
-//zmsgs(" delete %d\n",wp->id);
- wp->set_state(st_unmap);
- if( wp == curw ) curw = 0;
- bfr_put(wp->bfr);
- }
- return 0;
-}
-
-int zsvc_t::
-DLY() /* delay */
-{
- if( bp >= ep ) return 1;
-//zmsgs(" svc %d (%d)\n",sid, *bp);
- ++bp; // 1
- return 0;
-}
-
-int zsvc_t::
-DLC() /* delay cancel */
-{
-//zmsg("\n");
- return 0;
-}
-
-int zsvc_t::
-RST() /* Reset */
-{
-//zmsgs("svc %d\n",sid);
- reset(sid, cc);
- return 0;
-}
-
-int zsvc_t::
-SPA() /* SetPenAttributes */
-{
- if( bp+2 > ep ) return 1;
- int b = *bp++; // 1
- int text_tag = b>>4;
- int offset = (b>>2) & 0x03;
- int pen_size = b & 0x03;
- b = *bp++; // 2
- int italics = b>>7;
- int underline = (b>>6) & 0x01;
- int edge_type = (b>>3) & 0x07;
- int font_style = b & 0x07;
- if( pen_size >= 3 ) return 0;
- if( offset >= 3 ) return 0;
- if( edge_type >= 6 ) return 0;
- win_t *wp = curw;
- if( wp && wp->st > st_unmap ) {
- wp->text_tag = text_tag;
- wp->offset = offset;
- wp->pen_size = pen_size;
- wp->italics = italics;
- wp->underline = underline;
- wp->edge_type = edge_type;
- wp->font_style = font_style;
-//zmsgs("txttag=%d,offset=%d,pen_size=%d,ital=%d,undl=%d,"
-// "edge=%d,ftstyl=%d,win %d,svc %d\n",text_tag,offset,
-// pen_size,italics,underline,edge_type,font_style,wp->id,sid);
- }
- return 0;
-}
-
-int zsvc_t::
-SPC() /* SetPenColor */
-{
- if( bp+3 > ep ) return 1;
- int b = *bp++; // 1
- int fg_opacity = b >> 6;
- int fg_color = b & 0x3f;
- b = *bp++; // 2
- int bg_opacity = b >> 6;
- int bg_color = b & 0x3f;
- b = *bp++; // 3
- int edge_color = b;
- win_t *wp = curw;
- if( wp && wp->st > st_unmap ) {
- wp->fg_opacity = fg_opacity;
- wp->fg_color = fg_color;
- wp->edge_color = edge_color;
- wp->bg_opacity = bg_opacity;
- wp->bg_color = bg_color;
- wp->fg_yuva = pen_yuva(fg_color,fg_opacity);
- wp->edge_yuva = pen_yuva(edge_color,fg_opacity);
- wp->bg_yuva = pen_yuva(bg_color,bg_opacity);
-//zmsgs("fgopc=%d,fgclr=%02x,bgopc=%d,bgclr=%02x,egclr=%02x,"
-// "win %d,svc %d\n",fg_opacity,fg_color,bg_opacity,bg_color,
-// edge_color,wp->id,sid);
- }
- return 0;
-}
-
-int zsvc_t::
-SPL() /* SetPenLocation */
-{
- if( bp+2 > ep ) return 1;
- int b = *bp++; // 1
- int row = b;
- b = *bp++; // 2
- int column = b;
- if( row >= MX_CY ) return 0;
- if( column >= MX_CX ) return 0;
- win_t *wp = curw;
- if( wp && wp->st > st_unmap ) {
- if( column >= wp->cw || row >= wp->ch ) return 1;
- wp->cx = column; wp->cy = row;
-//zmsgs("row=%d,col=%d,win %d,svc %d\n",row,column,wp->id,sid);
- }
- return 0;
-}
-
-int zsvc_t::
-RSVD() /* reserved */
-{
-//zmsgs("sid %d\n",sid);
- return 0;
-}
-
-int zsvc_t::
-SWA() /* SetWindowAttributes */
-{
- if( bp+4 > ep ) return 1;
- int b = *bp++; // 1
- int fill_opacity = b>>6;
- int fill_color = b & 0x3f;
- b = *bp++; // 2
- int border_color = b & 0x3f;
- int border_type = b>>6;
- b = *bp++; // 3
- int wordwrap = (b>>6) & 0x01;
- border_type |= (b>>5) & 0x04;
- int print_direction = (b>>4) & 0x03;
- int scroll_direction = (b>>2) & 0x03;
- int justify = b & 0x03;
- b = *bp++; // 4
- int effect_speed = b>>4;
- int effect_direction = (b>>2) & 0x3;
- int display_effect = b & 0x03;
- if( border_type >= 6 ) return 0;
- if( display_effect >= 3 ) return 0;
-
- win_t *wp = curw;
- if( wp && wp->st > st_unmap ) {
- wp->fill_opacity = fill_opacity;
- wp->fill_color = fill_color;
- wp->border_color = border_color;
- wp->fill_yuva = pen_yuva(fill_color,fill_opacity);
- wp->border_yuva = pen_yuva(border_color,fill_opacity);
- wp->wordwrap = wordwrap;
- wp->pdir = print_direction;
- wp->sdir = scroll_direction;
- wp->justify = justify;
- wp->effect_speed = effect_speed;
- wp->effect_direction = effect_direction;
- wp->display_effect = display_effect;
- wp->dirty = 1;
-//zmsgs("fopc=%d,fclr=%02x,bclr=%02x,wrap=%d,pdir=%d,sdir=%d,just=%d"
-// "espd=%d,edir=%d,deft=%d,win %d,svc %d\n",fill_opacity,fill_color,
-// border_color,wordwrap,print_direction,scroll_direction,justify,
-// effect_speed,effect_direction,display_effect,wp->id,sid);
- }
- return 0;
-}
-
-int zsvc_t::
-CWx(int id) /* SetCurrentWindow */
-{
- win_t *wp = &win[id];
- curw = wp->st == st_unmap ? 0 : wp;
-//zmsgs("== win %d,svc %d\n",wp->id,sid);
- return 0;
-}
-
-int zsvc_t::
-DFz(int id) /* DFx DefineWindow */
-{
- if( bp+6 > ep ) return 1;
- win_t *wp = &win[id];
- int b = *bp++; // 1
- int visible = (b>>5) & 0x01;
- int row_lock = (b>>4) & 0x01;
- int col_lock = (b>>3) & 0x01;
- int priority = b & 0x07;
- b = *bp++; // 2
- int anchor_relative = (b>>7) & 0x01;
- int anchor_vertical = b & 0x7f;
- b = *bp++; // 3
- int anchor_horizontal = b;
- b = *bp++; // 4
- int anchor_point = b>>4;
- int ch = (b & 0x0f) + 1;
- b = *bp++; // 5
- int cw = b + 1;
- b = *bp++; // 6
- int window_style = (b>>3) & 0x07;
- int pen_style = b & 0x07;
-//zmsgs("%dx%d vis=%d,rowlk=%d,collk=%d,pri=%d,an_rel=%d,\n"
-// "an_hor=%d,an_vert=%d,an_pnt=%d,wsty=%d,psty=%d,win %d,svc %d\n",
-// cw,ch,visible,row_lock,col_lock,priority,anchor_relative,
-// anchor_horizontal,anchor_vertical,anchor_point,window_style,
-// pen_style,wp->id,sid);
- if( anchor_relative ) {
- if( anchor_vertical >= 75 ) return -1;
- if( anchor_horizontal >= 210 ) return -1;
- }
- else {
- if( anchor_vertical >= 100 ) return -1;
- if( anchor_horizontal >= 100 ) return -1;
- }
- if( anchor_point >= 9 ) return -1;
- if( cw > MX_CX ) return -1;
- if( ch > MX_CY ) return -1;
-
- wp->row_lock = row_lock;
- wp->col_lock = col_lock;
- wp->priority = priority;
- wp->anchor_relative = anchor_relative;
- wp->anchor_vertical = anchor_vertical;
- wp->anchor_horizontal = anchor_horizontal;
- wp->anchor_point = anchor_point;
- if( wp->st == st_unmap )
- wp->set_window_style(window_style);
- if( wp->st == st_unmap )
- wp->set_pen_style(pen_style);
- int bw = wp->border_type != edg_none ? bdr_width : 0;
- wp->bw = (bw+3) & ~4; // yuv 422 macro pixels
- if( wp->st == st_unmap )
- wp->init(cw, ch);
- else
- wp->resize(cw, ch);
- wp->set_state(visible ? st_visible : st_hidden);
- curw = wp;
- wp->dirty = 1;
- int scale = cc->video->coded_picture_height/360;
- if( scale < 1 ) scale = 1;
- wp->scale = scale;
- return 0;
-}
-
-int zsvc_t::
-DFx(int id) /* DFx DefineWindow wrapper */
-{
- int ret = DFz(id);
- if( ret < 0 ) {
- zmsgs("failed to validate cc win %d\n",id);
- ret = 0;
- }
- return ret;
-}
-
-int zwin_t::
-init(int ncw, int nch)
-{
-//zmsgs(" init %d, %dx%d\n", id, ncw, nch);
- if( ncw > MX_CX ) return 1;
- if( nch > MX_CY ) return 1;
- bfr = svc->get_bfr();
- if( !bfr )
- bfr = new chr_t[MX_CX*MX_CY];
- cw = ncw; ch = nch;
- int n = cw*sizeof(*bfr);
- for( int iy=0; iy<ch; ++iy )
- memset(&bfr[iy*MX_CX],0,n);
- text_tag = 0;
- cx = cy = 0;
- x = y = 0;
- return 0;
-}
-
-int zwin_t::
-resize(int ncw, int nch)
-{
-//zmsgs(" resize %d, %dx%d %s\n", id, ncw, nch, cw!=ncw || ch!=nch ? "*" : "");
- if( ncw > MX_CX ) return 1;
- if( nch > MX_CY ) return 1;
- int dx = ncw-cw, dy = nch-ch;
- if( !dx && !dy ) return 0;
- int n = cw*sizeof(*bfr);
- switch( sdir ) {
- case dir_rt:
- if( dx > 0 ) { // scroll right, expanding
- int m = dx*sizeof(*bfr);
- for( int iy=0; iy<ch; ++iy ) {
- chr_t *bp = &bfr[iy*MX_CX], *cp = bp+dx;
- memmove(cp,bp,n);
- memset(bp,0,m);
- }
- dx = 0;
- }
- break;
- case dir_lt:
- if( dx < 0 ) { // scroll left, contracting
- for( int iy=0; iy<ch; ++iy ) {
- chr_t *bp = &bfr[iy*MX_CX], *cp = bp-dx;
- memmove(bp,cp,n);
- }
- dx = 0;
- }
- break;
- case dir_dn:
- if( dy > 0 ) { // scroll down, expanding
- for( int iy=ch; --iy>=dy; ) {
- chr_t *bp = &bfr[iy*MX_CX], *cp = bp-dy*MX_CX;
- memmove(bp,cp,n);
- }
- memset(&bfr[0],0,dy*n);
- dy = 0;
- }
- break;
- case dir_up:
- if( dy < 0 ) { // scroll up, contracting
- for( int iy=dy; iy>ch; ++iy ) {
- chr_t *bp = &bfr[iy*MX_CX], *cp = bp+dy*MX_CX;
- memmove(cp,bp,n);
- }
- dy = 0;
- }
- break;
- }
-
- if( dx > 0 ) {
- int m = dx*sizeof(*bfr);
- for( int iy=0; iy<ch; ++iy ) {
- chr_t *bp = &bfr[iy*MX_CX] + cw;
- memset(bp,0,m);
- }
- }
- if( dy > 0 ) {
- n = ncw*sizeof(*bfr);
- for( int iy=ch; iy<nch; ++iy ) {
- chr_t *bp = &bfr[iy*MX_CX];
- memset(bp,0,n);
- }
- }
- cw = ncw; ch = nch;
- return 0;
-}
-
-void zwin_t::
-set_pen_style(int i)
-{
- pen_style = i > 0 ? i : 1;
- pen_size = psz_standard;
- font_style = pen_style <= 5 ? pen_style-1 : pen_style-3;
- offset = ofs_normal;
- italics = underline = 0;
- fg_opacity = oty_solid;
- fg_color = 0x3f;
- edge_type = pen_style <= 5 ? edg_none : edg_uniform;
- edge_color = 0x00;
- bg_opacity = pen_style <= 5 ? oty_solid : oty_transparent;
- bg_color = 0x00;
- fg_yuva = pen_yuva(fg_color,fg_opacity);
- edge_yuva = pen_yuva(edge_color,fg_opacity);
- bg_yuva = pen_yuva(bg_color,bg_opacity);
- text_tag = tag_dialog;
-}
-
-void zwin_t::
-set_window_style(int i)
-{
- window_style = i > 0 ? i : 1;
- justify = ((0x48>>window_style) & 1) ? jfy_center : jfy_left;
- pdir = window_style < 7 ? dir_rt : dir_dn;
- sdir = window_style < 7 ? dir_up : dir_lt;
- wordwrap = (0x70>>window_style) & 1;
- display_effect = eft_snap;
- effect_speed = 0;
- effect_direction = dir_rt;
- fill_opacity = oty_solid;
- fill_color = 0x00;
- border_type = edg_none;
- border_color = 0x00;
- fill_yuva = pen_yuva(fill_color,fill_opacity);
- border_yuva = pen_yuva(border_color,fill_opacity);
-}
-
-#if 0
-void zwin_t::
-default_window()
-{
- if( !bfr ) return;
- row_lock = col_lock = 0;
- priority = 0;
- anchor_relative = 0;
- anchor_vertical = 24;
- anchor_horizontal = 12;
- anchor_point = 0;
- set_window_style(1);
- set_pen_style(1);
- text_tag = 0;
- ch = 1; cw = 32;
- int n = cw*sizeof(*bfr);
- for( int iy=0; iy<ch; ++iy)
- memset(&bfr[iy*MX_CX],0,n);
- cx = cy = 0;
- st = st_visible;
-}
-#endif
-
-void zwin_t::
-print_buffer()
-{
- if( !bfr ) return;
- zmsgs("bfr %d\n",id);
- for( int iy=0; iy<ch; ++iy ) {
- int ofs = iy*MX_CX;
- for( int ix=0; ix<cw; ++ix ) {
- int b = bfr[ofs++].glyph;
- printf("%c", b>=0x20 && b<0x7f ? b : '.');
- }
- printf("\n");
- }
-}
-
-void zwin_t::
-put_chr(chr_t *chr)
-{
- if( !subtitle ) return;
- uint16_t bb = chr->glyph;
- bitfont_t *font = chr_font(chr, scale);
- if( bb >= font->nch ) return;
-//zmsgs("%02x \"%c\" at %d,%d in %d\n",bb,bb>=0x20&&bb<0x7f?bb:'.',x,y,id);
- int ww = subtitle->w - 2*bw;
- int hh = subtitle->h - 2*bw;
- int dx = 0, dy = 0;
- bitfont_t::bitchar_t *cp = &font->chrs[bb];
- uint8_t *bmap = cp->bitmap;
- if( bmap || cp->ch == ' ' ) {
- /* cell origin = (x,y) addressed (0,0) to (x2,y2) */
- /* char data box (x0,y0) to (x1,y1), may exceed cell box */
- int x0, ix0, y0, iy0;
- int x1, x2, y1, y2;
- x0 = ix0 = cp->left;
- y0 = iy0 = font->imy - cp->ascent;
- x1 = cp->right;
- y1 = font->imy + cp->decent;
- x2 = font->idx; y2 = font->idy;
- if( bmap ) {
- switch( pdir ) {
- case dir_rt: x2 = dx = cp->right; break;
- case dir_lt: x2 = dx = cp->left; break;
- case dir_dn: y2 = dy = cp->decent; break;
- case dir_up: y2 = dy = cp->ascent; break;
- }
- }
- else { /* blank */
- switch( pdir ) {
- case dir_rt: case dir_lt: dx = font->idx; break;
- case dir_dn: case dir_up: dy = font->idy; break;
- }
- }
- if( x+x0 < 0 ) x0 = -x;
- if( y+y0 < 0 ) y0 = -y;
- int mx = ww - x;
- if( x0 > mx ) x0 = mx;
- if( x1 > mx ) x1 = mx;
- if( x2 > mx ) x2 = mx;
- int my = hh - y;
- if( y0 > my ) y0 = my;
- if( y1 > my ) y1 = my;
- if( y2 > my ) y2 = my;
-
- class pix_t { /* address char cell */
- uint8_t *image_y, *image_u, *image_v, *image_a;
- uint8_t *img_y, *img_u, *img_v, *img_a; int w;
- public:
- void set_line(int n) {
- int ofs = w * n;
- img_y = image_y + ofs;
- img_u = image_u + ofs;
- img_v = image_v + ofs;
- img_a = image_a + ofs;
- }
- pix_t(subtitle_t *subtitle, int x, int y) {
- w = subtitle->w;
- int ofs = y*w + x;
- image_y = subtitle->image_y + ofs;
- image_u = subtitle->image_u + ofs;
- image_v = subtitle->image_v + ofs;
- image_a = subtitle->image_a + ofs;
- }
- void write(int i, uint32_t yuva) {
- img_y[i] = yuva >> 24;
- img_u[i] = yuva >> 16;
- img_v[i] = yuva >> 8;
- img_a[i] = yuva >> 0;
- }
- void fill_box(uint32_t yuva, int x0,int y0, int x1,int y1) {
- if( x0 >= x1 ) return;
- while( y0 < y1 ) {
- set_line(y0++);
- for( int ix=x0; ix<x1; ++ix ) write(ix,yuva);
- }
- }
- } pix(subtitle, x+bw, y+bw); /* origin inside border */
- /* dont fill left of cell */
- pix.fill_box(bg_yuva, 0, 0, x2,y0); /* fill top */
- pix.fill_box(bg_yuva, 0,y0, x0,y1); /* fill left */
- pix.fill_box(bg_yuva, x1,y0, x2,y1); /* fill right */
- pix.fill_box(bg_yuva, 0,y1, x2,y2); /* fill bottom */
-
- int wsz = (cp->right-cp->left+7) / 8;
- int rx = x0 - ix0;
- int ry = y0 - iy0;
- /* render char box */
- for( int iy=y0; iy<y1; ++iy,++ry ) {
- pix.set_line(iy);
- uint8_t *row = &bmap[ry*wsz];
- int i = rx, ix = x0;
- /* dont render bg left of cell */
- while( ix < 0 ) {
- if( ((row[i>>3] >> (i&7)) & 1) ) pix.write(ix, fg_yuva);
- ++ix; ++i;
- }
- /* render fg/bg inside of cell */
- while( ix < x1 ) {
- pix.write(ix, ((row[i>>3] >> (i&7)) & 1) ? fg_yuva : bg_yuva);
- ++ix; ++i;
- }
- }
- if( chr->underline ) {
- int uy0 = font->imy;
- if( uy0 < y2 ) {
- int uy1 = uy0 + (y2+23)/24;
- if( uy1 > y2 ) uy1 = y2;
- pix.fill_box(fg_yuva, 0,uy0, x2,uy1);
- }
- }
- }
- else {
- /* no bitmap and not blank */
- switch( pdir ) {
- case dir_rt: dx = font->idx; dy = 0; break;
- case dir_lt: dx = font->idy; dy = 0; break;
- case dir_dn: dx = 0; dy = font->idy; break;
- case dir_up: dx = 0; dy = font->idy; break;
- }
- }
- x += dx; y += dy;
-}
-
-void zwin_t::
-hbar(int x, int y, int ww, int hh, int lm, int rm, int clr)
-{
-/* w,h = widget dims, ww,hh = bar dims */
-/* x,y = widget coord, lm,rm = lt/rt miter, clr = color */
- int w = subtitle->w;
- int h = subtitle->h;
- if( y < 0 ) { hh += y; y = 0; }
- if( y+hh > h ) hh = h - y;
- uint32_t yuva = border_yuva;
- for( int ih=hh; --ih>=0; ++y ) {
- int iw = ww, ix = x;
- if( ix < 0 ) { iw += ix; ix = 0; }
- if( ix+iw > w ) iw = w - ix;
- int ofs = w*y + ix;
- uint8_t *img_y = &subtitle->image_y[ofs];
- uint8_t *img_u = &subtitle->image_u[ofs];
- uint8_t *img_v = &subtitle->image_v[ofs];
- uint8_t *img_a = &subtitle->image_a[ofs];
- while( --iw >= 0 ) {
- *img_y = clr; ++img_y;
- *img_u = yuva >> 16; ++img_u;
- *img_v = yuva >> 8; ++img_v;
- *img_a = yuva >> 0; ++img_a;
- }
- x += lm; ww -= lm-rm;
- }
-}
-
-void zwin_t::
-vbar(int x, int y, int ww, int hh, int tm, int bm, int clr)
-{
-/* w,h = widget dims, ww,hh = bar dims */
-/* x,y = widget coord, lm,rm = lt/rt miter, clr = color */
- int w = subtitle->w;
- int h = subtitle->h;
- if( x < 0 ) { ww += x; x = 0; }
- if( x+ww > w ) ww = w - x;
- uint32_t yuva = border_yuva;
- for( int iw=ww; --iw>=0; ++x ) {
- int ih = hh, iy = y;
- if( iy < 0 ) { ih += iy; iy = 0; }
- if( iy+ih > h ) ih = h - iy;
- int ofs = w*iy + x;
- uint8_t *img_y = &subtitle->image_y[ofs];
- uint8_t *img_u = &subtitle->image_u[ofs];
- uint8_t *img_v = &subtitle->image_v[ofs];
- uint8_t *img_a = &subtitle->image_a[ofs];
- while( --ih >= 0 ) {
- *img_y = clr; img_y += w;
- *img_u = yuva >> 16; img_u += w;
- *img_v = yuva >> 8; img_v += w;
- *img_a = yuva >> 0; img_a += w;
- }
- y += tm; hh -= tm-bm;
- }
-}
-
-void zwin_t::
-border(int ilt, int olt, int irt, int ort,
- int iup, int oup, int idn, int odn)
-{
-/* i/o = inside/outside + lt/rt/up/dn = colors */
- if( !bw || !subtitle ) return;
- int w = subtitle->w;
- int h = subtitle->h;
- int sbw = bw * scale;
- int zo = sbw / 2; // outside width
- int zi = sbw - zo; // inside width
- hbar(0,0,w,zo,1,-1,oup);
- hbar(zo,zo,w-2*zo,zi,1,-1,iup);
- hbar(sbw-1,h-sbw,w-2*sbw+2,zi,-1,1,idn);
- hbar(zo-1,h-zo,w-2*zo+2,zo,-1,1,odn);
- vbar(0,1,zo,h-2,1,-1,olt);
- vbar(zo,zo+1,zi,h-2*zo-2,1,-1,ilt);
- vbar(w-sbw,sbw,zi,h-2*sbw,-1,1,irt);
- vbar(w-zo,zo,zo,h-2*zo,-1,1,ort);
-}
-
-void zwin_t::
-render()
-{
- if( st < st_visible || !bfr ) {
- if( subtitle ) subtitle->draw = -1;
- return;
- }
- /* get bounding box */
- int wd = 2*bw;
- int ht = 2*bw;
- int fw = 0, fh = 0, zz = 0;
- switch( pdir ) {
- case dir_rt:
- case dir_lt:
- for( int iy=0; iy<ch; ++iy ) {
- int ww = 0;
- for( int ix=0; ix<cw; ++ix ) {
- chr_t *chr = &bfr[iy*MX_CX + ix];
- bitfont_t *font = chr_font(chr, scale);
- if( font->idy > fh ) fh = font->idy;
- int b = chr->glyph;
- if( b >= font->nch ) continue;
- bitfont_t::bitchar_t *cp = &font->chrs[b];
- int sz = !cp->bitmap ? font->idx :
- pdir == dir_rt ? cp->right : cp->left;
- ww += sz;
- }
- if( ww > zz ) zz = ww;
- }
- wd += zz;
- ht += ch * fh;
- break;
- case dir_up:
- case dir_dn:
- for( int ix=0; ix<cw; ++ix ) {
- int hh = 0;
- for( int iy=0; iy<ch; ++iy ) {
- chr_t *chr = &bfr[iy*MX_CX + ix];
- bitfont_t *font = chr_font(chr, scale);
- if( font->idx > fw ) fw = font->idx;
- int b = chr->glyph;
- if( b >= font->nch ) continue;
- bitfont_t::bitchar_t *cp = &font->chrs[b];
- int sz = !cp->bitmap ? font->idy :
- pdir == dir_dn ? cp->decent : cp->ascent;
- hh += sz;
- }
- if( hh > zz ) zz = hh;
- }
- wd += cw * fw;
- ht += zz;
- break;
- }
- video_t *video = svc->cc->video;
-//zmsgs(" an_horz=%d, an_vert=%d, an_rela=%d, %dx%d\n",
-// anchor_horizontal, anchor_vertical, anchor_relative,
-// video->coded_picture_width, video->coded_picture_height);
- int ax = ((anchor_horizontal+10) * video->coded_picture_width) / 200;
- int ay = ((anchor_vertical+10) * video->coded_picture_height) / 100;
- if( anchor_relative ) { ax += ax; ay += ay; }
- switch( anchor_point ) {
- case 0x00: break; /* nw */
- case 0x01: ax -= wd/2; break; /* n */
- case 0x02: ax -= wd; break; /* ne */
- case 0x03: ax -= wd; ay -= ht/2; break; /* e */
- case 0x04: ax -= wd; ay -= ht; break; /* se */
- case 0x05: ax -= wd/2; ay -= ht; break; /* s */
- case 0x06: ay -= ht; break; /* sw */
- case 0x07: ay -= ht/2; break; /* w */
- case 0x08: ax -= wd/2; ay -= ht/2; break; /* center */
- }
-
- zmpeg3_t *src = video->src;
- strack_t *strack = src->create_strack(svc->ctrk, video);
- if( !subtitle )
- subtitle = new subtitle_t(id, wd, ht);
- if( subtitle->done < 0 ) {
- if( strack->append_subtitle(subtitle,0) ) {
- delete subtitle; subtitle = 0;
- return;
- }
- }
- subtitle->set_image_size(wd, ht);
- subtitle->x1 = ax; subtitle->x2 = ax + wd;
- subtitle->y1 = ay; subtitle->y2 = ay + ht;
- subtitle->draw = 1;
- subtitle->frame_time = video->frame_time;
-//print_buffer();
- uint8_t yy = fill_yuva >> 24;
- uint8_t uu = fill_yuva >> 16;
- uint8_t vv = fill_yuva >> 8;
- uint8_t aa = fill_yuva >> 0;
- aa = 0xff - aa; // this is probably wrong
- int w = subtitle->w;
- int h = subtitle->h;
- int sz = w * h;
- memset(subtitle->image_y, yy, sz);
- memset(subtitle->image_u, uu, sz);
- memset(subtitle->image_v, vv, sz);
- memset(subtitle->image_a, aa, sz);
- yy = border_yuva >> 24;
- int hi_y, lo_y;
- if( (hi_y = yy + 0x60) > 0xff ) hi_y = 0xff;
- if( (lo_y = yy - 0x60) < 0x10 ) lo_y = 0x10;
- switch( border_type ) {
- case 0x01: /* raised */
- border(hi_y, yy, hi_y, yy, hi_y, yy, hi_y, yy);
- break;
- case 0x02: /* depressed */
- border(lo_y, yy, lo_y, yy, lo_y, yy, lo_y, yy);
- break;
- case 0x03: /* uniform */
- border(yy, yy, yy, yy, yy, yy, yy, yy);
- break;
- case 0x04: /* shadowl */
- border(lo_y, lo_y, hi_y, hi_y, hi_y, lo_y, hi_y, lo_y);
- break;
- case 0x05: /* shadowr */
- border(hi_y, hi_y, lo_y, lo_y, hi_y, lo_y, hi_y, lo_y);
- break;
- default:
- case 0x00: /* none */
- break;
- }
- /* render character data */
- switch( pdir ) {
- case dir_rt:
- for( int iy=0; iy<ch; ++iy ) {
- x = 0; y = iy * fh;
- chr_t *bp = &bfr[iy * MX_CX];
- for( int ix=0; ix<cw; ++ix, ++bp ) {
- put_chr(bp);
- }
- }
- break;
- case dir_lt:
- for( int iy=0; iy<ch; ++iy ) {
- x = w; y = iy * fh;
- chr_t *bp = &bfr[iy*MX_CX + cw];
- for( int ix=cw; --ix>=0; )
- put_chr(--bp);
- }
- break;
- case dir_dn:
- for( int ix=0; ix<cw; ++ix ) {
- x = ix * fw; y = 0;
- chr_t *bp = &bfr[ix];
- for( int iy=0; iy<ch; ++iy, bp+=MX_CX )
- put_chr(bp);
- }
- break;
- case dir_up:
- for( int ix=0; ix<cw; ++ix ) {
- x = ix * fw; y = h;
- chr_t *bp = &bfr[ch*MX_CX - cw + ix];
- for( int iy=ch; --iy>=0; ) {
- put_chr(bp -= MX_CX);
- }
- }
- break;
- }
-}
-