#define VCODEC_DIVX4 1 #define ACODEC_PCM 1 #define ACODEC_VBRMP3 2 #include #include #include #include #include "mp_msg.h" #include "help_mp.h" #include "codec-cfg.h" #include "stream.h" #include "demuxer.h" #include "stheader.h" #include "aviwrite.h" #include "libvo/video_out.h" #include "dec_audio.h" #include "dec_video.h" #include #include "get_path.c" //-------------------------- static int tabsel_123[2][3][16] = { { {0,32,64,96,128,160,192,224,256,288,320,352,384,416,448,}, {0,32,48,56, 64, 80, 96,112,128,160,192,224,256,320,384,}, {0,32,40,48, 56, 64, 80, 96,112,128,160,192,224,256,320,} }, { {0,32,48,56,64,80,96,112,128,144,160,176,192,224,256,}, {0,8,16,24,32,40,48,56,64,80,96,112,128,144,160,}, {0,8,16,24,32,40,48,56,64,80,96,112,128,144,160,} } }; static long freqs[9] = { 44100, 48000, 32000, 22050, 24000, 16000 , 11025 , 12000 , 8000 }; /* * decode a header and write the information * into the frame structure */ static int decode_header(unsigned char* hbuf){ int stereo,ssize,crc,lsf,mpeg25,framesize,padding,bitrate_index,sampling_frequency; unsigned long newhead = hbuf[0] << 24 | hbuf[1] << 16 | hbuf[2] << 8 | hbuf[3]; // printf("head=0x%08X\n",newhead); #if 1 // head_check: if( (newhead & 0xffe00000) != 0xffe00000 || (newhead & 0x0000fc00) == 0x0000fc00){ printf("head_check failed\n"); return -1; } #endif if((4-((newhead>>17)&3))!=3){ printf("not layer-3\n"); return -1;} if( newhead & ((long)1<<20) ) { lsf = (newhead & ((long)1<<19)) ? 0x0 : 0x1; mpeg25 = 0; } else { lsf = 1; mpeg25 = 1; } if(mpeg25) sampling_frequency = 6 + ((newhead>>10)&0x3); else sampling_frequency = ((newhead>>10)&0x3) + (lsf*3); if(sampling_frequency>8){ printf("invalid sampling_frequency\n"); return -1; // valid: 0..8 } crc = ((newhead>>16)&0x1)^0x1; bitrate_index = ((newhead>>12)&0xf); padding = ((newhead>>9)&0x1); // fr->extension = ((newhead>>8)&0x1); // fr->mode = ((newhead>>6)&0x3); // fr->mode_ext = ((newhead>>4)&0x3); // fr->copyright = ((newhead>>3)&0x1); // fr->original = ((newhead>>2)&0x1); // fr->emphasis = newhead & 0x3; stereo = ( (((newhead>>6)&0x3)) == 3) ? 1 : 2; if(!bitrate_index){ fprintf(stderr,"Free format not supported.\n"); return -1; } if(lsf) ssize = (stereo == 1) ? 9 : 17; else ssize = (stereo == 1) ? 17 : 32; if(crc) ssize += 2; framesize = (long) tabsel_123[lsf][2][bitrate_index] * 144000; framesize /= freqs[sampling_frequency]<MAXFRAMESIZE) return FALSE; return framesize; } //-------------------------- // cache2: #ifdef USE_STREAM_CACHE extern int cache_fill_status; #else #define cache_fill_status 0 #endif // AVI demuxer params: static float c_total=0; int delay_corrected=1; char *audio_codec=NULL; // override audio codec char *video_codec=NULL; // override video codec int audio_family=-1; // override audio codec family int video_family=-1; // override video codec family // audio stream skip/resync functions requires only for seeking. // (they should be implemented in the audio codec layer) //void skip_audio_frame(sh_audio_t *sh_audio){} //void resync_audio_stream(sh_audio_t *sh_audio){} int verbose=1; // must be global! double video_time_usage=0; double vout_time_usage=0; static double audio_time_usage=0; static int total_time_usage_start=0; static int benchmark=0; int force_fps=0; #include "libmpeg2/mpeg2.h" #include "libmpeg2/mpeg2_internal.h" static unsigned char* vo_image=NULL; static unsigned char* vo_image_ptr=NULL; static int vo_w,vo_h; static uint32_t draw_slice(uint8_t *src[], int stride[], int w,int h, int x0,int y0){ int y; // printf("draw_slice %dx%d %d;%d\n",w,h,x,y); // copy Y: for(y=0;y>=1;y0>>=1; w>>=1;h>>=1; // copy U: for(y=0;y>1)*(y0+y)+x0; memcpy(d,s,w); } // copy V: for(y=0;y>1)*(y0+y)+x0; memcpy(d,s,w); } } static uint32_t draw_frame(uint8_t *src[]){ // printf("This function shouldn't be called - report bug!\n"); // later: add YUY2->YV12 conversion here! vo_image_ptr=src[0]; } vo_functions_t video_out; //--------------- static int eof=0; static void exit_sighandler(int x){ eof=1; } int main(int argc,char* argv[]){ stream_t* stream=NULL; demuxer_t* demuxer=NULL; demux_stream_t *d_audio=NULL; demux_stream_t *d_video=NULL; demux_stream_t *d_dvdsub=NULL; sh_audio_t *sh_audio=NULL; sh_video_t *sh_video=NULL; int file_format=DEMUXER_TYPE_UNKNOWN; int i; unsigned int out_fmt; aviwrite_t* muxer=NULL; aviwrite_stream_t* mux_a=NULL; aviwrite_stream_t* mux_v=NULL; FILE* muxer_f=NULL; ENC_PARAM enc_param; ENC_FRAME enc_frame; ENC_RESULT enc_result; void* enc_handle=NULL; //lame_global_flags *lame; float audio_preload=0.3; //int out_buffer_size=0x200000; //unsigned char* out_buffer=malloc(out_buffer_size); mp_msg_init(verbose+MSGL_STATUS); // check codec.conf if(!parse_codec_cfg("etc/codecs.conf")){ mp_msg(MSGT_CPLAYER,MSGL_HINT,MSGTR_CopyCodecsConf); exit(0); // From unknown reason a hangup occurs here :(((((( } if(argc>1) stream=open_stream(argv[1],0,&file_format); else stream=open_stream("/3d/abcug/Weird AL - Amish Paradise (MUSIC VIDEO).mpeg",0,&file_format); // stream=open_stream("/3d/divx/405divx_sm_v2[1].avi",0,&file_format); // stream=open_stream("/dev/cdrom",2,&file_format); // VCD track 2 if(!stream){ printf("Cannot open file/device\n"); exit(1); } printf("success: format: %d data: 0x%X - 0x%X\n",file_format, (int)(stream->start_pos),(int)(stream->end_pos)); stream_enable_cache(stream,2048*1024); demuxer=demux_open(stream,file_format,-1,-1,-1); if(!demuxer){ printf("Cannot open demuxer\n"); exit(1); } d_audio=demuxer->audio; d_video=demuxer->video; d_dvdsub=demuxer->sub; sh_audio=d_audio->sh; sh_video=d_video->sh; if(!video_read_properties(sh_video)){ printf("Couldn't read video properties\n"); exit(1); } mp_msg(MSGT_CPLAYER,MSGL_INFO,"[V] filefmt:%d fourcc:0x%X size:%dx%d fps:%5.2f ftime:=%6.4f\n", demuxer->file_format,sh_video->format, sh_video->disp_w,sh_video->disp_h, sh_video->fps,sh_video->frametime ); sh_video->codec=NULL; if(video_family!=-1) mp_msg(MSGT_CPLAYER,MSGL_INFO,MSGTR_TryForceVideoFmt,video_family); while(1){ sh_video->codec=find_codec(sh_video->format, sh_video->bih?((unsigned int*) &sh_video->bih->biCompression):NULL,sh_video->codec,0); if(!sh_video->codec){ if(video_family!=-1) { sh_video->codec=NULL; /* re-search */ mp_msg(MSGT_CPLAYER,MSGL_WARN,MSGTR_CantFindVfmtFallback); video_family=-1; continue; } mp_msg(MSGT_CPLAYER,MSGL_ERR,MSGTR_CantFindVideoCodec,sh_video->format); mp_msg(MSGT_CPLAYER,MSGL_HINT, MSGTR_TryUpgradeCodecsConfOrRTFM,get_path("codecs.conf")); exit(1); } if(video_codec && strcmp(sh_video->codec->name,video_codec)) continue; else if(video_family!=-1 && sh_video->codec->driver!=video_family) continue; break; } mp_msg(MSGT_CPLAYER,MSGL_INFO,"%s video codec: [%s] drv:%d (%s)\n",video_codec?"Forcing":"Detected",sh_video->codec->name,sh_video->codec->driver,sh_video->codec->info); for(i=0;icodec->outfmt[i]; if(out_fmt==0xFFFFFFFF) continue; if(out_fmt==IMGFMT_YV12) break; if(out_fmt==IMGFMT_I420) break; if(out_fmt==IMGFMT_IYUV) break; if(out_fmt==IMGFMT_YUY2) break; } if(i>=CODECS_MAX_OUTFMT){ mp_msg(MSGT_CPLAYER,MSGL_FATAL,MSGTR_VOincompCodec); exit(1); // exit_player(MSGTR_Exit_error); } sh_video->outfmtidx=i; if(out_fmt==IMGFMT_YV12 || out_fmt==IMGFMT_I420 || out_fmt==IMGFMT_IYUV){ vo_w=sh_video->disp_w; vo_h=sh_video->disp_h; vo_image=malloc(vo_w*vo_h*3/2); vo_image_ptr=vo_image; } divx_quality=4; if(!init_video(sh_video)){ mp_msg(MSGT_CPLAYER,MSGL_FATAL,MSGTR_CouldntInitVideoCodec); exit(1); } if(sh_audio){ // Go through the codec.conf and find the best codec... sh_audio->codec=NULL; if(audio_family!=-1) mp_msg(MSGT_CPLAYER,MSGL_INFO,MSGTR_TryForceAudioFmt,audio_family); while(1){ sh_audio->codec=find_codec(sh_audio->format,NULL,sh_audio->codec,1); if(!sh_audio->codec){ if(audio_family!=-1) { sh_audio->codec=NULL; /* re-search */ mp_msg(MSGT_CPLAYER,MSGL_ERR,MSGTR_CantFindAfmtFallback); audio_family=-1; continue; } mp_msg(MSGT_CPLAYER,MSGL_ERR,MSGTR_CantFindAudioCodec,sh_audio->format); mp_msg(MSGT_CPLAYER,MSGL_HINT, MSGTR_TryUpgradeCodecsConfOrRTFM,get_path("codecs.conf")); sh_audio=d_audio->sh=NULL; break; } if(audio_codec && strcmp(sh_audio->codec->name,audio_codec)) continue; else if(audio_family!=-1 && sh_audio->codec->driver!=audio_family) continue; mp_msg(MSGT_CPLAYER,MSGL_INFO,"%s audio codec: [%s] drv:%d (%s)\n",audio_codec?"Forcing":"Detected",sh_audio->codec->name,sh_audio->codec->driver,sh_audio->codec->info); break; } } if(sh_audio){ mp_msg(MSGT_CPLAYER,MSGL_V,"Initializing audio codec...\n"); if(!init_audio(sh_audio)){ mp_msg(MSGT_CPLAYER,MSGL_ERR,MSGTR_CouldntInitAudioCodec); sh_audio=d_audio->sh=NULL; } else { mp_msg(MSGT_CPLAYER,MSGL_INFO,"AUDIO: srate=%d chans=%d bps=%d sfmt=0x%X ratio: %d->%d\n",sh_audio->samplerate,sh_audio->channels,sh_audio->samplesize, sh_audio->sample_format,sh_audio->i_bps,sh_audio->o_bps); } } // set up video encoder: video_out.draw_slice=draw_slice; video_out.draw_frame=draw_frame; // set up output file: muxer_f=fopen("test.avi","wb"); muxer=aviwrite_new_muxer(); // ============= VIDEO =============== mux_v=aviwrite_new_stream(muxer,AVIWRITE_TYPE_VIDEO); mux_v->buffer_size=0x200000; mux_v->buffer=malloc(mux_v->buffer_size); mux_v->source=sh_video; mux_v->h.dwSampleSize=0; // VBR mux_v->h.dwScale=10000; mux_v->h.dwRate=mux_v->h.dwScale*sh_video->fps; mux_v->codec=VCODEC_DIVX4; // 0=streamcopy switch(mux_v->codec){ case 0: mux_v->bih=sh_video->bih; break; case VCODEC_DIVX4: mux_v->bih=malloc(sizeof(BITMAPINFOHEADER)); mux_v->bih->biSize=sizeof(BITMAPINFOHEADER); mux_v->bih->biWidth=sh_video->disp_w; mux_v->bih->biHeight=sh_video->disp_h; mux_v->bih->biPlanes=0; mux_v->bih->biBitCount=24; mux_v->bih->biCompression=mmioFOURCC('d','i','v','x'); mux_v->bih->biSizeImage=mux_v->bih->biWidth*mux_v->bih->biHeight*(mux_v->bih->biBitCount/8); break; } // ============= AUDIO =============== if(sh_audio){ mux_a=aviwrite_new_stream(muxer,AVIWRITE_TYPE_AUDIO); mux_a->buffer_size=0x100000; //16384; mux_a->buffer=malloc(mux_a->buffer_size); mux_a->source=sh_audio; mux_a->codec=ACODEC_PCM; // 0=streamcopy switch(mux_a->codec){ case 0: mux_a->h.dwSampleSize=sh_audio->audio.dwSampleSize; mux_a->h.dwScale=sh_audio->audio.dwScale; mux_a->h.dwRate=sh_audio->audio.dwRate; mux_a->wf=sh_audio->wf; break; case ACODEC_PCM: printf("CBR PCM audio selected\n"); mux_a->h.dwSampleSize=2*sh_audio->channels; mux_a->h.dwScale=1; mux_a->h.dwRate=sh_audio->samplerate; mux_a->wf=malloc(sizeof(WAVEFORMATEX)); mux_a->wf->nBlockAlign=mux_a->h.dwSampleSize; mux_a->wf->wFormatTag=0x1; // PCM mux_a->wf->nChannels=sh_audio->channels; mux_a->wf->nSamplesPerSec=sh_audio->samplerate; mux_a->wf->nAvgBytesPerSec=mux_a->h.dwSampleSize*mux_a->wf->nSamplesPerSec; mux_a->wf->wBitsPerSample=16; mux_a->wf->cbSize=0; // FIXME for l3codeca.acm break; case ACODEC_VBRMP3: mux_a->h.dwSampleSize=0; // VBR mux_a->h.dwScale=4608; mux_a->h.dwRate=sh_audio->samplerate; mux_a->wf=malloc(sizeof(WAVEFORMATEX)); mux_a->wf->wFormatTag=0x55; // MP3 mux_a->wf->nChannels=sh_audio->channels; mux_a->wf->nSamplesPerSec=sh_audio->samplerate; mux_a->wf->nAvgBytesPerSec=0; mux_a->wf->nBlockAlign=1; mux_a->wf->wBitsPerSample=16; mux_a->wf->cbSize=0; // FIXME for l3codeca.acm break; } } printf("Writting AVI header...\n"); aviwrite_write_header(muxer,muxer_f); switch(mux_v->codec){ case 0: break; case VCODEC_DIVX4: // init divx4linux: enc_param.x_dim=sh_video->disp_w; enc_param.y_dim=sh_video->disp_h; enc_param.framerate=sh_video->fps; enc_param.bitrate=1800000; enc_param.rc_period=0; enc_param.rc_reaction_period=0; enc_param.rc_reaction_ratio=0; enc_param.max_quantizer=0; enc_param.min_quantizer=0; enc_param.max_key_interval=0; enc_param.use_bidirect=0; enc_param.deinterlace=0; enc_param.quality=5; // the quality of compression ( 1 - fastest, 5 - best ) enc_param.obmc=0; enc_param.handle=NULL; encore(NULL,ENC_OPT_INIT,&enc_param,NULL); enc_handle=enc_param.handle; break; } #if 0 switch(mux_a->codec){ case ACODEC_VBRMP3: lame=lame_init(); //lame_set_bWriteVbrTag(lame,0); lame_set_in_samplerate(lame,sh_audio->samplerate); lame_set_num_channels(lame,mux_a->wf->nChannels); lame_set_out_samplerate(lame,mux_a->h.dwRate); lame_set_quality(lame,0); // best q //lame_set_mode(lame,JOINT_STEREO); // j-st //lame_set_brate(lame,64); //lame_set_compression_ratio(lame,20); lame_set_VBR(lame,vbr_default); // ??? //lame_set_VBR(lame,vbr_abr); // ??? lame_set_VBR_q(lame,6); // 1 = best vbr q 6=~128k //lame_set_VBR_mean_bitrate_kbps(lame,128); lame_init_params(lame); lame_print_config(lame); lame_print_internals(lame); } #endif signal(SIGINT,exit_sighandler); // Interrupt from keyboard signal(SIGQUIT,exit_sighandler); // Quit from keyboard signal(SIGTERM,exit_sighandler); // kill while(!eof){ float frame_time=0; int blit_frame=0; float a_pts=0; float v_pts=0; unsigned char* start=NULL; int in_size; if(sh_audio){ // get audio: while(mux_a->timer-audio_preloadtimer){ // copy 0.5 sec of audio int len; if(mux_a->h.dwSampleSize){ // CBR switch(mux_a->codec){ case 0: // copy len=sh_audio->i_bps/2; len/=mux_a->h.dwSampleSize;if(len<1) len=1; len*=mux_a->h.dwSampleSize; len=demux_read_data(sh_audio->ds,mux_a->buffer,len); break; case ACODEC_PCM: // printf("Decode!\n"); len=mux_a->h.dwSampleSize*(mux_a->h.dwRate/2); if(len>sh_audio->a_buffer_size) len=sh_audio->a_buffer_size; if(len>sh_audio->a_buffer_len){ int ret=decode_audio(sh_audio, &sh_audio->a_buffer[sh_audio->a_buffer_len], len-sh_audio->a_buffer_len, sh_audio->a_buffer_size-sh_audio->a_buffer_len); if(ret>0) sh_audio->a_buffer_len+=ret; // printf("ret=%d \n",ret); } if(len>sh_audio->a_buffer_len) len=sh_audio->a_buffer_len; memcpy(mux_a->buffer,sh_audio->a_buffer,len); sh_audio->a_buffer_len-=len; if(sh_audio->a_buffer_len>0) memcpy(sh_audio->a_buffer,&sh_audio->a_buffer[len],sh_audio->a_buffer_len); break; #if 0 case ACODEC_VBRMP3: while(mux_a->buffer_len<4){ len=2304; if(sh_audio->a_buffer_lena_buffer[sh_audio->a_buffer_len], len-sh_audio->a_buffer_len, sh_audio->a_buffer_size-sh_audio->a_buffer_len); if(ret>0) sh_audio->a_buffer_len+=ret; else break; } if(len< mux_a->buffer_len+=lame_encode_buffer_interleaved(lame, sh_audio->a_buffer,mux_a->buffer) } int len=fread(buffer,1,buff_size,f); if(len<=0) break; outbuf_len+=lame_encode_buffer_interleaved(lame,buffer,len/4,outbuf+outbuf_len,outbuf_size-outbuf_len); } len=decode_header(outbuf); if(len<=0){ printf("ERROR!\n"); len=1; // skip 1 byte outbuf_len-=len; memcpy(outbuf,outbuf+len,outbuf_len); continue; } printf("len=%4d %02X %02X %02X %02X\n",len,outbuf[0],outbuf[1],outbuf[2],outbuf[3]); while(outbuf_len ",len); // printf("%d \n",len); } else { // VBR printf("not yet implemented!\n"); } if(len<=0) break; // EOF? aviwrite_write_chunk(muxer,mux_a,muxer_f,len,0); } } // get video frame! in_size=video_read_frame(sh_video,&frame_time,&start,force_fps); if(in_size<0){ eof=1; break; } sh_video->timer+=frame_time; if(pts_from_bps){ unsigned int samples=(sh_audio->audio.dwSampleSize)? ((ds_tell(d_audio)-sh_audio->a_in_buffer_len)/sh_audio->audio.dwSampleSize) : (d_audio->pack_no); // <- used for VBR audio a_pts=samples*(float)sh_audio->audio.dwScale/(float)sh_audio->audio.dwRate; delay_corrected=1; } else { // PTS = (last timestamp) + (bytes after last timestamp)/(bytes per sec) a_pts=d_audio->pts; if(!delay_corrected) if(a_pts) delay_corrected=1; //printf("*** %5.3f ***\n",a_pts); a_pts+=(ds_tell_pts(d_audio)-sh_audio->a_in_buffer_len)/(float)sh_audio->i_bps; } v_pts=d_video->pts; mp_msg(MSGT_AVSYNC,MSGL_STATUS,"A:%6.1f V:%6.1f A-V:%7.3f ct:%7.3f %3d/%3d %2d%% %2d%% %4.1f%% %d%%\r", a_pts,v_pts,a_pts-v_pts,c_total, (int)sh_video->num_frames,(int)sh_video->num_frames_decoded, (sh_video->timer>0.5)?(int)(100.0*video_time_usage/(double)sh_video->timer):0, (sh_video->timer>0.5)?(int)(100.0*vout_time_usage/(double)sh_video->timer):0, (sh_video->timer>0.5)?(100.0*audio_time_usage/(double)sh_video->timer):0 ,cache_fill_status ); fflush(stdout); // if(!blit_frame) continue; switch(mux_v->codec){ case 0: mux_v->buffer=start; aviwrite_write_chunk(muxer,mux_v,muxer_f,in_size,(sh_video->ds->flags&1)?0x10:0); break; case VCODEC_DIVX4: blit_frame=decode_video(&video_out,sh_video,start,in_size,0); if(!blit_frame){ // empty. aviwrite_write_chunk(muxer,mux_v,muxer_f,0,0); break; } enc_frame.image=vo_image_ptr; enc_frame.bitstream=mux_v->buffer; enc_frame.length=mux_v->buffer_size; switch(out_fmt){ case IMGFMT_YV12: enc_frame.colorspace=ENC_CSP_YV12; break; case IMGFMT_IYUV: case IMGFMT_I420: enc_frame.colorspace=ENC_CSP_I420; break; case IMGFMT_YUY2: enc_frame.colorspace=ENC_CSP_YUY2; break; case IMGFMT_UYVY: enc_frame.colorspace=ENC_CSP_UYVY; break; case IMGFMT_RGB24: case IMGFMT_BGR24: enc_frame.colorspace=ENC_CSP_RGB24; break; } enc_frame.quant=0; enc_frame.intra=0; enc_frame.mvs=NULL; // printf("encoding...\n"); encore(enc_handle,ENC_OPT_ENCODE,&enc_frame,&enc_result); // printf(" len=%d key:%d qualt:%d \n",enc_frame.length,enc_result.is_key_frame,enc_result.quantizer); aviwrite_write_chunk(muxer,mux_v,muxer_f,enc_frame.length,enc_result.is_key_frame?0x10:0); break; } } // while(!eof) aviwrite_write_index(muxer,muxer_f); fseek(muxer_f,0,SEEK_SET); aviwrite_write_header(muxer,muxer_f); // update header fclose(muxer_f); }