update for adapter api changes
[platform/upstream/gst-plugins-good.git] / gst / rtp / gstrtph263pay.c
1 /* GStreamer
2  * Copyright (C) <2005> Wim Taymans <wim.taymans@gmail.com>
3  * Copyright (C) <2008> Dejan Sakelsak <dejan.sakelsak@marand.si>
4  * Copyright (C) <2009> Janin Kolenc  <janin.kolenc@marand.si>
5  *
6  * This library is free software; you can redistribute it and/or
7  * modify it under the terms of the GNU Library General Public
8  * License as published by the Free Software Foundation; either
9  * version 2 of the License, or (at your option) any later version.
10  *
11  * This library is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14  * Library General Public License for more details.
15  *
16  * You should have received a copy of the GNU Library General Public
17  * License along with this library; if not, write to the
18  * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
19  * Boston, MA 02111-1307, USA.
20  *
21  */
22
23 #ifdef HAVE_CONFIG_H
24 #  include "config.h"
25 #endif
26
27 #include <string.h>
28 #include <math.h>
29 #include <gst/rtp/gstrtpbuffer.h>
30
31 #include "gstrtph263pay.h"
32
33 typedef enum
34 {
35   GST_H263_FRAME_TYPE_I = 0,
36   GST_H263_FRAME_TYPE_P = 1,
37   GST_H263_FRAME_TYPE_PB = 2
38 } GstRtpH263PayFrameType;
39
40 typedef enum
41 {
42   GST_RTP_H263_PAYLOAD_PICTURE_FORMAT_RES1 = 0,
43   GST_RTP_H263_PAYLOAD_PICTURE_FORMAT_SQCIF = 1,
44   GST_RTP_H263_PAYLOAD_PICTURE_FORMAT_QCIF = 2,
45   GST_RTP_H263_PAYLOAD_PICTURE_FORMAT_CIF = 3,
46   GST_RTP_H263_PAYLOAD_PICTURE_FORMAT_4CIF = 4,
47   GST_RTP_H263_PAYLOAD_PICTURE_FORMAT_16CIF = 5,
48   GST_RTP_H263_PAYLOAD_PICTURE_FORMAT_RES2 = 6,
49   GST_H263_PAYLOAD_PICTURE_FORMAT_PLUS = 7
50 } GstRtpH263PayPictureFormat;
51
52 static const guint format_props[8][2] = { {254, 254},
53 {6, 8},
54 {9, 11},
55 {18, 22},
56 {18, 88},
57 {18, 352},
58 {254, 254},
59 {255, 255}
60 };
61
62 /*
63  * I-frame MCBPC table: code, mask, nbits, cb, cr, mb type -> 10 = undefined (because we have guint)
64  */
65 #define MCBPC_I_LEN 9
66 #define MCBPC_I_WID 6
67 static const guint32 mcbpc_I[9][6] = {
68   {0x8000, 0x8000, 1, 0, 0, 3},
69   {0x2000, 0xe000, 3, 0, 1, 3},
70   {0x4000, 0xe000, 3, 1, 0, 3},
71   {0x6000, 0xe000, 3, 1, 1, 3},
72   {0x1000, 0xf000, 4, 0, 0, 4},
73   {0x0400, 0xfc00, 6, 0, 1, 4},
74   {0x0800, 0xfc00, 6, 1, 0, 4},
75   {0x0c00, 0xfc00, 6, 1, 1, 4},
76   {0x0080, 0xff80, 9, 10, 10, 10}
77 };
78
79 /*
80  * P-frame MCBPC table: code, mask, nbits, cb, cr, mb type -> 10 = undefined (because we have guint)
81  */
82 #define MCBPC_P_LEN 21
83 #define MCBPC_P_WID 6
84 static const guint16 mcbpc_P[21][6] = {
85   {0x8000, 0x8000, 1, 0, 0, 0},
86   {0x3000, 0xf000, 4, 0, 1, 0},
87   {0x2000, 0xf000, 4, 1, 0, 0},
88   {0x1400, 0xfc00, 6, 1, 1, 0},
89   {0x6000, 0xe000, 3, 0, 0, 1},
90   {0x0e00, 0xfe00, 7, 0, 1, 1},
91   {0x0c00, 0xfe00, 7, 1, 0, 1},
92   {0x0280, 0xff80, 9, 1, 1, 1},
93   {0x4000, 0xe000, 3, 0, 0, 2},
94   {0x0a00, 0xfe00, 7, 0, 1, 2},
95   {0x0800, 0xfe00, 7, 1, 0, 2},
96   {0x0500, 0xff00, 8, 1, 1, 2},
97   {0x1800, 0xf800, 5, 0, 0, 3},
98   {0x0400, 0xff00, 8, 0, 1, 3},
99   {0x0300, 0xff00, 8, 1, 0, 3},
100   {0x0600, 0xfe00, 7, 1, 1, 3},
101   {0x1000, 0xfc00, 6, 0, 0, 4},
102   {0x0200, 0xff80, 9, 0, 1, 4},
103   {0x0180, 0xff80, 9, 1, 0, 4},
104   {0x0100, 0xff80, 9, 1, 1, 4},
105   {0x0080, 0xff80, 9, 10, 10, 10}
106 };
107
108 /*
109  * I-frame CBPY (code, mask, nbits, Y0, Y1, Y2, Y3)
110  */
111 #define CBPY_LEN 16
112 #define CBPY_WID 7
113 static const guint8 cbpy_I[16][7] = {
114   {0x30, 0xf0, 4, 0, 0, 0, 0},
115   {0x28, 0xf8, 5, 0, 0, 0, 1},
116   {0x20, 0xf8, 5, 0, 0, 1, 0},
117   {0x90, 0xf0, 4, 0, 0, 1, 1},
118   {0x18, 0xf8, 5, 0, 1, 0, 0},
119   {0x70, 0xf0, 4, 0, 1, 0, 1},
120   {0x08, 0xfc, 6, 0, 1, 1, 0},
121   {0xb0, 0xf0, 4, 0, 1, 1, 1},
122   {0x10, 0xf8, 5, 1, 0, 0, 0},
123   {0x0c, 0xfc, 6, 1, 0, 0, 1},
124   {0x50, 0xf0, 4, 1, 0, 1, 0},
125   {0xa0, 0xf0, 4, 1, 0, 1, 1},
126   {0x40, 0xf0, 4, 1, 1, 0, 0},
127   {0x80, 0xf0, 4, 1, 1, 0, 1},
128   {0x60, 0xf0, 4, 1, 1, 1, 0},
129   {0xc0, 0xc0, 2, 1, 1, 1, 1}
130 };
131
132 /*
133  * P-frame CBPY (code, mask, nbits, Y0, Y1, Y2, Y3)
134  */
135 static const guint8 cbpy_P[16][7] = {
136   {0x30, 0xf0, 4, 1, 1, 1, 1},
137   {0x28, 0xf8, 5, 1, 1, 1, 0},
138   {0x20, 0xf8, 5, 1, 1, 0, 1},
139   {0x90, 0xf0, 4, 1, 1, 0, 0},
140   {0x18, 0xf8, 5, 1, 0, 1, 1},
141   {0x70, 0xf0, 4, 1, 0, 1, 0},
142   {0x08, 0xfc, 6, 1, 0, 0, 1},
143   {0xb0, 0xf0, 4, 1, 0, 0, 0},
144   {0x10, 0xf8, 5, 0, 1, 1, 1},
145   {0x0c, 0xfc, 6, 0, 1, 1, 0},
146   {0x50, 0xf0, 4, 0, 1, 0, 1},
147   {0xa0, 0xf0, 4, 0, 1, 0, 0},
148   {0x40, 0xf0, 4, 0, 0, 1, 1},
149   {0x80, 0xf0, 4, 0, 0, 1, 0},
150   {0x60, 0xf0, 4, 0, 0, 0, 1},
151   {0xc0, 0xc0, 2, 0, 0, 0, 0}
152 };
153
154 /*
155  * Block TCOEF table (code, mask, nbits, LAST, RUN, LEVEL)
156  */
157 #define TCOEF_LEN 103
158 #define TCOEF_WID 6
159 static const guint16 tcoef[103][6] = {
160   {0x8000, 0xc000, 3, 0, 0, 1},
161   {0xf000, 0xf000, 5, 0, 0, 2},
162   {0x5400, 0xfc00, 7, 0, 0, 3},
163   {0x2e00, 0xfe00, 8, 0, 0, 4},
164   {0x1f00, 0xff00, 9, 0, 0, 5},
165   {0x1280, 0xff80, 10, 0, 0, 6},
166   {0x1200, 0xff80, 10, 0, 0, 7},
167   {0x0840, 0xffc0, 11, 0, 0, 8},
168   {0x0800, 0xffc0, 11, 0, 0, 9},
169   {0x00e0, 0xffe0, 12, 0, 0, 10},       //10
170   {0x00c0, 0xffe0, 12, 0, 0, 11},
171   {0x0400, 0xffe0, 12, 0, 0, 12},
172   {0xc000, 0xe000, 4, 0, 1, 1},
173   {0x5000, 0xfc00, 7, 0, 1, 2},
174   {0x1e00, 0xff00, 9, 0, 1, 3},
175   {0x03c0, 0xffc0, 11, 0, 1, 4},
176   {0x0420, 0xffe0, 12, 0, 1, 5},
177   {0x0500, 0xfff0, 13, 0, 1, 6},
178   {0xe000, 0xf000, 5, 0, 2, 1},
179   {0x1d00, 0xff00, 9, 0, 2, 2}, //20
180   {0x0380, 0xffc0, 11, 0, 2, 3},
181   {0x0510, 0xfff0, 13, 0, 2, 4},
182   {0x6800, 0xf800, 6, 0, 3, 1},
183   {0x1180, 0xff80, 10, 0, 3, 2},
184   {0x0340, 0xffc0, 11, 0, 3, 3},
185   {0x6000, 0xf800, 6, 0, 4, 1},
186   {0x1100, 0xff80, 10, 0, 4, 2},
187   {0x0520, 0xfff0, 13, 0, 4, 3},
188   {0x5800, 0xf800, 6, 0, 5, 1},
189   {0x0300, 0xffc0, 11, 0, 5, 2},        // 30
190   {0x0530, 0xfff0, 13, 0, 5, 3},
191   {0x4c00, 0xfc00, 7, 0, 6, 1},
192   {0x02c0, 0xffc0, 11, 0, 6, 2},
193   {0x0540, 0xfff0, 13, 0, 6, 3},
194   {0x4800, 0xfc00, 7, 0, 7, 1},
195   {0x0280, 0xffc0, 11, 0, 7, 2},
196   {0x4400, 0xfc00, 7, 0, 8, 1},
197   {0x0240, 0xffc0, 11, 0, 8, 2},
198   {0x4000, 0xfc00, 7, 0, 9, 1},
199   {0x0200, 0xffc0, 11, 0, 9, 2},        // 40
200   {0x2c00, 0xfe00, 8, 0, 10, 1},
201   {0x0550, 0xfff0, 13, 0, 10, 2},
202   {0x2a00, 0xfe00, 8, 0, 11, 1},
203   {0x2800, 0xfe00, 8, 0, 12, 1},
204   {0x1c00, 0xff00, 9, 0, 13, 1},
205   {0x1b00, 0xff00, 9, 0, 14, 1},
206   {0x1080, 0xff80, 10, 0, 15, 1},
207   {0x1000, 0xff80, 10, 0, 16, 1},
208   {0x0f80, 0xff80, 10, 0, 17, 1},
209   {0x0f00, 0xff80, 10, 0, 18, 1},       // 50
210   {0x0e80, 0xff80, 10, 0, 19, 1},
211   {0x0e00, 0xff80, 10, 0, 20, 1},
212   {0x0d80, 0xff80, 10, 0, 21, 1},
213   {0x0d00, 0xff80, 10, 0, 22, 1},
214   {0x0440, 0xffe0, 12, 0, 23, 1},
215   {0x0460, 0xffe0, 12, 0, 24, 1},
216   {0x0560, 0xfff0, 13, 0, 25, 1},
217   {0x0570, 0xfff0, 13, 0, 26, 1},
218   {0x7000, 0xf000, 5, 1, 0, 1},
219   {0x0c80, 0xff80, 10, 1, 0, 2},        // 60
220   {0x00a0, 0xffe0, 12, 1, 0, 3},
221   {0x3c00, 0xfc00, 7, 1, 1, 1},
222   {0x0080, 0xffe0, 12, 1, 1, 2},
223   {0x3800, 0xfc00, 7, 1, 2, 1},
224   {0x3400, 0xfc00, 7, 1, 3, 1},
225   {0x3000, 0xfc00, 7, 1, 4, 1},
226   {0x2600, 0xfe00, 8, 1, 5, 1},
227   {0x2400, 0xfe00, 8, 1, 6, 1},
228   {0x2200, 0xfe00, 8, 1, 7, 1},
229   {0x2000, 0xfe00, 8, 1, 8, 1}, // 70
230   {0x1a00, 0xff00, 9, 1, 9, 1},
231   {0x1900, 0xff00, 9, 1, 10, 1},
232   {0x1800, 0xff00, 9, 1, 11, 1},
233   {0x1700, 0xff00, 9, 1, 12, 1},
234   {0x1600, 0xff00, 9, 1, 13, 1},
235   {0x1500, 0xff00, 9, 1, 14, 1},
236   {0x1400, 0xff00, 9, 1, 15, 1},
237   {0x1300, 0xff00, 9, 1, 16, 1},
238   {0x0c00, 0xff80, 10, 1, 17, 1},
239   {0x0b80, 0xff80, 10, 1, 18, 1},       // 80
240   {0x0b00, 0xff80, 10, 1, 19, 1},
241   {0x0a80, 0xff80, 10, 1, 20, 1},
242   {0x0a00, 0xff80, 10, 1, 21, 1},
243   {0x0980, 0xff80, 10, 1, 22, 1},
244   {0x0900, 0xff80, 10, 1, 23, 1},
245   {0x0880, 0xff80, 10, 1, 24, 1},
246   {0x01c0, 0xffc0, 11, 1, 25, 1},
247   {0x0180, 0xffc0, 11, 1, 26, 1},
248   {0x0140, 0xffc0, 11, 1, 27, 1},
249   {0x0100, 0xffc0, 11, 1, 28, 1},       // 90
250   {0x0480, 0xffe0, 12, 1, 29, 1},
251   {0x04a0, 0xffe0, 12, 1, 30, 1},
252   {0x04c0, 0xffe0, 12, 1, 31, 1},
253   {0x04e0, 0xffe0, 12, 1, 32, 1},
254   {0x0580, 0xfff0, 13, 1, 33, 1},
255   {0x0590, 0xfff0, 13, 1, 34, 1},
256   {0x05a0, 0xfff0, 13, 1, 35, 1},
257   {0x05b0, 0xfff0, 13, 1, 36, 1},
258   {0x05c0, 0xfff0, 13, 1, 37, 1},
259   {0x05d0, 0xfff0, 13, 1, 38, 1},       // 100
260   {0x05e0, 0xfff0, 13, 1, 39, 1},
261   {0x05f0, 0xfff0, 13, 1, 40, 1},
262   {0x0600, 0xfe00, 7, 0, 0xffff, 0xffff}
263 };
264
265 /*
266  * Motion vector code table (Code, mask, nbits, vector (halfpixel, two's complement), diff (halfpixel, two's complement))
267  */
268 #define MVD_LEN 64
269 #define MVD_WID 5
270 static const guint16 mvd[64][5] = {
271   {0x0028, 0xfff8, 13, 0x0060, 0x0020},
272   {0x0038, 0xfff8, 13, 0x0061, 0x0021},
273   {0x0050, 0xfff0, 12, 0x0062, 0x0022},
274   {0x0070, 0xfff0, 12, 0x0063, 0x0023},
275   {0x0090, 0xfff0, 12, 0x0064, 0x0024},
276   {0x00b0, 0xfff0, 12, 0x0065, 0x0025},
277   {0x00d0, 0xfff0, 12, 0x0066, 0x0026},
278   {0x00f0, 0xfff0, 12, 0x0067, 0x0027},
279   {0x0120, 0xffe0, 11, 0x0068, 0x0028},
280   {0x0160, 0xffe0, 11, 0x0069, 0x0029},
281   {0x01a0, 0xffe0, 11, 0x006a, 0x002a},
282   {0x01e0, 0xffe0, 11, 0x006b, 0x002b},
283   {0x0220, 0xffe0, 11, 0x006c, 0x002c},
284   {0x0260, 0xffe0, 11, 0x006d, 0x002d},
285   {0x02a0, 0xffe0, 11, 0x006e, 0x002e},
286   {0x02e0, 0xffe0, 11, 0x006f, 0x002f},
287   {0x0320, 0xffe0, 11, 0x0070, 0x0030},
288   {0x0360, 0xffe0, 11, 0x0071, 0x0031},
289   {0x03a0, 0xffe0, 11, 0x0072, 0x0032},
290   {0x03e0, 0xffe0, 11, 0x0073, 0x0033},
291   {0x0420, 0xffe0, 11, 0x0074, 0x0034},
292   {0x0460, 0xffe0, 11, 0x0075, 0x0035},
293   {0x04c0, 0xffc0, 10, 0x0076, 0x0036},
294   {0x0540, 0xffc0, 10, 0x0077, 0x0037},
295   {0x05c0, 0xffc0, 10, 0x0078, 0x0038},
296   {0x0700, 0xff00, 8, 0x0079, 0x0039},
297   {0x0900, 0xff00, 8, 0x007a, 0x003a},
298   {0x0b00, 0xff00, 8, 0x007b, 0x003b},
299   {0x0e00, 0xfe00, 7, 0x007c, 0x003c},
300   {0x1800, 0xf800, 5, 0x007d, 0x003d},
301   {0x3000, 0xf000, 4, 0x007e, 0x003e},
302   {0x6000, 0xe000, 3, 0x007f, 0x003f},
303   {0x8000, 0x8000, 1, 0x0000, 0x0000},
304   {0x4000, 0xe000, 3, 0x0001, 0x0041},
305   {0x2000, 0xf000, 4, 0x0002, 0x0042},
306   {0x1000, 0xf800, 5, 0x0003, 0x0043},
307   {0x0c00, 0xfe00, 7, 0x0004, 0x0044},
308   {0x0a00, 0xff00, 8, 0x0005, 0x0045},
309   {0x0800, 0xff00, 8, 0x0006, 0x0046},
310   {0x0600, 0xff00, 8, 0x0007, 0x0047},
311   {0x0580, 0xffc0, 10, 0x0008, 0x0048},
312   {0x0500, 0xffc0, 10, 0x0009, 0x0049},
313   {0x0480, 0xffc0, 10, 0x000a, 0x004a},
314   {0x0440, 0xffe0, 11, 0x000b, 0x004b},
315   {0x0400, 0xffe0, 11, 0x000c, 0x004c},
316   {0x03c0, 0xffe0, 11, 0x000d, 0x004d},
317   {0x0380, 0xffe0, 11, 0x000e, 0x004e},
318   {0x0340, 0xffe0, 11, 0x000f, 0x004f},
319   {0x0300, 0xffe0, 11, 0x0010, 0x0050},
320   {0x02c0, 0xffe0, 11, 0x0011, 0x0051},
321   {0x0280, 0xffe0, 11, 0x0012, 0x0052},
322   {0x0240, 0xffe0, 11, 0x0013, 0x0053},
323   {0x0200, 0xffe0, 11, 0x0014, 0x0054},
324   {0x01c0, 0xffe0, 11, 0x0015, 0x0055},
325   {0x0180, 0xffe0, 11, 0x0016, 0x0056},
326   {0x0140, 0xffe0, 11, 0x0017, 0x0057},
327   {0x0100, 0xffe0, 11, 0x0018, 0x0058},
328   {0x00e0, 0xfff0, 12, 0x0019, 0x0059},
329   {0x00c0, 0xfff0, 12, 0x001a, 0x005a},
330   {0x00a0, 0xfff0, 12, 0x001b, 0x005b},
331   {0x0080, 0xfff0, 12, 0x001c, 0x005c},
332   {0x0060, 0xfff0, 12, 0x001d, 0x005d},
333   {0x0040, 0xfff0, 12, 0x001e, 0x005e},
334   {0x0030, 0xfff8, 13, 0x001f, 0x005f}
335 };
336
337 GST_DEBUG_CATEGORY_STATIC (rtph263pay_debug);
338 #define GST_CAT_DEFAULT (rtph263pay_debug)
339
340 #define GST_RTP_HEADER_LEN 12
341
342 enum
343 {
344   PROP_0,
345   PROP_MODE_A_ONLY
346 };
347
348 static GstStaticPadTemplate gst_rtp_h263_pay_sink_template =
349 GST_STATIC_PAD_TEMPLATE ("sink",
350     GST_PAD_SINK,
351     GST_PAD_ALWAYS,
352     GST_STATIC_CAPS ("video/x-h263, "
353         "variant = (string) \"itu\", " "h263version = (string) \"h263\"")
354     );
355
356 static GstStaticPadTemplate gst_rtp_h263_pay_src_template =
357     GST_STATIC_PAD_TEMPLATE ("src",
358     GST_PAD_SRC,
359     GST_PAD_ALWAYS,
360     GST_STATIC_CAPS ("application/x-rtp, "
361         "media = (string) \"video\", "
362         "payload = (int) " GST_RTP_PAYLOAD_H263_STRING ", "
363         "clock-rate = (int) 90000, " "encoding-name = (string) \"H263\"; "
364         "application/x-rtp, "
365         "media = (string) \"video\", "
366         "payload = (int) " GST_RTP_PAYLOAD_DYNAMIC_STRING ", "
367         "clock-rate = (int) 90000, " "encoding-name = (string) \"H263\"")
368     );
369
370 static void gst_rtp_h263_pay_finalize (GObject * object);
371
372 static gboolean gst_rtp_h263_pay_setcaps (GstBaseRTPPayload * payload,
373     GstCaps * caps);
374 static void gst_rtp_h263_pay_set_property (GObject * object, guint prop_id,
375     const GValue * value, GParamSpec * pspec);
376 static void gst_rtp_h263_pay_get_property (GObject * object, guint prop_id,
377     GValue * value, GParamSpec * pspec);
378 static GstFlowReturn gst_rtp_h263_pay_handle_buffer (GstBaseRTPPayload *
379     payload, GstBuffer * buffer);
380
381 static void gst_rtp_h263_pay_boundry_init (GstRtpH263PayBoundry * boundry,
382     guint8 * start, guint8 * end, guint8 sbit, guint8 ebit);
383 static GstRtpH263PayGob *gst_rtp_h263_pay_gob_new (GstRtpH263PayBoundry *
384     boundry, guint gobn);
385 static GstRtpH263PayMB *gst_rtp_h263_pay_mb_new (GstRtpH263PayBoundry * boundry,
386     guint mba);
387 static GstRtpH263PayPackage *gst_rtp_h263_pay_package_new_empty ();
388 static GstRtpH263PayPackage *gst_rtp_h263_pay_package_new (guint8 * start,
389     guint8 * end, guint length, guint8 sbit, guint8 ebit, GstBuffer * outbuf,
390     gboolean marker);
391
392 static void gst_rtp_h263_pay_mb_destroy (GstRtpH263PayMB * mb);
393 static void gst_rtp_h263_pay_gob_destroy (GstRtpH263PayGob * gob, guint ind);
394 static void gst_rtp_h263_pay_context_destroy (GstRtpH263PayContext * context,
395     guint ind);
396 static void gst_rtp_h263_pay_package_destroy (GstRtpH263PayPackage * pack);
397
398 #define gst_rtp_h263_pay_parent_class parent_class
399 G_DEFINE_TYPE (GstRtpH263Pay, gst_rtp_h263_pay, GST_TYPE_BASE_RTP_PAYLOAD);
400
401 static void
402 gst_rtp_h263_pay_class_init (GstRtpH263PayClass * klass)
403 {
404   GObjectClass *gobject_class;
405   GstElementClass *gstelement_class;
406   GstBaseRTPPayloadClass *gstbasertppayload_class;
407
408   gobject_class = (GObjectClass *) klass;
409   gstelement_class = (GstElementClass *) klass;
410   gstbasertppayload_class = (GstBaseRTPPayloadClass *) klass;
411
412   gobject_class->finalize = gst_rtp_h263_pay_finalize;
413
414   gstbasertppayload_class->set_caps = gst_rtp_h263_pay_setcaps;
415   gstbasertppayload_class->handle_buffer = gst_rtp_h263_pay_handle_buffer;
416   gobject_class->set_property = gst_rtp_h263_pay_set_property;
417   gobject_class->get_property = gst_rtp_h263_pay_get_property;
418
419   g_object_class_install_property (G_OBJECT_CLASS (klass),
420       PROP_MODE_A_ONLY, g_param_spec_boolean ("modea-only",
421           "Fragment packets in mode A Only",
422           "Disable packetization modes B and C", DEFAULT_MODE_A,
423           G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
424
425   gst_element_class_add_pad_template (gstelement_class,
426       gst_static_pad_template_get (&gst_rtp_h263_pay_src_template));
427   gst_element_class_add_pad_template (gstelement_class,
428       gst_static_pad_template_get (&gst_rtp_h263_pay_sink_template));
429
430   gst_element_class_set_details_simple (gstelement_class,
431       "RTP H263 packet payloader", "Codec/Payloader/Network/RTP",
432       "Payload-encodes H263 video in RTP packets (RFC 2190)",
433       "Neil Stratford <neils@vipadia.com>"
434       "Dejan Sakelsak <dejan.sakelsak@marand.si>");
435
436   GST_DEBUG_CATEGORY_INIT (rtph263pay_debug, "rtph263pay", 0,
437       "H263 RTP Payloader");
438 }
439
440 static void
441 gst_rtp_h263_pay_init (GstRtpH263Pay * rtph263pay)
442 {
443   rtph263pay->adapter = gst_adapter_new ();
444
445   rtph263pay->prop_payload_mode = DEFAULT_MODE_A;
446 }
447
448 static void
449 gst_rtp_h263_pay_finalize (GObject * object)
450 {
451   GstRtpH263Pay *rtph263pay;
452
453   rtph263pay = GST_RTP_H263_PAY (object);
454
455   g_object_unref (rtph263pay->adapter);
456   rtph263pay->adapter = NULL;
457
458   G_OBJECT_CLASS (parent_class)->finalize (object);
459 }
460
461 static gboolean
462 gst_rtp_h263_pay_setcaps (GstBaseRTPPayload * payload, GstCaps * caps)
463 {
464   gboolean res;
465
466   payload->pt = GST_RTP_PAYLOAD_H263;
467   gst_base_rtp_payload_set_options (payload, "video", TRUE, "H263", 90000);
468   res = gst_base_rtp_payload_set_outcaps (payload, NULL);
469
470   return res;
471 }
472
473 static void
474 gst_rtp_h263_pay_context_destroy (GstRtpH263PayContext * context, guint ind)
475 {
476   if (!context)
477     return;
478
479   if (context->gobs) {
480     guint i;
481
482     for (i = 0; i < format_props[ind][0]; i++) {
483       if (context->gobs[i]) {
484         gst_rtp_h263_pay_gob_destroy (context->gobs[i], ind);
485       }
486     }
487
488     g_free (context->gobs);
489   }
490
491   g_free (context);
492 }
493
494 static void
495 gst_rtp_h263_pay_set_property (GObject * object, guint prop_id,
496     const GValue * value, GParamSpec * pspec)
497 {
498   GstRtpH263Pay *rtph263pay;
499
500   rtph263pay = GST_RTP_H263_PAY (object);
501
502   switch (prop_id) {
503     case PROP_MODE_A_ONLY:
504       rtph263pay->prop_payload_mode = g_value_get_boolean (value);
505       break;
506     default:
507       G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
508       break;
509   }
510 }
511
512 static void
513 gst_rtp_h263_pay_get_property (GObject * object, guint prop_id,
514     GValue * value, GParamSpec * pspec)
515 {
516   GstRtpH263Pay *rtph263pay;
517
518   rtph263pay = GST_RTP_H263_PAY (object);
519
520   switch (prop_id) {
521     case PROP_MODE_A_ONLY:
522       g_value_set_boolean (value, rtph263pay->prop_payload_mode);
523       break;
524     default:
525       G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
526       break;
527   }
528 }
529
530 static GstRtpH263PayPackage *
531 gst_rtp_h263_pay_package_new_empty (void)
532 {
533   return (GstRtpH263PayPackage *) g_malloc0 (sizeof (GstRtpH263PayPackage));
534 }
535
536 static GstRtpH263PayPackage *
537 gst_rtp_h263_pay_package_new (guint8 * start, guint8 * end, guint length,
538     guint8 sbit, guint8 ebit, GstBuffer * outbuf, gboolean marker)
539 {
540
541   GstRtpH263PayPackage *package;
542
543   package = gst_rtp_h263_pay_package_new_empty ();
544
545   package->payload_start = start;
546   package->payload_end = end;
547   package->payload_len = length;
548   package->sbit = sbit;
549   package->ebit = ebit;
550   package->outbuf = outbuf;
551   package->marker = marker;
552
553   return package;
554 }
555
556 static void
557 gst_rtp_h263_pay_package_destroy (GstRtpH263PayPackage * pack)
558 {
559   if (pack)
560     g_free (pack);
561 }
562
563 static void
564 gst_rtp_h263_pay_boundry_init (GstRtpH263PayBoundry * boundry,
565     guint8 * start, guint8 * end, guint8 sbit, guint8 ebit)
566 {
567   boundry->start = start;
568   boundry->end = end;
569   boundry->sbit = sbit;
570   boundry->ebit = ebit;
571 }
572
573 static void
574 gst_rtp_h263_pay_splat_header_A (guint8 * header,
575     GstRtpH263PayPackage * package, GstRtpH263PayPic * piclayer)
576 {
577
578   GstRtpH263PayAHeader *a_header;
579
580   a_header = (GstRtpH263PayAHeader *) header;
581
582   a_header->f = 0;
583   a_header->p = 0;
584   a_header->sbit = package->sbit;
585   a_header->ebit = package->ebit;
586   a_header->src = GST_H263_PICTURELAYER_PLSRC (piclayer);
587   a_header->i = GST_H263_PICTURELAYER_PLTYPE (piclayer);
588   a_header->u = GST_H263_PICTURELAYER_PLUMV (piclayer);
589   a_header->s = GST_H263_PICTURELAYER_PLSAC (piclayer);
590   a_header->a = GST_H263_PICTURELAYER_PLAP (piclayer);
591   a_header->r1 = 0;
592   a_header->r2 = 0;
593   a_header->dbq = 0;
594   a_header->trb = 0;
595   a_header->tr = 0;
596
597 }
598
599 static void
600 gst_rtp_h263_pay_splat_header_B (guint8 * header,
601     GstRtpH263PayPackage * package, GstRtpH263PayPic * piclayer)
602 {
603
604   GstRtpH263PayBHeader *b_header;
605
606   b_header = (GstRtpH263PayBHeader *) header;
607
608   b_header->f = 1;
609   b_header->p = 0;
610   b_header->sbit = package->sbit;
611   b_header->ebit = package->ebit;
612   b_header->src = GST_H263_PICTURELAYER_PLSRC (piclayer);
613   b_header->quant = package->quant;
614   b_header->gobn = package->gobn;
615   b_header->mba1 = package->mba >> 6;
616   b_header->mba2 = package->mba & 0x003f;
617   b_header->r = 0;
618   b_header->i = GST_H263_PICTURELAYER_PLTYPE (piclayer);
619   b_header->u = GST_H263_PICTURELAYER_PLUMV (piclayer);
620   b_header->s = GST_H263_PICTURELAYER_PLSAC (piclayer);
621   b_header->a = GST_H263_PICTURELAYER_PLAP (piclayer);
622
623   b_header->hmv11 = 0;
624   b_header->hmv12 = 0;
625   b_header->vmv11 = 0;
626   b_header->vmv12 = 0;
627   b_header->hmv21 = 0;
628   b_header->hmv22 = 0;
629   b_header->vmv21 = 0;
630
631   if (package->nmvd > 0) {
632     //mvd[0]
633     b_header->hmv11 = (package->mvd[0] & 0x7f) >> 3;
634     b_header->hmv12 = (package->mvd[0] & 0x07);
635     //mvd[1]
636     b_header->vmv11 = (package->mvd[1] & 0x07f) >> 2;
637     b_header->vmv12 = (package->mvd[1] & 0x03);
638
639     if (package->nmvd == 8) {
640       //mvd[4]
641       b_header->hmv21 = (package->mvd[4] & 0x7f) >> 1;
642       b_header->hmv22 = (package->mvd[4] & 0x01);
643       //mvd[5]
644       b_header->vmv21 = (package->mvd[5] & 0x7f);
645     }
646   }
647
648 }
649
650 static gboolean
651 gst_rtp_h263_pay_gobfinder (GstRtpH263Pay * rtph263pay,
652     GstRtpH263PayBoundry * boundry)
653 {
654   guint8 *current;
655   guint range;
656   guint i;
657
658   current = boundry->end + 1;
659   range = (rtph263pay->data - current) + rtph263pay->available_data;
660
661
662   GST_DEBUG ("Searching for next GOB, data:%p, len:%u, payload_len:%p,"
663       " current:%p, range:%u", rtph263pay->data, rtph263pay->available_data,
664       boundry->end + 1, current, range);
665
666   /* If we are past the end, stop */
667   if (current >= rtph263pay->data + rtph263pay->available_data)
668     return FALSE;
669
670   for (i = 3; i < range - 3; i++) {
671     if ((current[i] == 0x0) &&
672         (current[i + 1] == 0x0) && (current[i + 2] >> 7 == 0x1)) {
673       GST_LOG ("GOB end found at: %p start: %p len: %u", current + i - 1,
674           boundry->end + 1, (guint) (current + i - boundry->end + 2));
675       gst_rtp_h263_pay_boundry_init (boundry, boundry->end + 1,
676           current + i - 1, 0, 0);
677
678       return TRUE;
679     }
680   }
681
682   GST_DEBUG ("Couldn't find any new GBSC in this frame, range:%u", range);
683
684   gst_rtp_h263_pay_boundry_init (boundry, boundry->end + 1,
685       (guint8 *) (rtph263pay->data + rtph263pay->available_data - 1), 0, 0);
686
687   return TRUE;
688 }
689
690 static GstRtpH263PayGob *
691 gst_rtp_h263_pay_gob_new (GstRtpH263PayBoundry * boundry, guint gobn)
692 {
693   GstRtpH263PayGob *gob;
694
695   gob = (GstRtpH263PayGob *) g_malloc0 (sizeof (GstRtpH263PayGob));
696
697   gob->start = boundry->start;
698   gob->end = boundry->end;
699   gob->length = boundry->end - boundry->start + 1;
700   gob->ebit = boundry->ebit;
701   gob->sbit = boundry->sbit;
702   gob->gobn = gobn;
703   gob->quant = 0;
704   gob->macroblocks = NULL;
705   gob->nmacroblocs = 0;
706
707   return gob;
708 }
709
710 static void
711 gst_rtp_h263_pay_gob_destroy (GstRtpH263PayGob * gob, guint ind)
712 {
713
714   if (!gob)
715     return;
716
717   if (gob->macroblocks) {
718
719     guint i;
720
721     for (i = 0; i < gob->nmacroblocs; i++) {
722       gst_rtp_h263_pay_mb_destroy (gob->macroblocks[i]);
723     }
724
725     g_free (gob->macroblocks);
726   }
727
728   g_free (gob);
729 }
730
731 /*
732  * decode MCBPC for I frames and return index in table or -1 if not found
733  */
734 static gint
735 gst_rtp_h263_pay_decode_mcbpc_I (guint32 value)
736 {
737
738   gint i;
739   guint16 code;
740
741   code = value >> 16;
742
743   GST_DEBUG ("value:0x%08x, code:0x%04x", value, code);
744
745   for (i = 0; i < MCBPC_I_LEN; i++) {
746     if ((code & mcbpc_I[i][1]) == mcbpc_I[i][0]) {
747       return i;
748     }
749   }
750
751   GST_WARNING ("Couldn't find code, returning -1");
752
753   return -1;
754 }
755
756 /*
757  * decode MCBPC for P frames and return index in table or -1 if not found
758  */
759 static gint
760 gst_rtp_h263_pay_decode_mcbpc_P (guint32 value)
761 {
762
763   gint i;
764   guint16 code;
765
766   code = value >> 16;
767
768   GST_DEBUG ("value:0x%08x, code:0x%04x", value, code);
769
770   for (i = 0; i < MCBPC_P_LEN; i++) {
771     if ((code & mcbpc_P[i][1]) == mcbpc_P[i][0]) {
772       return i;
773     }
774   }
775
776   GST_WARNING ("Couldn't find code, returning -1");
777
778   return -1;
779 }
780
781 /*
782  * decode CBPY and return index in table or -1 if not found
783  */
784 static gint
785 gst_rtp_h263_pay_decode_cbpy (guint32 value, const guint8 cbpy_table[16][7])
786 {
787
788   gint i;
789   guint8 code;
790
791   code = value >> 24;
792
793   GST_DEBUG ("value:0x%08x, code:0x%04x", value, code);
794
795   for (i = 0; i < CBPY_LEN; i++) {
796     if ((code & cbpy_table[i][1]) == cbpy_table[i][0]) {
797       return i;
798     }
799   }
800
801   GST_WARNING ("Couldn't find code, returning -1");
802
803   return -1;
804 }
805
806 /*
807  * decode MVD and return index in table or -1 if not found
808  */
809 static gint
810 gst_rtp_h263_pay_decode_mvd (guint32 value)
811 {
812
813   gint i;
814   guint16 code;
815
816   code = value >> 16;
817
818   GST_DEBUG ("value:0x%08x, code:0x%04x", value, code);
819
820   for (i = 0; i < MVD_LEN; i++) {
821     if ((code & mvd[i][1]) == mvd[i][0]) {
822       return i;
823     }
824   }
825
826   GST_WARNING ("Couldn't find code, returning -1");
827
828   return -1;
829 }
830
831 /*
832  * decode TCOEF and return index in table or -1 if not found
833  */
834 static gint
835 gst_rtp_h263_pay_decode_tcoef (guint32 value)
836 {
837
838   gint i;
839   guint16 code;
840
841   code = value >> 16;
842
843   GST_DEBUG ("value:0x%08x, code:0x%04x", value, code);
844
845   for (i = 0; i < TCOEF_LEN; i++) {
846     if ((code & tcoef[i][1]) == tcoef[i][0]) {
847       GST_LOG ("tcoef is %d", i);
848       return i;
849     }
850   }
851
852   GST_WARNING ("Couldn't find code, returning -1");
853
854   return -1;
855 }
856
857 /*
858  * the 32-bit register is like a window that we move right for "move_bits" to get the next v "data" h263 field
859  * "rest_bits" tells how many bits in the "data" byte address are still not used
860  */
861
862 static gint
863 gst_rtp_h263_pay_move_window_right (GstRtpH263PayContext * context, guint n,
864     guint rest_bits, guint8 ** orig_data, guint8 ** data_end)
865 {
866
867   GST_DEBUG ("Moving window: 0x%08x from: %p for %d bits, rest_bits: %d",
868       context->window, context->win_end, n, rest_bits);
869
870   if (n == 0)
871     return rest_bits;
872
873   while (n != 0 || context->win_end == ((*data_end) + 1)) {
874     //guint8 a = *data;
875     if (rest_bits == 0) {
876       if (n > 8) {
877         context->window = (context->window << 8) | *context->win_end;
878         n -= 8;
879       } else {
880         context->window =
881             (context->window << n) | (*context->win_end >> (8 - n));
882         rest_bits = 8 - n;
883         if (rest_bits == 0)
884           context->win_end++;
885         break;
886       }
887     } else {
888       if (n > rest_bits) {
889         context->window =
890             (context->
891             window << rest_bits) | (*context->win_end & (((guint) pow (2.0,
892                         (double) rest_bits)) - 1));
893         n -= rest_bits;
894         rest_bits = 0;
895       } else {
896         context->window =
897             (context->window << n) | ((*context->win_end & (((guint) pow (2.0,
898                             (double) rest_bits)) - 1)) >> (rest_bits - n));
899         rest_bits -= n;
900         if (rest_bits == 0)
901           context->win_end++;
902         break;
903       }
904     }
905
906     context->win_end++;
907   }
908
909   *orig_data = context->win_end - 4;
910
911   GST_DEBUG
912       ("Window moved to %p with value: 0x%08x and orig_data: %p rest_bits: %d",
913       context->win_end, context->window, *orig_data, rest_bits);
914   return rest_bits;
915 }
916
917 /*
918  * Find the start of the next MB (end of the current MB)
919  * returns the number of excess bits and stores the end of the MB in end
920  * data must be placed on first MB byte
921  */
922 static GstRtpH263PayMB *
923 gst_rtp_h263_pay_B_mbfinder (GstRtpH263PayContext * context,
924     GstRtpH263PayGob * gob, GstRtpH263PayMB * macroblock, guint mba)
925 {
926
927   guint mb_type_index;
928   guint cbpy_type_index;
929   guint tcoef_type_index;
930   GstRtpH263PayMB *mac;
931   GstRtpH263PayBoundry boundry;
932
933
934   gst_rtp_h263_pay_boundry_init (&boundry, macroblock->end,
935       macroblock->end, 8 - macroblock->ebit, macroblock->ebit);
936   mac = gst_rtp_h263_pay_mb_new (&boundry, mba);
937
938
939   if (mac->sbit == 8) {
940     mac->start++;
941 //     mac->end++;
942     mac->sbit = 0;
943   }
944
945   GST_LOG ("current_pos:%p, end:%p, rest_bits:%d, window:%x",
946       mac->start, mac->end, macroblock->ebit, context->window);
947
948   GST_LOG ("Current pos after COD: %p", mac->end);
949
950   if (context->piclayer->ptype_pictype == 0) {
951     //We have an I frame
952     gint i;
953     guint last;
954     guint ind;
955
956     //Step 2 decode MCBPC I
957     mb_type_index = gst_rtp_h263_pay_decode_mcbpc_I (context->window);
958
959     GST_DEBUG ("MCBPC index: %d", mb_type_index);
960     if (mb_type_index == -1) {
961       GST_ERROR ("MB index shouldn't be -1 in window: %08x", context->window);
962       return NULL;
963     }
964
965     mac->ebit =
966         gst_rtp_h263_pay_move_window_right (context, mcbpc_I[mb_type_index][2],
967         mac->ebit, &mac->end, &gob->end);
968
969     mac->mb_type = mcbpc_I[mb_type_index][5];
970
971     if (mb_type_index == 8) {
972       GST_LOG ("Stuffing skipping rest of MB header");
973       return mac;
974     }
975     //Step 3 decode CBPY I
976     cbpy_type_index = gst_rtp_h263_pay_decode_cbpy (context->window, cbpy_I);
977
978     GST_DEBUG ("CBPY index: %d", cbpy_type_index);
979     if (cbpy_type_index == -1) {
980       GST_ERROR ("CBPY index shouldn't be -1 in window: %08x", context->window);
981       return NULL;
982     }
983
984     mac->ebit =
985         gst_rtp_h263_pay_move_window_right (context, cbpy_I[cbpy_type_index][2],
986         mac->ebit, &mac->end, &gob->end);
987
988     //Step 4 decode rest of MB
989     //MB type 1 and 4 have DQUANT - we store it for packaging purposes
990     if (mcbpc_I[mb_type_index][5] == 4) {
991       GST_DEBUG ("Shifting DQUANT");
992
993       mac->quant = (context->window >> 30);
994
995       mac->ebit =
996           gst_rtp_h263_pay_move_window_right (context, 2, mac->ebit, &mac->end,
997           &gob->end);
998     }
999     //Step 5 go trough the blocks - decode DC and TCOEF
1000     last = 0;
1001     for (i = 0; i < N_BLOCKS; i++) {
1002
1003       GST_DEBUG ("Decoding INTRADC and TCOEF, i:%d", i);
1004       mac->ebit =
1005           gst_rtp_h263_pay_move_window_right (context, 8, mac->ebit, &mac->end,
1006           &gob->end);
1007
1008       if (i > 3) {
1009         ind = mcbpc_I[mb_type_index][i - 1];
1010       } else {
1011         ind = cbpy_I[cbpy_type_index][i + 3];
1012       }
1013
1014       if (ind == 1) {
1015         while (last == 0) {
1016           tcoef_type_index = gst_rtp_h263_pay_decode_tcoef (context->window);
1017
1018           GST_DEBUG ("TCOEF index: %d", tcoef_type_index);
1019           if (tcoef_type_index == -1) {
1020             GST_ERROR ("TCOEF index shouldn't be -1 in window: %08x",
1021                 context->window);
1022             return NULL;
1023           }
1024           mac->ebit =
1025               gst_rtp_h263_pay_move_window_right (context,
1026               tcoef[tcoef_type_index][2], mac->ebit, &mac->end, &gob->end);
1027
1028           last = tcoef[tcoef_type_index][3];
1029           if (tcoef_type_index == 102) {
1030             if ((context->window & 0x80000000) == 0x80000000)
1031               last = 1;
1032             else
1033               last = 0;
1034
1035             mac->ebit =
1036                 gst_rtp_h263_pay_move_window_right (context, 15,
1037                 mac->ebit, &mac->end, &gob->end);
1038           }
1039         }
1040         last = 0;
1041       }
1042     }
1043
1044   } else {
1045     //We have a P frame
1046     guint i;
1047     guint last;
1048     guint ind;
1049
1050     //Step 1 check COD
1051     GST_DEBUG ("Checking for COD");
1052     if ((context->window & 0x80000000) == 0x80000000) {
1053       //The MB is not coded
1054       mac->ebit =
1055           gst_rtp_h263_pay_move_window_right (context, 1, mac->ebit, &mac->end,
1056           &gob->end);
1057       GST_DEBUG ("COOOOOOOOOOOD = 1");
1058
1059       return mac;
1060     } else {
1061       //The MB is coded
1062       mac->ebit =
1063           gst_rtp_h263_pay_move_window_right (context, 1, mac->ebit, &mac->end,
1064           &gob->end);
1065     }
1066
1067     //Step 2 decode MCBPC P
1068     mb_type_index = gst_rtp_h263_pay_decode_mcbpc_P (context->window);
1069
1070     GST_DEBUG ("MCBPC index: %d", mb_type_index);
1071     if (mb_type_index == -1) {
1072       GST_ERROR ("MB index shouldn't be -1 in window: %08x", context->window);
1073       return NULL;
1074     }
1075     mac->ebit =
1076         gst_rtp_h263_pay_move_window_right (context, mcbpc_P[mb_type_index][2],
1077         mac->ebit, &mac->end, &gob->end);
1078
1079     mac->mb_type = mcbpc_P[mb_type_index][5];
1080
1081     if (mb_type_index == 20) {
1082       GST_LOG ("Stuffing skipping rest of MB header");
1083       return mac;
1084     }
1085     //Step 3 decode CBPY P
1086     cbpy_type_index = gst_rtp_h263_pay_decode_cbpy (context->window, cbpy_P);
1087
1088     GST_DEBUG ("CBPY index: %d", cbpy_type_index);
1089     if (cbpy_type_index == -1) {
1090       GST_ERROR ("CBPY index shouldn't be -1 in window: %08x", context->window);
1091       return NULL;
1092     }
1093     mac->ebit =
1094         gst_rtp_h263_pay_move_window_right (context, cbpy_P[cbpy_type_index][2],
1095         mac->ebit, &mac->end, &gob->end);
1096
1097     //MB type 1 and 4 have DQUANT - we add it to MB object and jump over
1098     if (mcbpc_P[mb_type_index][5] == 4 || mcbpc_P[mb_type_index][5] == 1) {
1099       GST_DEBUG ("Shifting DQUANT");
1100
1101       mac->quant = context->window >> 30;
1102
1103       mac->ebit =
1104           gst_rtp_h263_pay_move_window_right (context, 2, mac->ebit, &mac->end,
1105           &gob->end);
1106     }
1107     //MB types < 3 have MVD1-4
1108     if (mcbpc_P[mb_type_index][5] < 3) {
1109
1110       guint nmvd;
1111       gint j;
1112
1113       nmvd = 2;
1114       if (mcbpc_P[mb_type_index][5] == 2)
1115         nmvd = 8;
1116
1117       for (j = 0; j < nmvd; j++) {
1118         guint mvd_type;
1119
1120         mvd_type = gst_rtp_h263_pay_decode_mvd (context->window);
1121
1122         if (mvd_type == -1) {
1123           GST_ERROR ("MVD1-4 index shouldn't be -1 in window: %08x",
1124               context->window);
1125           return NULL;
1126         }
1127         //set the MB mvd values
1128         mac->mvd[j] = mvd[mvd_type][3];
1129
1130         mac->ebit =
1131             gst_rtp_h263_pay_move_window_right (context, mvd[mvd_type][2],
1132             mac->ebit, &mac->end, &gob->end);
1133       }
1134
1135
1136     }
1137     //Step 5 go trough the blocks - decode DC and TCOEF
1138     last = 0;
1139     for (i = 0; i < N_BLOCKS; i++) {
1140
1141       //if MB type 3 or 4 then INTRADC coef are present in blocks
1142       if (mcbpc_P[mb_type_index][5] > 2) {
1143         GST_DEBUG ("INTRADC coef: %d", i);
1144         mac->ebit =
1145             gst_rtp_h263_pay_move_window_right (context, 8, mac->ebit,
1146             &mac->end, &gob->end);
1147       } else {
1148         GST_DEBUG ("INTRADC coef is not present");
1149       }
1150
1151       //check if the block has TCOEF
1152       if (i > 3) {
1153         ind = mcbpc_P[mb_type_index][i - 1];
1154       } else {
1155         if (mcbpc_P[mb_type_index][5] > 2) {
1156           ind = cbpy_I[cbpy_type_index][i + 3];
1157         } else {
1158           ind = cbpy_P[cbpy_type_index][i + 3];
1159         }
1160       }
1161
1162       if (ind == 1) {
1163         while (last == 0) {
1164           tcoef_type_index = gst_rtp_h263_pay_decode_tcoef (context->window);
1165
1166           GST_DEBUG ("TCOEF index: %d", tcoef_type_index);
1167           if (tcoef_type_index == -1) {
1168             GST_ERROR ("TCOEF index shouldn't be -1 in window: %08x",
1169                 context->window);
1170             return NULL;
1171           }
1172
1173           mac->ebit =
1174               gst_rtp_h263_pay_move_window_right (context,
1175               tcoef[tcoef_type_index][2], mac->ebit, &mac->end, &gob->end);
1176
1177           last = tcoef[tcoef_type_index][3];
1178           if (tcoef_type_index == 102) {
1179             if ((context->window & 0x80000000) == 0x80000000)
1180               last = 1;
1181             else
1182               last = 0;
1183
1184             mac->ebit =
1185                 gst_rtp_h263_pay_move_window_right (context, 15,
1186                 mac->ebit, &mac->end, &gob->end);
1187           }
1188         }
1189         last = 0;
1190       }
1191     }
1192   }
1193
1194   mac->length = mac->end - mac->start + 1;
1195
1196   return mac;
1197 }
1198
1199 static GstRtpH263PayMB *
1200 gst_rtp_h263_pay_mb_new (GstRtpH263PayBoundry * boundry, guint mba)
1201 {
1202   GstRtpH263PayMB *mb;
1203   gint i;
1204
1205   mb = (GstRtpH263PayMB *) g_malloc0 (sizeof (GstRtpH263PayMB));
1206
1207   mb->start = boundry->start;
1208   mb->end = boundry->end;
1209   mb->length = boundry->end - boundry->start + 1;
1210   mb->sbit = boundry->sbit;
1211   mb->ebit = boundry->ebit;
1212   mb->mba = mba;
1213
1214   for (i = 0; i < 5; i++)
1215     mb->mvd[i] = 0;
1216
1217   return mb;
1218 }
1219
1220 static void
1221 gst_rtp_h263_pay_mb_destroy (GstRtpH263PayMB * mb)
1222 {
1223   if (!mb)
1224     return;
1225
1226   g_free (mb);
1227 }
1228
1229 static GstFlowReturn
1230 gst_rtp_h263_pay_push (GstRtpH263Pay * rtph263pay,
1231     GstRtpH263PayContext * context, GstRtpH263PayPackage * package)
1232 {
1233
1234   /*
1235    * Splat the payload header values
1236    */
1237   guint8 *header;
1238   guint8 *payload;
1239   GstFlowReturn ret;
1240   GstRTPBuffer rtp = { NULL };
1241
1242   gst_rtp_buffer_map (package->outbuf, GST_MAP_WRITE, &rtp);
1243
1244   header = gst_rtp_buffer_get_payload (&rtp);
1245   payload = header + package->mode;
1246
1247   switch (package->mode) {
1248     case GST_RTP_H263_PAYLOAD_HEADER_MODE_A:
1249       GST_LOG ("Pushing A packet");
1250       gst_rtp_h263_pay_splat_header_A (header, package, context->piclayer);
1251       break;
1252     case GST_RTP_H263_PAYLOAD_HEADER_MODE_B:
1253       GST_LOG ("Pushing B packet");
1254       gst_rtp_h263_pay_splat_header_B (header, package, context->piclayer);
1255       break;
1256     case GST_RTP_H263_PAYLOAD_HEADER_MODE_C:
1257       //gst_rtp_h263_pay_splat_header_C(header, package, context->piclayer);
1258       //break;
1259     default:
1260       return GST_FLOW_ERROR;
1261   }
1262
1263
1264   /*
1265    * Copy the payload data in the buffer
1266    */
1267   GST_DEBUG ("Copying memory");
1268   memcpy (payload, (guint8 *) package->payload_start, package->payload_len);
1269
1270   /*
1271    * timestamp the buffer
1272    */
1273   GST_BUFFER_TIMESTAMP (package->outbuf) = rtph263pay->first_ts;
1274
1275   gst_rtp_buffer_set_marker (&rtp, package->marker);
1276   if (package->marker)
1277     GST_DEBUG ("Marker set!");
1278
1279   gst_rtp_buffer_unmap (&rtp);
1280
1281   ret =
1282       gst_base_rtp_payload_push (GST_BASE_RTP_PAYLOAD (rtph263pay),
1283       package->outbuf);
1284   GST_DEBUG ("Package pushed, returning");
1285
1286   gst_rtp_h263_pay_package_destroy (package);
1287
1288   return ret;
1289 }
1290
1291 static GstFlowReturn
1292 gst_rtp_h263_pay_A_fragment_push (GstRtpH263Pay * rtph263pay,
1293     GstRtpH263PayContext * context, guint first, guint last)
1294 {
1295
1296   GstRtpH263PayPackage *pack;
1297
1298   pack = gst_rtp_h263_pay_package_new_empty ();
1299
1300   pack->payload_start = context->gobs[first]->start;
1301   pack->sbit = context->gobs[first]->sbit;
1302   pack->ebit = context->gobs[last]->ebit;
1303   pack->payload_len =
1304       (context->gobs[last]->end - context->gobs[first]->start) + 1;
1305   pack->marker = FALSE;
1306
1307   if (last == context->no_gobs - 1) {
1308     pack->marker = TRUE;
1309   }
1310
1311   pack->gobn = context->gobs[first]->gobn;
1312   pack->mode = GST_RTP_H263_PAYLOAD_HEADER_MODE_A;
1313   pack->outbuf =
1314       gst_rtp_buffer_new_allocate (pack->payload_len + pack->mode, 0, 0);
1315
1316   GST_DEBUG ("Sending len:%d data to push function", pack->payload_len);
1317
1318   return gst_rtp_h263_pay_push (rtph263pay, context, pack);
1319 }
1320
1321 static GstFlowReturn
1322 gst_rtp_h263_pay_B_fragment_push (GstRtpH263Pay * rtph263pay,
1323     GstRtpH263PayContext * context, GstRtpH263PayGob * gob, guint first,
1324     guint last, GstRtpH263PayBoundry * boundry)
1325 {
1326
1327   GstRtpH263PayPackage *pack;
1328   guint mv;
1329
1330   pack = gst_rtp_h263_pay_package_new_empty ();
1331
1332   pack->payload_start = gob->macroblocks[first]->start;
1333   pack->sbit = gob->macroblocks[first]->sbit;
1334   if (first == 0) {
1335     pack->payload_start = boundry->start;
1336     pack->sbit = boundry->sbit;
1337     pack->quant = gob->quant;
1338   } else {
1339     pack->quant = gob->macroblocks[first]->quant;
1340   }
1341   pack->payload_end = gob->macroblocks[last]->end;
1342
1343   pack->ebit = gob->macroblocks[last]->ebit;
1344   pack->mba = gob->macroblocks[first]->mba;
1345   pack->gobn = gob->gobn;
1346   pack->mode = GST_RTP_H263_PAYLOAD_HEADER_MODE_B;
1347   pack->nmvd = 0;
1348
1349   if (gob->macroblocks[first]->mb_type < 3) {
1350     if (gob->macroblocks[first]->mb_type == 2)
1351       pack->nmvd = 8;
1352     else if (gob->macroblocks[first]->mb_type < 2)
1353       pack->nmvd = 2;
1354
1355     for (mv = 0; mv < pack->nmvd; mv++)
1356       pack->mvd[mv] = gob->macroblocks[first]->mvd[mv];
1357   }
1358
1359   pack->marker = FALSE;
1360   if (last == gob->nmacroblocs - 1) {
1361     pack->ebit = 0;
1362   }
1363
1364   if ((format_props[context->piclayer->ptype_srcformat][0] - 1 == gob->gobn)
1365       && (last == gob->nmacroblocs - 1)) {
1366     pack->marker = TRUE;
1367   }
1368
1369   pack->payload_len = pack->payload_end - pack->payload_start + 1;
1370   pack->outbuf =
1371       gst_rtp_buffer_new_allocate (pack->payload_len + pack->mode, 0, 0);
1372
1373   return gst_rtp_h263_pay_push (rtph263pay, context, pack);
1374 }
1375
1376
1377 static gboolean
1378 gst_rtp_h263_pay_mode_B_fragment (GstRtpH263Pay * rtph263pay,
1379     GstRtpH263PayContext * context, GstRtpH263PayGob * gob)
1380 {
1381
1382
1383     /*---------- MODE B MODE FRAGMENTATION ----------*/
1384   GstRtpH263PayMB *mac;
1385   guint max_payload_size;
1386   GstRtpH263PayBoundry boundry;
1387   guint mb;
1388   //TODO remove m
1389   GstRtpH263PayMB *m;
1390
1391   guint first = 0;
1392   guint payload_len;
1393
1394   max_payload_size =
1395       context->mtu - GST_RTP_H263_PAYLOAD_HEADER_MODE_B - GST_RTP_HEADER_LEN;
1396
1397   gst_rtp_h263_pay_boundry_init (&boundry, gob->start, gob->start, gob->sbit,
1398       0);
1399
1400   gob->macroblocks =
1401       (GstRtpH263PayMB **) g_malloc0 (sizeof (GstRtpH263PayMB *) *
1402       format_props[context->piclayer->ptype_srcformat][1]);
1403
1404   GST_LOG ("GOB isn't PB frame, applying mode B");
1405
1406   //initializing window
1407   context->win_end = boundry.end;
1408   if (gst_rtp_h263_pay_move_window_right (context, 32, boundry.ebit,
1409           &boundry.end, &gob->end) != 0) {
1410     GST_ERROR
1411         ("The rest of the bits should be 0, exiting, because something bad happend");
1412     gst_adapter_flush (rtph263pay->adapter, rtph263pay->available_data);
1413     goto decode_error;
1414   }
1415   //The first GOB of a frame "has no" actual header - PICTURE header is his header
1416   if (gob->gobn == 0) {
1417     guint shift;
1418     GST_LOG ("Initial GOB");
1419     shift = 43;
1420
1421     boundry.ebit =
1422         gst_rtp_h263_pay_move_window_right (context, shift, boundry.ebit,
1423         &boundry.end, &gob->end);
1424
1425     //We need PQUANT for mode B packages - so we store it
1426     gob->quant = context->window >> 27;
1427
1428     //if PCM == 1, then PSBI is present - header has 51 bits
1429     //shift for PQUANT (5) and PCM (1) = 6 bits
1430     shift = 6;
1431     if (context->cpm == 1)
1432       shift += 2;
1433     boundry.ebit =
1434         gst_rtp_h263_pay_move_window_right (context, shift, boundry.ebit,
1435         &boundry.end, &gob->end);
1436
1437     GST_DEBUG ("window: 0x%08x", context->window);
1438
1439     //Shifting the PEI and PSPARE fields
1440     while ((context->window & 0x80000000) == 0x80000000) {
1441       boundry.ebit =
1442           gst_rtp_h263_pay_move_window_right (context, 9,
1443           boundry.ebit, &boundry.end, &gob->end);
1444       GST_LOG ("window: 0x%x", context->window);
1445     }
1446
1447     //shift the last PEI field
1448     boundry.ebit =
1449         gst_rtp_h263_pay_move_window_right (context, 1, boundry.ebit,
1450         &boundry.end, &gob->end);
1451
1452   } else {
1453     //skipping GOBs 24 header bits + 5 GQUANT
1454     guint shift = 24;
1455
1456     GST_LOG ("INTER GOB");
1457
1458     //if CPM == 1, there are 2 more bits in the header - GSBI header is 31 bits long
1459     if (context->cpm == 1)
1460       shift += 2;
1461
1462     GST_LOG ("window: 0x%x", context->window);
1463     boundry.ebit =
1464         gst_rtp_h263_pay_move_window_right (context, shift,
1465         boundry.ebit, &boundry.end, &gob->end);
1466
1467     //We need GQUANT for mode B packages - so we store it
1468     gob->quant = context->window >> 27;
1469
1470     shift = 5;
1471     boundry.ebit =
1472         gst_rtp_h263_pay_move_window_right (context, shift,
1473         boundry.ebit, &boundry.end, &gob->end);
1474
1475     GST_LOG ("window: 0x%x", context->window);
1476   }
1477
1478   GST_DEBUG ("GQUANT IS: %08x", gob->quant);
1479
1480   // We are on MB layer
1481
1482   m = mac = gst_rtp_h263_pay_mb_new (&boundry, 0);
1483   for (mb = 0; mb < format_props[context->piclayer->ptype_srcformat][1]; mb++) {
1484
1485     GST_DEBUG ("================ START MB %d =================", mb);
1486
1487     //Find next macroblock boundaries
1488     if (!(mac = gst_rtp_h263_pay_B_mbfinder (context, gob, mac, mb))) {
1489
1490       GST_DEBUG ("Error decoding MB - sbit: %d", 8 - m->ebit);
1491       GST_ERROR ("Error decoding in GOB");
1492
1493       goto decode_error;
1494     }
1495     //If mb_type == stuffing, don't increment the mb address
1496     if (mac->mb_type == 10) {
1497       mb--;
1498       continue;
1499     } else {
1500       gob->nmacroblocs++;
1501     }
1502
1503     gob->macroblocks[mb] = mac;
1504
1505     if (mac->end >= gob->end) {
1506       GST_LOG ("No more MBs in this GOB");
1507       if (!mac->ebit) {
1508         mac->end--;
1509       }
1510       gob->end = mac->end;
1511       break;
1512     }
1513     m = mac;
1514     GST_DEBUG ("Found MB: mba: %d start: %p end: %p len: %d sbit: %d ebit: %d",
1515         mac->mba, mac->start, mac->end, mac->length, mac->sbit, mac->ebit);
1516     GST_DEBUG ("================ END MB %d =================", mb);
1517   }
1518
1519   mb = 0;
1520   first = 0;
1521   payload_len = boundry.end - boundry.start + 1;
1522   GST_DEBUG ("------------------------- NEW PACKAGE ----------------------");
1523   while (mb < gob->nmacroblocs) {
1524     if (payload_len + gob->macroblocks[mb]->length < max_payload_size) {
1525
1526       //FIXME: payload_len is not the real length -> ignoring sbit/ebit
1527       payload_len += gob->macroblocks[mb]->length;
1528       mb++;
1529
1530     } else {
1531       //FIXME: we should include the last few bits of the GOB in the package - do we do that now?
1532       //GST_DEBUG ("Pushing GOBS %d to %d because payload size is %d", first,
1533       //    first == mb - 1, payload_len);
1534
1535       if (gst_rtp_h263_pay_B_fragment_push (rtph263pay, context, gob, first,
1536               mb - 1, &boundry)) {
1537         GST_ERROR ("Oooops, there was an error sending");
1538         return FALSE;
1539       }
1540
1541       payload_len = 0;
1542       first = mb;
1543       GST_DEBUG
1544           ("------------------------- END PACKAGE ----------------------");
1545       GST_DEBUG
1546           ("------------------------- NEW PACKAGE ----------------------");
1547     }
1548   }
1549
1550   /* Push rest */
1551   GST_DEBUG ("Remainder first: %d, MB: %d", first, mb);
1552   if (payload_len != 0) {
1553     if (gst_rtp_h263_pay_B_fragment_push (rtph263pay, context, gob, first,
1554             mb - 1, &boundry)) {
1555       GST_ERROR ("Oooops, there was an error sending!");
1556       return FALSE;
1557     }
1558   }
1559
1560     /*---------- END OF MODE B FRAGMENTATION ----------*/
1561
1562   return TRUE;
1563
1564 decode_error:
1565   return FALSE;
1566 }
1567
1568 static GstFlowReturn
1569 gst_rtp_h263_send_entire_frame (GstRtpH263Pay * rtph263pay,
1570     GstRtpH263PayContext * context)
1571 {
1572   GstRtpH263PayPackage *pack;
1573   pack =
1574       gst_rtp_h263_pay_package_new (rtph263pay->data,
1575       rtph263pay->data + rtph263pay->available_data,
1576       rtph263pay->available_data, 0, 0, NULL, TRUE);
1577   pack->mode = GST_RTP_H263_PAYLOAD_HEADER_MODE_A;
1578
1579   GST_DEBUG ("Available data: %d", rtph263pay->available_data);
1580
1581   pack->outbuf =
1582       gst_rtp_buffer_new_allocate (pack->payload_len +
1583       GST_RTP_H263_PAYLOAD_HEADER_MODE_A, 0, 0);
1584
1585   return gst_rtp_h263_pay_push (rtph263pay, context, pack);
1586 }
1587
1588 static GstFlowReturn
1589 gst_rtp_h263_pay_flush (GstRtpH263Pay * rtph263pay)
1590 {
1591
1592   /*
1593    * FIXME: GSTUF bits are ignored right now,
1594    *  - not using EBIT/SBIT payload header fields in mode A fragmentation - ffmpeg doesn't need them, but others?
1595    */
1596
1597   GstFlowReturn ret;
1598   GstRtpH263PayContext *context;
1599   gint i;
1600
1601   ret = 0;
1602   context = (GstRtpH263PayContext *) g_malloc0 (sizeof (GstRtpH263PayContext));
1603   context->mtu =
1604       rtph263pay->payload.mtu - (MTU_SECURITY_OFFSET + GST_RTP_HEADER_LEN +
1605       GST_RTP_H263_PAYLOAD_HEADER_MODE_C);
1606
1607   GST_DEBUG ("MTU: %d", context->mtu);
1608   rtph263pay->available_data = gst_adapter_available (rtph263pay->adapter);
1609   if (rtph263pay->available_data == 0) {
1610     ret = GST_FLOW_RESEND;
1611     goto end;
1612   }
1613
1614   /* Get a pointer to all the data for the frame */
1615   rtph263pay->data =
1616       (guint8 *) gst_adapter_map (rtph263pay->adapter,
1617       rtph263pay->available_data);
1618
1619   /* Picture header */
1620   context->piclayer = (GstRtpH263PayPic *) rtph263pay->data;
1621
1622   if (context->piclayer->ptype_pictype == 0)
1623     GST_DEBUG ("We got an I-frame");
1624   else
1625     GST_DEBUG ("We got a P-frame");
1626
1627   context->cpm = rtph263pay->data[6] >> 7;
1628
1629   GST_DEBUG ("CPM: %d", context->cpm);
1630
1631   GST_DEBUG ("Payload length is: %d", rtph263pay->available_data);
1632
1633   /*
1634    * - MODE A - If normal, I and P frames,  -> mode A
1635    *   - GOB layer fragmentation
1636    * - MODE B - If normal, I and P frames, but GOBs > mtu
1637    *   - MB layer fragmentation
1638    * - MODE C - For P frames with PB option, but GOBs > mtu
1639    *   - MB layer fragmentation
1640    */
1641   if (rtph263pay->available_data + GST_RTP_H263_PAYLOAD_HEADER_MODE_A +
1642       GST_RTP_HEADER_LEN < context->mtu) {
1643     ret = gst_rtp_h263_send_entire_frame (rtph263pay, context);
1644   } else {
1645
1646       /*---------- FRAGMENTING THE FRAME BECAUSE TOO LARGE TO FIT IN MTU ----------*/
1647     GstRtpH263PayBoundry bound;
1648     gint first;
1649     guint payload_len;
1650     gboolean forcea = FALSE;
1651
1652     GST_DEBUG ("Frame too large for MTU");
1653     /*
1654      * Let's go trough all the data and fragment it untill end is reached
1655      */
1656
1657     gst_rtp_h263_pay_boundry_init (&bound, NULL, rtph263pay->data - 1, 0, 0);
1658     context->gobs =
1659         (GstRtpH263PayGob **) g_malloc0 (format_props[context->
1660             piclayer->ptype_srcformat][0] * sizeof (GstRtpH263PayGob *));
1661
1662
1663     for (i = 0; i < format_props[context->piclayer->ptype_srcformat][0]; i++) {
1664       GST_DEBUG ("Searching for gob %d", i);
1665       if (!gst_rtp_h263_pay_gobfinder (rtph263pay, &bound)) {
1666         if (i <= 1) {
1667           GST_WARNING
1668               ("No GOB's were found in data stream! Please enable RTP mode in encoder. Forcing mode A for now.");
1669           ret = gst_rtp_h263_send_entire_frame (rtph263pay, context);
1670           goto end;
1671         } else {
1672           /* try to send fragments corresponding to found GOBs */
1673           forcea = TRUE;
1674           break;
1675         }
1676       }
1677
1678       context->gobs[i] = gst_rtp_h263_pay_gob_new (&bound, i);
1679       //FIXME - encoders may generate an EOS gob that has to be processed
1680       GST_DEBUG
1681           ("Gob values are: gobn: %d, start: %p len: %d ebit: %d sbit: %d", i,
1682           context->gobs[i]->start, context->gobs[i]->length,
1683           context->gobs[i]->ebit, context->gobs[i]->sbit);
1684     }
1685     /* NOTE some places may still assume this to be the max possible */
1686     context->no_gobs = i;
1687     GST_DEBUG ("Found %d GOBS of maximum %d",
1688         context->no_gobs, format_props[context->piclayer->ptype_srcformat][0]);
1689
1690     // Make packages smaller than MTU
1691     //   A mode
1692     // - if ( GOB > MTU) -> B mode || C mode
1693     //   Push packages
1694
1695     first = 0;
1696     payload_len = 0;
1697     i = 0;
1698     while (i < context->no_gobs) {
1699
1700       if (context->gobs[i]->length >= context->mtu) {
1701         if (payload_len == 0) {
1702
1703           GST_DEBUG ("GOB len > MTU");
1704           if (rtph263pay->prop_payload_mode || forcea) {
1705             payload_len = context->gobs[i]->length;
1706             goto force_a;
1707           }
1708           if (!context->piclayer->ptype_pbmode) {
1709             GST_DEBUG ("MODE B on GOB %d needed", i);
1710             if (!gst_rtp_h263_pay_mode_B_fragment (rtph263pay, context,
1711                     context->gobs[i])) {
1712               GST_ERROR ("There was an error fragmenting in mode B");
1713               return GST_FLOW_ERROR;
1714             }
1715           } else {
1716             //IMPLEMENT C mode
1717             GST_ERROR ("MODE C on GOB %d needed, but not supported yet", i);
1718             /*if(!gst_rtp_h263_pay_mode_C_fragment(rtph263pay, context, context->gobs[i])) {
1719                ret = GST_FLOW_OK;
1720                GST_ERROR("There was an error fragmenting in mode C");
1721                goto decode_error;
1722                } */
1723             goto decode_error;
1724           }
1725         decode_error:
1726           i++;
1727           first = i;
1728           continue;
1729
1730         } else {
1731           goto payload_a_push;
1732         }
1733       }
1734
1735       if (payload_len + context->gobs[i]->length < context->mtu) {
1736         GST_DEBUG ("GOB %d fills mtu", i);
1737         payload_len += context->gobs[i]->length;
1738         i++;
1739         if (i == context->no_gobs) {
1740           GST_DEBUG ("LAST GOB %d", i);
1741           goto payload_a_push;
1742         }
1743
1744       } else {
1745       payload_a_push:
1746         GST_DEBUG ("Pushing GOBS %d to %d because payload size is %d", first,
1747             first == i ? i : i - 1, payload_len);
1748         gst_rtp_h263_pay_A_fragment_push (rtph263pay, context, first,
1749             first == i ? i : i - 1);
1750         payload_len = 0;
1751         first = i;
1752       }
1753       continue;
1754
1755     force_a:
1756       GST_DEBUG ("Pushing GOBS %d to %d because payload size is %d", first, i,
1757           payload_len);
1758       gst_rtp_h263_pay_A_fragment_push (rtph263pay, context, first, i);
1759       payload_len = 0;
1760       i++;
1761       first = i;
1762     }
1763
1764
1765   }/*---------- END OF FRAGMENTATION ----------*/
1766
1767   /* Flush the input buffer data */
1768
1769 end:
1770   gst_rtp_h263_pay_context_destroy (context,
1771       context->piclayer->ptype_srcformat);
1772   gst_adapter_unmap (rtph263pay->adapter);
1773   gst_adapter_flush (rtph263pay->adapter, rtph263pay->available_data);
1774
1775   return ret;
1776 }
1777
1778 static GstFlowReturn
1779 gst_rtp_h263_pay_handle_buffer (GstBaseRTPPayload * payload, GstBuffer * buffer)
1780 {
1781
1782   GstRtpH263Pay *rtph263pay;
1783   GstFlowReturn ret;
1784
1785   GST_DEBUG ("-------------------- NEW FRAME ---------------");
1786   rtph263pay = GST_RTP_H263_PAY (payload);
1787
1788   rtph263pay->first_ts = GST_BUFFER_TIMESTAMP (buffer);
1789
1790   /* we always encode and flush a full picture */
1791   gst_adapter_push (rtph263pay->adapter, buffer);
1792   ret = gst_rtp_h263_pay_flush (rtph263pay);
1793   GST_DEBUG ("-------------------- END FRAME ---------------");
1794
1795   return ret;
1796 }
1797
1798 gboolean
1799 gst_rtp_h263_pay_plugin_init (GstPlugin * plugin)
1800 {
1801   return gst_element_register (plugin, "rtph263pay",
1802       GST_RANK_SECONDARY, GST_TYPE_RTP_H263_PAY);
1803 }