source: mediastreamer2/linphone/mediastreamer2/src/msfilter.c @ 0:5a6e836a86a3

/*
mediastreamer2 library - modular sound and video processing and streaming
Copyright (C) 2006  Simon MORLAT (simon.morlat@linphone.org)

This program is free software; you can redistribute it and/or
modify it under the terms of the GNU General Public License
as published by the Free Software Foundation; either version 2
of the License, or (at your option) any later version.

This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
GNU General Public License for more details.

You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
*/

#include "mediastreamer2/msfilter.h"
#include "mediastreamer2/mscommon.h"

static MSList *desc_list=NULL;

void ms_filter_register(MSFilterDesc *desc){
        if (desc->id==MS_FILTER_NOT_SET_ID){
                ms_fatal("MSFilterId for %s not set !",desc->name);
        }
        /*lastly registered encoder/decoders may replace older ones*/
        desc_list=ms_list_prepend(desc_list,desc);
}

void ms_filter_unregister_all(){
        if (desc_list!=NULL) ms_list_free(desc_list);
}

bool_t ms_filter_codec_supported(const char *mime){
        if (ms_filter_get_encoder(mime)!=NULL
                && ms_filter_get_decoder(mime)!=NULL) return TRUE;
        return FALSE;
}

MSFilterDesc * ms_filter_get_encoder(const char *mime){
        MSList *elem;
        for (elem=desc_list;elem!=NULL;elem=ms_list_next(elem)){
                MSFilterDesc *desc=(MSFilterDesc*)elem->data;
                if (desc->category==MS_FILTER_ENCODER && 
                        strcasecmp(desc->enc_fmt,mime)==0){
                        return desc;
                }
        }
        return NULL;
}

MSFilterDesc * ms_filter_get_decoder(const char *mime){
        MSList *elem;
        for (elem=desc_list;elem!=NULL;elem=ms_list_next(elem)){
                MSFilterDesc *desc=(MSFilterDesc*)elem->data;
                if (desc->category==MS_FILTER_DECODER && 
                        strcasecmp(desc->enc_fmt,mime)==0){
                        return desc;
                }
        }
        return NULL;
}

MSFilter * ms_filter_create_encoder(const char *mime){
        MSFilterDesc *desc=ms_filter_get_encoder(mime);
        if (desc!=NULL) return ms_filter_new_from_desc(desc);
        return NULL;
}

MSFilter * ms_filter_create_decoder(const char *mime){
        MSFilterDesc *desc=ms_filter_get_decoder(mime);
        if (desc!=NULL) return ms_filter_new_from_desc(desc);
        return NULL;
}

MSFilter *ms_filter_new_from_desc(MSFilterDesc *desc){
        MSFilter *obj;
        obj=(MSFilter *)ms_new0(MSFilter,1);
        ms_mutex_init(&obj->lock,NULL);
        obj->desc=desc;
        if (desc->ninputs>0)    obj->inputs=(MSQueue**)ms_new0(MSQueue*,desc->ninputs);
        if (desc->noutputs>0)   obj->outputs=(MSQueue**)ms_new0(MSQueue*,desc->noutputs);
        if (desc->ninputs==0 && desc->noutputs==0)
                ms_fatal("A filter cannot have no inputs and outputs");
        if (obj->desc->init!=NULL)
                obj->desc->init(obj);
        return obj;
}

MSFilter *ms_filter_new(MSFilterId id){
        MSList *elem;
        if (id==MS_FILTER_PLUGIN_ID){
                ms_warning("cannot create plugin filters with ms_filter_new_from_id()");
                return NULL;
        }
        for (elem=desc_list;elem!=NULL;elem=ms_list_next(elem)){
                MSFilterDesc *desc=(MSFilterDesc*)elem->data;
                if (desc->id==id){
                        return ms_filter_new_from_desc(desc);
                }
        }
        ms_error("No such filter with id %i",id);
        return NULL;
}

MSFilter *ms_filter_new_from_name(const char *filter_name){
        MSList *elem;
        for (elem=desc_list;elem!=NULL;elem=ms_list_next(elem)){
                MSFilterDesc *desc=(MSFilterDesc*)elem->data;
                if (strcmp(desc->name,filter_name)==0){
                        return ms_filter_new_from_desc(desc);
                }
        }
        ms_error("No such filter with name %s",filter_name);
        return NULL;
}


MSFilterId ms_filter_get_id(MSFilter *f){
        return f->desc->id;
}

int ms_filter_link(MSFilter *f1, int pin1, MSFilter *f2, int pin2){
        MSQueue *q;
        ms_return_val_if_fail(pin1<f1->desc->noutputs, -1);
        ms_return_val_if_fail(pin2<f2->desc->ninputs, -1);
        ms_return_val_if_fail(f1->outputs[pin1]==NULL,-1);
        ms_return_val_if_fail(f2->inputs[pin2]==NULL,-1);
        q=ms_queue_new(f1,pin1,f2,pin2);
        f1->outputs[pin1]=q;
        f2->inputs[pin2]=q;
        ms_message("ms_filter_link: %s:%p,%i-->%s:%p,%i",f1->desc->name,f1,pin1,f2->desc->name,f2,pin2);
        return 0;
}

int ms_filter_unlink(MSFilter *f1, int pin1, MSFilter *f2, int pin2){
        MSQueue *q;
        ms_return_val_if_fail(f1, -1);
        ms_return_val_if_fail(f2, -1);
        ms_return_val_if_fail(pin1<f1->desc->noutputs, -1);
        ms_return_val_if_fail(pin2<f2->desc->ninputs, -1);
        ms_return_val_if_fail(f1->outputs[pin1]!=NULL,-1);
        ms_return_val_if_fail(f2->inputs[pin2]!=NULL,-1);
        ms_return_val_if_fail(f1->outputs[pin1]==f2->inputs[pin2],-1);
        q=f1->outputs[pin1];
        f1->outputs[pin1]=f2->inputs[pin2]=0;
        ms_queue_destroy(q);
        ms_message("ms_filter_unlink: %s:%p,%i-->%s:%p,%i",f1->desc->name,f1,pin1,f2->desc->name,f2,pin2);
        return 0;
}

#define MS_FILTER_METHOD_GET_FID(id)    (((id)>>16) & 0xFFFF)

int ms_filter_call_method(MSFilter *f, unsigned int id, void *arg){
        MSFilterMethod *methods=f->desc->methods;
        int i;
        unsigned int magic=MS_FILTER_METHOD_GET_FID(id);
        if (magic!=MS_FILTER_BASE_ID && magic!=f->desc->id) {
                ms_fatal("Bad method definition in filter %s",f->desc->name);
                return -1;
        }
        for(i=0;methods!=NULL && methods[i].method!=NULL; i++){
                unsigned int mm=MS_FILTER_METHOD_GET_FID(methods[i].id);
                if (mm!=f->desc->id && mm!=MS_FILTER_BASE_ID) {
                        ms_fatal("MSFilter method mismatch: bad call.");
                        return -1;
                }
                if (methods[i].id==id){
                        return methods[i].method(f,arg);
                }
        }
        if (magic!=MS_FILTER_BASE_ID) ms_error("no such method on filter %s",f->desc->name);
        return -1;
}

int ms_filter_call_method_noarg(MSFilter *f, unsigned int id){
        return ms_filter_call_method(f,id,NULL);
}

void ms_filter_set_notify_callback(MSFilter *f, MSFilterNotifyFunc fn, void *ud){
        f->notify=fn;
        f->notify_ud=ud;
}

void ms_filter_destroy(MSFilter *f){
        if (f->desc->uninit!=NULL)
                f->desc->uninit(f);
        if (f->inputs!=NULL)    ms_free(f->inputs);
        if (f->outputs!=NULL)   ms_free(f->outputs);
        ms_mutex_destroy(&f->lock);
        ms_free(f);
}


void ms_filter_process(MSFilter *f){
        ms_debug("Executing process of filter %s:%p",f->desc->name,f);
        f->desc->process(f);
}

void ms_filter_preprocess(MSFilter *f, struct _MSTicker *t){
        f->seen=FALSE;
        f->last_tick=0;
        f->ticker=t;
        if (f->desc->preprocess!=NULL)
                f->desc->preprocess(f);
}

void ms_filter_postprocess(MSFilter *f){
        if (f->desc->postprocess!=NULL)
                f->desc->postprocess(f);
        f->seen=FALSE;
        f->ticker=NULL;
}

bool_t ms_filter_inputs_have_data(MSFilter *f){
        int i;
        for(i=0;i<f->desc->ninputs;i++){
                MSQueue *q=f->inputs[i];
                if (q!=NULL && q->q.q_mcount>0) return TRUE;
        }
        return FALSE;
}

void ms_filter_notify(MSFilter *f, unsigned int id, void *arg){
        if (f->notify!=NULL)
                f->notify(f->notify_ud,id,arg);
}

void ms_filter_notify_no_arg(MSFilter *f, unsigned int id){
        if (f->notify!=NULL)
                f->notify(f->notify_ud,id,NULL);
}