diff sub/spuenc.c @ 32470:139876e79725

Move spuenc.[ch] from libvo to sub.

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/sub/spuenc.c	Wed Oct 27 17:55:45 2010 +0000
@@ -0,0 +1,237 @@
+/*
+ * encode a pixmap with RLE
+ *
+ * Copyright (C) 2000   Alejandro J. Cura <[e-mail]>
+ *
+ * (modified a bit to work with the dxr3 driver...4/2/2002 cg)
+ *
+ * Based on the hard work of:
+ *
+ *   Samuel Hocevar <[e-mail]> and Michel Lespinasse <[e-mail]>
+ *
+ * This file is part of MPlayer.
+ *
+ * MPlayer is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * MPlayer is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License along
+ * with MPlayer; if not, write to the Free Software Foundation, Inc.,
+ * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+ */
+
+#include <stdio.h>
+#include <stdlib.h>
+#include "unistd.h"
+#include "spuenc.h"
+
+typedef struct {
+	int x, y;
+	unsigned int rgb[4];
+	unsigned char* pixels;
+} pixbuf;
+
+static void
+encode_do_control(int x,int y, encodedata* ed, pixbuf* pb) {
+	int controlstart= ed->count;
+	int x1;
+	int i;
+	unsigned int top, left, bottom, right;
+
+	top= 450 - pb->y/2;
+   	left=(720 / 2) - (pb->x / 2);
+	top= 32;//this forces the first bit to be visible on a TV
+	left= 32;//you could actually pass in x/y and do some nice
+	         //calculations for making it look right...
+	bottom= top + pb->y - 1;
+	right= left + pb->x - 1;
+
+/* the format of this is well described by a page:
+ * http://members.aol.com/mpucoder/DVD/spu.html
+ *
+ * note I changed the layout of commands to turn off the subpic as the
+ * first command, and then turn on the new subpic...this is so we can
+ * leave the subpic on for an arbitrary ammount of time as controlled by
+ * mplayer (ie when we turn on the subpic we don't know how long it should
+ * stay on when using mplayer).
+ * with this layout we turn off the last subpic as we are turning on the
+ * new one.
+ * The original hd it turn on the subpic, and delay the turn off command using
+ * the durration/delay feature.
+ * */
+	/* start at x0+2*/
+	i= controlstart;
+	/* display duration... */
+//	ed->data[i++]= 0x00;
+//	ed->data[i++]= 0x00; //durration before turn off command occurs
+			     //in 90000/1024 units
+
+	/* x1 */
+//	x1=i+4;
+//	ed->data[i++]= x1 >> 8;//location of next command block
+//	ed->data[i++]= x1 & 0xff;
+	/* finish it */
+//	ed->data[i++]= 0x02;//turn off command
+//	ed->data[i++]= 0xff;//end of command block
+	x1= i; //marker for last command block address
+
+	/* display duration... */
+	ed->data[i++]= 0x00;
+	ed->data[i++]= 0x00; //durration before turn on command occurs
+			     //in 90000/1024 units
+	/* x1 */
+	ed->data[i++]= x1 >> 8;  //since this is the last command block, this
+	ed->data[i++]= x1 & 0xff;//points back to itself
+
+
+	/* 0x01: start displaying */
+	ed->data[i++]= 0x01;
+
+	/* 0x03: palette info */
+	ed->data[i++]= 0x03;
+	ed->data[i++]= 0x08;
+	ed->data[i++]= 0x7f;
+/*
+ * The palette is a coded index (one of 16) 0 is black, 0xf is white
+ * (unless you screw with the default palette)
+ * for what I am doing I only use white.
+ * 7 is lt grey, and 8 is dk grey...
+ * */
+	/* 0x04: transparency info (reversed) */
+	ed->data[i++]= 0x04;
+	ed->data[i++]= 0xFF;//change the opacity values of the color entries
+	ed->data[i++]= 0xF0;//say if you wanted white text on a black backround
+			    //note you will have to work harder, by finding the
+	//bounding box of the text, and use a non transparent black palette
+	// entry to fill the backround with, (say color 1 instead of 0)
+
+	/* 0x05: coordinates */
+	ed->data[i++]= 0x05;
+	ed->data[i++]= left >> 4;
+	ed->data[i++]= ((left&0xf)<<4)+(right>>8);
+	ed->data[i++]= (right&0xff);
+	ed->data[i++]= top >> 4;
+	ed->data[i++]= ((top&0xf)<<4)+(bottom>>8);
+	ed->data[i++]= (bottom&0xff);
+
+	/* 0x06: both fields' offsets */
+	ed->data[i++]= 0x06;
+	ed->data[i++]= 0x00;
+	ed->data[i++]= 0x04;
+	ed->data[i++]= ed->oddstart >> 8;
+	ed->data[i++]= ed->oddstart & 0xff;
+
+	/* 0xFF: end sequence */
+	ed->data[i++]= 0xFF;
+	if(! i&1 ) {
+		ed->data[i++]= 0xff;
+	}
+
+	/* x0 */
+	ed->data[2]= (controlstart) >> 8;
+	ed->data[3]= (controlstart) & 0xff;
+
+	/* packet size */
+	ed->data[0]= i >> 8;
+	ed->data[1]= i & 0xff;
+
+	ed->count= i;
+}
+
+static void
+encode_put_nibble( encodedata* ed, unsigned char nibble ) {
+	if( ed->nibblewaiting ) {
+		ed->data[ed->count++]|= nibble;
+		ed->nibblewaiting= 0;
+	} else {
+		ed->data[ed->count]= nibble<<4;
+		ed->nibblewaiting= 1;
+	}
+}
+
+static void
+encode_pixels( encodedata* ed, int color, int number ) {
+	if(number > 3) {
+		if(number > 15) {
+			encode_put_nibble( ed, 0 );
+			if(number > 63) {
+				encode_put_nibble( ed, (number & 0xC0)>>6 );
+			}
+		}
+		encode_put_nibble( ed, (number & 0x3C)>>2 );
+	}
+	encode_put_nibble( ed, ((number & 0xF)<<2) | color);
+}
+
+static void
+encode_eol( encodedata* ed ) {
+	if( ed->nibblewaiting ) {
+		ed->count++;
+		ed->nibblewaiting= 0;
+	}
+	ed->data[ed->count++]= 0x00;
+	ed->data[ed->count++]= 0x00;
+}
+
+static void
+encode_do_row( encodedata* ed, pixbuf* pb, int row ) {
+	int i= 0;
+	unsigned char* pix= pb->pixels + row * pb->x;
+	int color= *pix;
+	int n= 0; /* the number of pixels of this color */
+
+	while( i++ < pb->x ) {
+		/* FIXME: watch this space for EOL */
+		if( *pix != color || n == 255 ) {
+			encode_pixels( ed, color, n );
+			color= *pix;
+			n= 1;
+		} else {
+			n++;
+		}
+		pix++;
+	}
+
+	/* this small optimization: (n>63) can save up to two bytes per line
+	 * I wonder if this is compatible with all the hardware... */
+	if( color == 0 && n > 63 ) {
+		encode_eol( ed );
+	} else {
+		encode_pixels( ed, color, n );
+	}
+
+	if( ed->nibblewaiting ) {
+		ed->count++;
+		ed->nibblewaiting= 0;
+	}
+}
+
+
+void
+pixbuf_encode_rle(int x, int y, int w, int h, char *inbuf,  int stride,encodedata *ed){
+       	pixbuf pb;
+	int i, row;
+	pb.x = w;
+	pb.y = h;
+
+	pb.pixels = inbuf;
+	ed->count= 4;
+	ed->nibblewaiting= 0;
+
+	row= 0;
+	for( i= 0; i < pb.y; i++ ) {
+		encode_do_row(ed, &pb, row);
+		row+= 2;
+		if( row > pb.y ) {
+			row= 1;
+			ed->oddstart= ed->count;
+		}
+	}
+	encode_do_control(x,y, ed, &pb);
+}