?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
r125: This commit was manufactured by cvs2svn to create tag 'r1_1_7-last'.
[cinelerra_cv/mob.git] / hvirtual / quicktime / mpeg4.c
blob57545d91262def1dc14c51641534b5d8bb4ebb55
1 /* General codec for all MPEG-4 derived encoding. */
2 /* Uses ffmpeg and encore50. */
3 /* Encore50 still seemed to provide better results than ffmpeg for encoding */
4 /* so it does all the generic MPEG-4 encoding. */
5
6
7
8
9
10 #include "avcodec.h"
11 #include "colormodels.h"
12 #include "funcprotos.h"
13 #include "quicktime.h"
14 #include "workarounds.h"
15 #include ENCORE_INCLUDE
16 #include DECORE_INCLUDE
17
18
19
20 #include <pthread.h>
21 #include <stdint.h>
22 #include <stdlib.h>
23
24 #define FRAME_RATE_BASE 10000
25
26
27 typedef struct
28 {
29 #define FIELDS 2
30 int decode_initialized[FIELDS];
31
32
33 // FFMpeg internals
34 AVCodec *decoder[FIELDS];
35 AVCodecContext *decoder_context[FIELDS];
36 AVFrame picture[FIELDS];
37
38
39 // Decore internals
40 DEC_PARAM dec_param[FIELDS];
41 int decode_handle[FIELDS];
42
43 // Last frame decoded
44 long last_frame[FIELDS];
45
46 int got_key[FIELDS];
47
48
49
50
51
52
53
54
55
56
57 int encode_initialized[FIELDS];
58 // Information for picking the right library routines.
59 // ID out of avcodec.h for the codec used.
60 // Invalid if encore50 is used.
61 int ffmpeg_id;
62 // True if encore50 is being used.
63 int use_encore;
64
65 // FFMpeg internals
66 AVCodec *encoder[FIELDS];
67 AVCodecContext *encoder_context[FIELDS];
68
69
70 // Encore internals
71 int encode_handle[FIELDS];
72 ENC_PARAM enc_param[FIELDS];
73 // Must count pframes in VBR
74 int p_count[FIELDS];
75
76
77 // Encoding parameters
78 int bitrate;
79 // For heroine 60 encoding, we want different streams for each field.
80 int total_fields;
81 long rc_period; // the intended rate control averaging period
82 long rc_reaction_period; // the reation period for rate control
83 long rc_reaction_ratio; // the ratio for down/up rate control
84 long max_key_interval; // the maximum interval between key frames
85 int bitrate_tolerance;
86 int interlaced;
87 int gop_size;
88 int max_quantizer; // the upper limit of the quantizer
89 int min_quantizer; // the lower limit of the quantizer
90 int quantizer; // For vbr
91 int quality; // the forward search range for motion estimation
92 int fix_bitrate;
93 int use_deblocking;
94
95
96 // Temporary storage for color conversions
97 char *temp_frame;
98 // Storage of compressed data
99 unsigned char *work_buffer;
100 // Allocation of work_buffer
101 int buffer_size;
102 } quicktime_mpeg4_codec_t;
103
104 int ffmpeg_initialized = 0;
105 pthread_mutex_t ffmpeg_lock = PTHREAD_MUTEX_INITIALIZER;
106
107
108 // Decore needs the user to specify handles
109 static int decode_handle = 1;
110 static int encode_handle = 0;
111
112
113
114
115
116
117
118
119
120 // Utilities for programs wishing to parse MPEG-4
121
122
123 // Determine of the compressed frame is a keyframe for direct copy
124 int quicktime_mpeg4_is_key(unsigned char *data, long size, char *codec_id)
125 {
126 int result = 0;
127 int i;
128
129 if(quicktime_match_32(codec_id, QUICKTIME_DIVX) ||
130 quicktime_match_32(codec_id, QUICKTIME_HV60))
131 {
132 for(i = 0; i < size - 5; i++)
133 {
134 if( data[i] == 0x00 &&
135 data[i + 1] == 0x00 &&
136 data[i + 2] == 0x01 &&
137 data[i + 3] == 0xb6)
138 {
139 if((data[i + 4] & 0xc0) == 0x0)
140 return 1;
141 else
142 return 0;
143 }
144 }
145 }
146 return result;
147 }
148
149
150 // Test for VOL header in frame
151 int quicktime_mpeg4_has_vol(unsigned char *data)
152 {
153 if( data[0] == 0x00 &&
154 data[1] == 0x00 &&
155 data[2] == 0x01 &&
156 data[3] == 0x00 &&
157 data[4] == 0x00 &&
158 data[5] == 0x00 &&
159 data[6] == 0x01 &&
160 data[7] == 0x20)
161 return 1;
162 else
163 return 0;
164 }
165
166
167
168
169 static void putbits(unsigned char **data,
170 int *bit_pos,
171 uint64_t *bit_store,
172 int *total,
173 int count,
174 uint64_t value)
175 {
176 value &= 0xffffffffffffffff >> (64 - count);
177
178 while(64 - *bit_pos < count)
179 {
180 *(*data)++ = (*bit_store) >> 56;
181 (*bit_store) <<= 8;
182 (*bit_pos) -= 8;
183 }
184
185 (*bit_store) |= value << (64 - count - *bit_pos);
186 (*bit_pos) += count;
187 (*total) += count;
188 }
189
190
191 static void flushbits(unsigned char **data,
192 int *bit_pos,
193 uint64_t *bit_store)
194 {
195 //printf("flushbits %llx\n", (*bit_store));
196 while((*bit_pos) > 0)
197 {
198 *(*data)++ = (*bit_store) >> 56;
199 (*bit_store) <<= 8;
200 (*bit_pos) -= 8;
201 }
202 }
203
204
205
206
207 #define VO_START_CODE 0x8
208 #define VO_START_CODE_LENGTH 27
209 #define VOL_START_CODE 0x12 /* 25-MAR-97 JDL : according to WD2 */
210 #define VOL_START_CODE_LENGTH 28
211
212
213
214 int quicktime_mpeg4_write_vol(unsigned char *data_start,
215 int vol_width,
216 int vol_height,
217 int time_increment_resolution,
218 double frame_rate)
219 {
220 int written = 0;
221 int bits, fixed_vop_time_increment;
222 unsigned char *data = data_start;
223 int bit_pos;
224 uint64_t bit_store;
225 int i, j;
226
227 bit_store = 0;
228 bit_pos = 0;
229 vol_width = (int)((float)vol_width / 16 + 0.5) * 16;
230 vol_height = (int)((float)vol_height / 16 + 0.5) * 16;
231
232
233 putbits(&data,
234 &bit_pos,
235 &bit_store,
236 &written,
237 VO_START_CODE_LENGTH, VO_START_CODE);
238 putbits(&data,
239 &bit_pos,
240 &bit_store,
241 &written,
242 5, 0); /* vo_id = 0 */
243
244 putbits(&data,
245 &bit_pos,
246 &bit_store,
247 &written,
248 VOL_START_CODE_LENGTH, VOL_START_CODE);
249
250
251
252
253 putbits(&data,
254 &bit_pos,
255 &bit_store,
256 &written,
257 4, 0); /* vol_id = 0 */
258
259 putbits(&data,
260 &bit_pos,
261 &bit_store,
262 &written,
263 1, 0); /* random_accessible_vol = 0 */
264 putbits(&data,
265 &bit_pos,
266 &bit_store,
267 &written,
268 8, 1); /* video_object_type_indication = 1 video */
269 putbits(&data,
270 &bit_pos,
271 &bit_store,
272 &written,
273 1, 1); /* is_object_layer_identifier = 1 */
274 putbits(&data,
275 &bit_pos,
276 &bit_store,
277 &written,
278 4, 2); /* visual_object_layer_ver_id = 2 */
279 putbits(&data,
280 &bit_pos,
281 &bit_store,
282 &written,
283 3, 1); /* visual_object_layer_priority = 1 */
284 putbits(&data,
285 &bit_pos,
286 &bit_store,
287 &written,
288 4, 1); /* aspect_ratio_info = 1 */
289
290
291
292
293
294
295
296 putbits(&data,
297 &bit_pos,
298 &bit_store,
299 &written,
300 1, 0); /* vol_control_parameter = 0 */
301 putbits(&data,
302 &bit_pos,
303 &bit_store,
304 &written,
305 2, 0); /* vol_shape = 0 rectangular */
306 putbits(&data,
307 &bit_pos,
308 &bit_store,
309 &written,
310 1, 1); /* marker */
311
312
313
314
315
316
317
318 putbits(&data,
319 &bit_pos,
320 &bit_store,
321 &written,
322 16, time_increment_resolution);
323 putbits(&data,
324 &bit_pos,
325 &bit_store,
326 &written,
327 1, 1); /* marker */
328 putbits(&data,
329 &bit_pos,
330 &bit_store,
331 &written,
332 1, 1); /* fixed_vop_rate = 1 */
333
334
335 bits = 1;
336 while((1 << bits) < time_increment_resolution) bits++;
337
338 // Log calculation fails for some reason
339 // bits = (int)ceil(log((double)time_increment_resolution) / log(2.0));
340 // if (bits < 1) bits=1;
341
342 fixed_vop_time_increment =
343 (int)(time_increment_resolution / frame_rate + 0.1);
344
345 putbits(&data,
346 &bit_pos,
347 &bit_store,
348 &written,
349 bits, fixed_vop_time_increment);
350
351 putbits(&data,
352 &bit_pos,
353 &bit_store,
354 &written,
355 1, 1); /* marker */
356
357 putbits(&data,
358 &bit_pos,
359 &bit_store,
360 &written,
361 13, vol_width);
362 putbits(&data,
363 &bit_pos,
364 &bit_store,
365 &written,
366 1, 1); /* marker */
367 putbits(&data,
368 &bit_pos,
369 &bit_store,
370 &written,
371 13, vol_height);
372 putbits(&data,
373 &bit_pos,
374 &bit_store,
375 &written,
376 1, 1); /* marker */
377
378 putbits(&data,
379 &bit_pos,
380 &bit_store,
381 &written,
382 1, 0); /* interlaced = 0 */
383 putbits(&data,
384 &bit_pos,
385 &bit_store,
386 &written,
387 1, 1); /* OBMC_disabled = 1 */
388 putbits(&data,
389 &bit_pos,
390 &bit_store,
391 &written,
392 2, 0); /* vol_sprite_usage = 0 */
393 putbits(&data,
394 &bit_pos,
395 &bit_store,
396 &written,
397 1, 0); /* not_8_bit = 0 */
398
399 putbits(&data,
400 &bit_pos,
401 &bit_store,
402 &written,
403 1, 0); /* vol_quant_type = 0 */
404 putbits(&data,
405 &bit_pos,
406 &bit_store,
407 &written,
408 1, 0); /* vol_quarter_pixel = 0 */
409 putbits(&data,
410 &bit_pos,
411 &bit_store,
412 &written,
413 1, 1); /* complexity_estimation_disabled = 1 */
414 putbits(&data,
415 &bit_pos,
416 &bit_store,
417 &written,
418 1, 1); /* resync_marker_disabled = 1 */
419 putbits(&data,
420 &bit_pos,
421 &bit_store,
422 &written,
423 1, 0); /* data_partitioning_enabled = 0 */
424 putbits(&data,
425 &bit_pos,
426 &bit_store,
427 &written,
428 1, 0); /* scalability = 0 */
429
430 flushbits(&data,
431 &bit_pos,
432 &bit_store);
433
434
435
436 /*
437 * for(i = 0; i < data - data_start; i++)
438 * for(j = 0x80; j >= 1; j /= 2)
439 * printf("%d", (data_start[i] & j) ? 1 : 0);
440 * printf("\n");
441 */
442
443
444
445 return data - data_start;
446 }
447
448
449
450
451
452
453
454 // Mpeg-4 interface
455
456 static int reads_colormodel(quicktime_t *file,
457 int colormodel,
458 int track)
459 {
460 return (colormodel == BC_YUV420P);
461 }
462
463 static int writes_colormodel(quicktime_t *file,
464 int colormodel,
465 int track)
466 {
467 return (colormodel == BC_RGB888 ||
468 colormodel == BC_RGBA8888 ||
469 colormodel == BC_RGB161616 ||
470 colormodel == BC_RGBA16161616 ||
471 colormodel == BC_YUV888 ||
472 colormodel == BC_YUVA8888 ||
473 colormodel == BC_YUV161616 ||
474 colormodel == BC_YUVA16161616 ||
475 colormodel == BC_YUV420P ||
476 colormodel == BC_YUV422 ||
477 colormodel == BC_COMPRESSED);
478 }
479
480
481 static int delete_decoder(quicktime_mpeg4_codec_t *codec, int field)
482 {
483 if(codec->decode_initialized[field])
484 {
485 pthread_mutex_lock(&ffmpeg_lock);
486
487 avcodec_close(codec->decoder_context[field]);
488 free(codec->decoder_context[field]);
489
490 pthread_mutex_unlock(&ffmpeg_lock);
491 codec->decode_initialized[field] = 0;
492 }
493 }
494
495
496 static int init_decode(quicktime_mpeg4_codec_t *codec,
497 int current_field,
498 int width_i,
499 int height_i)
500 {
501
502 if(!ffmpeg_initialized)
503 {
504 ffmpeg_initialized = 1;
505 avcodec_init();
506 avcodec_register_all();
507 }
508
509
510 codec->decoder[current_field] = avcodec_find_decoder(codec->ffmpeg_id);
511 if(!codec->decoder[current_field])
512 {
513 printf("init_decode: avcodec_find_decoder returned NULL.\n");
514 return 1;
515 }
516
517 codec->decoder_context[current_field] = avcodec_alloc_context();
518 codec->decoder_context[current_field]->width = width_i;
519 codec->decoder_context[current_field]->height = height_i;
520 if(avcodec_open(codec->decoder_context[current_field],
521 codec->decoder[current_field]) < 0)
522 {
523 printf("init_decode: avcodec_open failed.\n");
524 }
525 return 0;
526 }
527
528
529
530 static int decode_wrapper(quicktime_t *file,
531 quicktime_video_map_t *vtrack,
532 quicktime_mpeg4_codec_t *codec,
533 int frame_number,
534 int current_field,
535 int track)
536 {
537 int got_picture = 0;
538 int result = 0;
539 int bytes;
540 char *compressor = vtrack->track->mdia.minf.stbl.stsd.table[0].format;
541 quicktime_trak_t *trak = vtrack->track;
542 int width = trak->tkhd.track_width;
543 int height = trak->tkhd.track_height;
544 int width_i = (int)((float)width / 16 + 0.5) * 16;
545 int height_i = (int)((float)height / 16 + 0.5) * 16;
546
547 //printf("decode_wrapper 1\n");
548 quicktime_set_video_position(file, frame_number, track);
549
550 bytes = quicktime_frame_size(file, frame_number, track);
551
552 if(!codec->work_buffer || codec->buffer_size < bytes)
553 {
554 if(codec->work_buffer) free(codec->work_buffer);
555 codec->buffer_size = bytes;
556 codec->work_buffer = calloc(1, codec->buffer_size + 100);
557 }
558
559 //printf("decode_wrapper 1 %d %llx %x\n", codec->ffmpeg_id, quicktime_position(file), bytes);
560 if(!quicktime_read_data(file,
561 codec->work_buffer,
562 bytes))
563 result = -1;
564
565
566 if(!result)
567 {
568 /*
569 * if(!codec->got_key[current_field])
570 * {
571 * if(!quicktime_mpeg4_is_key(codec->work_buffer, bytes, compressor))
572 * return -1;
573 * else
574 * {
575 * codec->got_key[current_field] = 1;
576 * }
577 * }
578 */
579
580 //printf("decode_wrapper 2 %d\n", frame_number);
581
582 // No way to determine if there was an error based on nonzero status.
583 // Need to test row pointers to determine if an error occurred.
584 result = avcodec_decode_video(codec->decoder_context[current_field],
585 &codec->picture[current_field],
586 &got_picture,
587 codec->work_buffer,
588 bytes);
589 //printf("decode_wrapper 3\n");
590 if(codec->picture[current_field].data[0])
591 {
592 if(!codec->got_key[current_field])
593 {
594 codec->got_key[current_field] = 1;
595 }
596 result = 0;
597 }
598 else
599 {
600 // ffmpeg can't recover if the first frame errored out, like in a direct copy
601 // sequence.
602 /*
603 * delete_decoder(codec, current_field);
604 * init_decode(codec, current_field, width_i, height_i);
605 */
606 result = 1;
607 }
608
609 #ifdef ARCH_X86
610 asm("emms");
611 #endif
612 }
613 //printf("decode_wrapper 4\n");
614
615 return result;
616 }
617
618 static int decode(quicktime_t *file, unsigned char **row_pointers, int track)
619 {
620 int i;
621 int result = 0;
622 quicktime_video_map_t *vtrack = &(file->vtracks[track]);
623 quicktime_trak_t *trak = vtrack->track;
624 quicktime_mpeg4_codec_t *codec = ((quicktime_codec_t*)vtrack->codec)->priv;
625 int width = trak->tkhd.track_width;
626 int height = trak->tkhd.track_height;
627 int width_i = (int)((float)width / 16 + 0.5) * 16;
628 int height_i = (int)((float)height / 16 + 0.5) * 16;
629 int use_temp = 0;
630 int input_cmodel;
631 int current_field = vtrack->current_position % codec->total_fields;
632 unsigned char **input_rows;
633 int seeking_done = 0;
634
635
636 pthread_mutex_lock(&ffmpeg_lock);
637
638
639 if(!codec->decode_initialized[current_field])
640 {
641 init_decode(codec, current_field, width_i, height_i);
642 // Must decode frame with VOL header first but only the first frame in the
643 // field sequence has a VOL header.
644 result = decode_wrapper(file,
645 vtrack,
646 codec,
647 current_field,
648 current_field,
649 track);
650 codec->decode_initialized[current_field] = 1;
651 }
652 //printf("decode 1\n");
653
654 // Handle seeking
655 if(quicktime_has_keyframes(file, track) &&
656 vtrack->current_position != codec->last_frame[current_field] + codec->total_fields)
657 {
658 int frame1, frame2 = vtrack->current_position, current_frame = frame2;
659 int do_i_frame = 1;
660 //printf("decode 2\n");
661
662 // Get first keyframe of same field
663 do
664 {
665 frame1 = quicktime_get_keyframe_before(file,
666 current_frame--,
667 track);
668 }while(frame1 > 0 && (frame1 % codec->total_fields) != current_field);
669 //printf("decode 3\n");
670
671 // Keyframe is before last decoded frame and current frame is after last decoded
672 // frame, so instead of rerendering from the last keyframe we can rerender from
673 // the last decoded frame.
674 if(frame1 < codec->last_frame[current_field] &&
675 frame2 > codec->last_frame[current_field])
676 {
677 //printf("decode 1 %d %d\n", frame1, frame2);
678 frame1 = codec->last_frame[current_field] + codec->total_fields;
679 do_i_frame = 0;
680 }
681 //printf("decode 4\n");
682
683 while(frame1 <= frame2)
684 {
685 result = decode_wrapper(file,
686 vtrack,
687 codec,
688 frame1,
689 current_field,
690 track);
691
692
693 // May need to do the first I frame twice.
694 if(do_i_frame)
695 {
696 result = decode_wrapper(file,
697 vtrack,
698 codec,
699 frame1,
700 current_field,
701 track);
702 do_i_frame = 0;
703 }
704 frame1 += codec->total_fields;
705 }
706 //printf("decode 5\n");
707
708 vtrack->current_position = frame2;
709 seeking_done = 1;
710 }
711 //printf("decode 6\n");
712
713 if(!seeking_done)
714 {
715 result = decode_wrapper(file,
716 vtrack,
717 codec,
718 vtrack->current_position,
719 current_field,
720 track);
721 }
722 pthread_mutex_unlock(&ffmpeg_lock);
723 //printf("decode 10\n");
724
725
726 codec->last_frame[current_field] = vtrack->current_position;
727
728
729
730
731
732
733
734
735
736 // result = (result != 0);
737 switch(codec->decoder_context[current_field]->pix_fmt)
738 {
739 case PIX_FMT_YUV420P:
740 input_cmodel = BC_YUV420P;
741 break;
742 case PIX_FMT_YUV422:
743 input_cmodel = BC_YUV422;
744 break;
745 case PIX_FMT_YUV422P:
746 input_cmodel = BC_YUV422P;
747 break;
748 }
749
750
751 //printf("decode 20 %d %p\n", result, codec->picture[current_field].data[0]);
752 if(codec->picture[current_field].data[0])
753 {
754 int y_out_size = codec->decoder_context[current_field]->width *
755 codec->decoder_context[current_field]->height;
756 int u_out_size = codec->decoder_context[current_field]->width *
757 codec->decoder_context[current_field]->height /
758 4;
759 int v_out_size = codec->decoder_context[current_field]->width *
760 codec->decoder_context[current_field]->height /
761 4;
762 int y_in_size = codec->picture[current_field].linesize[0] *
763 codec->decoder_context[current_field]->height;
764 int u_in_size = codec->picture[current_field].linesize[1] *
765 codec->decoder_context[current_field]->height /
766 4;
767 int v_in_size = codec->picture[current_field].linesize[2] *
768 codec->decoder_context[current_field]->height /
769 4;
770 input_rows =
771 malloc(sizeof(unsigned char*) *
772 codec->decoder_context[current_field]->height);
773
774 for(i = 0; i < codec->decoder_context[current_field]->height; i++)
775 input_rows[i] = codec->picture[current_field].data[0] +
776 i *
777 codec->decoder_context[current_field]->width *
778 cmodel_calculate_pixelsize(input_cmodel);
779
780 if(!codec->temp_frame)
781 {
782 codec->temp_frame = malloc(y_out_size +
783 u_out_size +
784 v_out_size);
785 }
786
787 if(codec->picture[current_field].data[0])
788
789 for(i = 0; i < codec->decoder_context[current_field]->height; i++)
790 {
791 memcpy(codec->temp_frame + i * codec->decoder_context[current_field]->width,
792 codec->picture[current_field].data[0] + i * codec->picture[current_field].linesize[0],
793 codec->decoder_context[current_field]->width);
794 }
795
796 for(i = 0; i < codec->decoder_context[current_field]->height; i += 2)
797 {
798 memcpy(codec->temp_frame +
799 y_out_size +
800 i / 2 *
801 codec->decoder_context[current_field]->width / 2,
802 codec->picture[current_field].data[1] +
803 i / 2 *
804 codec->picture[current_field].linesize[1],
805 codec->decoder_context[current_field]->width / 2);
806
807 memcpy(codec->temp_frame +
808 y_out_size +
809 u_out_size +
810 i / 2 *
811 codec->decoder_context[current_field]->width / 2,
812 codec->picture[current_field].data[2] +
813 i / 2 *
814 codec->picture[current_field].linesize[2],
815 codec->decoder_context[current_field]->width / 2);
816 }
817
818 cmodel_transfer(row_pointers, /* Leave NULL if non existent */
819 input_rows,
820 row_pointers[0], /* Leave NULL if non existent */
821 row_pointers[1],
822 row_pointers[2],
823 codec->temp_frame, /* Leave NULL if non existent */
824 codec->temp_frame + y_out_size,
825 codec->temp_frame + y_out_size + u_out_size,
826 file->in_x, /* Dimensions to capture from input frame */
827 file->in_y,
828 file->in_w,
829 file->in_h,
830 0, /* Dimensions to project on output frame */
831 0,
832 file->out_w,
833 file->out_h,
834 input_cmodel,
835 file->color_model,
836 0, /* When transfering BC_RGBA8888 to non-alpha this is the background color in 0xRRGGBB hex */
837 codec->decoder_context[current_field]->width, /* For planar use the luma rowspan */
838 width);
839 free(input_rows);
840 }
841
842
843 //printf("decode 100\n");
844
845
846
847 return result;
848 }
849
850
851 static int encode(quicktime_t *file, unsigned char **row_pointers, int track)
852 {
853 int64_t offset = quicktime_position(file);
854 quicktime_video_map_t *vtrack = &(file->vtracks[track]);
855 quicktime_mpeg4_codec_t *codec = ((quicktime_codec_t*)vtrack->codec)->priv;
856 quicktime_trak_t *trak = vtrack->track;
857 int width = trak->tkhd.track_width;
858 int height = trak->tkhd.track_height;
859 int width_i = (int)((float)width / 16 + 0.5) * 16;
860 int height_i = (int)((float)height / 16 + 0.5) * 16;
861 int result = 0;
862 int i;
863 int bytes = 0;
864 int is_keyframe = 0;
865 int current_field = vtrack->current_position % codec->total_fields;
866 quicktime_atom_t chunk_atom;
867
868
869 //printf("encode 1\n");
870
871
872
873 pthread_mutex_lock(&ffmpeg_lock);
874
875
876
877 if(!codec->encode_initialized[current_field])
878 {
879 // Encore section
880 if(codec->ffmpeg_id == CODEC_ID_MPEG4)
881 {
882 codec->use_encore = 1;
883 codec->encode_initialized[current_field] = 1;
884 codec->encode_handle[current_field] = encode_handle++;
885 codec->enc_param[current_field].x_dim = width_i;
886 codec->enc_param[current_field].y_dim = height_i;
887 codec->enc_param[current_field].framerate =
888 quicktime_frame_rate(file, track) / codec->total_fields;
889 codec->enc_param[current_field].bitrate =
890 codec->bitrate / codec->total_fields;
891 codec->enc_param[current_field].rc_period = codec->rc_period;
892 codec->enc_param[current_field].rc_reaction_period = codec->rc_reaction_period;
893 codec->enc_param[current_field].rc_reaction_ratio = codec->rc_reaction_ratio;
894 codec->enc_param[current_field].max_quantizer = codec->max_quantizer;
895 codec->enc_param[current_field].min_quantizer = codec->min_quantizer;
896 codec->enc_param[current_field].max_key_interval = codec->max_key_interval;
897
898 codec->enc_param[current_field].search_range = codec->quality * 3;
899 if(codec->enc_param[current_field].search_range > 15)
900 codec->enc_param[current_field].search_range = 15;
901
902 encore(codec->encode_handle[current_field],
903 ENC_OPT_INIT,
904 &codec->enc_param[current_field], NULL);
905
906 }
907 else
908 // ffmpeg section
909 {
910 static char *video_rc_eq="tex^qComp";
911 codec->encode_initialized[current_field] = 1;
912 if(!ffmpeg_initialized)
913 {
914 ffmpeg_initialized = 1;
915 avcodec_init();
916 avcodec_register_all();
917 }
918
919 codec->encoder[current_field] = avcodec_find_encoder(codec->ffmpeg_id);
920 if(!codec->encoder[current_field])
921 {
922 printf("encode: avcodec_find_encoder returned NULL.\n");
923 pthread_mutex_unlock(&ffmpeg_lock);
924 return 1;
925 }
926
927 codec->encoder_context[current_field] = avcodec_alloc_context();
928 codec->encoder_context[current_field]->frame_rate = FRAME_RATE_BASE *
929 quicktime_frame_rate(file, track);
930 codec->encoder_context[current_field]->width = width_i;
931 codec->encoder_context[current_field]->height = height_i;
932 codec->encoder_context[current_field]->gop_size = codec->gop_size;
933 codec->encoder_context[current_field]->pix_fmt = PIX_FMT_YUV420P;
934 codec->encoder_context[current_field]->bit_rate = codec->bitrate;
935 codec->encoder_context[current_field]->bit_rate_tolerance = codec->bitrate_tolerance;
936 codec->encoder_context[current_field]->rc_eq = video_rc_eq;
937 codec->encoder_context[current_field]->qmin = 2;
938 codec->encoder_context[current_field]->qmax = 31;
939 codec->encoder_context[current_field]->max_qdiff = 3;
940 codec->encoder_context[current_field]->qblur = 0.5;
941 codec->encoder_context[current_field]->qcompress = 0.5;
942 codec->encoder_context[current_field]->me_method = ME_FULL;
943
944 printf("encode %d %d %d %d %d\n", codec->gop_size, codec->bitrate, codec->bitrate_tolerance, codec->fix_bitrate, codec->interlaced);
945
946
947 if(!codec->fix_bitrate)
948 {
949 codec->encoder_context[current_field]->flags |= CODEC_FLAG_QSCALE;
950 }
951
952 if(codec->interlaced)
953 {
954 codec->encoder_context[current_field]->flags |= CODEC_FLAG_INTERLACED_DCT;
955 }
956
957 avcodec_open(codec->encoder_context[current_field], codec->encoder[current_field]);
958
959 }
960 }
961
962
963 if(!codec->work_buffer)
964 {
965 codec->buffer_size = width_i * height_i;
966 codec->work_buffer = malloc(codec->buffer_size);
967 }
968
969
970
971 // Encore section
972 if(codec->use_encore)
973 {
974 // Encore section
975 ENC_FRAME encore_input;
976 ENC_RESULT encore_result;
977
978
979 // Assume planes are contiguous.
980 // Encode directly from function arguments
981 if(file->color_model == BC_YUV420P &&
982 width == width_i &&
983 height == height_i)
984 {
985 encore_input.image = row_pointers[0];
986 }
987 // Convert to YUV420P
988 // Encode from temporary.
989 else
990 {
991 if(!codec->temp_frame)
992 {
993 codec->temp_frame = malloc(width_i * height_i * 3 / 2);
994 }
995
996 cmodel_transfer(0, /* Leave NULL if non existent */
997 row_pointers,
998 codec->temp_frame, /* Leave NULL if non existent */
999 codec->temp_frame + width_i * height_i,
1000 codec->temp_frame + width_i * height_i + width_i * height_i / 4,
1001 row_pointers[0], /* Leave NULL if non existent */
1002 row_pointers[1],
1003 row_pointers[2],
1004 0, /* Dimensions to capture from input frame */
1005 0,
1006 width,
1007 height,
1008 0, /* Dimensions to project on output frame */
1009 0,
1010 width,
1011 height,
1012 file->color_model,
1013 BC_YUV420P,
1014 0, /* When transfering BC_RGBA8888 to non-alpha this is the background color in 0xRRGGBB hex */
1015 width, /* For planar use the luma rowspan */
1016 width_i);
1017
1018
1019 encore_input.image = codec->temp_frame;
1020 }
1021
1022
1023
1024 bzero(codec->work_buffer, codec->buffer_size);
1025 encore_input.bitstream = codec->work_buffer;
1026 encore_input.length = 0;
1027 encore_input.quant = !codec->fix_bitrate ? codec->quantizer : 0;
1028
1029 if(codec->p_count == 0)
1030 {
1031 codec->p_count[current_field]++;
1032 }
1033 else
1034 {
1035 codec->p_count[current_field]++;
1036 if(codec->p_count[current_field] >= codec->max_key_interval)
1037 codec->p_count[current_field] = 0;
1038 }
1039
1040 encore(codec->encode_handle[current_field],
1041 0,
1042 &encore_input,
1043 &encore_result);
1044
1045 bytes = encore_input.length;
1046 is_keyframe = encore_result.isKeyFrame;
1047 }
1048 else
1049 // ffmpeg section
1050 {
1051 AVFrame pict_tmp;
1052
1053 if(width_i == width &&
1054 height_i == height &&
1055 file->color_model == BC_YUV420P)
1056 {
1057 pict_tmp.data[0] = row_pointers[0];
1058 pict_tmp.data[1] = row_pointers[1];
1059 pict_tmp.data[2] = row_pointers[2];
1060 pict_tmp.linesize[0] = width_i;
1061 pict_tmp.linesize[1] = width_i / 2;
1062 pict_tmp.linesize[2] = width_i / 2;
1063 }
1064 else
1065 {
1066 if(!codec->temp_frame)
1067 {
1068 codec->temp_frame = malloc(width_i * height_i * 3 / 2);
1069 }
1070
1071 cmodel_transfer(0, /* Leave NULL if non existent */
1072 row_pointers,
1073 codec->temp_frame, /* Leave NULL if non existent */
1074 codec->temp_frame + width_i * height_i,
1075 codec->temp_frame + width_i * height_i + width_i * height_i / 4,
1076 row_pointers[0], /* Leave NULL if non existent */
1077 row_pointers[1],
1078 row_pointers[2],
1079 0, /* Dimensions to capture from input frame */
1080 0,
1081 width,
1082 height,
1083 0, /* Dimensions to project on output frame */
1084 0,
1085 width,
1086 height,
1087 file->color_model,
1088 BC_YUV420P,
1089 0, /* When transfering BC_RGBA8888 to non-alpha this is the background color in 0xRRGGBB hex */
1090 width, /* For planar use the luma rowspan */
1091 width_i);
1092
1093 pict_tmp.data[0] = codec->temp_frame;
1094 pict_tmp.data[1] = codec->temp_frame + width_i * height_i;
1095 pict_tmp.data[2] = codec->temp_frame + width_i * height_i + width_i * height_i / 4;
1096 pict_tmp.linesize[0] = width_i;
1097 pict_tmp.linesize[1] = width_i / 2;
1098 pict_tmp.linesize[2] = width_i / 2;
1099 }
1100
1101
1102 if(codec->quantizer >= 0)
1103 pict_tmp.quality = codec->quantizer;
1104 bytes = avcodec_encode_video(codec->encoder_context[current_field],
1105 codec->work_buffer,
1106 codec->buffer_size,
1107 &pict_tmp);
1108 is_keyframe = pict_tmp.key_frame;
1109 }
1110
1111
1112
1113
1114
1115
1116 pthread_mutex_unlock(&ffmpeg_lock);
1117 quicktime_write_chunk_header(file, trak, &chunk_atom);
1118 result = !quicktime_write_data(file,
1119 codec->work_buffer,
1120 bytes);
1121 quicktime_write_chunk_footer(file,
1122 trak,
1123 vtrack->current_chunk,
1124 &chunk_atom,
1125 1);
1126 if(is_keyframe)
1127 quicktime_insert_keyframe(file,
1128 vtrack->current_position,
1129 track);
1130 //printf("encode 10\n");
1131
1132 vtrack->current_chunk++;
1133 return result;
1134 }
1135
1136
1137
1138
1139
1140
1141
1142 static int set_parameter(quicktime_t *file,
1143 int track,
1144 char *key,
1145 void *value)
1146 {
1147 quicktime_video_map_t *vtrack = &(file->vtracks[track]);
1148 char *compressor = vtrack->track->mdia.minf.stbl.stsd.table[0].format;
1149
1150 if(quicktime_match_32(compressor, QUICKTIME_DIVX) ||
1151 quicktime_match_32(compressor, QUICKTIME_HV60))
1152 {
1153 quicktime_mpeg4_codec_t *codec = ((quicktime_codec_t*)vtrack->codec)->priv;
1154
1155 if(!strcasecmp(key, "divx_bitrate"))
1156 codec->bitrate = *(int*)value;
1157 else
1158 if(!strcasecmp(key, "divx_rc_period"))
1159 codec->rc_period = *(int*)value;
1160 else
1161 if(!strcasecmp(key, "divx_rc_reaction_ratio"))
1162 codec->rc_reaction_ratio = *(int*)value;
1163 else
1164 if(!strcasecmp(key, "divx_rc_reaction_period"))
1165 codec->rc_reaction_period = *(int*)value;
1166 else
1167 if(!strcasecmp(key, "divx_max_key_interval"))
1168 codec->max_key_interval = *(int*)value;
1169 else
1170 if(!strcasecmp(key, "divx_max_quantizer"))
1171 codec->max_quantizer = *(int*)value;
1172 else
1173 if(!strcasecmp(key, "divx_min_quantizer"))
1174 codec->min_quantizer = *(int*)value;
1175 else
1176 if(!strcasecmp(key, "divx_quantizer"))
1177 codec->quantizer = *(int*)value;
1178 else
1179 if(!strcasecmp(key, "divx_quality"))
1180 codec->quality = *(int*)value;
1181 else
1182 if(!strcasecmp(key, "divx_fix_bitrate"))
1183 codec->fix_bitrate = *(int*)value;
1184 else
1185 if(!strcasecmp(key, "divx_use_deblocking"))
1186 codec->use_deblocking = *(int*)value;
1187 }
1188 else
1189 if(quicktime_match_32(compressor, QUICKTIME_DIV3))
1190 {
1191 quicktime_mpeg4_codec_t *codec = ((quicktime_codec_t*)vtrack->codec)->priv;
1192 if(!strcasecmp(key, "div3_bitrate"))
1193 codec->bitrate = *(int*)value;
1194 else
1195 if(!strcasecmp(key, "div3_bitrate_tolerance"))
1196 codec->bitrate_tolerance = *(int*)value;
1197 else
1198 if(!strcasecmp(key, "div3_interlaced"))
1199 codec->interlaced = *(int*)value;
1200 else
1201 if(!strcasecmp(key, "div3_gop_size"))
1202 codec->gop_size = *(int*)value;
1203 else
1204 if(!strcasecmp(key, "div3_quantizer"))
1205 codec->quantizer = *(int*)value;
1206 else
1207 if(!strcasecmp(key, "div3_fix_bitrate"))
1208 codec->fix_bitrate = *(int*)value;
1209 }
1210 return 0;
1211 }
1212
1213
1214
1215 static int delete_codec(quicktime_video_map_t *vtrack)
1216 {
1217 quicktime_mpeg4_codec_t *codec;
1218 int i;
1219
1220
1221 codec = ((quicktime_codec_t*)vtrack->codec)->priv;
1222 for(i = 0; i < codec->total_fields; i++)
1223 {
1224 if(codec->encode_initialized[i])
1225 {
1226 pthread_mutex_lock(&ffmpeg_lock);
1227 if(codec->use_encore)
1228 {
1229 encore(codec->encode_handle[i],
1230 ENC_OPT_RELEASE,
1231 0,
1232 0);
1233 }
1234 else
1235 {
1236 avcodec_close(codec->encoder_context[i]);
1237 free(codec->encoder_context[i]);
1238 }
1239 pthread_mutex_unlock(&ffmpeg_lock);
1240 }
1241 delete_decoder(codec, i);
1242 }
1243
1244
1245 if(codec->temp_frame) free(codec->temp_frame);
1246 if(codec->work_buffer) free(codec->work_buffer);
1247
1248
1249 free(codec);
1250 return 0;
1251 }
1252
1253
1254
1255
1256 static quicktime_mpeg4_codec_t* init_common(quicktime_video_map_t *vtrack,
1257 char *compressor,
1258 char *title,
1259 char *description)
1260 {
1261 quicktime_codec_t *codec_base = (quicktime_codec_t*)vtrack->codec;
1262 quicktime_mpeg4_codec_t *codec;
1263
1264 codec_base->priv = calloc(1, sizeof(quicktime_mpeg4_codec_t));
1265 codec_base->delete_vcodec = delete_codec;
1266 codec_base->decode_video = decode;
1267 codec_base->encode_video = encode;
1268 codec_base->reads_colormodel = reads_colormodel;
1269 codec_base->writes_colormodel = writes_colormodel;
1270 codec_base->set_parameter = set_parameter;
1271 codec_base->fourcc = compressor;
1272 codec_base->title = title;
1273 codec_base->desc = description;
1274
1275 codec = (quicktime_mpeg4_codec_t*)codec_base->priv;
1276
1277
1278
1279 // Set defaults
1280 codec->bitrate = 1000000;
1281 codec->rc_period = 50;
1282 codec->rc_reaction_ratio = 45;
1283 codec->rc_reaction_period = 10;
1284 codec->max_key_interval = 45;
1285 codec->max_quantizer = 31;
1286 codec->min_quantizer = 1;
1287 codec->quantizer = 10;
1288 codec->quality = 5;
1289 codec->fix_bitrate = 1;
1290 codec->total_fields = 1;
1291
1292
1293
1294 return codec;
1295 }
1296
1297
1298
1299
1300 // Mike Rowe Soft MPEG-4
1301 void quicktime_init_codec_div3(quicktime_video_map_t *vtrack)
1302 {
1303 quicktime_mpeg4_codec_t *result = init_common(vtrack,
1304 QUICKTIME_DIV3,
1305 "DIVX",
1306 "Mike Row Soft MPEG4 Version 3");
1307 result->ffmpeg_id = CODEC_ID_MSMPEG4V3;
1308 }
1309
1310 // Mike Rowe Soft MPEG-4
1311 void quicktime_init_codec_div3lower(quicktime_video_map_t *vtrack)
1312 {
1313 quicktime_mpeg4_codec_t *result = init_common(vtrack,
1314 QUICKTIME_DIV3_LOWER,
1315 "DIVX",
1316 "Mike Row Soft MPEG4 Version 3");
1317 result->ffmpeg_id = CODEC_ID_MSMPEG4V3;
1318 }
1319
1320
1321 // Generic MPEG-4
1322 void quicktime_init_codec_divx(quicktime_video_map_t *vtrack)
1323 {
1324 quicktime_mpeg4_codec_t *result = init_common(vtrack,
1325 QUICKTIME_DIVX,
1326 "MPEG4",
1327 "Generic MPEG Four");
1328 result->ffmpeg_id = CODEC_ID_MPEG4;
1329 }
1330
1331
1332 // Mormon MPEG-4
1333 void quicktime_init_codec_svq1(quicktime_video_map_t *vtrack)
1334 {
1335 quicktime_mpeg4_codec_t *result = init_common(vtrack,
1336 QUICKTIME_SVQ1,
1337 "Sorenson Version 1",
1338 "From the chearch of codecs of yesterday's sights");
1339 result->ffmpeg_id = CODEC_ID_SVQ1;
1340 }
1341
1342 // field based MPEG-4
1343 void quicktime_init_codec_hv60(quicktime_video_map_t *vtrack)
1344 {
1345 quicktime_mpeg4_codec_t *result = init_common(vtrack,
1346 QUICKTIME_HV60,
1347 "Heroine 60",
1348 "MPEG 4 with alternating streams every other frame. (Not standardized)");
1349 result->total_fields = 2;
1350 result->ffmpeg_id = CODEC_ID_MPEG4;
1351 }
1352
1353
1354
1355
1356
1357
mob repository