OSDN Git Service

008f9e9e81e76eff2b552fd57a5c45f9fad71765
[coroid/libav_saccubus.git] / libavcodec / utils.c
1 /*
2  * utils for libavcodec
3  * Copyright (c) 2001 Fabrice Bellard
4  * Copyright (c) 2002-2004 Michael Niedermayer <michaelni@gmx.at>
5  *
6  * This file is part of FFmpeg.
7  *
8  * FFmpeg is free software; you can redistribute it and/or
9  * modify it under the terms of the GNU Lesser General Public
10  * License as published by the Free Software Foundation; either
11  * version 2.1 of the License, or (at your option) any later version.
12  *
13  * FFmpeg is distributed in the hope that it will be useful,
14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
16  * Lesser General Public License for more details.
17  *
18  * You should have received a copy of the GNU Lesser General Public
19  * License along with FFmpeg; if not, write to the Free Software
20  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
21  */
22
23 /**
24  * @file
25  * utils.
26  */
27
28 /* needed for mkstemp() */
29 #define _XOPEN_SOURCE 600
30
31 #include "libavutil/avstring.h"
32 #include "libavutil/integer.h"
33 #include "libavutil/crc.h"
34 #include "libavutil/pixdesc.h"
35 #include "avcodec.h"
36 #include "dsputil.h"
37 #include "opt.h"
38 #include "imgconvert.h"
39 #include "audioconvert.h"
40 #include "libxvid_internal.h"
41 #include "internal.h"
42 #include <stdlib.h>
43 #include <stdarg.h>
44 #include <limits.h>
45 #include <float.h>
46 #if !HAVE_MKSTEMP
47 #include <fcntl.h>
48 #endif
49
50 static int volatile entangled_thread_counter=0;
51 int (*ff_lockmgr_cb)(void **mutex, enum AVLockOp op);
52 static void *codec_mutex;
53
54 void *av_fast_realloc(void *ptr, unsigned int *size, unsigned int min_size)
55 {
56     if(min_size < *size)
57         return ptr;
58
59     *size= FFMAX(17*min_size/16 + 32, min_size);
60
61     ptr= av_realloc(ptr, *size);
62     if(!ptr) //we could set this to the unmodified min_size but this is safer if the user lost the ptr and uses NULL now
63         *size= 0;
64
65     return ptr;
66 }
67
68 void av_fast_malloc(void *ptr, unsigned int *size, unsigned int min_size)
69 {
70     void **p = ptr;
71     if (min_size < *size)
72         return;
73     *size= FFMAX(17*min_size/16 + 32, min_size);
74     av_free(*p);
75     *p = av_malloc(*size);
76     if (!*p) *size = 0;
77 }
78
79 /* encoder management */
80 static AVCodec *first_avcodec = NULL;
81
82 AVCodec *av_codec_next(AVCodec *c){
83     if(c) return c->next;
84     else  return first_avcodec;
85 }
86
87 void avcodec_register(AVCodec *codec)
88 {
89     AVCodec **p;
90     avcodec_init();
91     p = &first_avcodec;
92     while (*p != NULL) p = &(*p)->next;
93     *p = codec;
94     codec->next = NULL;
95 }
96
97 #if LIBAVCODEC_VERSION_MAJOR < 53
98 void register_avcodec(AVCodec *codec)
99 {
100     avcodec_register(codec);
101 }
102 #endif
103
104 unsigned avcodec_get_edge_width(void)
105 {
106     return EDGE_WIDTH;
107 }
108
109 void avcodec_set_dimensions(AVCodecContext *s, int width, int height){
110     s->coded_width = width;
111     s->coded_height= height;
112     s->width = -((-width )>>s->lowres);
113     s->height= -((-height)>>s->lowres);
114 }
115
116 typedef struct InternalBuffer{
117     int last_pic_num;
118     uint8_t *base[4];
119     uint8_t *data[4];
120     int linesize[4];
121     int width, height;
122     enum PixelFormat pix_fmt;
123 }InternalBuffer;
124
125 #define INTERNAL_BUFFER_SIZE 32
126
127 void avcodec_align_dimensions2(AVCodecContext *s, int *width, int *height, int linesize_align[4]){
128     int w_align= 1;
129     int h_align= 1;
130
131     switch(s->pix_fmt){
132     case PIX_FMT_YUV420P:
133     case PIX_FMT_YUYV422:
134     case PIX_FMT_UYVY422:
135     case PIX_FMT_YUV422P:
136     case PIX_FMT_YUV440P:
137     case PIX_FMT_YUV444P:
138     case PIX_FMT_GRAY8:
139     case PIX_FMT_GRAY16BE:
140     case PIX_FMT_GRAY16LE:
141     case PIX_FMT_YUVJ420P:
142     case PIX_FMT_YUVJ422P:
143     case PIX_FMT_YUVJ440P:
144     case PIX_FMT_YUVJ444P:
145     case PIX_FMT_YUVA420P:
146         w_align= 16; //FIXME check for non mpeg style codecs and use less alignment
147         h_align= 16;
148         if(s->codec_id == CODEC_ID_MPEG2VIDEO || s->codec_id == CODEC_ID_MJPEG || s->codec_id == CODEC_ID_AMV || s->codec_id == CODEC_ID_THP)
149             h_align= 32; // interlaced is rounded up to 2 MBs
150         break;
151     case PIX_FMT_YUV411P:
152     case PIX_FMT_UYYVYY411:
153         w_align=32;
154         h_align=8;
155         break;
156     case PIX_FMT_YUV410P:
157         if(s->codec_id == CODEC_ID_SVQ1){
158             w_align=64;
159             h_align=64;
160         }
161     case PIX_FMT_RGB555:
162         if(s->codec_id == CODEC_ID_RPZA){
163             w_align=4;
164             h_align=4;
165         }
166     case PIX_FMT_PAL8:
167     case PIX_FMT_BGR8:
168     case PIX_FMT_RGB8:
169         if(s->codec_id == CODEC_ID_SMC){
170             w_align=4;
171             h_align=4;
172         }
173         break;
174     case PIX_FMT_BGR24:
175         if((s->codec_id == CODEC_ID_MSZH) || (s->codec_id == CODEC_ID_ZLIB)){
176             w_align=4;
177             h_align=4;
178         }
179         break;
180     default:
181         w_align= 1;
182         h_align= 1;
183         break;
184     }
185
186     *width = FFALIGN(*width , w_align);
187     *height= FFALIGN(*height, h_align);
188     if(s->codec_id == CODEC_ID_H264)
189         *height+=2; // some of the optimized chroma MC reads one line too much
190
191     linesize_align[0] =
192     linesize_align[1] =
193     linesize_align[2] =
194     linesize_align[3] = STRIDE_ALIGN;
195 //STRIDE_ALIGN is 8 for SSE* but this does not work for SVQ1 chroma planes
196 //we could change STRIDE_ALIGN to 16 for x86/sse but it would increase the
197 //picture size unneccessarily in some cases. The solution here is not
198 //pretty and better ideas are welcome!
199 #if HAVE_MMX
200     if(s->codec_id == CODEC_ID_SVQ1 || s->codec_id == CODEC_ID_VP5 ||
201        s->codec_id == CODEC_ID_VP6 || s->codec_id == CODEC_ID_VP6F ||
202        s->codec_id == CODEC_ID_VP6A) {
203         linesize_align[0] =
204         linesize_align[1] =
205         linesize_align[2] = 16;
206     }
207 #endif
208 }
209
210 void avcodec_align_dimensions(AVCodecContext *s, int *width, int *height){
211     int chroma_shift = av_pix_fmt_descriptors[s->pix_fmt].log2_chroma_w;
212     int linesize_align[4];
213     int align;
214     avcodec_align_dimensions2(s, width, height, linesize_align);
215     align = FFMAX(linesize_align[0], linesize_align[3]);
216     linesize_align[1] <<= chroma_shift;
217     linesize_align[2] <<= chroma_shift;
218     align = FFMAX3(align, linesize_align[1], linesize_align[2]);
219     *width=FFALIGN(*width, align);
220 }
221
222 int avcodec_check_dimensions(void *av_log_ctx, unsigned int w, unsigned int h){
223     if((int)w>0 && (int)h>0 && (w+128)*(uint64_t)(h+128) < INT_MAX/8)
224         return 0;
225
226     av_log(av_log_ctx, AV_LOG_ERROR, "picture size invalid (%ux%u)\n", w, h);
227     return AVERROR(EINVAL);
228 }
229
230 int avcodec_default_get_buffer(AVCodecContext *s, AVFrame *pic){
231     int i;
232     int w= s->width;
233     int h= s->height;
234     InternalBuffer *buf;
235     int *picture_number;
236
237     if(pic->data[0]!=NULL) {
238         av_log(s, AV_LOG_ERROR, "pic->data[0]!=NULL in avcodec_default_get_buffer\n");
239         return -1;
240     }
241     if(s->internal_buffer_count >= INTERNAL_BUFFER_SIZE) {
242         av_log(s, AV_LOG_ERROR, "internal_buffer_count overflow (missing release_buffer?)\n");
243         return -1;
244     }
245
246     if(avcodec_check_dimensions(s,w,h))
247         return -1;
248
249     if(s->internal_buffer==NULL){
250         s->internal_buffer= av_mallocz((INTERNAL_BUFFER_SIZE+1)*sizeof(InternalBuffer));
251     }
252 #if 0
253     s->internal_buffer= av_fast_realloc(
254         s->internal_buffer,
255         &s->internal_buffer_size,
256         sizeof(InternalBuffer)*FFMAX(99,  s->internal_buffer_count+1)/*FIXME*/
257         );
258 #endif
259
260     buf= &((InternalBuffer*)s->internal_buffer)[s->internal_buffer_count];
261     picture_number= &(((InternalBuffer*)s->internal_buffer)[INTERNAL_BUFFER_SIZE]).last_pic_num; //FIXME ugly hack
262     (*picture_number)++;
263
264     if(buf->base[0] && (buf->width != w || buf->height != h || buf->pix_fmt != s->pix_fmt)){
265         for(i=0; i<4; i++){
266             av_freep(&buf->base[i]);
267             buf->data[i]= NULL;
268         }
269     }
270
271     if(buf->base[0]){
272         pic->age= *picture_number - buf->last_pic_num;
273         buf->last_pic_num= *picture_number;
274     }else{
275         int h_chroma_shift, v_chroma_shift;
276         int size[4] = {0};
277         int tmpsize;
278         int unaligned;
279         AVPicture picture;
280         int stride_align[4];
281
282         avcodec_get_chroma_sub_sample(s->pix_fmt, &h_chroma_shift, &v_chroma_shift);
283
284         avcodec_align_dimensions2(s, &w, &h, stride_align);
285
286         if(!(s->flags&CODEC_FLAG_EMU_EDGE)){
287             w+= EDGE_WIDTH*2;
288             h+= EDGE_WIDTH*2;
289         }
290
291         do {
292             // NOTE: do not align linesizes individually, this breaks e.g. assumptions
293             // that linesize[0] == 2*linesize[1] in the MPEG-encoder for 4:2:2
294             ff_fill_linesize(&picture, s->pix_fmt, w);
295             // increase alignment of w for next try (rhs gives the lowest bit set in w)
296             w += w & ~(w-1);
297
298             unaligned = 0;
299             for (i=0; i<4; i++){
300                 unaligned |= picture.linesize[i] % stride_align[i];
301             }
302         } while (unaligned);
303
304         tmpsize = ff_fill_pointer(&picture, NULL, s->pix_fmt, h);
305         if (tmpsize < 0)
306             return -1;
307
308         for (i=0; i<3 && picture.data[i+1]; i++)
309             size[i] = picture.data[i+1] - picture.data[i];
310         size[i] = tmpsize - (picture.data[i] - picture.data[0]);
311
312         buf->last_pic_num= -256*256*256*64;
313         memset(buf->base, 0, sizeof(buf->base));
314         memset(buf->data, 0, sizeof(buf->data));
315
316         for(i=0; i<4 && size[i]; i++){
317             const int h_shift= i==0 ? 0 : h_chroma_shift;
318             const int v_shift= i==0 ? 0 : v_chroma_shift;
319
320             buf->linesize[i]= picture.linesize[i];
321
322             buf->base[i]= av_malloc(size[i]+16); //FIXME 16
323             if(buf->base[i]==NULL) return -1;
324             memset(buf->base[i], 128, size[i]);
325
326             // no edge if EDGE EMU or not planar YUV
327             if((s->flags&CODEC_FLAG_EMU_EDGE) || !size[2])
328                 buf->data[i] = buf->base[i];
329             else
330                 buf->data[i] = buf->base[i] + FFALIGN((buf->linesize[i]*EDGE_WIDTH>>v_shift) + (EDGE_WIDTH>>h_shift), stride_align[i]);
331         }
332         if(size[1] && !size[2])
333             ff_set_systematic_pal((uint32_t*)buf->data[1], s->pix_fmt);
334         buf->width  = s->width;
335         buf->height = s->height;
336         buf->pix_fmt= s->pix_fmt;
337         pic->age= 256*256*256*64;
338     }
339     pic->type= FF_BUFFER_TYPE_INTERNAL;
340
341     for(i=0; i<4; i++){
342         pic->base[i]= buf->base[i];
343         pic->data[i]= buf->data[i];
344         pic->linesize[i]= buf->linesize[i];
345     }
346     s->internal_buffer_count++;
347
348     pic->reordered_opaque= s->reordered_opaque;
349
350     if(s->debug&FF_DEBUG_BUFFERS)
351         av_log(s, AV_LOG_DEBUG, "default_get_buffer called on pic %p, %d buffers used\n", pic, s->internal_buffer_count);
352
353     return 0;
354 }
355
356 void avcodec_default_release_buffer(AVCodecContext *s, AVFrame *pic){
357     int i;
358     InternalBuffer *buf, *last;
359
360     assert(pic->type==FF_BUFFER_TYPE_INTERNAL);
361     assert(s->internal_buffer_count);
362
363     buf = NULL; /* avoids warning */
364     for(i=0; i<s->internal_buffer_count; i++){ //just 3-5 checks so is not worth to optimize
365         buf= &((InternalBuffer*)s->internal_buffer)[i];
366         if(buf->data[0] == pic->data[0])
367             break;
368     }
369     assert(i < s->internal_buffer_count);
370     s->internal_buffer_count--;
371     last = &((InternalBuffer*)s->internal_buffer)[s->internal_buffer_count];
372
373     FFSWAP(InternalBuffer, *buf, *last);
374
375     for(i=0; i<4; i++){
376         pic->data[i]=NULL;
377 //        pic->base[i]=NULL;
378     }
379 //printf("R%X\n", pic->opaque);
380
381     if(s->debug&FF_DEBUG_BUFFERS)
382         av_log(s, AV_LOG_DEBUG, "default_release_buffer called on pic %p, %d buffers used\n", pic, s->internal_buffer_count);
383 }
384
385 int avcodec_default_reget_buffer(AVCodecContext *s, AVFrame *pic){
386     AVFrame temp_pic;
387     int i;
388
389     /* If no picture return a new buffer */
390     if(pic->data[0] == NULL) {
391         /* We will copy from buffer, so must be readable */
392         pic->buffer_hints |= FF_BUFFER_HINTS_READABLE;
393         return s->get_buffer(s, pic);
394     }
395
396     /* If internal buffer type return the same buffer */
397     if(pic->type == FF_BUFFER_TYPE_INTERNAL) {
398         pic->reordered_opaque= s->reordered_opaque;
399         return 0;
400     }
401
402     /*
403      * Not internal type and reget_buffer not overridden, emulate cr buffer
404      */
405     temp_pic = *pic;
406     for(i = 0; i < 4; i++)
407         pic->data[i] = pic->base[i] = NULL;
408     pic->opaque = NULL;
409     /* Allocate new frame */
410     if (s->get_buffer(s, pic))
411         return -1;
412     /* Copy image data from old buffer to new buffer */
413     av_picture_copy((AVPicture*)pic, (AVPicture*)&temp_pic, s->pix_fmt, s->width,
414              s->height);
415     s->release_buffer(s, &temp_pic); // Release old frame
416     return 0;
417 }
418
419 int avcodec_default_execute(AVCodecContext *c, int (*func)(AVCodecContext *c2, void *arg2),void *arg, int *ret, int count, int size){
420     int i;
421
422     for(i=0; i<count; i++){
423         int r= func(c, (char*)arg + i*size);
424         if(ret) ret[i]= r;
425     }
426     return 0;
427 }
428
429 int avcodec_default_execute2(AVCodecContext *c, int (*func)(AVCodecContext *c2, void *arg2, int jobnr, int threadnr),void *arg, int *ret, int count){
430     int i;
431
432     for(i=0; i<count; i++){
433         int r= func(c, arg, i, 0);
434         if(ret) ret[i]= r;
435     }
436     return 0;
437 }
438
439 enum PixelFormat avcodec_default_get_format(struct AVCodecContext *s, const enum PixelFormat *fmt){
440     while (*fmt != PIX_FMT_NONE && ff_is_hwaccel_pix_fmt(*fmt))
441         ++fmt;
442     return fmt[0];
443 }
444
445 void avcodec_get_frame_defaults(AVFrame *pic){
446     memset(pic, 0, sizeof(AVFrame));
447
448     pic->pts= AV_NOPTS_VALUE;
449     pic->key_frame= 1;
450 }
451
452 AVFrame *avcodec_alloc_frame(void){
453     AVFrame *pic= av_malloc(sizeof(AVFrame));
454
455     if(pic==NULL) return NULL;
456
457     avcodec_get_frame_defaults(pic);
458
459     return pic;
460 }
461
462 int attribute_align_arg avcodec_open(AVCodecContext *avctx, AVCodec *codec)
463 {
464     int ret= -1;
465
466     /* If there is a user-supplied mutex locking routine, call it. */
467     if (ff_lockmgr_cb) {
468         if ((*ff_lockmgr_cb)(&codec_mutex, AV_LOCK_OBTAIN))
469             return -1;
470     }
471
472     entangled_thread_counter++;
473     if(entangled_thread_counter != 1){
474         av_log(avctx, AV_LOG_ERROR, "insufficient thread locking around avcodec_open/close()\n");
475         goto end;
476     }
477
478     if(avctx->codec || !codec)
479         goto end;
480
481     if (codec->priv_data_size > 0) {
482         avctx->priv_data = av_mallocz(codec->priv_data_size);
483         if (!avctx->priv_data) {
484             ret = AVERROR(ENOMEM);
485             goto end;
486         }
487     } else {
488         avctx->priv_data = NULL;
489     }
490
491     if(avctx->coded_width && avctx->coded_height)
492         avcodec_set_dimensions(avctx, avctx->coded_width, avctx->coded_height);
493     else if(avctx->width && avctx->height)
494         avcodec_set_dimensions(avctx, avctx->width, avctx->height);
495
496 #define SANE_NB_CHANNELS 128U
497     if (((avctx->coded_width || avctx->coded_height)
498         && avcodec_check_dimensions(avctx, avctx->coded_width, avctx->coded_height))
499         || avctx->channels > SANE_NB_CHANNELS) {
500         ret = AVERROR(EINVAL);
501         goto free_and_end;
502     }
503
504     avctx->codec = codec;
505     if ((avctx->codec_type == AVMEDIA_TYPE_UNKNOWN || avctx->codec_type == codec->type) &&
506         avctx->codec_id == CODEC_ID_NONE) {
507         avctx->codec_type = codec->type;
508         avctx->codec_id   = codec->id;
509     }
510     if(avctx->codec_id != codec->id || avctx->codec_type != codec->type){
511         av_log(avctx, AV_LOG_ERROR, "codec type or id mismatches\n");
512         goto free_and_end;
513     }
514     avctx->frame_number = 0;
515     if(avctx->codec->init){
516         ret = avctx->codec->init(avctx);
517         if (ret < 0) {
518             goto free_and_end;
519         }
520     }
521     ret=0;
522 end:
523     entangled_thread_counter--;
524
525     /* Release any user-supplied mutex. */
526     if (ff_lockmgr_cb) {
527         (*ff_lockmgr_cb)(&codec_mutex, AV_LOCK_RELEASE);
528     }
529     return ret;
530 free_and_end:
531     av_freep(&avctx->priv_data);
532     avctx->codec= NULL;
533     goto end;
534 }
535
536 int attribute_align_arg avcodec_encode_audio(AVCodecContext *avctx, uint8_t *buf, int buf_size,
537                          const short *samples)
538 {
539     if(buf_size < FF_MIN_BUFFER_SIZE && 0){
540         av_log(avctx, AV_LOG_ERROR, "buffer smaller than minimum size\n");
541         return -1;
542     }
543     if((avctx->codec->capabilities & CODEC_CAP_DELAY) || samples){
544         int ret = avctx->codec->encode(avctx, buf, buf_size, samples);
545         avctx->frame_number++;
546         return ret;
547     }else
548         return 0;
549 }
550
551 int attribute_align_arg avcodec_encode_video(AVCodecContext *avctx, uint8_t *buf, int buf_size,
552                          const AVFrame *pict)
553 {
554     if(buf_size < FF_MIN_BUFFER_SIZE){
555         av_log(avctx, AV_LOG_ERROR, "buffer smaller than minimum size\n");
556         return -1;
557     }
558     if(avcodec_check_dimensions(avctx,avctx->width,avctx->height))
559         return -1;
560     if((avctx->codec->capabilities & CODEC_CAP_DELAY) || pict){
561         int ret = avctx->codec->encode(avctx, buf, buf_size, pict);
562         avctx->frame_number++;
563         emms_c(); //needed to avoid an emms_c() call before every return;
564
565         return ret;
566     }else
567         return 0;
568 }
569
570 int avcodec_encode_subtitle(AVCodecContext *avctx, uint8_t *buf, int buf_size,
571                             const AVSubtitle *sub)
572 {
573     int ret;
574     if(sub->start_display_time) {
575         av_log(avctx, AV_LOG_ERROR, "start_display_time must be 0.\n");
576         return -1;
577     }
578     if(sub->num_rects == 0 || !sub->rects)
579         return -1;
580     ret = avctx->codec->encode(avctx, buf, buf_size, sub);
581     avctx->frame_number++;
582     return ret;
583 }
584
585 #if LIBAVCODEC_VERSION_MAJOR < 53
586 int attribute_align_arg avcodec_decode_video(AVCodecContext *avctx, AVFrame *picture,
587                          int *got_picture_ptr,
588                          const uint8_t *buf, int buf_size)
589 {
590     AVPacket avpkt;
591     av_init_packet(&avpkt);
592     avpkt.data = buf;
593     avpkt.size = buf_size;
594     // HACK for CorePNG to decode as normal PNG by default
595     avpkt.flags = AV_PKT_FLAG_KEY;
596
597     return avcodec_decode_video2(avctx, picture, got_picture_ptr, &avpkt);
598 }
599 #endif
600
601 int attribute_align_arg avcodec_decode_video2(AVCodecContext *avctx, AVFrame *picture,
602                          int *got_picture_ptr,
603                          AVPacket *avpkt)
604 {
605     int ret;
606
607     *got_picture_ptr= 0;
608     if((avctx->coded_width||avctx->coded_height) && avcodec_check_dimensions(avctx,avctx->coded_width,avctx->coded_height))
609         return -1;
610     if((avctx->codec->capabilities & CODEC_CAP_DELAY) || avpkt->size){
611         ret = avctx->codec->decode(avctx, picture, got_picture_ptr,
612                                 avpkt);
613
614         emms_c(); //needed to avoid an emms_c() call before every return;
615
616         if (*got_picture_ptr)
617             avctx->frame_number++;
618     }else
619         ret= 0;
620
621     return ret;
622 }
623
624 #if LIBAVCODEC_VERSION_MAJOR < 53
625 int attribute_align_arg avcodec_decode_audio2(AVCodecContext *avctx, int16_t *samples,
626                          int *frame_size_ptr,
627                          const uint8_t *buf, int buf_size)
628 {
629     AVPacket avpkt;
630     av_init_packet(&avpkt);
631     avpkt.data = buf;
632     avpkt.size = buf_size;
633
634     return avcodec_decode_audio3(avctx, samples, frame_size_ptr, &avpkt);
635 }
636 #endif
637
638 int attribute_align_arg avcodec_decode_audio3(AVCodecContext *avctx, int16_t *samples,
639                          int *frame_size_ptr,
640                          AVPacket *avpkt)
641 {
642     int ret;
643
644     if((avctx->codec->capabilities & CODEC_CAP_DELAY) || avpkt->size){
645         //FIXME remove the check below _after_ ensuring that all audio check that the available space is enough
646         if(*frame_size_ptr < AVCODEC_MAX_AUDIO_FRAME_SIZE){
647             av_log(avctx, AV_LOG_ERROR, "buffer smaller than AVCODEC_MAX_AUDIO_FRAME_SIZE\n");
648             return -1;
649         }
650         if(*frame_size_ptr < FF_MIN_BUFFER_SIZE ||
651         *frame_size_ptr < avctx->channels * avctx->frame_size * sizeof(int16_t)){
652             av_log(avctx, AV_LOG_ERROR, "buffer %d too small\n", *frame_size_ptr);
653             return -1;
654         }
655
656         ret = avctx->codec->decode(avctx, samples, frame_size_ptr, avpkt);
657         avctx->frame_number++;
658     }else{
659         ret= 0;
660         *frame_size_ptr=0;
661     }
662     return ret;
663 }
664
665 #if LIBAVCODEC_VERSION_MAJOR < 53
666 int avcodec_decode_subtitle(AVCodecContext *avctx, AVSubtitle *sub,
667                             int *got_sub_ptr,
668                             const uint8_t *buf, int buf_size)
669 {
670     AVPacket avpkt;
671     av_init_packet(&avpkt);
672     avpkt.data = buf;
673     avpkt.size = buf_size;
674
675     return avcodec_decode_subtitle2(avctx, sub, got_sub_ptr, &avpkt);
676 }
677 #endif
678
679 int avcodec_decode_subtitle2(AVCodecContext *avctx, AVSubtitle *sub,
680                             int *got_sub_ptr,
681                             AVPacket *avpkt)
682 {
683     int ret;
684
685     *got_sub_ptr = 0;
686     ret = avctx->codec->decode(avctx, sub, got_sub_ptr, avpkt);
687     if (*got_sub_ptr)
688         avctx->frame_number++;
689     return ret;
690 }
691
692 av_cold int avcodec_close(AVCodecContext *avctx)
693 {
694     /* If there is a user-supplied mutex locking routine, call it. */
695     if (ff_lockmgr_cb) {
696         if ((*ff_lockmgr_cb)(&codec_mutex, AV_LOCK_OBTAIN))
697             return -1;
698     }
699
700     entangled_thread_counter++;
701     if(entangled_thread_counter != 1){
702         av_log(avctx, AV_LOG_ERROR, "insufficient thread locking around avcodec_open/close()\n");
703         entangled_thread_counter--;
704         return -1;
705     }
706
707     if (HAVE_THREADS && avctx->thread_opaque)
708         avcodec_thread_free(avctx);
709     if (avctx->codec && avctx->codec->close)
710         avctx->codec->close(avctx);
711     avcodec_default_free_buffers(avctx);
712     avctx->coded_frame = NULL;
713     av_freep(&avctx->priv_data);
714     if(avctx->codec && avctx->codec->encode)
715         av_freep(&avctx->extradata);
716     avctx->codec = NULL;
717     entangled_thread_counter--;
718
719     /* Release any user-supplied mutex. */
720     if (ff_lockmgr_cb) {
721         (*ff_lockmgr_cb)(&codec_mutex, AV_LOCK_RELEASE);
722     }
723     return 0;
724 }
725
726 AVCodec *avcodec_find_encoder(enum CodecID id)
727 {
728     AVCodec *p, *experimental=NULL;
729     p = first_avcodec;
730     while (p) {
731         if (p->encode != NULL && p->id == id) {
732             if (p->capabilities & CODEC_CAP_EXPERIMENTAL && !experimental) {
733                 experimental = p;
734             } else
735                 return p;
736         }
737         p = p->next;
738     }
739     return experimental;
740 }
741
742 AVCodec *avcodec_find_encoder_by_name(const char *name)
743 {
744     AVCodec *p;
745     if (!name)
746         return NULL;
747     p = first_avcodec;
748     while (p) {
749         if (p->encode != NULL && strcmp(name,p->name) == 0)
750             return p;
751         p = p->next;
752     }
753     return NULL;
754 }
755
756 AVCodec *avcodec_find_decoder(enum CodecID id)
757 {
758     AVCodec *p;
759     p = first_avcodec;
760     while (p) {
761         if (p->decode != NULL && p->id == id)
762             return p;
763         p = p->next;
764     }
765     return NULL;
766 }
767
768 AVCodec *avcodec_find_decoder_by_name(const char *name)
769 {
770     AVCodec *p;
771     if (!name)
772         return NULL;
773     p = first_avcodec;
774     while (p) {
775         if (p->decode != NULL && strcmp(name,p->name) == 0)
776             return p;
777         p = p->next;
778     }
779     return NULL;
780 }
781
782 static int get_bit_rate(AVCodecContext *ctx)
783 {
784     int bit_rate;
785     int bits_per_sample;
786
787     switch(ctx->codec_type) {
788     case AVMEDIA_TYPE_VIDEO:
789     case AVMEDIA_TYPE_DATA:
790     case AVMEDIA_TYPE_SUBTITLE:
791     case AVMEDIA_TYPE_ATTACHMENT:
792         bit_rate = ctx->bit_rate;
793         break;
794     case AVMEDIA_TYPE_AUDIO:
795         bits_per_sample = av_get_bits_per_sample(ctx->codec_id);
796         bit_rate = bits_per_sample ? ctx->sample_rate * ctx->channels * bits_per_sample : ctx->bit_rate;
797         break;
798     default:
799         bit_rate = 0;
800         break;
801     }
802     return bit_rate;
803 }
804
805 size_t av_get_codec_tag_string(char *buf, size_t buf_size, unsigned int codec_tag)
806 {
807     int i, len, ret = 0;
808
809     for (i = 0; i < 4; i++) {
810         len = snprintf(buf, buf_size,
811                        isprint(codec_tag&0xFF) ? "%c" : "[%d]", codec_tag&0xFF);
812         buf      += len;
813         buf_size  = buf_size > len ? buf_size - len : 0;
814         ret      += len;
815         codec_tag>>=8;
816     }
817     return ret;
818 }
819
820 void avcodec_string(char *buf, int buf_size, AVCodecContext *enc, int encode)
821 {
822     const char *codec_name;
823     AVCodec *p;
824     char buf1[32];
825     int bitrate;
826     AVRational display_aspect_ratio;
827
828     if (encode)
829         p = avcodec_find_encoder(enc->codec_id);
830     else
831         p = avcodec_find_decoder(enc->codec_id);
832
833     if (p) {
834         codec_name = p->name;
835     } else if (enc->codec_id == CODEC_ID_MPEG2TS) {
836         /* fake mpeg2 transport stream codec (currently not
837            registered) */
838         codec_name = "mpeg2ts";
839     } else if (enc->codec_name[0] != '\0') {
840         codec_name = enc->codec_name;
841     } else {
842         /* output avi tags */
843         char tag_buf[32];
844         av_get_codec_tag_string(tag_buf, sizeof(tag_buf), enc->codec_tag);
845         snprintf(buf1, sizeof(buf1), "%s / 0x%04X", tag_buf, enc->codec_tag);
846         codec_name = buf1;
847     }
848
849     switch(enc->codec_type) {
850     case AVMEDIA_TYPE_VIDEO:
851         snprintf(buf, buf_size,
852                  "Video: %s%s",
853                  codec_name, enc->mb_decision ? " (hq)" : "");
854         if (enc->pix_fmt != PIX_FMT_NONE) {
855             snprintf(buf + strlen(buf), buf_size - strlen(buf),
856                      ", %s",
857                      avcodec_get_pix_fmt_name(enc->pix_fmt));
858         }
859         if (enc->width) {
860             snprintf(buf + strlen(buf), buf_size - strlen(buf),
861                      ", %dx%d",
862                      enc->width, enc->height);
863             if (enc->sample_aspect_ratio.num) {
864                 av_reduce(&display_aspect_ratio.num, &display_aspect_ratio.den,
865                           enc->width*enc->sample_aspect_ratio.num,
866                           enc->height*enc->sample_aspect_ratio.den,
867                           1024*1024);
868                 snprintf(buf + strlen(buf), buf_size - strlen(buf),
869                          " [PAR %d:%d DAR %d:%d]",
870                          enc->sample_aspect_ratio.num, enc->sample_aspect_ratio.den,
871                          display_aspect_ratio.num, display_aspect_ratio.den);
872             }
873             if(av_log_get_level() >= AV_LOG_DEBUG){
874                 int g= av_gcd(enc->time_base.num, enc->time_base.den);
875                 snprintf(buf + strlen(buf), buf_size - strlen(buf),
876                      ", %d/%d",
877                      enc->time_base.num/g, enc->time_base.den/g);
878             }
879         }
880         if (encode) {
881             snprintf(buf + strlen(buf), buf_size - strlen(buf),
882                      ", q=%d-%d", enc->qmin, enc->qmax);
883         }
884         break;
885     case AVMEDIA_TYPE_AUDIO:
886         snprintf(buf, buf_size,
887                  "Audio: %s",
888                  codec_name);
889         if (enc->sample_rate) {
890             snprintf(buf + strlen(buf), buf_size - strlen(buf),
891                      ", %d Hz", enc->sample_rate);
892         }
893         av_strlcat(buf, ", ", buf_size);
894         avcodec_get_channel_layout_string(buf + strlen(buf), buf_size - strlen(buf), enc->channels, enc->channel_layout);
895         if (enc->sample_fmt != SAMPLE_FMT_NONE) {
896             snprintf(buf + strlen(buf), buf_size - strlen(buf),
897                      ", %s", avcodec_get_sample_fmt_name(enc->sample_fmt));
898         }
899         break;
900     case AVMEDIA_TYPE_DATA:
901         snprintf(buf, buf_size, "Data: %s", codec_name);
902         break;
903     case AVMEDIA_TYPE_SUBTITLE:
904         snprintf(buf, buf_size, "Subtitle: %s", codec_name);
905         break;
906     case AVMEDIA_TYPE_ATTACHMENT:
907         snprintf(buf, buf_size, "Attachment: %s", codec_name);
908         break;
909     default:
910         snprintf(buf, buf_size, "Invalid Codec type %d", enc->codec_type);
911         return;
912     }
913     if (encode) {
914         if (enc->flags & CODEC_FLAG_PASS1)
915             snprintf(buf + strlen(buf), buf_size - strlen(buf),
916                      ", pass 1");
917         if (enc->flags & CODEC_FLAG_PASS2)
918             snprintf(buf + strlen(buf), buf_size - strlen(buf),
919                      ", pass 2");
920     }
921     bitrate = get_bit_rate(enc);
922     if (bitrate != 0) {
923         snprintf(buf + strlen(buf), buf_size - strlen(buf),
924                  ", %d kb/s", bitrate / 1000);
925     }
926 }
927
928 unsigned avcodec_version( void )
929 {
930   return LIBAVCODEC_VERSION_INT;
931 }
932
933 const char *avcodec_configuration(void)
934 {
935     return FFMPEG_CONFIGURATION;
936 }
937
938 const char *avcodec_license(void)
939 {
940 #define LICENSE_PREFIX "libavcodec license: "
941     return LICENSE_PREFIX FFMPEG_LICENSE + sizeof(LICENSE_PREFIX) - 1;
942 }
943
944 void avcodec_init(void)
945 {
946     static int initialized = 0;
947
948     if (initialized != 0)
949         return;
950     initialized = 1;
951
952     dsputil_static_init();
953 }
954
955 void avcodec_flush_buffers(AVCodecContext *avctx)
956 {
957     if(avctx->codec->flush)
958         avctx->codec->flush(avctx);
959 }
960
961 void avcodec_default_free_buffers(AVCodecContext *s){
962     int i, j;
963
964     if(s->internal_buffer==NULL) return;
965
966     if (s->internal_buffer_count)
967         av_log(s, AV_LOG_WARNING, "Found %i unreleased buffers!\n", s->internal_buffer_count);
968     for(i=0; i<INTERNAL_BUFFER_SIZE; i++){
969         InternalBuffer *buf= &((InternalBuffer*)s->internal_buffer)[i];
970         for(j=0; j<4; j++){
971             av_freep(&buf->base[j]);
972             buf->data[j]= NULL;
973         }
974     }
975     av_freep(&s->internal_buffer);
976
977     s->internal_buffer_count=0;
978 }
979
980 char av_get_pict_type_char(int pict_type){
981     switch(pict_type){
982     case FF_I_TYPE: return 'I';
983     case FF_P_TYPE: return 'P';
984     case FF_B_TYPE: return 'B';
985     case FF_S_TYPE: return 'S';
986     case FF_SI_TYPE:return 'i';
987     case FF_SP_TYPE:return 'p';
988     case FF_BI_TYPE:return 'b';
989     default:        return '?';
990     }
991 }
992
993 int av_get_bits_per_sample(enum CodecID codec_id){
994     switch(codec_id){
995     case CODEC_ID_ADPCM_SBPRO_2:
996         return 2;
997     case CODEC_ID_ADPCM_SBPRO_3:
998         return 3;
999     case CODEC_ID_ADPCM_SBPRO_4:
1000     case CODEC_ID_ADPCM_CT:
1001     case CODEC_ID_ADPCM_IMA_WAV:
1002     case CODEC_ID_ADPCM_MS:
1003     case CODEC_ID_ADPCM_YAMAHA:
1004         return 4;
1005     case CODEC_ID_PCM_ALAW:
1006     case CODEC_ID_PCM_MULAW:
1007     case CODEC_ID_PCM_S8:
1008     case CODEC_ID_PCM_U8:
1009     case CODEC_ID_PCM_ZORK:
1010         return 8;
1011     case CODEC_ID_PCM_S16BE:
1012     case CODEC_ID_PCM_S16LE:
1013     case CODEC_ID_PCM_S16LE_PLANAR:
1014     case CODEC_ID_PCM_U16BE:
1015     case CODEC_ID_PCM_U16LE:
1016         return 16;
1017     case CODEC_ID_PCM_S24DAUD:
1018     case CODEC_ID_PCM_S24BE:
1019     case CODEC_ID_PCM_S24LE:
1020     case CODEC_ID_PCM_U24BE:
1021     case CODEC_ID_PCM_U24LE:
1022         return 24;
1023     case CODEC_ID_PCM_S32BE:
1024     case CODEC_ID_PCM_S32LE:
1025     case CODEC_ID_PCM_U32BE:
1026     case CODEC_ID_PCM_U32LE:
1027     case CODEC_ID_PCM_F32BE:
1028     case CODEC_ID_PCM_F32LE:
1029         return 32;
1030     case CODEC_ID_PCM_F64BE:
1031     case CODEC_ID_PCM_F64LE:
1032         return 64;
1033     default:
1034         return 0;
1035     }
1036 }
1037
1038 int av_get_bits_per_sample_format(enum SampleFormat sample_fmt) {
1039     switch (sample_fmt) {
1040     case SAMPLE_FMT_U8:
1041         return 8;
1042     case SAMPLE_FMT_S16:
1043         return 16;
1044     case SAMPLE_FMT_S32:
1045     case SAMPLE_FMT_FLT:
1046         return 32;
1047     case SAMPLE_FMT_DBL:
1048         return 64;
1049     default:
1050         return 0;
1051     }
1052 }
1053
1054 #if !HAVE_THREADS
1055 int avcodec_thread_init(AVCodecContext *s, int thread_count){
1056     s->thread_count = thread_count;
1057     return -1;
1058 }
1059 #endif
1060
1061 unsigned int av_xiphlacing(unsigned char *s, unsigned int v)
1062 {
1063     unsigned int n = 0;
1064
1065     while(v >= 0xff) {
1066         *s++ = 0xff;
1067         v -= 0xff;
1068         n++;
1069     }
1070     *s = v;
1071     n++;
1072     return n;
1073 }
1074
1075 /* Wrapper to work around the lack of mkstemp() on mingw/cygin.
1076  * Also, tries to create file in /tmp first, if possible.
1077  * *prefix can be a character constant; *filename will be allocated internally.
1078  * Returns file descriptor of opened file (or -1 on error)
1079  * and opened file name in **filename. */
1080 int av_tempfile(char *prefix, char **filename) {
1081     int fd=-1;
1082 #if !HAVE_MKSTEMP
1083     *filename = tempnam(".", prefix);
1084 #else
1085     size_t len = strlen(prefix) + 12; /* room for "/tmp/" and "XXXXXX\0" */
1086     *filename = av_malloc(len);
1087 #endif
1088     /* -----common section-----*/
1089     if (*filename == NULL) {
1090         av_log(NULL, AV_LOG_ERROR, "ff_tempfile: Cannot allocate file name\n");
1091         return -1;
1092     }
1093 #if !HAVE_MKSTEMP
1094     fd = open(*filename, O_RDWR | O_BINARY | O_CREAT, 0444);
1095 #else
1096     snprintf(*filename, len, "/tmp/%sXXXXXX", prefix);
1097     fd = mkstemp(*filename);
1098     if (fd < 0) {
1099         snprintf(*filename, len, "./%sXXXXXX", prefix);
1100         fd = mkstemp(*filename);
1101     }
1102 #endif
1103     /* -----common section-----*/
1104     if (fd < 0) {
1105         av_log(NULL, AV_LOG_ERROR, "ff_tempfile: Cannot open temporary file %s\n", *filename);
1106         return -1;
1107     }
1108     return fd; /* success */
1109 }
1110
1111 typedef struct {
1112     const char *abbr;
1113     int width, height;
1114 } VideoFrameSizeAbbr;
1115
1116 typedef struct {
1117     const char *abbr;
1118     int rate_num, rate_den;
1119 } VideoFrameRateAbbr;
1120
1121 static const VideoFrameSizeAbbr video_frame_size_abbrs[] = {
1122     { "ntsc",      720, 480 },
1123     { "pal",       720, 576 },
1124     { "qntsc",     352, 240 }, /* VCD compliant NTSC */
1125     { "qpal",      352, 288 }, /* VCD compliant PAL */
1126     { "sntsc",     640, 480 }, /* square pixel NTSC */
1127     { "spal",      768, 576 }, /* square pixel PAL */
1128     { "film",      352, 240 },
1129     { "ntsc-film", 352, 240 },
1130     { "sqcif",     128,  96 },
1131     { "qcif",      176, 144 },
1132     { "cif",       352, 288 },
1133     { "4cif",      704, 576 },
1134     { "16cif",    1408,1152 },
1135     { "qqvga",     160, 120 },
1136     { "qvga",      320, 240 },
1137     { "vga",       640, 480 },
1138     { "svga",      800, 600 },
1139     { "xga",      1024, 768 },
1140     { "uxga",     1600,1200 },
1141     { "qxga",     2048,1536 },
1142     { "sxga",     1280,1024 },
1143     { "qsxga",    2560,2048 },
1144     { "hsxga",    5120,4096 },
1145     { "wvga",      852, 480 },
1146     { "wxga",     1366, 768 },
1147     { "wsxga",    1600,1024 },
1148     { "wuxga",    1920,1200 },
1149     { "woxga",    2560,1600 },
1150     { "wqsxga",   3200,2048 },
1151     { "wquxga",   3840,2400 },
1152     { "whsxga",   6400,4096 },
1153     { "whuxga",   7680,4800 },
1154     { "cga",       320, 200 },
1155     { "ega",       640, 350 },
1156     { "hd480",     852, 480 },
1157     { "hd720",    1280, 720 },
1158     { "hd1080",   1920,1080 },
1159 };
1160
1161 static const VideoFrameRateAbbr video_frame_rate_abbrs[]= {
1162     { "ntsc",      30000, 1001 },
1163     { "pal",          25,    1 },
1164     { "qntsc",     30000, 1001 }, /* VCD compliant NTSC */
1165     { "qpal",         25,    1 }, /* VCD compliant PAL */
1166     { "sntsc",     30000, 1001 }, /* square pixel NTSC */
1167     { "spal",         25,    1 }, /* square pixel PAL */
1168     { "film",         24,    1 },
1169     { "ntsc-film", 24000, 1001 },
1170 };
1171
1172 int av_parse_video_frame_size(int *width_ptr, int *height_ptr, const char *str)
1173 {
1174     int i;
1175     int n = FF_ARRAY_ELEMS(video_frame_size_abbrs);
1176     char *p;
1177     int frame_width = 0, frame_height = 0;
1178
1179     for(i=0;i<n;i++) {
1180         if (!strcmp(video_frame_size_abbrs[i].abbr, str)) {
1181             frame_width = video_frame_size_abbrs[i].width;
1182             frame_height = video_frame_size_abbrs[i].height;
1183             break;
1184         }
1185     }
1186     if (i == n) {
1187         p = str;
1188         frame_width = strtol(p, &p, 10);
1189         if (*p)
1190             p++;
1191         frame_height = strtol(p, &p, 10);
1192     }
1193     if (frame_width <= 0 || frame_height <= 0)
1194         return -1;
1195     *width_ptr = frame_width;
1196     *height_ptr = frame_height;
1197     return 0;
1198 }
1199
1200 int av_parse_video_frame_rate(AVRational *frame_rate, const char *arg)
1201 {
1202     int i;
1203     int n = FF_ARRAY_ELEMS(video_frame_rate_abbrs);
1204     char* cp;
1205
1206     /* First, we check our abbreviation table */
1207     for (i = 0; i < n; ++i)
1208          if (!strcmp(video_frame_rate_abbrs[i].abbr, arg)) {
1209              frame_rate->num = video_frame_rate_abbrs[i].rate_num;
1210              frame_rate->den = video_frame_rate_abbrs[i].rate_den;
1211              return 0;
1212          }
1213
1214     /* Then, we try to parse it as fraction */
1215     cp = strchr(arg, '/');
1216     if (!cp)
1217         cp = strchr(arg, ':');
1218     if (cp) {
1219         char* cpp;
1220         frame_rate->num = strtol(arg, &cpp, 10);
1221         if (cpp != arg || cpp == cp)
1222             frame_rate->den = strtol(cp+1, &cpp, 10);
1223         else
1224            frame_rate->num = 0;
1225     }
1226     else {
1227         /* Finally we give up and parse it as double */
1228         AVRational time_base = av_d2q(strtod(arg, 0), 1001000);
1229         frame_rate->den = time_base.den;
1230         frame_rate->num = time_base.num;
1231     }
1232     if (!frame_rate->num || !frame_rate->den)
1233         return -1;
1234     else
1235         return 0;
1236 }
1237
1238 int ff_match_2uint16(const uint16_t (*tab)[2], int size, int a, int b){
1239     int i;
1240     for(i=0; i<size && !(tab[i][0]==a && tab[i][1]==b); i++);
1241     return i;
1242 }
1243
1244 void av_log_missing_feature(void *avc, const char *feature, int want_sample)
1245 {
1246     av_log(avc, AV_LOG_WARNING, "%s not implemented. Update your FFmpeg "
1247             "version to the newest one from SVN. If the problem still "
1248             "occurs, it means that your file has a feature which has not "
1249             "been implemented.", feature);
1250     if(want_sample)
1251         av_log_ask_for_sample(avc, NULL);
1252     else
1253         av_log(avc, AV_LOG_WARNING, "\n");
1254 }
1255
1256 void av_log_ask_for_sample(void *avc, const char *msg)
1257 {
1258     if (msg)
1259         av_log(avc, AV_LOG_WARNING, "%s ", msg);
1260     av_log(avc, AV_LOG_WARNING, "If you want to help, upload a sample "
1261             "of this file to ftp://upload.ffmpeg.org/MPlayer/incoming/ "
1262             "and contact the ffmpeg-devel mailing list.\n");
1263 }
1264
1265 static AVHWAccel *first_hwaccel = NULL;
1266
1267 void av_register_hwaccel(AVHWAccel *hwaccel)
1268 {
1269     AVHWAccel **p = &first_hwaccel;
1270     while (*p)
1271         p = &(*p)->next;
1272     *p = hwaccel;
1273     hwaccel->next = NULL;
1274 }
1275
1276 AVHWAccel *av_hwaccel_next(AVHWAccel *hwaccel)
1277 {
1278     return hwaccel ? hwaccel->next : first_hwaccel;
1279 }
1280
1281 AVHWAccel *ff_find_hwaccel(enum CodecID codec_id, enum PixelFormat pix_fmt)
1282 {
1283     AVHWAccel *hwaccel=NULL;
1284
1285     while((hwaccel= av_hwaccel_next(hwaccel))){
1286         if (   hwaccel->id      == codec_id
1287             && hwaccel->pix_fmt == pix_fmt)
1288             return hwaccel;
1289     }
1290     return NULL;
1291 }
1292
1293 int av_lockmgr_register(int (*cb)(void **mutex, enum AVLockOp op))
1294 {
1295     if (ff_lockmgr_cb) {
1296         if (ff_lockmgr_cb(&codec_mutex, AV_LOCK_DESTROY))
1297             return -1;
1298     }
1299
1300     ff_lockmgr_cb = cb;
1301
1302     if (ff_lockmgr_cb) {
1303         if (ff_lockmgr_cb(&codec_mutex, AV_LOCK_CREATE))
1304             return -1;
1305     }
1306     return 0;
1307 }
1308
1309 unsigned int ff_toupper4(unsigned int x)
1310 {
1311     return     toupper( x     &0xFF)
1312             + (toupper((x>>8 )&0xFF)<<8 )
1313             + (toupper((x>>16)&0xFF)<<16)
1314             + (toupper((x>>24)&0xFF)<<24);
1315 }