Statistics
| Branch: | Tag: | Revision:

humotion / src / server / gaze_motion_generator.cpp @ caf7373f

History | View | Annotate | Download (6.514 KB)

1
/*
2
* This file is part of humotion
3
*
4
* Copyright(c) sschulz <AT> techfak.uni-bielefeld.de
5
* http://opensource.cit-ec.de/projects/humotion
6
*
7
* This file may be licensed under the terms of the
8
* GNU Lesser General Public License Version 3 (the ``LGPL''),
9
* or (at your option) any later version.
10
*
11
* Software distributed under the License is distributed
12
* on an ``AS IS'' basis, WITHOUT WARRANTY OF ANY KIND, either
13
* express or implied. See the LGPL for the specific language
14
* governing rights and limitations.
15
*
16
* You should have received a copy of the LGPL along with this
17
* program. If not, go to http://www.gnu.org/licenses/lgpl.html
18
* or write to the Free Software Foundation, Inc.,
19
* 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
20
*
21
* The development of this software was supported by the
22
* Excellence Cluster EXC 277 Cognitive Interaction Technology.
23
* The Excellence Cluster EXC 277 is a grant of the Deutsche
24
* Forschungsgemeinschaft (DFG) in the context of the German
25
* Excellence Initiative.
26
*/
27

    
28
#include "server/gaze_motion_generator.h"
29
#include "server/server.h"
30

    
31
using namespace std;
32
using namespace humotion;
33
using namespace humotion::server;
34

    
35
//saccade detection threshold in deg/s
36
///const float GazeMotionGenerator::SACCADE_SPEED_THRESHOLD = 15.0;
37
//some constants to decide if the requested move will trigger a neck or eye saccade
38
const float GazeMotionGenerator::NECK_SACCADE_THRESHOLD      = 15.0; //deg
39
const float GazeMotionGenerator::EYE_SACCADE_SPEED_THRESHOLD = 15.0; //deg/s
40
//close to ocolumotor-range?
41
const float GazeMotionGenerator::OMR_LIMIT_TRIGGERS_NECK_SACCADE = 0.95; //0.95 = reaching 95% of OMR will trigger a correction
42

    
43

    
44
//! constructor
45
GazeMotionGenerator::GazeMotionGenerator(JointInterface *j, int dof, float t)
46
    : ReflexxesMotionGenerator(j, dof, t){
47
}
48

    
49
//! destructor
50
GazeMotionGenerator::~GazeMotionGenerator(){
51
}
52

    
53
//! update gaze target:
54
//! \param GazeState with target values for the overall gaze
55
void GazeMotionGenerator::set_gaze_target(GazeState new_gaze_target){
56
    if (requested_gaze_state.gaze_type == GazeState::GAZETYPE_RELATIVE){
57
        printf("> ERROR: gaze targets should be converted to absolute before calling this\n");
58
        exit(EXIT_FAILURE);
59
    }
60

    
61
    //check magnitude of gaze change to detect eye-neck saccades:
62
    float dist = fabs(requested_gaze_state.distance_pt_abs(new_gaze_target));
63

    
64
    //check requested speed
65
    float speed = fabs(requested_gaze_state.distance_pt_abs(new_gaze_target)) / (new_gaze_target.timestamp.to_seconds()-requested_gaze_state.timestamp.to_seconds());
66

    
67
    //check magnitude and speed of gaze change to detect eye-neck saccades:
68
    if (dist > NECK_SACCADE_THRESHOLD){
69
        //the next saccade has to use neck motion as well
70
        if (speed > EYE_SACCADE_SPEED_THRESHOLD){
71
            neck_saccade_requested = true;
72
        }
73
    }else{
74
        neck_saccade_requested = false;
75
    }
76

    
77
    //check for eye getting close to ocolomotor range
78
    //float eye_pos_l = joint_interface->get_ts_position(JointInterface::ID_EYES_LEFT_LR).get_newest_value();
79
    //float eye_pos_r = joint_interface->get_ts_position(JointInterface::ID_EYES_RIGHT_LR).get_newest_value();
80
    //float eye_pos_ud = joint_interface->get_ts_position(JointInterface::ID_EYES_BOTH_UD).get_newest_value();
81
    //actually it makes more sense to trigger the neck saccade based on the target getting out of the OMR
82
    float eye_target_l  = joint_interface->get_target_position(JointInterface::ID_EYES_LEFT_LR);
83
    float eye_target_r  = joint_interface->get_target_position(JointInterface::ID_EYES_RIGHT_LR);
84
    float eye_target_ud = joint_interface->get_target_position(JointInterface::ID_EYES_BOTH_UD);
85

    
86
    //min/max bounds:
87
    float left_min  = OMR_LIMIT_TRIGGERS_NECK_SACCADE * joint_interface->get_joint_min(JointInterface::ID_EYES_LEFT_LR);
88
    float left_max  = OMR_LIMIT_TRIGGERS_NECK_SACCADE * joint_interface->get_joint_max(JointInterface::ID_EYES_LEFT_LR);
89
    float right_min = OMR_LIMIT_TRIGGERS_NECK_SACCADE * joint_interface->get_joint_min(JointInterface::ID_EYES_RIGHT_LR);
90
    float right_max = OMR_LIMIT_TRIGGERS_NECK_SACCADE * joint_interface->get_joint_max(JointInterface::ID_EYES_RIGHT_LR);
91
    float ud_min    = OMR_LIMIT_TRIGGERS_NECK_SACCADE * joint_interface->get_joint_min(JointInterface::ID_EYES_BOTH_UD);
92
    float ud_max    = OMR_LIMIT_TRIGGERS_NECK_SACCADE * joint_interface->get_joint_max(JointInterface::ID_EYES_BOTH_UD);
93

    
94
    if (
95
            (eye_target_l < left_min) || (eye_target_l > left_max) ||
96
            (eye_target_r < right_min) || (eye_target_r > right_max) ||
97
            (eye_target_ud < ud_min) || (eye_target_ud > ud_max)){
98
        //the eyeball gets close to OMR, activate a neck compensation motion:
99
        neck_saccade_omr = true;
100
    }else{
101
        neck_saccade_omr = false;
102
    }
103

    
104
    //use base class set method:
105
    MotionGenerator::set_gaze_target(new_gaze_target);
106
}
107

    
108
//! check if an eye saccade is active:
109
bool GazeMotionGenerator::get_eye_saccade_active(){
110
    bool saccade_active;
111

    
112
    float speed_left  = joint_interface->get_ts_speed(JointInterface::ID_EYES_LEFT_LR).get_newest_value();
113
    float speed_right = joint_interface->get_ts_speed(JointInterface::ID_EYES_RIGHT_LR).get_newest_value();
114
    float speed_tilt  = joint_interface->get_ts_speed(JointInterface::ID_EYES_BOTH_UD).get_newest_value();
115

    
116
    float speed_total_l = sqrt(speed_left*speed_left + speed_tilt*speed_tilt);
117
    float speed_total_r = sqrt(speed_right*speed_right + speed_tilt*speed_tilt);
118

    
119
    //thresholding
120
    if ((speed_total_l > EYE_SACCADE_SPEED_THRESHOLD) || (speed_total_r > EYE_SACCADE_SPEED_THRESHOLD)){
121
        //this is a saccade
122
        saccade_active = true;
123
    }else{
124
        saccade_active = false;
125
    }
126

    
127
    return saccade_active;
128
}
129

    
130
//! get overall gaze
131
GazeState GazeMotionGenerator::get_current_gaze(){
132
    //shortcut, makes the following easier to read
133
    JointInterface *j = joint_interface;
134

    
135
    GazeState gaze = requested_gaze_state;
136

    
137
    gaze.pan = j->get_ts_position(JointInterface::ID_NECK_PAN).get_newest_value() +
138
            (j->get_ts_position(JointInterface::ID_EYES_LEFT_LR).get_newest_value() + j->get_ts_position(JointInterface::ID_EYES_RIGHT_LR).get_newest_value())/2.0;
139
    gaze.tilt = j->get_ts_position(JointInterface::ID_NECK_TILT).get_newest_value() + j->get_ts_position(JointInterface::ID_EYES_BOTH_UD).get_newest_value();
140
    gaze.roll = j->get_ts_position(JointInterface::ID_NECK_ROLL).get_newest_value();
141

    
142
    gaze.vergence = j->get_ts_position(JointInterface::ID_EYES_LEFT_LR).get_newest_value() - j->get_ts_position(JointInterface::ID_EYES_RIGHT_LR).get_newest_value();
143

    
144
    return gaze;
145
}