imgresample.c
上传用户:wstnjxml
上传日期:2014-04-03
资源大小:7248k
文件大小:22k
源码类别:

Windows CE

开发平台:

C/C++

  1. /*
  2.  * High quality image resampling with polyphase filters 
  3.  * Copyright (c) 2001 Fabrice Bellard.
  4.  *
  5.  * This library is free software; you can redistribute it and/or
  6.  * modify it under the terms of the GNU Lesser General Public
  7.  * License as published by the Free Software Foundation; either
  8.  * version 2 of the License, or (at your option) any later version.
  9.  *
  10.  * This library is distributed in the hope that it will be useful,
  11.  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  12.  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13.  * Lesser General Public License for more details.
  14.  *
  15.  * You should have received a copy of the GNU Lesser General Public
  16.  * License along with this library; if not, write to the Free Software
  17.  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  18.  */
  19.  
  20. /**
  21.  * @file imgresample.c
  22.  * High quality image resampling with polyphase filters .
  23.  */
  24.  
  25. #include "avcodec.h"
  26. #include "dsputil.h"
  27. #ifdef USE_FASTMEMCPY
  28. #include "fastmemcpy.h"
  29. #endif
  30. #define NB_COMPONENTS 3
  31. #define PHASE_BITS 4
  32. #define NB_PHASES  (1 << PHASE_BITS)
  33. #define NB_TAPS    4
  34. #define FCENTER    1  /* index of the center of the filter */
  35. //#define TEST    1  /* Test it */
  36. #define POS_FRAC_BITS 16
  37. #define POS_FRAC      (1 << POS_FRAC_BITS)
  38. /* 6 bits precision is needed for MMX */
  39. #define FILTER_BITS   8
  40. #define LINE_BUF_HEIGHT (NB_TAPS * 4)
  41. struct ImgReSampleContext {
  42.     int iwidth, iheight, owidth, oheight;
  43.     int topBand, bottomBand, leftBand, rightBand;
  44.     int padtop, padbottom, padleft, padright;
  45.     int pad_owidth, pad_oheight;
  46.     int h_incr, v_incr;
  47.     int16_t h_filters[NB_PHASES][NB_TAPS] __align8; /* horizontal filters */
  48.     int16_t v_filters[NB_PHASES][NB_TAPS] __align8; /* vertical filters */
  49.     uint8_t *line_buf;
  50. };
  51. void av_build_filter(int16_t *filter, double factor, int tap_count, int phase_count, int scale, int type);
  52. static inline int get_phase(int pos)
  53. {
  54.     return ((pos) >> (POS_FRAC_BITS - PHASE_BITS)) & ((1 << PHASE_BITS) - 1);
  55. }
  56. /* This function must be optimized */
  57. static void h_resample_fast(uint8_t *dst, int dst_width, const uint8_t *src,
  58.     int src_width, int src_start, int src_incr,
  59.     int16_t *filters)
  60. {
  61.     int src_pos, phase, sum, i;
  62.     const uint8_t *s;
  63.     int16_t *filter;
  64.     src_pos = src_start;
  65.     for(i=0;i<dst_width;i++) {
  66. #ifdef TEST
  67.         /* test */
  68.         if ((src_pos >> POS_FRAC_BITS) < 0 ||
  69.             (src_pos >> POS_FRAC_BITS) > (src_width - NB_TAPS))
  70.             av_abort();
  71. #endif
  72.         s = src + (src_pos >> POS_FRAC_BITS);
  73.         phase = get_phase(src_pos);
  74.         filter = filters + phase * NB_TAPS;
  75. #if NB_TAPS == 4
  76.         sum = s[0] * filter[0] +
  77.             s[1] * filter[1] +
  78.             s[2] * filter[2] +
  79.             s[3] * filter[3];
  80. #else
  81.         {
  82.             int j;
  83.             sum = 0;
  84.             for(j=0;j<NB_TAPS;j++)
  85.                 sum += s[j] * filter[j];
  86.         }
  87. #endif
  88.         sum = sum >> FILTER_BITS;
  89.         if (sum < 0)
  90.             sum = 0;
  91.         else if (sum > 255)
  92.             sum = 255;
  93.         dst[0] = sum;
  94.         src_pos += src_incr;
  95.         dst++;
  96.     }
  97. }
  98. /* This function must be optimized */
  99. static void v_resample(uint8_t *dst, int dst_width, const uint8_t *src,
  100.        int wrap, int16_t *filter)
  101. {
  102.     int sum, i;
  103.     const uint8_t *s;
  104.     s = src;
  105.     for(i=0;i<dst_width;i++) {
  106. #if NB_TAPS == 4
  107.         sum = s[0 * wrap] * filter[0] +
  108.             s[1 * wrap] * filter[1] +
  109.             s[2 * wrap] * filter[2] +
  110.             s[3 * wrap] * filter[3];
  111. #else
  112.         {
  113.             int j;
  114.             uint8_t *s1 = s;
  115.             sum = 0;
  116.             for(j=0;j<NB_TAPS;j++) {
  117.                 sum += s1[0] * filter[j];
  118.                 s1 += wrap;
  119.             }
  120.         }
  121. #endif
  122.         sum = sum >> FILTER_BITS;
  123.         if (sum < 0)
  124.             sum = 0;
  125.         else if (sum > 255)
  126.             sum = 255;
  127.         dst[0] = sum;
  128.         dst++;
  129.         s++;
  130.     }
  131. }
  132. #ifdef HAVE_MMX
  133. #include "i386/mmx.h"
  134. #define FILTER4(reg) 
  135. {
  136.         s = src + (src_pos >> POS_FRAC_BITS);
  137.         phase = get_phase(src_pos);
  138.         filter = filters + phase * NB_TAPS;
  139.         movq_m2r(*s, reg);
  140.         punpcklbw_r2r(mm7, reg);
  141.         movq_m2r(*filter, mm6);
  142.         pmaddwd_r2r(reg, mm6);
  143.         movq_r2r(mm6, reg);
  144.         psrlq_i2r(32, reg);
  145.         paddd_r2r(mm6, reg);
  146.         psrad_i2r(FILTER_BITS, reg);
  147.         src_pos += src_incr;
  148. }
  149. #define DUMP(reg) movq_r2m(reg, tmp); printf(#reg "=%016Lxn", tmp.uq);
  150. /* XXX: do four pixels at a time */
  151. static void h_resample_fast4_mmx(uint8_t *dst, int dst_width,
  152.  const uint8_t *src, int src_width,
  153.                                  int src_start, int src_incr, int16_t *filters)
  154. {
  155.     int src_pos, phase;
  156.     const uint8_t *s;
  157.     int16_t *filter;
  158.     mmx_t tmp;
  159.     
  160.     src_pos = src_start;
  161.     pxor_r2r(mm7, mm7);
  162.     while (dst_width >= 4) {
  163.         FILTER4(mm0);
  164.         FILTER4(mm1);
  165.         FILTER4(mm2);
  166.         FILTER4(mm3);
  167.         packuswb_r2r(mm7, mm0);
  168.         packuswb_r2r(mm7, mm1);
  169.         packuswb_r2r(mm7, mm3);
  170.         packuswb_r2r(mm7, mm2);
  171.         movq_r2m(mm0, tmp);
  172.         dst[0] = tmp.ub[0];
  173.         movq_r2m(mm1, tmp);
  174.         dst[1] = tmp.ub[0];
  175.         movq_r2m(mm2, tmp);
  176.         dst[2] = tmp.ub[0];
  177.         movq_r2m(mm3, tmp);
  178.         dst[3] = tmp.ub[0];
  179.         dst += 4;
  180.         dst_width -= 4;
  181.     }
  182.     while (dst_width > 0) {
  183.         FILTER4(mm0);
  184.         packuswb_r2r(mm7, mm0);
  185.         movq_r2m(mm0, tmp);
  186.         dst[0] = tmp.ub[0];
  187.         dst++;
  188.         dst_width--;
  189.     }
  190.     emms();
  191. }
  192. static void v_resample4_mmx(uint8_t *dst, int dst_width, const uint8_t *src,
  193.     int wrap, int16_t *filter)
  194. {
  195.     int sum, i, v;
  196.     const uint8_t *s;
  197.     mmx_t tmp;
  198.     mmx_t coefs[4];
  199.     
  200.     for(i=0;i<4;i++) {
  201.         v = filter[i];
  202.         coefs[i].uw[0] = v;
  203.         coefs[i].uw[1] = v;
  204.         coefs[i].uw[2] = v;
  205.         coefs[i].uw[3] = v;
  206.     }
  207.     
  208.     pxor_r2r(mm7, mm7);
  209.     s = src;
  210.     while (dst_width >= 4) {
  211.         movq_m2r(s[0 * wrap], mm0);
  212.         punpcklbw_r2r(mm7, mm0);
  213.         movq_m2r(s[1 * wrap], mm1);
  214.         punpcklbw_r2r(mm7, mm1);
  215.         movq_m2r(s[2 * wrap], mm2);
  216.         punpcklbw_r2r(mm7, mm2);
  217.         movq_m2r(s[3 * wrap], mm3);
  218.         punpcklbw_r2r(mm7, mm3);
  219.         pmullw_m2r(coefs[0], mm0);
  220.         pmullw_m2r(coefs[1], mm1);
  221.         pmullw_m2r(coefs[2], mm2);
  222.         pmullw_m2r(coefs[3], mm3);
  223.         paddw_r2r(mm1, mm0);
  224.         paddw_r2r(mm3, mm2);
  225.         paddw_r2r(mm2, mm0);
  226.         psraw_i2r(FILTER_BITS, mm0);
  227.         
  228.         packuswb_r2r(mm7, mm0);
  229.         movq_r2m(mm0, tmp);
  230.         *(uint32_t *)dst = tmp.ud[0];
  231.         dst += 4;
  232.         s += 4;
  233.         dst_width -= 4;
  234.     }
  235.     while (dst_width > 0) {
  236.         sum = s[0 * wrap] * filter[0] +
  237.             s[1 * wrap] * filter[1] +
  238.             s[2 * wrap] * filter[2] +
  239.             s[3 * wrap] * filter[3];
  240.         sum = sum >> FILTER_BITS;
  241.         if (sum < 0)
  242.             sum = 0;
  243.         else if (sum > 255)
  244.             sum = 255;
  245.         dst[0] = sum;
  246.         dst++;
  247.         s++;
  248.         dst_width--;
  249.     }
  250.     emms();
  251. }
  252. #endif
  253. #ifdef HAVE_ALTIVEC
  254. typedef union {
  255.     vector unsigned char v;
  256.     unsigned char c[16];
  257. } vec_uc_t;
  258. typedef union {
  259.     vector signed short v;
  260.     signed short s[8];
  261. } vec_ss_t;
  262. void v_resample16_altivec(uint8_t *dst, int dst_width, const uint8_t *src,
  263.   int wrap, int16_t *filter)
  264. {
  265.     int sum, i;
  266.     const uint8_t *s;
  267.     vector unsigned char *tv, tmp, dstv, zero;
  268.     vec_ss_t srchv[4], srclv[4], fv[4];
  269.     vector signed short zeros, sumhv, sumlv;    
  270.     s = src;
  271.     for(i=0;i<4;i++)
  272.     {
  273.         /*
  274.            The vec_madds later on does an implicit >>15 on the result.
  275.            Since FILTER_BITS is 8, and we have 15 bits of magnitude in
  276.            a signed short, we have just enough bits to pre-shift our
  277.            filter constants <<7 to compensate for vec_madds.
  278.         */
  279.         fv[i].s[0] = filter[i] << (15-FILTER_BITS);
  280.         fv[i].v = vec_splat(fv[i].v, 0);
  281.     }
  282.     
  283.     zero = vec_splat_u8(0);
  284.     zeros = vec_splat_s16(0);
  285.     /*
  286.        When we're resampling, we'd ideally like both our input buffers,
  287.        and output buffers to be 16-byte aligned, so we can do both aligned
  288.        reads and writes. Sadly we can't always have this at the moment, so
  289.        we opt for aligned writes, as unaligned writes have a huge overhead.
  290.        To do this, do enough scalar resamples to get dst 16-byte aligned.
  291.     */
  292.     i = (-(int)dst) & 0xf;
  293.     while(i>0) {
  294.         sum = s[0 * wrap] * filter[0] +
  295.         s[1 * wrap] * filter[1] +
  296.         s[2 * wrap] * filter[2] +
  297.         s[3 * wrap] * filter[3];
  298.         sum = sum >> FILTER_BITS;
  299.         if (sum<0) sum = 0; else if (sum>255) sum=255;
  300.         dst[0] = sum;
  301.         dst++;
  302.         s++;
  303.         dst_width--;
  304.         i--;
  305.     }
  306.     
  307.     /* Do our altivec resampling on 16 pixels at once. */
  308.     while(dst_width>=16) {
  309.         /*
  310.            Read 16 (potentially unaligned) bytes from each of
  311.            4 lines into 4 vectors, and split them into shorts.
  312.            Interleave the multipy/accumulate for the resample
  313.            filter with the loads to hide the 3 cycle latency
  314.            the vec_madds have.
  315.         */
  316.         tv = (vector unsigned char *) &s[0 * wrap];
  317.         tmp = vec_perm(tv[0], tv[1], vec_lvsl(0, &s[i * wrap]));
  318.         srchv[0].v = (vector signed short) vec_mergeh(zero, tmp);
  319.         srclv[0].v = (vector signed short) vec_mergel(zero, tmp);
  320.         sumhv = vec_madds(srchv[0].v, fv[0].v, zeros);
  321.         sumlv = vec_madds(srclv[0].v, fv[0].v, zeros);
  322.         tv = (vector unsigned char *) &s[1 * wrap];
  323.         tmp = vec_perm(tv[0], tv[1], vec_lvsl(0, &s[1 * wrap]));
  324.         srchv[1].v = (vector signed short) vec_mergeh(zero, tmp);
  325.         srclv[1].v = (vector signed short) vec_mergel(zero, tmp);
  326.         sumhv = vec_madds(srchv[1].v, fv[1].v, sumhv);
  327.         sumlv = vec_madds(srclv[1].v, fv[1].v, sumlv);
  328.         tv = (vector unsigned char *) &s[2 * wrap];
  329.         tmp = vec_perm(tv[0], tv[1], vec_lvsl(0, &s[2 * wrap]));
  330.         srchv[2].v = (vector signed short) vec_mergeh(zero, tmp);
  331.         srclv[2].v = (vector signed short) vec_mergel(zero, tmp);
  332.         sumhv = vec_madds(srchv[2].v, fv[2].v, sumhv);
  333.         sumlv = vec_madds(srclv[2].v, fv[2].v, sumlv);
  334.         tv = (vector unsigned char *) &s[3 * wrap];
  335.         tmp = vec_perm(tv[0], tv[1], vec_lvsl(0, &s[3 * wrap]));
  336.         srchv[3].v = (vector signed short) vec_mergeh(zero, tmp);
  337.         srclv[3].v = (vector signed short) vec_mergel(zero, tmp);
  338.         sumhv = vec_madds(srchv[3].v, fv[3].v, sumhv);
  339.         sumlv = vec_madds(srclv[3].v, fv[3].v, sumlv);
  340.     
  341.         /*
  342.            Pack the results into our destination vector,
  343.            and do an aligned write of that back to memory.
  344.         */
  345.         dstv = vec_packsu(sumhv, sumlv) ;
  346.         vec_st(dstv, 0, (vector unsigned char *) dst);
  347.         
  348.         dst+=16;
  349.         s+=16;
  350.         dst_width-=16;
  351.     }
  352.     /*
  353.        If there are any leftover pixels, resample them
  354.        with the slow scalar method.
  355.     */
  356.     while(dst_width>0) {
  357.         sum = s[0 * wrap] * filter[0] +
  358.         s[1 * wrap] * filter[1] +
  359.         s[2 * wrap] * filter[2] +
  360.         s[3 * wrap] * filter[3];
  361.         sum = sum >> FILTER_BITS;
  362.         if (sum<0) sum = 0; else if (sum>255) sum=255;
  363.         dst[0] = sum;
  364.         dst++;
  365.         s++;
  366.         dst_width--;
  367.     }
  368. }
  369. #endif
  370. /* slow version to handle limit cases. Does not need optimisation */
  371. static void h_resample_slow(uint8_t *dst, int dst_width,
  372.     const uint8_t *src, int src_width,
  373.                             int src_start, int src_incr, int16_t *filters)
  374. {
  375.     int src_pos, phase, sum, j, v, i;
  376.     const uint8_t *s, *src_end;
  377.     int16_t *filter;
  378.     src_end = src + src_width;
  379.     src_pos = src_start;
  380.     for(i=0;i<dst_width;i++) {
  381.         s = src + (src_pos >> POS_FRAC_BITS);
  382.         phase = get_phase(src_pos);
  383.         filter = filters + phase * NB_TAPS;
  384.         sum = 0;
  385.         for(j=0;j<NB_TAPS;j++) {
  386.             if (s < src)
  387.                 v = src[0];
  388.             else if (s >= src_end)
  389.                 v = src_end[-1];
  390.             else
  391.                 v = s[0];
  392.             sum += v * filter[j];
  393.             s++;
  394.         }
  395.         sum = sum >> FILTER_BITS;
  396.         if (sum < 0)
  397.             sum = 0;
  398.         else if (sum > 255)
  399.             sum = 255;
  400.         dst[0] = sum;
  401.         src_pos += src_incr;
  402.         dst++;
  403.     }
  404. }
  405. static void h_resample(uint8_t *dst, int dst_width, const uint8_t *src,
  406.        int src_width, int src_start, int src_incr,
  407.        int16_t *filters)
  408. {
  409.     int n, src_end;
  410.     if (src_start < 0) {
  411.         n = (0 - src_start + src_incr - 1) / src_incr;
  412.         h_resample_slow(dst, n, src, src_width, src_start, src_incr, filters);
  413.         dst += n;
  414.         dst_width -= n;
  415.         src_start += n * src_incr;
  416.     }
  417.     src_end = src_start + dst_width * src_incr;
  418.     if (src_end > ((src_width - NB_TAPS) << POS_FRAC_BITS)) {
  419.         n = (((src_width - NB_TAPS + 1) << POS_FRAC_BITS) - 1 - src_start) / 
  420.             src_incr;
  421.     } else {
  422.         n = dst_width;
  423.     }
  424. #ifdef HAVE_MMX
  425.     if ((mm_flags & MM_MMX) && NB_TAPS == 4)
  426.         h_resample_fast4_mmx(dst, n, 
  427.                              src, src_width, src_start, src_incr, filters);
  428.     else
  429. #endif
  430.         h_resample_fast(dst, n, 
  431.                         src, src_width, src_start, src_incr, filters);
  432.     if (n < dst_width) {
  433.         dst += n;
  434.         dst_width -= n;
  435.         src_start += n * src_incr;
  436.         h_resample_slow(dst, dst_width, 
  437.                         src, src_width, src_start, src_incr, filters);
  438.     }
  439. }
  440. static void component_resample(ImgReSampleContext *s, 
  441.                                uint8_t *output, int owrap, int owidth, int oheight,
  442.                                uint8_t *input, int iwrap, int iwidth, int iheight)
  443. {
  444.     int src_y, src_y1, last_src_y, ring_y, phase_y, y1, y;
  445.     uint8_t *new_line, *src_line;
  446.     last_src_y = - FCENTER - 1;
  447.     /* position of the bottom of the filter in the source image */
  448.     src_y = (last_src_y + NB_TAPS) * POS_FRAC; 
  449.     ring_y = NB_TAPS; /* position in ring buffer */
  450.     for(y=0;y<oheight;y++) {
  451.         /* apply horizontal filter on new lines from input if needed */
  452.         src_y1 = src_y >> POS_FRAC_BITS;
  453.         while (last_src_y < src_y1) {
  454.             if (++ring_y >= LINE_BUF_HEIGHT + NB_TAPS)
  455.                 ring_y = NB_TAPS;
  456.             last_src_y++;
  457.             /* handle limit conditions : replicate line (slightly
  458.                inefficient because we filter multiple times) */
  459.             y1 = last_src_y;
  460.             if (y1 < 0) {
  461.                 y1 = 0;
  462.             } else if (y1 >= iheight) {
  463.                 y1 = iheight - 1;
  464.             }
  465.             src_line = input + y1 * iwrap;
  466.             new_line = s->line_buf + ring_y * owidth;
  467.             /* apply filter and handle limit cases correctly */
  468.             h_resample(new_line, owidth, 
  469.                        src_line, iwidth, - FCENTER * POS_FRAC, s->h_incr, 
  470.                        &s->h_filters[0][0]);
  471.             /* handle ring buffer wraping */
  472.             if (ring_y >= LINE_BUF_HEIGHT) {
  473.                 memcpy(s->line_buf + (ring_y - LINE_BUF_HEIGHT) * owidth,
  474.                        new_line, owidth);
  475.             }
  476.         }
  477.         /* apply vertical filter */
  478.         phase_y = get_phase(src_y);
  479. #ifdef HAVE_MMX
  480.         /* desactivated MMX because loss of precision */
  481.         if ((mm_flags & MM_MMX) && NB_TAPS == 4 && 0)
  482.             v_resample4_mmx(output, owidth, 
  483.                             s->line_buf + (ring_y - NB_TAPS + 1) * owidth, owidth, 
  484.                             &s->v_filters[phase_y][0]);
  485.         else
  486. #endif
  487. #ifdef HAVE_ALTIVEC
  488.             if ((mm_flags & MM_ALTIVEC) && NB_TAPS == 4 && FILTER_BITS <= 6)
  489.                 v_resample16_altivec(output, owidth,
  490.                                 s->line_buf + (ring_y - NB_TAPS + 1) * owidth, owidth,
  491.                                 &s->v_filters[phase_y][0]);
  492.         else
  493. #endif
  494.             v_resample(output, owidth, 
  495.                        s->line_buf + (ring_y - NB_TAPS + 1) * owidth, owidth, 
  496.                        &s->v_filters[phase_y][0]);
  497.             
  498.         src_y += s->v_incr;
  499.         
  500.         output += owrap;
  501.     }
  502. }
  503. ImgReSampleContext *img_resample_init(int owidth, int oheight,
  504.                                       int iwidth, int iheight)
  505. {
  506.     return img_resample_full_init(owidth, oheight, iwidth, iheight, 
  507.             0, 0, 0, 0, 0, 0, 0, 0);
  508. }
  509. ImgReSampleContext *img_resample_full_init(int owidth, int oheight,
  510.                                       int iwidth, int iheight,
  511.                                       int topBand, int bottomBand,
  512.         int leftBand, int rightBand,
  513.         int padtop, int padbottom,
  514.         int padleft, int padright)
  515. {
  516.     ImgReSampleContext *s;
  517.     s = av_mallocz(sizeof(ImgReSampleContext));
  518.     if (!s)
  519.         return NULL;
  520.     if((unsigned)owidth >= UINT_MAX / (LINE_BUF_HEIGHT + NB_TAPS))
  521.         return NULL;
  522.     s->line_buf = av_mallocz(owidth * (LINE_BUF_HEIGHT + NB_TAPS));
  523.     if (!s->line_buf) 
  524.         goto fail;
  525.     
  526.     s->owidth = owidth;
  527.     s->oheight = oheight;
  528.     s->iwidth = iwidth;
  529.     s->iheight = iheight;
  530.   
  531.     s->topBand = topBand;
  532.     s->bottomBand = bottomBand;
  533.     s->leftBand = leftBand;
  534.     s->rightBand = rightBand;
  535.     
  536.     s->padtop = padtop;
  537.     s->padbottom = padbottom;
  538.     s->padleft = padleft;
  539.     s->padright = padright;
  540.     s->pad_owidth = owidth - (padleft + padright);
  541.     s->pad_oheight = oheight - (padtop + padbottom);
  542.     s->h_incr = ((iwidth - leftBand - rightBand) * POS_FRAC) / s->pad_owidth;
  543.     s->v_incr = ((iheight - topBand - bottomBand) * POS_FRAC) / s->pad_oheight; 
  544.     av_build_filter(&s->h_filters[0][0], (float) s->pad_owidth  / 
  545.             (float) (iwidth - leftBand - rightBand), NB_TAPS, NB_PHASES, 1<<FILTER_BITS, 0);
  546.     av_build_filter(&s->v_filters[0][0], (float) s->pad_oheight / 
  547.             (float) (iheight - topBand - bottomBand), NB_TAPS, NB_PHASES, 1<<FILTER_BITS, 0);
  548.     return s;
  549. fail:
  550.     av_free(s);
  551.     return NULL;
  552. }
  553. void img_resample(ImgReSampleContext *s, 
  554.                   AVPicture *output, const AVPicture *input)
  555. {
  556.     int i, shift;
  557.     uint8_t* optr;
  558.     for (i=0;i<3;i++) {
  559.         shift = (i == 0) ? 0 : 1;
  560.         optr = output->data[i] + (((output->linesize[i] * 
  561.                         s->padtop) + s->padleft) >> shift);
  562.         component_resample(s, optr, output->linesize[i], 
  563.                 s->pad_owidth >> shift, s->pad_oheight >> shift,
  564.                 input->data[i] + (input->linesize[i] * 
  565.                     (s->topBand >> shift)) + (s->leftBand >> shift),
  566.                 input->linesize[i], ((s->iwidth - s->leftBand - 
  567.                         s->rightBand) >> shift),
  568.                            (s->iheight - s->topBand - s->bottomBand) >> shift);
  569.     }
  570. }
  571. void img_resample_close(ImgReSampleContext *s)
  572. {
  573.     av_free(s->line_buf);
  574.     av_free(s);
  575. }
  576. #ifdef TEST
  577. #include <stdio.h>
  578. /* input */
  579. #define XSIZE 256
  580. #define YSIZE 256
  581. uint8_t img[XSIZE * YSIZE];
  582. /* output */
  583. #define XSIZE1 512
  584. #define YSIZE1 512
  585. uint8_t img1[XSIZE1 * YSIZE1];
  586. uint8_t img2[XSIZE1 * YSIZE1];
  587. void save_pgm(const char *filename, uint8_t *img, int xsize, int ysize)
  588. {
  589. #undef fprintf
  590.     FILE *f;
  591.     f=fopen(filename,"w");
  592.     fprintf(f,"P5n%d %dn%dn", xsize, ysize, 255);
  593.     fwrite(img,1, xsize * ysize,f);
  594.     fclose(f);
  595. #define fprintf please_use_av_log
  596. }
  597. static void dump_filter(int16_t *filter)
  598. {
  599.     int i, ph;
  600.     for(ph=0;ph<NB_PHASES;ph++) {
  601.         av_log(NULL, AV_LOG_INFO, "%2d: ", ph);
  602.         for(i=0;i<NB_TAPS;i++) {
  603.             av_log(NULL, AV_LOG_INFO, " %5.2f", filter[ph * NB_TAPS + i] / 256.0);
  604.         }
  605.         av_log(NULL, AV_LOG_INFO, "n");
  606.     }
  607. }
  608. #ifdef HAVE_MMX
  609. int mm_flags;
  610. #endif
  611. int main(int argc, char **argv)
  612. {
  613.     int x, y, v, i, xsize, ysize;
  614.     ImgReSampleContext *s;
  615.     float fact, factors[] = { 1/2.0, 3.0/4.0, 1.0, 4.0/3.0, 16.0/9.0, 2.0 };
  616.     char buf[256];
  617.     /* build test image */
  618.     for(y=0;y<YSIZE;y++) {
  619.         for(x=0;x<XSIZE;x++) {
  620.             if (x < XSIZE/2 && y < YSIZE/2) {
  621.                 if (x < XSIZE/4 && y < YSIZE/4) {
  622.                     if ((x % 10) <= 6 &&
  623.                         (y % 10) <= 6)
  624.                         v = 0xff;
  625.                     else
  626.                         v = 0x00;
  627.                 } else if (x < XSIZE/4) {
  628.                     if (x & 1) 
  629.                         v = 0xff;
  630.                     else 
  631.                         v = 0;
  632.                 } else if (y < XSIZE/4) {
  633.                     if (y & 1) 
  634.                         v = 0xff;
  635.                     else 
  636.                         v = 0;
  637.                 } else {
  638.                     if (y < YSIZE*3/8) {
  639.                         if ((y+x) & 1) 
  640.                             v = 0xff;
  641.                         else 
  642.                             v = 0;
  643.                     } else {
  644.                         if (((x+3) % 4) <= 1 &&
  645.                             ((y+3) % 4) <= 1)
  646.                             v = 0xff;
  647.                         else
  648.                             v = 0x00;
  649.                     }
  650.                 }
  651.             } else if (x < XSIZE/2) {
  652.                 v = ((x - (XSIZE/2)) * 255) / (XSIZE/2);
  653.             } else if (y < XSIZE/2) {
  654.                 v = ((y - (XSIZE/2)) * 255) / (XSIZE/2);
  655.             } else {
  656.                 v = ((x + y - XSIZE) * 255) / XSIZE;
  657.             }
  658.             img[(YSIZE - y) * XSIZE + (XSIZE - x)] = v;
  659.         }
  660.     }
  661.     save_pgm("/tmp/in.pgm", img, XSIZE, YSIZE);
  662.     for(i=0;i<sizeof(factors)/sizeof(float);i++) {
  663.         fact = factors[i];
  664.         xsize = (int)(XSIZE * fact);
  665.         ysize = (int)((YSIZE - 100) * fact);
  666.         s = img_resample_full_init(xsize, ysize, XSIZE, YSIZE, 50 ,50, 0, 0, 0, 0, 0, 0);
  667.         av_log(NULL, AV_LOG_INFO, "Factor=%0.2fn", fact);
  668.         dump_filter(&s->h_filters[0][0]);
  669.         component_resample(s, img1, xsize, xsize, ysize,
  670.                            img + 50 * XSIZE, XSIZE, XSIZE, YSIZE - 100);
  671.         img_resample_close(s);
  672.         snprintf(buf, sizeof(buf), "/tmp/out%d.pgm", i);
  673.         save_pgm(buf, img1, xsize, ysize);
  674.     }
  675.     /* mmx test */
  676. #ifdef HAVE_MMX
  677.     av_log(NULL, AV_LOG_INFO, "MMX testn");
  678.     fact = 0.72;
  679.     xsize = (int)(XSIZE * fact);
  680.     ysize = (int)(YSIZE * fact);
  681.     mm_flags = MM_MMX;
  682.     s = img_resample_init(xsize, ysize, XSIZE, YSIZE);
  683.     component_resample(s, img1, xsize, xsize, ysize,
  684.                        img, XSIZE, XSIZE, YSIZE);
  685.     mm_flags = 0;
  686.     s = img_resample_init(xsize, ysize, XSIZE, YSIZE);
  687.     component_resample(s, img2, xsize, xsize, ysize,
  688.                        img, XSIZE, XSIZE, YSIZE);
  689.     if (memcmp(img1, img2, xsize * ysize) != 0) {
  690.         av_log(NULL, AV_LOG_ERROR, "mmx errorn");
  691.         exit(1);
  692.     }
  693.     av_log(NULL, AV_LOG_INFO, "MMX OKn");
  694. #endif
  695.     return 0;
  696. }
  697. #endif