libmpcodecs/vf_screenshot.c

   1 /*
   2  * This file is part of MPlayer.
   3  *
   4  * MPlayer is free software; you can redistribute it and/or modify
   5  * it under the terms of the GNU General Public License as published by
   6  * the Free Software Foundation; either version 2 of the License, or
   7  * (at your option) any later version.
   8  *
   9  * MPlayer is distributed in the hope that it will be useful,
  10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12  * GNU General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU General Public License along
  15  * with MPlayer; if not, write to the Free Software Foundation, Inc.,
  16  * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
  17  */
  18
  19 #include "config.h"
  20
  21 #include <stdio.h>
  22 #include <stdlib.h>
  23 #if HAVE_MALLOC_H
  24 #include <malloc.h>
  25 #endif
  26 #include <string.h>
  27 #include <inttypes.h>
  28
  29 #include <sys/types.h>
  30 #include <sys/stat.h>
  31 #include <unistd.h>
  32
  33 #include "mp_msg.h"
  34
  35 #include "img_format.h"
  36 #include "mp_image.h"
  37 #include "vf.h"
  38 #include "vf_scale.h"
  39
  40 #include "libswscale/swscale.h"
  41 #include "libavcodec/avcodec.h"
  42
  43 struct vf_priv_s {
  44     int frameno;
  45     char fname[102];
  46     /// shot stores current screenshot mode:
  47     /// 0: don't take screenshots
  48     /// 1: take single screenshot, reset to 0 afterwards
  49     /// 2: take screenshots of each frame
  50     int shot, store_slices;
  51     int dw, dh, stride;
  52     uint8_t *buffer;
  53     struct SwsContext *ctx;
  54     AVCodecContext *avctx;
  55     uint8_t *outbuffer;
  56     int outbuffer_size;
  57 };
  58
  59 //===========================================================================//
  60
  61 static int config(struct vf_instance* vf,
  62                   int width, int height, int d_width, int d_height,
  63                   unsigned int flags, unsigned int outfmt)
  64 {
  65     vf->priv->ctx=sws_getContextFromCmdLine(width, height, outfmt,
  66                                  d_width, d_height, IMGFMT_RGB24);
  67
  68     vf->priv->outbuffer_size = d_width * d_height * 3 * 2;
  69     vf->priv->outbuffer = realloc(vf->priv->outbuffer, vf->priv->outbuffer_size);
  70     vf->priv->avctx->width = d_width;
  71     vf->priv->avctx->height = d_height;
  72     vf->priv->avctx->pix_fmt = PIX_FMT_RGB24;
  73     vf->priv->avctx->compression_level = 0;
  74     vf->priv->dw = d_width;
  75     vf->priv->dh = d_height;
  76     vf->priv->stride = (3*vf->priv->dw+15)&~15;
  77
  78     if (vf->priv->buffer) free(vf->priv->buffer); // probably reconfigured
  79     vf->priv->buffer = NULL;
  80
  81     return vf_next_config(vf,width,height,d_width,d_height,flags,outfmt);
  82 }
  83
  84 static void write_png(struct vf_priv_s *priv)
  85 {
  86     char *fname = priv->fname;
  87     FILE * fp;
  88     AVFrame pic;
  89     int size;
  90
  91     fp = fopen (fname, "wb");
  92     if (fp == NULL) {
  93         mp_msg(MSGT_VFILTER,MSGL_ERR,"\nPNG Error opening %s for writing!\n", fname);
  94         return;
  95     }
  96
  97     pic.data[0] = priv->buffer;
  98     pic.linesize[0] = priv->stride;
  99     size = avcodec_encode_video(priv->avctx, priv->outbuffer, priv->outbuffer_size, &pic);
 100     if (size > 0)
 101         fwrite(priv->outbuffer, size, 1, fp);
 102
 103     fclose (fp);
 104 }
 105
 106 static int fexists(char *fname)
 107 {
 108     struct stat dummy;
 109     if (stat(fname, &dummy) == 0) return 1;
 110     else return 0;
 111 }
 112
 113 static void gen_fname(struct vf_priv_s* priv)
 114 {
 115     do {
 116         snprintf (priv->fname, 100, "shot%04d.png", ++priv->frameno);
 117     } while (fexists(priv->fname) && priv->frameno < 100000);
 118     if (fexists(priv->fname)) {
 119         priv->fname[0] = '\0';
 120         return;
 121     }
 122
 123     mp_msg(MSGT_VFILTER,MSGL_INFO,"*** screenshot '%s' ***\n",priv->fname);
 124
 125 }
 126
 127 static void scale_image(struct vf_priv_s* priv, mp_image_t *mpi)
 128 {
 129     uint8_t *dst[MP_MAX_PLANES] = {NULL};
 130     int dst_stride[MP_MAX_PLANES] = {0};
 131
 132     dst_stride[0] = priv->stride;
 133     if (!priv->buffer)
 134         priv->buffer = av_malloc(dst_stride[0]*priv->dh);
 135
 136     dst[0] = priv->buffer;
 137     sws_scale(priv->ctx, mpi->planes, mpi->stride, 0, priv->dh, dst, dst_stride);
 138 }
 139
 140 static void start_slice(struct vf_instance* vf, mp_image_t *mpi)
 141 {
 142     vf->dmpi=vf_get_image(vf->next,mpi->imgfmt,
 143         mpi->type, mpi->flags, mpi->width, mpi->height);
 144     if (vf->priv->shot) {
 145         vf->priv->store_slices = 1;
 146         if (!vf->priv->buffer)
 147             vf->priv->buffer = av_malloc(vf->priv->stride*vf->priv->dh);
 148     }
 149
 150 }
 151
 152 static void draw_slice(struct vf_instance* vf, unsigned char** src,
 153                        int* stride, int w,int h, int x, int y)
 154 {
 155     if (vf->priv->store_slices) {
 156         uint8_t *dst[MP_MAX_PLANES] = {NULL};
 157         int dst_stride[MP_MAX_PLANES] = {0};
 158         dst_stride[0] = vf->priv->stride;
 159         dst[0] = vf->priv->buffer;
 160         sws_scale(vf->priv->ctx, src, stride, y, h, dst, dst_stride);
 161     }
 162     vf_next_draw_slice(vf,src,stride,w,h,x,y);
 163 }
 164
 165 static void get_image(struct vf_instance* vf, mp_image_t *mpi)
 166 {
 167     // FIXME: should vf.c really call get_image when using slices??
 168     if (mpi->flags & MP_IMGFLAG_DRAW_CALLBACK)
 169       return;
 170     vf->dmpi= vf_get_image(vf->next, mpi->imgfmt,
 171                            mpi->type, mpi->flags/* | MP_IMGFLAG_READABLE*/, mpi->width, mpi->height);
 172
 173     mpi->planes[0]=vf->dmpi->planes[0];
 174     mpi->stride[0]=vf->dmpi->stride[0];
 175     if(mpi->flags&MP_IMGFLAG_PLANAR){
 176         mpi->planes[1]=vf->dmpi->planes[1];
 177         mpi->planes[2]=vf->dmpi->planes[2];
 178         mpi->stride[1]=vf->dmpi->stride[1];
 179         mpi->stride[2]=vf->dmpi->stride[2];
 180     }
 181     mpi->width=vf->dmpi->width;
 182
 183     mpi->flags|=MP_IMGFLAG_DIRECT;
 184
 185     mpi->priv=(void*)vf->dmpi;
 186 }
 187
 188 static int put_image(struct vf_instance* vf, mp_image_t *mpi, double pts)
 189 {
 190     mp_image_t *dmpi = (mp_image_t *)mpi->priv;
 191
 192     if (mpi->flags & MP_IMGFLAG_DRAW_CALLBACK)
 193       dmpi = vf->dmpi;
 194     else
 195     if(!(mpi->flags&MP_IMGFLAG_DIRECT)){
 196         dmpi=vf_get_image(vf->next,mpi->imgfmt,
 197                                     MP_IMGTYPE_EXPORT, 0,
 198                                     mpi->width, mpi->height);
 199         vf_clone_mpi_attributes(dmpi, mpi);
 200         dmpi->planes[0]=mpi->planes[0];
 201         dmpi->planes[1]=mpi->planes[1];
 202         dmpi->planes[2]=mpi->planes[2];
 203         dmpi->stride[0]=mpi->stride[0];
 204         dmpi->stride[1]=mpi->stride[1];
 205         dmpi->stride[2]=mpi->stride[2];
 206         dmpi->width=mpi->width;
 207         dmpi->height=mpi->height;
 208     }
 209
 210     if(vf->priv->shot) {
 211         if (vf->priv->shot==1)
 212             vf->priv->shot=0;
 213         gen_fname(vf->priv);
 214         if (vf->priv->fname[0]) {
 215             if (!vf->priv->store_slices)
 216               scale_image(vf->priv, dmpi);
 217             write_png(vf->priv);
 218         }
 219         vf->priv->store_slices = 0;
 220     }
 221
 222     return vf_next_put_image(vf, dmpi, pts);
 223 }
 224
 225 static int control (vf_instance_t *vf, int request, void *data)
 226 {
 227     /** data contains an integer argument
 228      * 0: take screenshot with the next frame
 229      * 1: take screenshots with each frame until the same command is given once again
 230      **/
 231     if(request==VFCTRL_SCREENSHOT) {
 232         if (data && *(int*)data) { // repeated screenshot mode
 233             if (vf->priv->shot==2)
 234                 vf->priv->shot=0;
 235             else
 236                 vf->priv->shot=2;
 237         } else { // single screenshot
 238             if (!vf->priv->shot)
 239                 vf->priv->shot=1;
 240         }
 241         return CONTROL_TRUE;
 242     }
 243     return vf_next_control (vf, request, data);
 244 }
 245
 246
 247 //===========================================================================//
 248
 249 static int query_format(struct vf_instance* vf, unsigned int fmt)
 250 {
 251     switch(fmt){
 252     case IMGFMT_YV12:
 253     case IMGFMT_I420:
 254     case IMGFMT_IYUV:
 255     case IMGFMT_UYVY:
 256     case IMGFMT_YUY2:
 257     case IMGFMT_BGR32:
 258     case IMGFMT_BGR24:
 259     case IMGFMT_BGR16:
 260     case IMGFMT_BGR15:
 261     case IMGFMT_BGR12:
 262     case IMGFMT_RGB32:
 263     case IMGFMT_RGB24:
 264     case IMGFMT_Y800:
 265     case IMGFMT_Y8:
 266     case IMGFMT_YVU9:
 267     case IMGFMT_IF09:
 268     case IMGFMT_444P:
 269     case IMGFMT_422P:
 270     case IMGFMT_411P:
 271         return vf_next_query_format(vf, fmt);
 272     }
 273     return 0;
 274 }
 275
 276 static void uninit(vf_instance_t *vf)
 277 {
 278     avcodec_close(vf->priv->avctx);
 279     av_freep(&vf->priv->avctx);
 280     if(vf->priv->ctx) sws_freeContext(vf->priv->ctx);
 281     if (vf->priv->buffer) av_free(vf->priv->buffer);
 282     free(vf->priv->outbuffer);
 283     free(vf->priv);
 284 }
 285
 286 static int vf_open(vf_instance_t *vf, char *args)
 287 {
 288     vf->config=config;
 289     vf->control=control;
 290     vf->put_image=put_image;
 291     vf->query_format=query_format;
 292     vf->start_slice=start_slice;
 293     vf->draw_slice=draw_slice;
 294     vf->get_image=get_image;
 295     vf->uninit=uninit;
 296     vf->priv=malloc(sizeof(struct vf_priv_s));
 297     vf->priv->frameno=0;
 298     vf->priv->shot=0;
 299     vf->priv->store_slices=0;
 300     vf->priv->buffer=0;
 301     vf->priv->outbuffer=0;
 302     vf->priv->ctx=0;
 303     vf->priv->avctx = avcodec_alloc_context();
 304     avcodec_register_all();
 305     if (avcodec_open(vf->priv->avctx, avcodec_find_encoder(CODEC_ID_PNG))) {
 306         mp_msg(MSGT_VFILTER, MSGL_FATAL, "Could not open libavcodec PNG encoder\n");
 307         return 0;
 308     }
 309     return 1;
 310 }
 311
 312
 313 const vf_info_t vf_info_screenshot = {
 314     "screenshot to file",
 315     "screenshot",
 316     "A'rpi, Jindrich Makovicka",
 317     "",
 318     vf_open,
 319     NULL
 320 };
 321
 322 //===========================================================================//