mpv/libmpcodecs/native/nuppelvideo.c

125 lines
3.3 KiB
C

/*
* NuppelVideo 0.05 file parser
* for MPlayer
* by Panagiotis Issaris <takis@lumumba.luc.ac.be>
*
* Reworked by alex
*/
#include <stdio.h>
#include <stdlib.h>
#include <unistd.h>
#include <string.h>
#include "config.h"
#include "mp_msg.h"
#include "../../libvo/fastmemcpy.h"
#include "libmpdemux/nuppelvideo.h"
#include "RTjpegN.h"
#include "minilzo.h"
#define KEEP_BUFFER
void decode_nuv( unsigned char *encoded, int encoded_size,
unsigned char *decoded, int width, int height)
{
int r;
unsigned int out_len;
struct rtframeheader *encodedh = ( struct rtframeheader* ) encoded;
static unsigned char *buffer = 0; /* for RTJpeg with LZO decompress */
#ifdef KEEP_BUFFER
static unsigned char *previous_buffer = 0; /* to support Last-frame-copy */
#endif
static int is_lzo_inited = 0;
// printf("frametype: %c, comtype: %c, encoded_size: %d, width: %d, height: %d\n",
// encodedh->frametype, encodedh->comptype, encoded_size, width, height);
switch(encodedh->frametype)
{
case 'D': /* additional data for compressors */
{
/* tables are in encoded */
if (encodedh->comptype == 'R')
{
RTjpeg_init_decompress ( (unsigned long *)(encoded+12), width, height );
mp_msg(MSGT_DECVIDEO, MSGL_V, "Found RTjpeg tables (size: %d, width: %d, height: %d)\n",
encoded_size-12, width, height);
}
break;
}
case 'V':
{
#ifdef KEEP_BUFFER
if (!previous_buffer)
previous_buffer = ( unsigned char * ) malloc ( width * height + ( width * height ) / 2 );
#endif
if (((encodedh->comptype == '2') ||
(encodedh->comptype == '3')) && !is_lzo_inited)
{
/* frame using lzo, init lzo first if not inited */
if ( lzo_init() != LZO_E_OK )
{
mp_msg(MSGT_DECVIDEO, MSGL_ERR, "LZO init failed\n");
return;
}
is_lzo_inited = 1;
}
switch(encodedh->comptype)
{
case '0': /* raw YUV420 */
memcpy(decoded, encoded + 12, width*height*3/2);
break;
case '1': /* RTJpeg */
RTjpeg_decompressYUV420 ( ( __s8 * ) encoded + 12, decoded );
break;
case '2': /* RTJpeg with LZO */
if (!buffer)
buffer = ( unsigned char * ) malloc ( width * height + ( width * height ) / 2 );
if (!buffer)
{
mp_msg(MSGT_DECVIDEO, MSGL_ERR, "Nuppelvideo: error decompressing\n");
break;
}
r = lzo1x_decompress ( encoded + 12, encodedh->packetlength, buffer, &out_len, NULL );
if ( r != LZO_E_OK )
{
mp_msg(MSGT_DECVIDEO, MSGL_ERR, "Nuppelvideo: error decompressing\n");
break;
}
RTjpeg_decompressYUV420 ( ( __s8 * ) buffer, decoded );
break;
case '3': /* raw YUV420 with LZO */
r = lzo1x_decompress ( encoded + 12, encodedh->packetlength, decoded, &out_len, NULL );
if ( r != LZO_E_OK )
{
mp_msg(MSGT_DECVIDEO, MSGL_ERR, "Nuppelvideo: error decompressing\n");
break;
}
break;
case 'N': /* black frame */
memset ( decoded, 0, width * height );
memset ( decoded + width * height, 127, width * height / 2);
break;
case 'L': /* copy last frame */
#ifdef KEEP_BUFFER
memcpy ( decoded, previous_buffer, width*height*3/2);
#endif
break;
}
#ifdef KEEP_BUFFER
memcpy(previous_buffer, decoded, width*height*3/2);
#endif
break;
}
default:
mp_msg(MSGT_DECVIDEO, MSGL_V, "Nuppelvideo: unknwon frametype: %c\n",
encodedh->frametype);
}
}