hlrc

/*

* This file is part of hlrc_server

*

* Copyright(c) sschulz <AT> techfak.uni-bielefeld.de

* http://opensource.cit-ec.de/projects/hlrc_server

*

* This file may be licensed under the terms of the

* GNU General Public License Version 3 (the ``GPL''),

* or (at your option) any later version.

*

* Software distributed under the License is distributed

* on an ``AS IS'' basis, WITHOUT WARRANTY OF ANY KIND, either

* express or implied. See the GPL for the specific language

* governing rights and limitations.

*

* You should have received a copy of the GPL along with this

* program. If not, go to http://www.gnu.org/licenses/gpl.html

* or write to the Free Software Foundation, Inc.,

* 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.

*

* The development of this software was supported by the

* Excellence Cluster EXC 277 Cognitive Interaction Technology.

* The Excellence Cluster EXC 277 is a grant of the Deutsche

* Forschungsgemeinschaft (DFG) in the context of the German

* Excellence Initiative.

*

*/

#include "Arbiter.h"

#include "AudioPlayerLibAO.h"

#include "AudioPlayerRSB.h"

#include <boost/algorithm/string/predicate.hpp>

using namespace boost;

using namespace std;

Arbiter::Arbiter(std::string audio_output){

    //initialize audio player:

    if (iequals(audio_output, "none")){

        //allow none for no sound output

        audio_player = NULL;

    }else if (iequals(audio_output.substr(0,3), "rsb")){

        #ifdef RSB_SUPPORT

            audio_player = new AudioPlayerRSB(audio_output);

        #else

            printf("> ERROR: hlc is compiled without RSB support, RSB audio transport not available, defaulting to libao (default output!)\n");

            audio_player = new AudioPlayerLibAO("");

        #endif

    }else{

        audio_player = new AudioPlayerLibAO(audio_output);

    }

    //set default emotion:

    emotion_config_current.init_sad();

    emotion_config_current.set_duration(2000);

    emotion_config_default.init_neutral();

    gaze_state_animation_restart = true;

    emotion_target = &emotion_config_default;

    utterance = boost::shared_ptr<Utterance>(new Utterance());

}

Arbiter::~Arbiter(){

}

void Arbiter::set_default_emotion(EmotionState e){

    //lock access

    mutex::scoped_lock scoped_lock(emotion_config_default_mutex);

    //update our config, ignore duration as this is the default emotion

    emotion_config_default.select_config(e.value);

    emotion_target = &emotion_config_default;

    gaze_state_animation_restart = true;

    printf("> stored default emotion\n");

}

void Arbiter::set_current_emotion(EmotionState e){

    //lock access

    mutex::scoped_lock scoped_lock(emotion_config_current_mutex);

    //this will set a emotion override for a given time, after the timeout

    //we will return to the default emotion state:

    emotion_config_current.select_config(e.value);

    emotion_config_current.set_duration(e.duration);

    emotion_target = &emotion_config_current;

    gaze_state_animation_restart = true;

    printf("> stored current emotion (val=%d, duration = %dms)\n",e.value, e.duration);

}

void Arbiter::set_mouth_config(MouthConfig m){

    //lock access

    mutex::scoped_lock scoped_lock(mouth_config_override_mutex);

    mouth_config = m;

}

void Arbiter::set_gaze_target(humotion::GazeState target){

    //lock access

    mutex::scoped_lock scoped_lock(requested_gaze_state_mutex);

    requested_gaze_state = target;

}

void Arbiter::set_mouth_target(humotion::MouthState target){

    //lock access

    mutex::scoped_lock scoped_lock(requested_mouth_state_mutex);

    requested_mouth_state = target;

}

//! note: this is blocking!

void Arbiter::play_animation(boost::shared_ptr<Animation> incoming_animation){

    //incoming animation, check if this would conflict with any pending animations:

    //lock access & iterate over vector:

    mutex::scoped_lock lock_av(active_animation_vector_mutex);

    active_animation_vector_t::iterator it;

    for(it = active_animation_vector.begin(); it<active_animation_vector.end(); it++){

        boost::shared_ptr<Animation> current_ani = *it;

        //check if the running animation collides with the incoming animation:

        if (current_ani->collides_with(incoming_animation.get())){

            //this would fail, we can not play this animation right now!

            throw runtime_error("incoming animation collides with unfinished active animation");

            return;

        }

    }

    //ok, fine. no other animations are active that would collide with the new request

    //thus it is safe to enqueue this item:

    active_animation_vector.push_back(incoming_animation);

    //unlock mutex

    lock_av.unlock();

    //start playback!

    incoming_animation->start();

    //block until ani was played back

    while(incoming_animation->is_active()){

        //printf("A"); fflush(stdout);

        usleep(1*1000); //1ms, save cpu cycles

    }

    //ok, it finished. we can safely remove it now:

    lock_av.lock();

    for(it = active_animation_vector.begin(); it<active_animation_vector.end();){

        boost::shared_ptr<Animation> current_ani = *it;

        if (*it == incoming_animation){

            //printf(">match -> remove incoming ani again\n");

            it = active_animation_vector.erase(it);

          }else{

            ++it;

          }

    }

}

void Arbiter::speak(boost::shared_ptr<Utterance> u){ //, ao_sample_format audio_format, char *audio_data, unsigned int audio_len){

    //lock audio playback as such:

    mutex::scoped_lock scoped_lock_audio(audio_player_mutex);

    //lock utterance & store data:

    mutex::scoped_lock scoped_lock(utterance_mutex);

    utterance = u;

    scoped_lock.unlock();

    //start audio playback, this function returns once we started playback

    if (audio_player == NULL){

        printf("> audio_player disabled, not speaking '%s'\n", u.get()->get_text().c_str());

    }else{

        audio_player->play(utterance->get_audio_data());

    }

    utterance->start_playback();

    //wait until audio playback was finished:

    if (audio_player != NULL){

        while(audio_player->is_playing()){

            //save some cpu cycles:

            usleep(1*1000); //1ms

        }

    }

    //in case the audio output fails, we end up here before the utterance is finished.

    //so check now if the utterance finished as well:

    while (utterance->is_playing()){

        //save some cpu cycles:

        usleep(1*1000); //1ms

    }

}

bool Arbiter::speak_active(){

    if (audio_player == NULL){

        return false;

    }else{

        return audio_player->is_playing();

    }

}

void Arbiter::arbitrate(){

    //handle arbitration, DO NOT RE-ORDER these calls!

    //try to process all incoming requests

    override_by_emotion();

    //overwrite with mouth targets from outside:

    override_by_mouth();

    //lip animation

    override_by_utterance();

    //animations

    override_by_animation();

    //gaze target is set by requested_gaze_target

    override_by_gaze();

}

void Arbiter::override_by_utterance(){

    //fetch MouthState by utterance:

    if (!utterance->is_playing()){

        //not playing -> return

        return;

    }

    //fetch symbol

    string symbol = utterance->currently_active_phoneme();

    if ((symbol.empty()) || (symbol == "")){

        return;

    }

    //fetch config

    mouth_config.init_by_symbol(symbol);

    //overwrite mouth with offsets from utterance player

    mouth_config.apply_on_mouth_state(&mouth_state);

}

void Arbiter::override_by_mouth(){

    //external mouth requests can overwrite the mouth targets!

    if ((requested_mouth_state.position_center + requested_mouth_state.position_left + requested_mouth_state.position_right) > 0.0){

        //values given -> override emotion data

        mouth_state = requested_mouth_state;

    }

    //requested_mouth_state.dump();

    //mouth_state.dump();

}

void Arbiter::override_by_gaze(){

    //copy from requested target:

    gaze_state.pan   = requested_gaze_state.pan;

    gaze_state.tilt  = requested_gaze_state.tilt;

    gaze_state.roll  = requested_gaze_state.roll;

    gaze_state.gaze_type = requested_gaze_state.gaze_type;

    gaze_state.timestamp = requested_gaze_state.timestamp;

    gaze_state.vergence  = requested_gaze_state.vergence;

    //add offset values from user:

    gaze_state.pan_offset  += requested_gaze_state.pan_offset;

    gaze_state.tilt_offset += requested_gaze_state.tilt_offset;

}

void Arbiter::override_by_emotion(){

    if (emotion_target == NULL) {

        return;

    }

    //lock access

    mutex::scoped_lock scoped_lock1(emotion_config_default_mutex);

    // did the current emotion time out?

    if (!emotion_target->is_active()){

        // revert to default:

        emotion_target = &emotion_config_default;

        // trigger soft fade

        gaze_state_animation_restart = true;

    }

    //emotions will set the mouth state here (will be overwritten by speak)

    mouth_state = emotion_target->mouth_override;

    //mouth_state = ...

    //emotions will add an offset to the gaze state:

    //pan,tilt,roll will be overwritten by override_by_gaze() we only keep the offset values from this!

    //FIXME: change to eyelid opening  upper/lower once humotion supports it

    //eyebrow angles come from this

    humotion::GazeState gaze_state_target = emotion_target->gaze_override;

    // apply a soft overblending to the new gaze target

    gaze_state = soft_overblend_gaze(gaze_state, gaze_state_target, emotion_target->overblend_time_ms);

    //gaze_state.dump();

    //IMPORTANT: clear request from emotion target:

    emotion_target->gaze_override.eyeblink_request_left = 0;

    emotion_target->gaze_override.eyeblink_request_right = 0;

}

humotion::GazeState Arbiter::soft_overblend_gaze(humotion::GazeState gaze_now,

                                                 humotion::GazeState gaze_target,

                                                 unsigned int overblend_time) {

    humotion::GazeState result = gaze_now;

    result.eyeblink_request_left = 0;

    result.eyeblink_request_right = 0;

    if (gaze_state_animation_restart) {

        // new incoming target, set up soft fade:

        gaze_state_old = gaze_state;

        gaze_state_end_time = get_system_time() + boost::posix_time::milliseconds(overblend_time);

        gaze_state_animation_restart = false;

    }

    // do smooth overblend, all targets should be reached at gaze_state_end_time

    boost::posix_time::time_duration tdiff = gaze_state_end_time - get_system_time();

    if (tdiff.is_negative()) {

        // animation is done, exit now

        return result;

    } else {

        // do smooth animation

        double diff_ms = tdiff.total_milliseconds();

        double tp = 1.0 - diff_ms / static_cast<double>(overblend_time);

        result.pan_offset = gaze_state_old.pan_offset + tp * (gaze_target.pan_offset - gaze_state_old.pan_offset);

        result.tilt_offset = gaze_state_old.tilt_offset + tp * (gaze_target.tilt_offset - gaze_state_old.tilt_offset);

        result.roll_offset = gaze_state_old.roll_offset + tp * (gaze_target.roll_offset - gaze_state_old.roll_offset);

        result.eyelid_opening_lower = gaze_state_old.eyelid_opening_lower + tp * (gaze_target.eyelid_opening_lower - gaze_state_old.eyelid_opening_lower);

        result.eyelid_opening_upper = gaze_state_old.eyelid_opening_upper + tp * (gaze_target.eyelid_opening_upper - gaze_state_old.eyelid_opening_upper);

        result.eyebrow_left = gaze_state_old.eyebrow_left + tp * (gaze_target.eyebrow_left - gaze_state_old.eyebrow_left);

        result.eyebrow_right = gaze_state_old.eyebrow_right + tp * (gaze_target.eyebrow_right - gaze_state_old.eyebrow_right);

    }

    return result;

}

void Arbiter::override_by_animation(){

    //lock access & iterate over vector:

    mutex::scoped_lock lock_av(active_animation_vector_mutex);

    active_animation_vector_t::iterator it;

    for(it = active_animation_vector.begin(); it<active_animation_vector.end(); it++){

        boost::shared_ptr<Animation> current_ani = *it;

        //gaze_state.dump();

        current_ani->apply_on_gazestate(&gaze_state);

        //gaze_state.dump();

    }

}

humotion::GazeState Arbiter::get_gaze_state(){

    //gaze_state.dump();

    return gaze_state;

}

humotion::MouthState Arbiter::get_mouth_state(){

    return mouth_state;

}