yading@10: /*
yading@10:  * Copyright (c) 2012 Michael Niedermayer <michaelni@gmx.at>
yading@10:  *
yading@10:  * This file is part of FFmpeg.
yading@10:  *
yading@10:  * FFmpeg is free software; you can redistribute it and/or
yading@10:  * modify it under the terms of the GNU Lesser General Public
yading@10:  * License as published by the Free Software Foundation; either
yading@10:  * version 2.1 of the License, or (at your option) any later version.
yading@10:  *
yading@10:  * FFmpeg is distributed in the hope that it will be useful,
yading@10:  * but WITHOUT ANY WARRANTY; without even the implied warranty of
yading@10:  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
yading@10:  * Lesser General Public License for more details.
yading@10:  *
yading@10:  * You should have received a copy of the GNU Lesser General Public
yading@10:  * License along with FFmpeg; if not, write to the Free Software
yading@10:  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
yading@10:  */
yading@10: 
yading@10: #include "frame_thread_encoder.h"
yading@10: 
yading@10: #include "libavutil/fifo.h"
yading@10: #include "libavutil/avassert.h"
yading@10: #include "libavutil/imgutils.h"
yading@10: #include "avcodec.h"
yading@10: #include "internal.h"
yading@10: #include "thread.h"
yading@10: 
yading@10: #if HAVE_PTHREADS
yading@10: #include <pthread.h>
yading@10: #elif HAVE_W32THREADS
yading@10: #include "w32pthreads.h"
yading@10: #elif HAVE_OS2THREADS
yading@10: #include "os2threads.h"
yading@10: #endif
yading@10: 
yading@10: #define MAX_THREADS 64
yading@10: #define BUFFER_SIZE (2*MAX_THREADS)
yading@10: 
yading@10: typedef struct{
yading@10:     void *indata;
yading@10:     void *outdata;
yading@10:     int64_t return_code;
yading@10:     unsigned index;
yading@10: } Task;
yading@10: 
yading@10: typedef struct{
yading@10:     AVCodecContext *parent_avctx;
yading@10:     pthread_mutex_t buffer_mutex;
yading@10: 
yading@10:     AVFifoBuffer *task_fifo;
yading@10:     pthread_mutex_t task_fifo_mutex;
yading@10:     pthread_cond_t task_fifo_cond;
yading@10: 
yading@10:     Task finished_tasks[BUFFER_SIZE];
yading@10:     pthread_mutex_t finished_task_mutex;
yading@10:     pthread_cond_t finished_task_cond;
yading@10: 
yading@10:     unsigned task_index;
yading@10:     unsigned finished_task_index;
yading@10: 
yading@10:     pthread_t worker[MAX_THREADS];
yading@10:     int exit;
yading@10: } ThreadContext;
yading@10: 
yading@10: static void * attribute_align_arg worker(void *v){
yading@10:     AVCodecContext *avctx = v;
yading@10:     ThreadContext *c = avctx->internal->frame_thread_encoder;
yading@10:     AVPacket *pkt = NULL;
yading@10: 
yading@10:     while(!c->exit){
yading@10:         int got_packet, ret;
yading@10:         AVFrame *frame;
yading@10:         Task task;
yading@10: 
yading@10:         if(!pkt) pkt= av_mallocz(sizeof(*pkt));
yading@10:         if(!pkt) continue;
yading@10:         av_init_packet(pkt);
yading@10: 
yading@10:         pthread_mutex_lock(&c->task_fifo_mutex);
yading@10:         while (av_fifo_size(c->task_fifo) <= 0 || c->exit) {
yading@10:             if(c->exit){
yading@10:                 pthread_mutex_unlock(&c->task_fifo_mutex);
yading@10:                 goto end;
yading@10:             }
yading@10:             pthread_cond_wait(&c->task_fifo_cond, &c->task_fifo_mutex);
yading@10:         }
yading@10:         av_fifo_generic_read(c->task_fifo, &task, sizeof(task), NULL);
yading@10:         pthread_mutex_unlock(&c->task_fifo_mutex);
yading@10:         frame = task.indata;
yading@10: 
yading@10:         ret = avcodec_encode_video2(avctx, pkt, frame, &got_packet);
yading@10:         pthread_mutex_lock(&c->buffer_mutex);
yading@10:         av_frame_unref(frame);
yading@10:         pthread_mutex_unlock(&c->buffer_mutex);
yading@10:         av_frame_free(&frame);
yading@10:         if(got_packet) {
yading@10:             av_dup_packet(pkt);
yading@10:         } else {
yading@10:             pkt->data = NULL;
yading@10:             pkt->size = 0;
yading@10:         }
yading@10:         pthread_mutex_lock(&c->finished_task_mutex);
yading@10:         c->finished_tasks[task.index].outdata = pkt; pkt = NULL;
yading@10:         c->finished_tasks[task.index].return_code = ret;
yading@10:         pthread_cond_signal(&c->finished_task_cond);
yading@10:         pthread_mutex_unlock(&c->finished_task_mutex);
yading@10:     }
yading@10: end:
yading@10:     av_free(pkt);
yading@10:     pthread_mutex_lock(&c->buffer_mutex);
yading@10:     avcodec_close(avctx);
yading@10:     pthread_mutex_unlock(&c->buffer_mutex);
yading@10:     av_freep(&avctx);
yading@10:     return NULL;
yading@10: }
yading@10: 
yading@10: int ff_frame_thread_encoder_init(AVCodecContext *avctx, AVDictionary *options){
yading@10:     int i=0;
yading@10:     ThreadContext *c;
yading@10: 
yading@10: 
yading@10:     if(   !(avctx->thread_type & FF_THREAD_FRAME)
yading@10:        || !(avctx->codec->capabilities & CODEC_CAP_INTRA_ONLY))
yading@10:         return 0;
yading@10: 
yading@10:     if(!avctx->thread_count) {
yading@10:         avctx->thread_count = ff_get_logical_cpus(avctx);
yading@10:         avctx->thread_count = FFMIN(avctx->thread_count, MAX_THREADS);
yading@10:     }
yading@10: 
yading@10:     if(avctx->thread_count <= 1)
yading@10:         return 0;
yading@10: 
yading@10:     if(avctx->thread_count > MAX_THREADS)
yading@10:         return AVERROR(EINVAL);
yading@10: 
yading@10:     av_assert0(!avctx->internal->frame_thread_encoder);
yading@10:     c = avctx->internal->frame_thread_encoder = av_mallocz(sizeof(ThreadContext));
yading@10:     if(!c)
yading@10:         return AVERROR(ENOMEM);
yading@10: 
yading@10:     c->parent_avctx = avctx;
yading@10: 
yading@10:     c->task_fifo = av_fifo_alloc(sizeof(Task) * BUFFER_SIZE);
yading@10:     if(!c->task_fifo)
yading@10:         goto fail;
yading@10: 
yading@10:     pthread_mutex_init(&c->task_fifo_mutex, NULL);
yading@10:     pthread_mutex_init(&c->finished_task_mutex, NULL);
yading@10:     pthread_mutex_init(&c->buffer_mutex, NULL);
yading@10:     pthread_cond_init(&c->task_fifo_cond, NULL);
yading@10:     pthread_cond_init(&c->finished_task_cond, NULL);
yading@10: 
yading@10:     for(i=0; i<avctx->thread_count ; i++){
yading@10:         AVDictionary *tmp = NULL;
yading@10:         void *tmpv;
yading@10:         AVCodecContext *thread_avctx = avcodec_alloc_context3(avctx->codec);
yading@10:         if(!thread_avctx)
yading@10:             goto fail;
yading@10:         tmpv = thread_avctx->priv_data;
yading@10:         *thread_avctx = *avctx;
yading@10:         thread_avctx->priv_data = tmpv;
yading@10:         thread_avctx->internal = NULL;
yading@10:         memcpy(thread_avctx->priv_data, avctx->priv_data, avctx->codec->priv_data_size);
yading@10:         thread_avctx->thread_count = 1;
yading@10:         thread_avctx->active_thread_type &= ~FF_THREAD_FRAME;
yading@10: 
yading@10:         av_dict_copy(&tmp, options, 0);
yading@10:         av_dict_set(&tmp, "threads", "1", 0);
yading@10:         if(avcodec_open2(thread_avctx, avctx->codec, &tmp) < 0) {
yading@10:             av_dict_free(&tmp);
yading@10:             goto fail;
yading@10:         }
yading@10:         av_dict_free(&tmp);
yading@10:         av_assert0(!thread_avctx->internal->frame_thread_encoder);
yading@10:         thread_avctx->internal->frame_thread_encoder = c;
yading@10:         if(pthread_create(&c->worker[i], NULL, worker, thread_avctx)) {
yading@10:             goto fail;
yading@10:         }
yading@10:     }
yading@10: 
yading@10:     avctx->active_thread_type = FF_THREAD_FRAME;
yading@10: 
yading@10:     return 0;
yading@10: fail:
yading@10:     avctx->thread_count = i;
yading@10:     av_log(avctx, AV_LOG_ERROR, "ff_frame_thread_encoder_init failed\n");
yading@10:     ff_frame_thread_encoder_free(avctx);
yading@10:     return -1;
yading@10: }
yading@10: 
yading@10: void ff_frame_thread_encoder_free(AVCodecContext *avctx){
yading@10:     int i;
yading@10:     ThreadContext *c= avctx->internal->frame_thread_encoder;
yading@10: 
yading@10:     pthread_mutex_lock(&c->task_fifo_mutex);
yading@10:     c->exit = 1;
yading@10:     pthread_cond_broadcast(&c->task_fifo_cond);
yading@10:     pthread_mutex_unlock(&c->task_fifo_mutex);
yading@10: 
yading@10:     for (i=0; i<avctx->thread_count; i++) {
yading@10:          pthread_join(c->worker[i], NULL);
yading@10:     }
yading@10: 
yading@10:     pthread_mutex_destroy(&c->task_fifo_mutex);
yading@10:     pthread_mutex_destroy(&c->finished_task_mutex);
yading@10:     pthread_mutex_destroy(&c->buffer_mutex);
yading@10:     pthread_cond_destroy(&c->task_fifo_cond);
yading@10:     pthread_cond_destroy(&c->finished_task_cond);
yading@10:     av_fifo_free(c->task_fifo); c->task_fifo = NULL;
yading@10:     av_freep(&avctx->internal->frame_thread_encoder);
yading@10: }
yading@10: 
yading@10: int ff_thread_video_encode_frame(AVCodecContext *avctx, AVPacket *pkt, const AVFrame *frame, int *got_packet_ptr){
yading@10:     ThreadContext *c = avctx->internal->frame_thread_encoder;
yading@10:     Task task;
yading@10:     int ret;
yading@10: 
yading@10:     av_assert1(!*got_packet_ptr);
yading@10: 
yading@10:     if(frame){
yading@10:         if(!(avctx->flags & CODEC_FLAG_INPUT_PRESERVED)){
yading@10:             AVFrame *new = av_frame_alloc();
yading@10:             if(!new)
yading@10:                 return AVERROR(ENOMEM);
yading@10:             pthread_mutex_lock(&c->buffer_mutex);
yading@10:             ret = ff_get_buffer(c->parent_avctx, new, 0);
yading@10:             pthread_mutex_unlock(&c->buffer_mutex);
yading@10:             if(ret<0)
yading@10:                 return ret;
yading@10:             new->pts = frame->pts;
yading@10:             new->quality = frame->quality;
yading@10:             new->pict_type = frame->pict_type;
yading@10:             av_image_copy(new->data, new->linesize, (const uint8_t **)frame->data, frame->linesize,
yading@10:                           avctx->pix_fmt, avctx->width, avctx->height);
yading@10:             frame = new;
yading@10:         }
yading@10: 
yading@10:         task.index = c->task_index;
yading@10:         task.indata = (void*)frame;
yading@10:         pthread_mutex_lock(&c->task_fifo_mutex);
yading@10:         av_fifo_generic_write(c->task_fifo, &task, sizeof(task), NULL);
yading@10:         pthread_cond_signal(&c->task_fifo_cond);
yading@10:         pthread_mutex_unlock(&c->task_fifo_mutex);
yading@10: 
yading@10:         c->task_index = (c->task_index+1) % BUFFER_SIZE;
yading@10: 
yading@10:         if(!c->finished_tasks[c->finished_task_index].outdata && (c->task_index - c->finished_task_index) % BUFFER_SIZE <= avctx->thread_count)
yading@10:             return 0;
yading@10:     }
yading@10: 
yading@10:     if(c->task_index == c->finished_task_index)
yading@10:         return 0;
yading@10: 
yading@10:     pthread_mutex_lock(&c->finished_task_mutex);
yading@10:     while (!c->finished_tasks[c->finished_task_index].outdata) {
yading@10:         pthread_cond_wait(&c->finished_task_cond, &c->finished_task_mutex);
yading@10:     }
yading@10:     task = c->finished_tasks[c->finished_task_index];
yading@10:     *pkt = *(AVPacket*)(task.outdata);
yading@10:     if(pkt->data)
yading@10:         *got_packet_ptr = 1;
yading@10:     av_freep(&c->finished_tasks[c->finished_task_index].outdata);
yading@10:     c->finished_task_index = (c->finished_task_index+1) % BUFFER_SIZE;
yading@10:     pthread_mutex_unlock(&c->finished_task_mutex);
yading@10: 
yading@10:     return task.return_code;
yading@10: }