annotate swf.c @ 455:e5174af0f52f libavformat

fix rounding errors with NTSC patch by (Luca Abeni <lucabe72 at email dot it>)
author michael
date Tue, 27 Apr 2004 13:28:16 +0000
parents 845f9de2c883
children b69898ffc92a
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
1 /*
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
2 * Flash Compatible Streaming Format
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
3 * Copyright (c) 2000 Fabrice Bellard.
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
4 * Copyright (c) 2003 Tinic Uro.
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
5 *
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
6 * This library is free software; you can redistribute it and/or
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
7 * modify it under the terms of the GNU Lesser General Public
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
8 * License as published by the Free Software Foundation; either
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
9 * version 2 of the License, or (at your option) any later version.
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
10 *
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
11 * This library is distributed in the hope that it will be useful,
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
14 * Lesser General Public License for more details.
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
15 *
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
16 * You should have received a copy of the GNU Lesser General Public
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
17 * License along with this library; if not, write to the Free Software
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
18 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
19 */
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
20 #include "avformat.h"
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
21
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
22 /* should have a generic way to indicate probable size */
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
23 #define DUMMY_FILE_SIZE (100 * 1024 * 1024)
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
24 #define DUMMY_DURATION 600 /* in seconds */
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
25
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
26 #define TAG_END 0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
27 #define TAG_SHOWFRAME 1
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
28 #define TAG_DEFINESHAPE 2
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
29 #define TAG_FREECHARACTER 3
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
30 #define TAG_PLACEOBJECT 4
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
31 #define TAG_REMOVEOBJECT 5
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
32 #define TAG_STREAMHEAD 45
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
33 #define TAG_STREAMBLOCK 19
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
34 #define TAG_JPEG2 21
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
35 #define TAG_PLACEOBJECT2 26
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
36 #define TAG_STREAMHEAD2 45
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
37 #define TAG_VIDEOSTREAM 60
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
38 #define TAG_VIDEOFRAME 61
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
39
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
40 #define TAG_LONG 0x100
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
41
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
42 /* flags for shape definition */
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
43 #define FLAG_MOVETO 0x01
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
44 #define FLAG_SETFILL0 0x02
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
45 #define FLAG_SETFILL1 0x04
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
46
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
47 #define SWF_VIDEO_CODEC_FLV1 0x02
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
48
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
49 #define AUDIO_FIFO_SIZE 65536
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
50
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
51 /* character id used */
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
52 #define BITMAP_ID 0
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
53 #define VIDEO_ID 0
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
54 #define SHAPE_ID 1
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
55
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
56 typedef struct SWFFrame_s {
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
57 void *data;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
58 int size;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
59 struct SWFFrame_s *prev;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
60 struct SWFFrame_s *next;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
61 } SWFFrame;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
62
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
63 typedef struct {
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
64
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
65 offset_t duration_pos;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
66 offset_t tag_pos;
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
67
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
68 int samples_per_frame;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
69 int sound_samples;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
70 int video_samples;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
71 int skip_samples;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
72 int swf_frame_number;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
73 int video_frame_number;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
74 int ms_per_frame;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
75 int ch_id;
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
76 int tag;
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
77
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
78 uint8_t *audio_fifo;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
79 int audio_in_pos;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
80 int audio_out_pos;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
81 int audio_size;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
82
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
83 int video_type;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
84 int audio_type;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
85
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
86 SWFFrame *frame_head;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
87 SWFFrame *frame_tail;
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
88 } SWFContext;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
89
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
90 static const int sSampleRates[3][4] = {
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
91 {44100, 48000, 32000, 0},
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
92 {22050, 24000, 16000, 0},
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
93 {11025, 12000, 8000, 0},
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
94 };
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
95
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
96 static const int sBitRates[2][3][15] = {
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
97 { { 0, 32, 64, 96,128,160,192,224,256,288,320,352,384,416,448},
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
98 { 0, 32, 48, 56, 64, 80, 96,112,128,160,192,224,256,320,384},
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
99 { 0, 32, 40, 48, 56, 64, 80, 96,112,128,160,192,224,256,320}
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
100 },
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
101 { { 0, 32, 48, 56, 64, 80, 96,112,128,144,160,176,192,224,256},
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
102 { 0, 8, 16, 24, 32, 40, 48, 56, 64, 80, 96,112,128,144,160},
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
103 { 0, 8, 16, 24, 32, 40, 48, 56, 64, 80, 96,112,128,144,160}
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
104 },
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
105 };
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
106
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
107 static const int sSamplesPerFrame[3][3] =
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
108 {
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
109 { 384, 1152, 1152 },
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
110 { 384, 1152, 576 },
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
111 { 384, 1152, 576 }
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
112 };
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
113
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
114 static const int sBitsPerSlot[3] = {
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
115 32,
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
116 8,
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
117 8
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
118 };
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
119
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
120 static int swf_mp3_info(void *data, int *byteSize, int *samplesPerFrame, int *sampleRate, int *isMono )
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
121 {
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
122 uint8_t *dataTmp = (uint8_t *)data;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
123 uint32_t header = ( (uint32_t)dataTmp[0] << 24 ) | ( (uint32_t)dataTmp[1] << 16 ) | ( (uint32_t)dataTmp[2] << 8 ) | (uint32_t)dataTmp[3];
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
124 int layerID = 3 - ((header >> 17) & 0x03);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
125 int bitRateID = ((header >> 12) & 0x0f);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
126 int sampleRateID = ((header >> 10) & 0x03);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
127 int bitRate = 0;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
128 int bitsPerSlot = sBitsPerSlot[layerID];
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
129 int isPadded = ((header >> 9) & 0x01);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
130
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
131 if ( (( header >> 21 ) & 0x7ff) != 0x7ff ) {
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
132 return 0;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
133 }
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
134
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
135 *isMono = ((header >> 6) & 0x03) == 0x03;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
136
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
137 if ( (header >> 19 ) & 0x01 ) {
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
138 *sampleRate = sSampleRates[0][sampleRateID];
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
139 bitRate = sBitRates[0][layerID][bitRateID] * 1000;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
140 *samplesPerFrame = sSamplesPerFrame[0][layerID];
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
141 } else {
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
142 if ( (header >> 20) & 0x01 ) {
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
143 *sampleRate = sSampleRates[1][sampleRateID];
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
144 bitRate = sBitRates[1][layerID][bitRateID] * 1000;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
145 *samplesPerFrame = sSamplesPerFrame[1][layerID];
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
146 } else {
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
147 *sampleRate = sSampleRates[2][sampleRateID];
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
148 bitRate = sBitRates[1][layerID][bitRateID] * 1000;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
149 *samplesPerFrame = sSamplesPerFrame[2][layerID];
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
150 }
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
151 }
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
152
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
153 *byteSize = ( ( ( ( *samplesPerFrame * (bitRate / bitsPerSlot) ) / *sampleRate ) + isPadded ) );
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
154
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
155 return 1;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
156 }
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
157
277
a313e1080322 disable encoders where appropriate (patch courtesy of BERO
melanson
parents: 276
diff changeset
158 #ifdef CONFIG_ENCODERS
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
159 static void put_swf_tag(AVFormatContext *s, int tag)
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
160 {
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
161 SWFContext *swf = s->priv_data;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
162 ByteIOContext *pb = &s->pb;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
163
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
164 swf->tag_pos = url_ftell(pb);
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
165 swf->tag = tag;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
166 /* reserve some room for the tag */
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
167 if (tag & TAG_LONG) {
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
168 put_le16(pb, 0);
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
169 put_le32(pb, 0);
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
170 } else {
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
171 put_le16(pb, 0);
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
172 }
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
173 }
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
174
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
175 static void put_swf_end_tag(AVFormatContext *s)
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
176 {
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
177 SWFContext *swf = s->priv_data;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
178 ByteIOContext *pb = &s->pb;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
179 offset_t pos;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
180 int tag_len, tag;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
181
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
182 pos = url_ftell(pb);
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
183 tag_len = pos - swf->tag_pos - 2;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
184 tag = swf->tag;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
185 url_fseek(pb, swf->tag_pos, SEEK_SET);
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
186 if (tag & TAG_LONG) {
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
187 tag &= ~TAG_LONG;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
188 put_le16(pb, (tag << 6) | 0x3f);
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
189 put_le32(pb, tag_len - 4);
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
190 } else {
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
191 assert(tag_len < 0x3f);
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
192 put_le16(pb, (tag << 6) | tag_len);
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
193 }
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
194 url_fseek(pb, pos, SEEK_SET);
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
195 }
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
196
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
197 static inline void max_nbits(int *nbits_ptr, int val)
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
198 {
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
199 int n;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
200
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
201 if (val == 0)
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
202 return;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
203 val = abs(val);
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
204 n = 1;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
205 while (val != 0) {
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
206 n++;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
207 val >>= 1;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
208 }
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
209 if (n > *nbits_ptr)
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
210 *nbits_ptr = n;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
211 }
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
212
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
213 static void put_swf_rect(ByteIOContext *pb,
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
214 int xmin, int xmax, int ymin, int ymax)
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
215 {
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
216 PutBitContext p;
65
a58a8a53eb46 * UINTX -> uintx_t INTX -> intx_t
kabi
parents: 5
diff changeset
217 uint8_t buf[256];
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
218 int nbits, mask;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
219
276
3dd3646e0164 init_put_bits changed
alex
parents: 241
diff changeset
220 init_put_bits(&p, buf, sizeof(buf));
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
221
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
222 nbits = 0;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
223 max_nbits(&nbits, xmin);
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
224 max_nbits(&nbits, xmax);
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
225 max_nbits(&nbits, ymin);
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
226 max_nbits(&nbits, ymax);
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
227 mask = (1 << nbits) - 1;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
228
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
229 /* rectangle info */
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
230 put_bits(&p, 5, nbits);
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
231 put_bits(&p, nbits, xmin & mask);
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
232 put_bits(&p, nbits, xmax & mask);
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
233 put_bits(&p, nbits, ymin & mask);
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
234 put_bits(&p, nbits, ymax & mask);
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
235
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
236 flush_put_bits(&p);
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
237 put_buffer(pb, buf, pbBufPtr(&p) - p.buf);
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
238 }
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
239
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
240 static void put_swf_line_edge(PutBitContext *pb, int dx, int dy)
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
241 {
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
242 int nbits, mask;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
243
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
244 put_bits(pb, 1, 1); /* edge */
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
245 put_bits(pb, 1, 1); /* line select */
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
246 nbits = 2;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
247 max_nbits(&nbits, dx);
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
248 max_nbits(&nbits, dy);
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
249
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
250 mask = (1 << nbits) - 1;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
251 put_bits(pb, 4, nbits - 2); /* 16 bits precision */
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
252 if (dx == 0) {
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
253 put_bits(pb, 1, 0);
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
254 put_bits(pb, 1, 1);
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
255 put_bits(pb, nbits, dy & mask);
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
256 } else if (dy == 0) {
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
257 put_bits(pb, 1, 0);
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
258 put_bits(pb, 1, 0);
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
259 put_bits(pb, nbits, dx & mask);
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
260 } else {
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
261 put_bits(pb, 1, 1);
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
262 put_bits(pb, nbits, dx & mask);
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
263 put_bits(pb, nbits, dy & mask);
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
264 }
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
265 }
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
266
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
267 #define FRAC_BITS 16
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
268
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
269 /* put matrix */
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
270 static void put_swf_matrix(ByteIOContext *pb,
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
271 int a, int b, int c, int d, int tx, int ty)
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
272 {
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
273 PutBitContext p;
65
a58a8a53eb46 * UINTX -> uintx_t INTX -> intx_t
kabi
parents: 5
diff changeset
274 uint8_t buf[256];
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
275 int nbits;
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
276
276
3dd3646e0164 init_put_bits changed
alex
parents: 241
diff changeset
277 init_put_bits(&p, buf, sizeof(buf));
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
278
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
279 put_bits(&p, 1, 1); /* a, d present */
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
280 nbits = 1;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
281 max_nbits(&nbits, a);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
282 max_nbits(&nbits, d);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
283 put_bits(&p, 5, nbits); /* nb bits */
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
284 put_bits(&p, nbits, a);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
285 put_bits(&p, nbits, d);
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
286
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
287 put_bits(&p, 1, 1); /* b, c present */
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
288 nbits = 1;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
289 max_nbits(&nbits, c);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
290 max_nbits(&nbits, b);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
291 put_bits(&p, 5, nbits); /* nb bits */
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
292 put_bits(&p, nbits, c);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
293 put_bits(&p, nbits, b);
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
294
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
295 nbits = 1;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
296 max_nbits(&nbits, tx);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
297 max_nbits(&nbits, ty);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
298 put_bits(&p, 5, nbits); /* nb bits */
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
299 put_bits(&p, nbits, tx);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
300 put_bits(&p, nbits, ty);
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
301
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
302 flush_put_bits(&p);
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
303 put_buffer(pb, buf, pbBufPtr(&p) - p.buf);
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
304 }
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
305
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
306 /* */
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
307 static int swf_write_header(AVFormatContext *s)
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
308 {
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
309 SWFContext *swf;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
310 ByteIOContext *pb = &s->pb;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
311 AVCodecContext *enc, *audio_enc, *video_enc;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
312 PutBitContext p;
65
a58a8a53eb46 * UINTX -> uintx_t INTX -> intx_t
kabi
parents: 5
diff changeset
313 uint8_t buf1[256];
85
25062c9b1f86 per context frame_rate_base, this should finally fix frame_rate related av sync issues
michaelni
parents: 65
diff changeset
314 int i, width, height, rate, rate_base;
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
315
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
316 swf = av_malloc(sizeof(SWFContext));
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
317 if (!swf)
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
318 return -1;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
319 s->priv_data = swf;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
320
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
321 swf->ch_id = -1;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
322 swf->audio_in_pos = 0;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
323 swf->audio_out_pos = 0;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
324 swf->audio_size = 0;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
325 swf->audio_fifo = av_malloc(AUDIO_FIFO_SIZE);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
326 swf->frame_head = 0;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
327 swf->frame_tail = 0;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
328 swf->sound_samples = 0;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
329 swf->video_samples = 0;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
330 swf->swf_frame_number = 0;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
331 swf->video_frame_number = 0;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
332 swf->skip_samples = 0;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
333
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
334 video_enc = NULL;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
335 audio_enc = NULL;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
336 for(i=0;i<s->nb_streams;i++) {
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
337 enc = &s->streams[i]->codec;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
338 if (enc->codec_type == CODEC_TYPE_AUDIO)
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
339 audio_enc = enc;
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
340 else {
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
341 if ( enc->codec_id == CODEC_ID_FLV1 || enc->codec_id == CODEC_ID_MJPEG ) {
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
342 video_enc = enc;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
343 } else {
370
845f9de2c883 av_log() patch by (Michel Bardiaux <mbardiaux at peaktime dot be>)
michael
parents: 360
diff changeset
344 av_log(enc, AV_LOG_ERROR, "SWF only supports FLV1 and MJPEG\n");
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
345 return -1;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
346 }
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
347 }
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
348 }
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
349
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
350 if (!video_enc) {
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
351 /* currenty, cannot work correctly if audio only */
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
352 swf->video_type = 0;
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
353 width = 320;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
354 height = 200;
85
25062c9b1f86 per context frame_rate_base, this should finally fix frame_rate related av sync issues
michaelni
parents: 65
diff changeset
355 rate = 10;
25062c9b1f86 per context frame_rate_base, this should finally fix frame_rate related av sync issues
michaelni
parents: 65
diff changeset
356 rate_base= 1;
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
357 } else {
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
358 swf->video_type = video_enc->codec_id;
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
359 width = video_enc->width;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
360 height = video_enc->height;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
361 rate = video_enc->frame_rate;
85
25062c9b1f86 per context frame_rate_base, this should finally fix frame_rate related av sync issues
michaelni
parents: 65
diff changeset
362 rate_base = video_enc->frame_rate_base;
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
363 }
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
364
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
365 if (!audio_enc ) {
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
366 swf->audio_type = 0;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
367 swf->samples_per_frame = ( 44100. * rate_base ) / rate;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
368 } else {
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
369 swf->audio_type = audio_enc->codec_id;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
370 swf->samples_per_frame = ( ( audio_enc->sample_rate ) * rate_base ) / rate;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
371 }
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
372
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
373 put_tag(pb, "FWS");
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
374 if ( video_enc && video_enc->codec_id == CODEC_ID_FLV1 ) {
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
375 put_byte(pb, 6); /* version (version 6 and above support FLV1 codec) */
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
376 } else {
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
377 put_byte(pb, 4); /* version (should use 4 for mpeg audio support) */
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
378 }
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
379 put_le32(pb, DUMMY_FILE_SIZE); /* dummy size
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
380 (will be patched if not streamed) */
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
381
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
382 put_swf_rect(pb, 0, width * 20, 0, height * 20);
85
25062c9b1f86 per context frame_rate_base, this should finally fix frame_rate related av sync issues
michaelni
parents: 65
diff changeset
383 put_le16(pb, (rate * 256) / rate_base); /* frame rate */
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
384 swf->duration_pos = url_ftell(pb);
85
25062c9b1f86 per context frame_rate_base, this should finally fix frame_rate related av sync issues
michaelni
parents: 65
diff changeset
385 put_le16(pb, (uint16_t)(DUMMY_DURATION * (int64_t)rate / rate_base)); /* frame count */
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
386
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
387 /* define a shape with the jpeg inside */
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
388 if ( video_enc && video_enc->codec_id == CODEC_ID_FLV1 ) {
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
389 } else if ( video_enc && video_enc->codec_id == CODEC_ID_MJPEG ) {
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
390 put_swf_tag(s, TAG_DEFINESHAPE);
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
391
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
392 put_le16(pb, SHAPE_ID); /* ID of shape */
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
393 /* bounding rectangle */
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
394 put_swf_rect(pb, 0, width, 0, height);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
395 /* style info */
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
396 put_byte(pb, 1); /* one fill style */
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
397 put_byte(pb, 0x41); /* clipped bitmap fill */
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
398 put_le16(pb, BITMAP_ID); /* bitmap ID */
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
399 /* position of the bitmap */
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
400 put_swf_matrix(pb, (int)(1.0 * (1 << FRAC_BITS)), 0,
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
401 0, (int)(1.0 * (1 << FRAC_BITS)), 0, 0);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
402 put_byte(pb, 0); /* no line style */
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
403
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
404 /* shape drawing */
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
405 init_put_bits(&p, buf1, sizeof(buf1));
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
406 put_bits(&p, 4, 1); /* one fill bit */
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
407 put_bits(&p, 4, 0); /* zero line bit */
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
408
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
409 put_bits(&p, 1, 0); /* not an edge */
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
410 put_bits(&p, 5, FLAG_MOVETO | FLAG_SETFILL0);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
411 put_bits(&p, 5, 1); /* nbits */
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
412 put_bits(&p, 1, 0); /* X */
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
413 put_bits(&p, 1, 0); /* Y */
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
414 put_bits(&p, 1, 1); /* set fill style 1 */
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
415
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
416 /* draw the rectangle ! */
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
417 put_swf_line_edge(&p, width, 0);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
418 put_swf_line_edge(&p, 0, height);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
419 put_swf_line_edge(&p, -width, 0);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
420 put_swf_line_edge(&p, 0, -height);
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
421
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
422 /* end of shape */
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
423 put_bits(&p, 1, 0); /* not an edge */
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
424 put_bits(&p, 5, 0);
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
425
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
426 flush_put_bits(&p);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
427 put_buffer(pb, buf1, pbBufPtr(&p) - p.buf);
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
428
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
429 put_swf_end_tag(s);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
430 }
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
431
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
432 if (audio_enc && audio_enc->codec_id == CODEC_ID_MP3 ) {
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
433 int v;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
434
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
435 /* start sound */
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
436 put_swf_tag(s, TAG_STREAMHEAD2);
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
437
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
438 v = 0;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
439 switch(audio_enc->sample_rate) {
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
440 case 11025:
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
441 v |= 1 << 2;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
442 break;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
443 case 22050:
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
444 v |= 2 << 2;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
445 break;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
446 case 44100:
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
447 v |= 3 << 2;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
448 break;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
449 default:
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
450 /* not supported */
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
451 av_free(swf->audio_fifo);
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
452 av_free(swf);
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
453 return -1;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
454 }
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
455 v |= 0x02; /* 16 bit playback */
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
456 if (audio_enc->channels == 2)
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
457 v |= 0x01; /* stereo playback */
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
458 put_byte(&s->pb, v);
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
459 v |= 0x20; /* mp3 compressed */
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
460 put_byte(&s->pb, v);
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
461 put_le16(&s->pb, swf->samples_per_frame); /* avg samples per frame */
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
462 put_le16(&s->pb, 0);
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
463
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
464 put_swf_end_tag(s);
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
465 }
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
466
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
467 put_flush_packet(&s->pb);
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
468 return 0;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
469 }
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
470
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
471 static int swf_write_video(AVFormatContext *s,
241
3d92f793fd67 64 bit pts for writing - more const usage
bellard
parents: 187
diff changeset
472 AVCodecContext *enc, const uint8_t *buf, int size)
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
473 {
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
474 SWFContext *swf = s->priv_data;
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
475 ByteIOContext *pb = &s->pb;
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
476 int c = 0;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
477 int outSize = 0;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
478 int outSamples = 0;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
479
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
480 /* Flash Player limit */
360
81e90b91f457 no limits!, warning is enough
michael
parents: 359
diff changeset
481 if ( swf->swf_frame_number == 16000 ) {
370
845f9de2c883 av_log() patch by (Michel Bardiaux <mbardiaux at peaktime dot be>)
michael
parents: 360
diff changeset
482 av_log(enc, AV_LOG_INFO, "warning: Flash Player limit of 16000 frames reached\n");
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
483 }
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
484
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
485 /* Store video data in queue */
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
486 if ( enc->codec_type == CODEC_TYPE_VIDEO ) {
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
487 SWFFrame *new_frame = av_malloc(sizeof(SWFFrame));
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
488 new_frame->prev = 0;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
489 new_frame->next = swf->frame_head;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
490 new_frame->data = av_malloc(size);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
491 new_frame->size = size;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
492 memcpy(new_frame->data,buf,size);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
493 swf->frame_head = new_frame;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
494 if ( swf->frame_tail == 0 ) {
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
495 swf->frame_tail = new_frame;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
496 }
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
497 }
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
498
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
499 if ( swf->audio_type ) {
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
500 /* Prescan audio data for this swf frame */
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
501 retry_swf_audio_packet:
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
502 if ( ( swf->audio_size-outSize ) >= 4 ) {
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
503 int mp3FrameSize = 0;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
504 int mp3SampleRate = 0;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
505 int mp3IsMono = 0;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
506 int mp3SamplesPerFrame = 0;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
507
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
508 /* copy out mp3 header from ring buffer */
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
509 uint8_t header[4];
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
510 for (c=0; c<4; c++) {
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
511 header[c] = swf->audio_fifo[(swf->audio_in_pos+outSize+c) % AUDIO_FIFO_SIZE];
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
512 }
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
513
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
514 if ( swf_mp3_info(header,&mp3FrameSize,&mp3SamplesPerFrame,&mp3SampleRate,&mp3IsMono) ) {
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
515 if ( ( swf->audio_size-outSize ) >= mp3FrameSize ) {
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
516 outSize += mp3FrameSize;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
517 outSamples += mp3SamplesPerFrame;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
518 if ( ( swf->sound_samples + outSamples + swf->samples_per_frame ) < swf->video_samples ) {
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
519 goto retry_swf_audio_packet;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
520 }
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
521 }
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
522 } else {
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
523 /* invalid mp3 data, skip forward
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
524 we need to do this since the Flash Player
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
525 does not like custom headers */
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
526 swf->audio_in_pos ++;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
527 swf->audio_size --;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
528 swf->audio_in_pos %= AUDIO_FIFO_SIZE;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
529 goto retry_swf_audio_packet;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
530 }
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
531 }
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
532
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
533 /* audio stream is behind video stream, bail */
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
534 if ( ( swf->sound_samples + outSamples + swf->samples_per_frame ) < swf->video_samples ) {
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
535 return 0;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
536 }
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
537
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
538 /* compute audio/video drift */
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
539 if ( enc->codec_type == CODEC_TYPE_VIDEO ) {
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
540 swf->skip_samples = (int)( ( (double)(swf->swf_frame_number) * (double)enc->frame_rate_base * 44100. ) / (double)(enc->frame_rate) );
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
541 swf->skip_samples -= swf->video_samples;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
542 }
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
543 }
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
544
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
545 /* check if we need to insert a padding frame */
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
546 if (swf->skip_samples <= ( swf->samples_per_frame / 2 ) ) {
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
547 /* no, it is time for a real frame, check if one is available */
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
548 if ( swf->frame_tail ) {
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
549 if ( swf->video_type == CODEC_ID_FLV1 ) {
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
550 if ( swf->video_frame_number == 0 ) {
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
551 /* create a new video object */
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
552 put_swf_tag(s, TAG_VIDEOSTREAM);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
553 put_le16(pb, VIDEO_ID);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
554 put_le16(pb, 15000 ); /* hard flash player limit */
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
555 put_le16(pb, enc->width);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
556 put_le16(pb, enc->height);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
557 put_byte(pb, 0);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
558 put_byte(pb, SWF_VIDEO_CODEC_FLV1);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
559 put_swf_end_tag(s);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
560
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
561 /* place the video object for the first time */
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
562 put_swf_tag(s, TAG_PLACEOBJECT2);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
563 put_byte(pb, 0x36);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
564 put_le16(pb, 1);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
565 put_le16(pb, VIDEO_ID);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
566 put_swf_matrix(pb, 1 << FRAC_BITS, 0, 0, 1 << FRAC_BITS, 0, 0);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
567 put_le16(pb, swf->video_frame_number );
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
568 put_byte(pb, 'v');
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
569 put_byte(pb, 'i');
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
570 put_byte(pb, 'd');
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
571 put_byte(pb, 'e');
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
572 put_byte(pb, 'o');
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
573 put_byte(pb, 0x00);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
574 put_swf_end_tag(s);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
575 } else {
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
576 /* mark the character for update */
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
577 put_swf_tag(s, TAG_PLACEOBJECT2);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
578 put_byte(pb, 0x11);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
579 put_le16(pb, 1);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
580 put_le16(pb, swf->video_frame_number );
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
581 put_swf_end_tag(s);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
582 }
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
583
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
584 // write out pending frames
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
585 for (; ( enc->frame_number - swf->video_frame_number ) > 0;) {
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
586 /* set video frame data */
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
587 put_swf_tag(s, TAG_VIDEOFRAME | TAG_LONG);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
588 put_le16(pb, VIDEO_ID);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
589 put_le16(pb, swf->video_frame_number++ );
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
590 put_buffer(pb, swf->frame_tail->data, swf->frame_tail->size);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
591 put_swf_end_tag(s);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
592 }
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
593
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
594 } else if ( swf->video_type == CODEC_ID_MJPEG ) {
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
595 if (swf->swf_frame_number > 0) {
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
596 /* remove the shape */
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
597 put_swf_tag(s, TAG_REMOVEOBJECT);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
598 put_le16(pb, SHAPE_ID); /* shape ID */
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
599 put_le16(pb, 1); /* depth */
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
600 put_swf_end_tag(s);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
601
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
602 /* free the bitmap */
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
603 put_swf_tag(s, TAG_FREECHARACTER);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
604 put_le16(pb, BITMAP_ID);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
605 put_swf_end_tag(s);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
606 }
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
607
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
608 put_swf_tag(s, TAG_JPEG2 | TAG_LONG);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
609
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
610 put_le16(pb, BITMAP_ID); /* ID of the image */
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
611
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
612 /* a dummy jpeg header seems to be required */
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
613 put_byte(pb, 0xff);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
614 put_byte(pb, 0xd8);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
615 put_byte(pb, 0xff);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
616 put_byte(pb, 0xd9);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
617 /* write the jpeg image */
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
618 put_buffer(pb, swf->frame_tail->data, swf->frame_tail->size);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
619
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
620 put_swf_end_tag(s);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
621
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
622 /* draw the shape */
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
623
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
624 put_swf_tag(s, TAG_PLACEOBJECT);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
625 put_le16(pb, SHAPE_ID); /* shape ID */
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
626 put_le16(pb, 1); /* depth */
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
627 put_swf_matrix(pb, 20 << FRAC_BITS, 0, 0, 20 << FRAC_BITS, 0, 0);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
628 put_swf_end_tag(s);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
629 } else {
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
630 /* invalid codec */
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
631 }
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
632
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
633 av_free(swf->frame_tail->data);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
634 swf->frame_tail = swf->frame_tail->prev;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
635 if ( swf->frame_tail ) {
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
636 if ( swf->frame_tail->next ) {
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
637 av_free(swf->frame_tail->next);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
638 }
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
639 swf->frame_tail->next = 0;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
640 } else {
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
641 swf->frame_head = 0;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
642 }
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
643 swf->swf_frame_number ++;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
644 }
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
645 }
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
646
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
647 swf->video_samples += swf->samples_per_frame;
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
648
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
649 /* streaming sound always should be placed just before showframe tags */
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
650 if ( outSize > 0 ) {
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
651 put_swf_tag(s, TAG_STREAMBLOCK | TAG_LONG);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
652 put_le16(pb, outSamples);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
653 put_le16(pb, 0);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
654 for (c=0; c<outSize; c++) {
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
655 put_byte(pb,swf->audio_fifo[(swf->audio_in_pos+c) % AUDIO_FIFO_SIZE]);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
656 }
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
657 put_swf_end_tag(s);
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
658
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
659 /* update FIFO */
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
660 swf->sound_samples += outSamples;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
661 swf->audio_in_pos += outSize;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
662 swf->audio_size -= outSize;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
663 swf->audio_in_pos %= AUDIO_FIFO_SIZE;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
664 }
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
665
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
666 /* output the frame */
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
667 put_swf_tag(s, TAG_SHOWFRAME);
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
668 put_swf_end_tag(s);
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
669
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
670 put_flush_packet(&s->pb);
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
671
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
672 return 0;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
673 }
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
674
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
675 static int swf_write_audio(AVFormatContext *s,
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
676 AVCodecContext *enc, const uint8_t *buf, int size)
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
677 {
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
678 SWFContext *swf = s->priv_data;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
679 int c = 0;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
680
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
681 /* Flash Player limit */
360
81e90b91f457 no limits!, warning is enough
michael
parents: 359
diff changeset
682 if ( swf->swf_frame_number == 16000 ) {
370
845f9de2c883 av_log() patch by (Michel Bardiaux <mbardiaux at peaktime dot be>)
michael
parents: 360
diff changeset
683 av_log(enc, AV_LOG_INFO, "warning: Flash Player limit of 16000 frames reached\n");
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
684 }
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
685
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
686 if (enc->codec_id == CODEC_ID_MP3 ) {
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
687 for (c=0; c<size; c++) {
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
688 swf->audio_fifo[(swf->audio_out_pos+c)%AUDIO_FIFO_SIZE] = buf[c];
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
689 }
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
690 swf->audio_size += size;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
691 swf->audio_out_pos += size;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
692 swf->audio_out_pos %= AUDIO_FIFO_SIZE;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
693 }
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
694
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
695 /* if audio only stream make sure we add swf frames */
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
696 if ( swf->video_type == 0 ) {
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
697 swf_write_video(s, enc, 0, 0);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
698 }
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
699
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
700 return 0;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
701 }
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
702
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
703 static int swf_write_packet(AVFormatContext *s, int stream_index,
241
3d92f793fd67 64 bit pts for writing - more const usage
bellard
parents: 187
diff changeset
704 const uint8_t *buf, int size, int64_t pts)
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
705 {
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
706 AVCodecContext *codec = &s->streams[stream_index]->codec;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
707 if (codec->codec_type == CODEC_TYPE_AUDIO)
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
708 return swf_write_audio(s, codec, buf, size);
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
709 else
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
710 return swf_write_video(s, codec, buf, size);
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
711 }
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
712
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
713 static int swf_write_trailer(AVFormatContext *s)
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
714 {
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
715 SWFContext *swf = s->priv_data;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
716 ByteIOContext *pb = &s->pb;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
717 AVCodecContext *enc, *video_enc;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
718 int file_size, i;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
719
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
720 video_enc = NULL;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
721 for(i=0;i<s->nb_streams;i++) {
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
722 enc = &s->streams[i]->codec;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
723 if (enc->codec_type == CODEC_TYPE_VIDEO)
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
724 video_enc = enc;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
725 }
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
726
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
727 put_swf_tag(s, TAG_END);
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
728 put_swf_end_tag(s);
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
729
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
730 put_flush_packet(&s->pb);
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
731
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
732 /* patch file size and number of frames if not streamed */
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
733 if (!url_is_streamed(&s->pb) && video_enc) {
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
734 file_size = url_ftell(pb);
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
735 url_fseek(pb, 4, SEEK_SET);
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
736 put_le32(pb, file_size);
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
737 url_fseek(pb, swf->duration_pos, SEEK_SET);
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
738 put_le16(pb, video_enc->frame_number);
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
739 }
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
740
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
741 av_free(swf->audio_fifo);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
742
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
743 return 0;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
744 }
277
a313e1080322 disable encoders where appropriate (patch courtesy of BERO
melanson
parents: 276
diff changeset
745 #endif //CONFIG_ENCODERS
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
746
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
747 /*********************************************/
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
748 /* Extract FLV encoded frame and MP3 from swf
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
749 Note that the detection of the real frame
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
750 is inaccurate at this point as it can be
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
751 quite tricky to determine, you almost certainly
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
752 will get a bad audio/video sync */
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
753
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
754 static int get_swf_tag(ByteIOContext *pb, int *len_ptr)
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
755 {
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
756 int tag, len;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
757
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
758 if (url_feof(pb))
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
759 return -1;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
760
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
761 tag = get_le16(pb);
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
762 len = tag & 0x3f;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
763 tag = tag >> 6;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
764 if (len == 0x3f) {
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
765 len = get_le32(pb);
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
766 }
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
767 *len_ptr = len;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
768 return tag;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
769 }
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
770
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
771
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
772 static int swf_probe(AVProbeData *p)
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
773 {
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
774 /* check file header */
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
775 if (p->buf_size <= 16)
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
776 return 0;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
777 if (p->buf[0] == 'F' && p->buf[1] == 'W' &&
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
778 p->buf[2] == 'S')
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
779 return AVPROBE_SCORE_MAX;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
780 else
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
781 return 0;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
782 }
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
783
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
784 static int swf_read_header(AVFormatContext *s, AVFormatParameters *ap)
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
785 {
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
786 SWFContext *swf = 0;
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
787 ByteIOContext *pb = &s->pb;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
788 int nbits, len, frame_rate, tag, v;
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
789 offset_t firstTagOff;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
790 AVStream *ast = 0;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
791 AVStream *vst = 0;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
792
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
793 swf = av_malloc(sizeof(SWFContext));
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
794 if (!swf)
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
795 return -1;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
796 s->priv_data = swf;
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
797
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
798 if ((get_be32(pb) & 0xffffff00) != MKBETAG('F', 'W', 'S', 0))
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
799 return -EIO;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
800 get_le32(pb);
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
801 /* skip rectangle size */
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
802 nbits = get_byte(pb) >> 3;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
803 len = (4 * nbits - 3 + 7) / 8;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
804 url_fskip(pb, len);
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
805 frame_rate = get_le16(pb);
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
806 get_le16(pb); /* frame count */
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
807
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
808 av_set_pts_info(s, 24, 1, 1000); /* 24 bit pts in ms */
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
809
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
810 /* The Flash Player converts 8.8 frame rates
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
811 to milliseconds internally. Do the same to get
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
812 a correct framerate */
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
813 swf->ms_per_frame = ( 1000 * 256 ) / frame_rate;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
814 swf->samples_per_frame = 0;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
815 swf->ch_id = -1;
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
816
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
817 firstTagOff = url_ftell(pb);
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
818 for(;;) {
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
819 tag = get_swf_tag(pb, &len);
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
820 if (tag < 0) {
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
821 if ( ast || vst ) {
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
822 if ( vst && ast ) {
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
823 vst->codec.frame_rate = ast->codec.sample_rate / swf->samples_per_frame;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
824 vst->codec.frame_rate_base = 1;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
825 }
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
826 break;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
827 }
370
845f9de2c883 av_log() patch by (Michel Bardiaux <mbardiaux at peaktime dot be>)
michael
parents: 360
diff changeset
828 av_log(s, AV_LOG_ERROR, "No media found in SWF\n");
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
829 return -EIO;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
830 }
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
831 if ( tag == TAG_VIDEOSTREAM && !vst) {
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
832 swf->ch_id = get_le16(pb);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
833 get_le16(pb);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
834 get_le16(pb);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
835 get_le16(pb);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
836 get_byte(pb);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
837 /* Check for FLV1 */
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
838 if ( get_byte(pb) == SWF_VIDEO_CODEC_FLV1 ) {
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
839 vst = av_new_stream(s, 0);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
840 vst->codec.codec_type = CODEC_TYPE_VIDEO;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
841 vst->codec.codec_id = CODEC_ID_FLV1;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
842 if ( swf->samples_per_frame ) {
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
843 vst->codec.frame_rate = 1000. / swf->ms_per_frame;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
844 vst->codec.frame_rate_base = 1;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
845 }
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
846 }
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
847 } else if ( ( tag == TAG_STREAMHEAD || tag == TAG_STREAMHEAD2 ) && !ast) {
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
848 /* streaming found */
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
849 get_byte(pb);
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
850 v = get_byte(pb);
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
851 swf->samples_per_frame = get_le16(pb);
325
e1d4300bf783 SWF sanity check patch by (Glyn Kennington <glyn dot kennington at ox dot compsoc dot net>)
michael
parents: 277
diff changeset
852 if (len!=4)
e1d4300bf783 SWF sanity check patch by (Glyn Kennington <glyn dot kennington at ox dot compsoc dot net>)
michael
parents: 277
diff changeset
853 url_fskip(pb,len-4);
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
854 /* if mp3 streaming found, OK */
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
855 if ((v & 0x20) != 0) {
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
856 if ( tag == TAG_STREAMHEAD2 ) {
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
857 get_le16(pb);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
858 }
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
859 ast = av_new_stream(s, 1);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
860 if (!ast)
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
861 return -ENOMEM;
5
39c4c4336486 cleanup
michaelni
parents: 0
diff changeset
862
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
863 if (v & 0x01)
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
864 ast->codec.channels = 2;
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
865 else
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
866 ast->codec.channels = 1;
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
867
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
868 switch((v>> 2) & 0x03) {
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
869 case 1:
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
870 ast->codec.sample_rate = 11025;
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
871 break;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
872 case 2:
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
873 ast->codec.sample_rate = 22050;
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
874 break;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
875 case 3:
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
876 ast->codec.sample_rate = 44100;
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
877 break;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
878 default:
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
879 av_free(ast);
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
880 return -EIO;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
881 }
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
882 ast->codec.codec_type = CODEC_TYPE_AUDIO;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
883 ast->codec.codec_id = CODEC_ID_MP3;
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
884 }
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
885 } else {
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
886 url_fskip(pb, len);
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
887 }
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
888 }
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
889 url_fseek(pb, firstTagOff, SEEK_SET);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
890
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
891 return 0;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
892 }
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
893
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
894 static int swf_read_packet(AVFormatContext *s, AVPacket *pkt)
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
895 {
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
896 SWFContext *swf = s->priv_data;
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
897 ByteIOContext *pb = &s->pb;
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
898 AVStream *st = 0;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
899 int tag, len, i, frame;
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
900
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
901 for(;;) {
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
902 tag = get_swf_tag(pb, &len);
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
903 if (tag < 0)
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
904 return -EIO;
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
905 if (tag == TAG_VIDEOFRAME) {
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
906 for( i=0; i<s->nb_streams; i++ ) {
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
907 st = s->streams[i];
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
908 if (st->id == 0) {
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
909 if ( get_le16(pb) == swf->ch_id ) {
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
910 frame = get_le16(pb);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
911 av_new_packet(pkt, len-4);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
912 pkt->pts = frame * swf->ms_per_frame;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
913 pkt->stream_index = st->index;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
914 get_buffer(pb, pkt->data, pkt->size);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
915 return pkt->size;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
916 } else {
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
917 url_fskip(pb, len-2);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
918 continue;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
919 }
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
920 }
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
921 }
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
922 url_fskip(pb, len);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
923 } else if (tag == TAG_STREAMBLOCK) {
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
924 for( i=0; i<s->nb_streams; i++ ) {
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
925 st = s->streams[i];
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
926 if (st->id == 1) {
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
927 av_new_packet(pkt, len);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
928 pkt->stream_index = st->index;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
929 get_buffer(pb, pkt->data, pkt->size);
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
930 return pkt->size;
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
931 }
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
932 }
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
933 url_fskip(pb, len);
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
934 } else {
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
935 url_fskip(pb, len);
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
936 }
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
937 }
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
938 return 0;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
939 }
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
940
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
941 static int swf_read_close(AVFormatContext *s)
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
942 {
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
943 return 0;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
944 }
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
945
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
946 static AVInputFormat swf_iformat = {
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
947 "swf",
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
948 "Flash format",
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
949 sizeof(SWFContext),
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
950 swf_probe,
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
951 swf_read_header,
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
952 swf_read_packet,
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
953 swf_read_close,
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
954 };
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
955
277
a313e1080322 disable encoders where appropriate (patch courtesy of BERO
melanson
parents: 276
diff changeset
956 #ifdef CONFIG_ENCODERS
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
957 static AVOutputFormat swf_oformat = {
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
958 "swf",
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
959 "Flash format",
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
960 "application/x-shockwave-flash",
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
961 "swf",
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
962 sizeof(SWFContext),
359
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
963 CODEC_ID_MP3,
e9232aa21976 - made --extra-cflags option work on darwin
michael
parents: 325
diff changeset
964 CODEC_ID_FLV1,
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
965 swf_write_header,
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
966 swf_write_packet,
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
967 swf_write_trailer,
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
968 };
277
a313e1080322 disable encoders where appropriate (patch courtesy of BERO
melanson
parents: 276
diff changeset
969 #endif //CONFIG_ENCODERS
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
970
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
971 int swf_init(void)
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
972 {
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
973 av_register_input_format(&swf_iformat);
277
a313e1080322 disable encoders where appropriate (patch courtesy of BERO
melanson
parents: 276
diff changeset
974 #ifdef CONFIG_ENCODERS
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
975 av_register_output_format(&swf_oformat);
277
a313e1080322 disable encoders where appropriate (patch courtesy of BERO
melanson
parents: 276
diff changeset
976 #endif //CONFIG_ENCODERS
0
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
977 return 0;
05318cf2e886 renamed libav to libavformat
bellard
parents:
diff changeset
978 }