mpv/nuppelvideo.c

129 lines
3.2 KiB
C
Raw Normal View History

/*
* 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 "config.h"
#include "mp_msg.h"
#include "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;
static unsigned char *previous_buffer = 0;
static 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 ( encoded+12, width, height );
printf("Found RTjpeg tables (size: %d, width: %d, height: %d)\n",
encoded_size-12, width, height);
}
break;
}
case 'V':
{
/* do the buffer stuffs */
if ( buffer == NULL )
{
buffer = ( unsigned char * ) malloc ( width * height + ( width * height ) / 2 );
#if 0
printf ( "Allocated for %dx%d image %d bytes\n", width, height,
width * height + ( width * height ) / 2 );
#endif
}
#ifdef KEEP_BUFFER
if ( previous_buffer == NULL )
{
previous_buffer = ( unsigned char * ) malloc ( width * height + ( width * height ) / 2 );
#if 0
printf ( "Allocated for %dx%d image %d bytes\n", width, height,
width * height + ( width * height ) / 2 );
#endif
}
#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 )
{
fprintf ( stderr, "%s\n", "lzo_init() failed !!!" );
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 */
r = lzo1x_decompress ( encoded + 12, encodedh->packetlength, buffer, &out_len, NULL );
if ( r != LZO_E_OK )
{
printf ( "Error decompressing\n" );
}
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 )
{
printf ( "Error decompressing\n" );
}
// memcpy(decoded, buffer, width*height*3/2);
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:
printf("Unknown chunk: %c\n", encodedh->frametype);
}
}