libmpcodecs/vf_palette.c

   1 #include <stdio.h>
   2 #include <stdlib.h>
   3 #include <string.h>
   4 #include <inttypes.h>
   5
   6 #include "config.h"
   7 #include "mp_msg.h"
   8 #include "help_mp.h"
   9
  10 #include "img_format.h"
  11 #include "mp_image.h"
  12 #include "vf.h"
  13
  14 #include "libswscale/rgb2rgb.h"
  15
  16 //===========================================================================//
  17
  18 // commented out 16 and 15 bit output support, because the conversion
  19 // routines are incorrrect.  they assume the palette to be of the same
  20 // depth as the output, which is incorrect. --Joey
  21
  22 static const unsigned int bgr_list[]={
  23     IMGFMT_BGR32,
  24     IMGFMT_BGR24,
  25 //    IMGFMT_BGR16,
  26 //    IMGFMT_BGR15,
  27     0
  28 };
  29 static const unsigned int rgb_list[]={
  30     IMGFMT_RGB32,
  31     IMGFMT_RGB24,
  32 //    IMGFMT_RGB16,
  33 //    IMGFMT_RGB15,
  34     0
  35 };
  36
  37 static unsigned int gray_pal[256];
  38
  39 static unsigned int find_best(struct vf_instance* vf, unsigned int fmt){
  40     unsigned int best=0;
  41     int ret;
  42     const unsigned int* p;
  43     if(fmt==IMGFMT_BGR8) p=bgr_list;
  44     else if(fmt==IMGFMT_RGB8) p=rgb_list;
  45     else return 0;
  46     while(*p){
  47         ret=vf->next->query_format(vf->next,*p);
  48         mp_msg(MSGT_VFILTER,MSGL_DBG2,"[%s] query(%s) -> %d\n",vf->info->name,vo_format_name(*p),ret&3);
  49         if(ret&VFCAP_CSP_SUPPORTED_BY_HW){ best=*p; break;} // no conversion -> bingo!
  50         if(ret&VFCAP_CSP_SUPPORTED && !best) best=*p; // best with conversion
  51         ++p;
  52     }
  53     return best;
  54 }
  55
  56 //===========================================================================//
  57
  58 struct vf_priv_s {
  59     unsigned int fmt;
  60     int pal_msg;
  61 };
  62
  63 static int config(struct vf_instance* vf,
  64         int width, int height, int d_width, int d_height,
  65         unsigned int flags, unsigned int outfmt){
  66     if (!vf->priv->fmt)
  67         vf->priv->fmt=find_best(vf,outfmt);
  68     if(!vf->priv->fmt){
  69         // no matching fmt, so force one...
  70         if(outfmt==IMGFMT_RGB8) vf->priv->fmt=IMGFMT_RGB32;
  71         else if(outfmt==IMGFMT_BGR8) vf->priv->fmt=IMGFMT_BGR32;
  72         else return 0;
  73     }
  74     return vf_next_config(vf,width,height,d_width,d_height,flags,vf->priv->fmt);
  75 }
  76
  77 static int put_image(struct vf_instance* vf, mp_image_t *mpi, double pts){
  78     mp_image_t *dmpi;
  79
  80     // hope we'll get DR buffer:
  81     dmpi=vf_get_image(vf->next,vf->priv->fmt,
  82         MP_IMGTYPE_TEMP, MP_IMGFLAG_ACCEPT_STRIDE,
  83         mpi->w, mpi->h);
  84
  85     if (!mpi->planes[1])
  86     {
  87         if(!vf->priv->pal_msg){
  88             mp_msg(MSGT_VFILTER,MSGL_V,"[%s] no palette given, assuming builtin grayscale one\n",vf->info->name);
  89             vf->priv->pal_msg=1;
  90         }
  91         mpi->planes[1] = (unsigned char*)gray_pal;
  92     }
  93
  94     if(mpi->w==mpi->stride[0] && dmpi->w*(dmpi->bpp>>3)==dmpi->stride[0]){
  95         // no stride conversion needed
  96         switch(IMGFMT_RGB_DEPTH(dmpi->imgfmt)){
  97         case 15:
  98             if (IMGFMT_IS_BGR(dmpi->imgfmt))
  99                 palette8tobgr15(mpi->planes[0],dmpi->planes[0],mpi->h*mpi->w,mpi->planes[1]);
 100             else
 101                 palette8torgb15(mpi->planes[0],dmpi->planes[0],mpi->h*mpi->w,mpi->planes[1]);
 102             break;
 103         case 16:
 104             if (IMGFMT_IS_BGR(dmpi->imgfmt))
 105                 palette8tobgr16(mpi->planes[0],dmpi->planes[0],mpi->h*mpi->w,mpi->planes[1]);
 106             else
 107                 palette8torgb16(mpi->planes[0],dmpi->planes[0],mpi->h*mpi->w,mpi->planes[1]);
 108             break;
 109         case 24:
 110             if (IMGFMT_IS_BGR(dmpi->imgfmt))
 111                 palette8topacked24(mpi->planes[0],dmpi->planes[0],mpi->h*mpi->w,mpi->planes[1]);
 112             else
 113                 palette8topacked24(mpi->planes[0],dmpi->planes[0],mpi->h*mpi->w,mpi->planes[1]);
 114             break;
 115         case 32:
 116             if (IMGFMT_IS_BGR(dmpi->imgfmt))
 117                 palette8topacked32(mpi->planes[0],dmpi->planes[0],mpi->h*mpi->w,mpi->planes[1]);
 118             else
 119                 palette8topacked32(mpi->planes[0],dmpi->planes[0],mpi->h*mpi->w,mpi->planes[1]);
 120             break;
 121         }
 122     } else {
 123         int y;
 124         for(y=0;y<mpi->h;y++){
 125             unsigned char* src=mpi->planes[0]+y*mpi->stride[0];
 126             unsigned char* dst=dmpi->planes[0]+y*dmpi->stride[0];
 127             switch(IMGFMT_RGB_DEPTH(dmpi->imgfmt)){
 128             case 15:
 129                 if (IMGFMT_IS_BGR(dmpi->imgfmt))
 130                     palette8tobgr15(src,dst,mpi->w,mpi->planes[1]);
 131                 else
 132                     palette8torgb15(src,dst,mpi->w,mpi->planes[1]);
 133                 break;
 134             case 16:
 135                 if (IMGFMT_IS_BGR(dmpi->imgfmt))
 136                     palette8tobgr16(src,dst,mpi->w,mpi->planes[1]);
 137                 else
 138                     palette8torgb16(src,dst,mpi->w,mpi->planes[1]);
 139                 break;
 140             case 24:
 141                 if (IMGFMT_IS_BGR(dmpi->imgfmt))
 142                     palette8topacked24(src,dst,mpi->w,mpi->planes[1]);
 143                 else
 144                     palette8topacked24(src,dst,mpi->w,mpi->planes[1]);
 145                 break;
 146             case 32:
 147                 if (IMGFMT_IS_BGR(dmpi->imgfmt))
 148                     palette8topacked32(src,dst,mpi->w,mpi->planes[1]);
 149                 else
 150                     palette8topacked32(src,dst,mpi->w,mpi->planes[1]);
 151                 break;
 152             }
 153         }
 154     }
 155
 156     return vf_next_put_image(vf,dmpi, pts);
 157 }
 158
 159 //===========================================================================//
 160
 161 static int query_format(struct vf_instance* vf, unsigned int fmt){
 162     int best=find_best(vf,fmt);
 163     if(!best) return 0; // no match
 164     return vf->next->query_format(vf->next,best);
 165 }
 166
 167 static void uninit(vf_instance_t *vf) {
 168   free(vf->priv);
 169 }
 170
 171 static int open(vf_instance_t *vf, char* args){
 172     unsigned int i;
 173     vf->config=config;
 174     vf->uninit=uninit;
 175     vf->put_image=put_image;
 176     vf->query_format=query_format;
 177     vf->priv=malloc(sizeof(struct vf_priv_s));
 178     memset(vf->priv, 0, sizeof(struct vf_priv_s));
 179     for(i=0;i<256;i++) gray_pal[i]=0x01010101*i;
 180     if (args)
 181     {
 182         if (!strcasecmp(args,"rgb15")) vf->priv->fmt=IMGFMT_RGB15; else
 183         if (!strcasecmp(args,"rgb16")) vf->priv->fmt=IMGFMT_RGB16; else
 184         if (!strcasecmp(args,"rgb24")) vf->priv->fmt=IMGFMT_RGB24; else
 185         if (!strcasecmp(args,"rgb32")) vf->priv->fmt=IMGFMT_RGB32; else
 186         if (!strcasecmp(args,"bgr15")) vf->priv->fmt=IMGFMT_BGR15; else
 187         if (!strcasecmp(args,"bgr16")) vf->priv->fmt=IMGFMT_BGR16; else
 188         if (!strcasecmp(args,"bgr24")) vf->priv->fmt=IMGFMT_BGR24; else
 189         if (!strcasecmp(args,"bgr32")) vf->priv->fmt=IMGFMT_BGR32; else
 190         {
 191             mp_msg(MSGT_VFILTER, MSGL_WARN, MSGTR_MPCODECS_UnknownFormatName, args);
 192             return 0;
 193         }
 194     }
 195     return 1;
 196 }
 197
 198 const vf_info_t vf_info_palette = {
 199     "8bpp indexed (using palette) -> BGR 15/16/24/32 conversion",
 200     "palette",
 201     "A'rpi & Alex",
 202     "",
 203     open,
 204     NULL
 205 };
 206
 207 //===========================================================================//