InputEvents.cc

Go to the documentation of this file.

#include "InputEvents.hh"
#include "Keys.hh"
#include "TclObject.hh"
#include "Timer.hh"
#include "checked_cast.hh"
#include "strCat.hh"
#include "stl.hh"
#include <string>
#include <tuple>
#include <SDL.h>

using std::make_tuple;
using std::string;

namespace openmsx {

// class TimedEvent

TimedEvent::TimedEvent(EventType type_)
        : Event(type_)
        , realtime(Timer::getTime()) // TODO use SDL2 event timestamp
{
}


// class KeyEvent

KeyEvent::KeyEvent(EventType type_, Keys::KeyCode keyCode_, uint32_t unicode_)
        : TimedEvent(type_), keyCode(keyCode_), unicode(unicode_)
{
}

TclObject KeyEvent::toTclList() const
{
        auto result = makeTclList("keyb", Keys::getName(getKeyCode()));
        if (getUnicode() != 0) {
                result.addListElement(strCat("unicode", getUnicode()));
        }
        return result;
}

bool KeyEvent::lessImpl(const Event& other) const
{
        // note: don't compare unicode
        auto& o = checked_cast<const KeyEvent&>(other);
        return getKeyCode() < o.getKeyCode();
}


// class KeyUpEvent

KeyUpEvent::KeyUpEvent(Keys::KeyCode keyCode_)
        : KeyEvent(OPENMSX_KEY_UP_EVENT, keyCode_, 0)
{
}


// class KeyDownEvent

KeyDownEvent::KeyDownEvent(Keys::KeyCode keyCode_, uint32_t unicode_)
        : KeyEvent(OPENMSX_KEY_DOWN_EVENT, keyCode_, unicode_)
{
}


// class MouseButtonEvent

MouseButtonEvent::MouseButtonEvent(EventType type_, unsigned button_)
        : TimedEvent(type_), button(button_)
{
}

TclObject MouseButtonEvent::toTclHelper(string_view direction) const
{
        return makeTclList("mouse", strCat("button", getButton()), direction);
}

bool MouseButtonEvent::lessImpl(const Event& other) const
{
        auto& o = checked_cast<const MouseButtonEvent&>(other);
        return getButton() < o.getButton();
}


// class MouseButtonUpEvent

MouseButtonUpEvent::MouseButtonUpEvent(unsigned button_)
        : MouseButtonEvent(OPENMSX_MOUSE_BUTTON_UP_EVENT, button_)
{
}

TclObject MouseButtonUpEvent::toTclList() const
{
        return toTclHelper("up");
}


// class MouseButtonDownEvent

MouseButtonDownEvent::MouseButtonDownEvent(unsigned button_)
        : MouseButtonEvent(OPENMSX_MOUSE_BUTTON_DOWN_EVENT, button_)
{
}

TclObject MouseButtonDownEvent::toTclList() const
{
        return toTclHelper("down");
}


// class MouseWheelEvent

MouseWheelEvent::MouseWheelEvent(int x_, int y_)
        : TimedEvent(OPENMSX_MOUSE_WHEEL_EVENT)
        , x(x_), y(y_)
{
}

TclObject MouseWheelEvent::toTclList() const
{
        return makeTclList("mouse", "wheel", getX(), getY());
}

bool MouseWheelEvent::lessImpl(const Event& other) const
{
        auto& o = checked_cast<const MouseWheelEvent&>(other);
        return make_tuple(  getX(),   getY()) <
               make_tuple(o.getX(), o.getY());
}


// class MouseMotionEvent

MouseMotionEvent::MouseMotionEvent(int xrel_, int yrel_, int xabs_, int yabs_)
        : TimedEvent(OPENMSX_MOUSE_MOTION_EVENT)
        , xrel(xrel_), yrel(yrel_)
        , xabs(xabs_), yabs(yabs_)
{
}

TclObject MouseMotionEvent::toTclList() const
{
        return makeTclList("mouse", "motion", getX(), getY(), getAbsX(), getAbsY());
}

bool MouseMotionEvent::lessImpl(const Event& other) const
{
        auto& o = checked_cast<const MouseMotionEvent&>(other);
        return make_tuple(  getX(),   getY(),   getAbsX(),   getAbsY()) <
               make_tuple(o.getX(), o.getY(), o.getAbsX(), o.getAbsY());
}


// class JoystickEvent

JoystickEvent::JoystickEvent(EventType type_, unsigned joystick_)
        : TimedEvent(type_), joystick(joystick_)
{
}

TclObject JoystickEvent::toTclHelper() const
{
        return makeTclList(strCat("joy", getJoystick() + 1));
}

bool JoystickEvent::lessImpl(const Event& other) const
{
        auto& o = checked_cast<const JoystickEvent&>(other);
        return (getJoystick() != o.getJoystick())
             ? (getJoystick() <  o.getJoystick())
             : lessImpl(o);
}


// class JoystickButtonEvent

JoystickButtonEvent::JoystickButtonEvent(
                EventType type_, unsigned joystick_, unsigned button_)
        : JoystickEvent(type_, joystick_), button(button_)
{
}

TclObject JoystickButtonEvent::toTclHelper(string_view direction) const
{
        auto result = JoystickEvent::toTclHelper();
        result.addListElement(strCat("button", getButton()), direction);
        return result;
}

bool JoystickButtonEvent::lessImpl(const JoystickEvent& other) const
{
        auto& o = checked_cast<const JoystickButtonEvent&>(other);
        return getButton() < o.getButton();
}


// class JoystickButtonUpEvent

JoystickButtonUpEvent::JoystickButtonUpEvent(unsigned joystick_, unsigned button_)
        : JoystickButtonEvent(OPENMSX_JOY_BUTTON_UP_EVENT, joystick_, button_)
{
}

TclObject JoystickButtonUpEvent::toTclList() const
{
        return toTclHelper("up");
}


// class JoystickButtonDownEvent

JoystickButtonDownEvent::JoystickButtonDownEvent(unsigned joystick_, unsigned button_)
        : JoystickButtonEvent(OPENMSX_JOY_BUTTON_DOWN_EVENT, joystick_, button_)
{
}

TclObject JoystickButtonDownEvent::toTclList() const
{
        return toTclHelper("down");
}


// class JoystickAxisMotionEvent

JoystickAxisMotionEvent::JoystickAxisMotionEvent(
                unsigned joystick_, unsigned axis_, int value_)
        : JoystickEvent(OPENMSX_JOY_AXIS_MOTION_EVENT, joystick_)
        , axis(axis_), value(value_)
{
}

TclObject JoystickAxisMotionEvent::toTclList() const
{
        auto result = JoystickEvent::toTclHelper();
        result.addListElement(strCat("axis", getAxis()), getValue());
        return result;
}

bool JoystickAxisMotionEvent::lessImpl(const JoystickEvent& other) const
{
        auto& o = checked_cast<const JoystickAxisMotionEvent&>(other);
        return make_tuple(  getAxis(),   getValue()) <
               make_tuple(o.getAxis(), o.getValue());
}


// class JoystickHatEvent

JoystickHatEvent::JoystickHatEvent(unsigned joystick_, unsigned hat_, unsigned value_)
        : JoystickEvent(OPENMSX_JOY_HAT_EVENT, joystick_)
        , hat(hat_), value(value_)
{
}

TclObject JoystickHatEvent::toTclList() const
{
        auto result = JoystickEvent::toTclHelper();
        const char* str;
        switch (getValue()) {
                case SDL_HAT_UP:        str = "up";        break;
                case SDL_HAT_RIGHT:     str = "right";     break;
                case SDL_HAT_DOWN:      str = "down";      break;
                case SDL_HAT_LEFT:      str = "left";      break;
                case SDL_HAT_RIGHTUP:   str = "rightup";   break;
                case SDL_HAT_RIGHTDOWN: str = "rightdown"; break;
                case SDL_HAT_LEFTUP:    str = "leftup";    break;
                case SDL_HAT_LEFTDOWN:  str = "leftdown";  break;
                default:                str = "center";    break;
        }
        result.addListElement(strCat("hat", getHat()), str);
        return result;
}

bool JoystickHatEvent::lessImpl(const JoystickEvent& other) const
{
        auto& o = checked_cast<const JoystickHatEvent&>(other);
        return make_tuple(  getHat(),   getValue()) <
               make_tuple(o.getHat(), o.getValue());
}


// class FocusEvent

FocusEvent::FocusEvent(bool gain_)
        : Event(OPENMSX_FOCUS_EVENT), gain(gain_)
{
}

TclObject FocusEvent::toTclList() const
{
        return makeTclList("focus", getGain());
}

bool FocusEvent::lessImpl(const Event& other) const
{
        auto& o = checked_cast<const FocusEvent&>(other);
        return getGain() < o.getGain();
}


// class ResizeEvent

ResizeEvent::ResizeEvent(unsigned x_, unsigned y_)
        : Event(OPENMSX_RESIZE_EVENT), x(x_), y(y_)
{
}

TclObject ResizeEvent::toTclList() const
{
        return makeTclList("resize", int(getX()), int(getY()));
}

bool ResizeEvent::lessImpl(const Event& other) const
{
        auto& o = checked_cast<const ResizeEvent&>(other);
        return make_tuple(  getX(),   getY()) <
               make_tuple(o.getX(), o.getY());
}


// class QuitEvent

QuitEvent::QuitEvent() : Event(OPENMSX_QUIT_EVENT)
{
}

TclObject QuitEvent::toTclList() const
{
        return makeTclList("quit");
}

bool QuitEvent::lessImpl(const Event& /*other*/) const
{
        return false;
}

// class OsdControlEvent

OsdControlEvent::OsdControlEvent(
                EventType type_, unsigned button_,
                std::shared_ptr<const Event> origEvent_)
        : TimedEvent(type_), origEvent(std::move(origEvent_)), button(button_)
{
}

bool OsdControlEvent::isRepeatStopper(const Event& other) const
{
        // If this OsdControlEvent was geneated by the other event, then
        // repeat should not be stopped.
        if (origEvent.get() == &other) return false;

        // If this OsdControlEvent event was generated by a joystick motion
        // event and the new event is also a joystick motion event then don't
        // stop repeat. We don't need to check the actual values of the events
        // (it also isn't trivial), because when the values differ by enough,
        // a new OsdControlEvent will be generated and that one will stop
        // repeat.
        return !dynamic_cast<const JoystickAxisMotionEvent*>(origEvent.get()) ||
               !dynamic_cast<const JoystickAxisMotionEvent*>(&other);
}

TclObject OsdControlEvent::toTclHelper(string_view direction) const
{
        static const char* const names[] = {
                "LEFT", "RIGHT", "UP", "DOWN", "A", "B"
        };
        return makeTclList("OSDcontrol", names[getButton()], direction);
}

bool OsdControlEvent::lessImpl(const Event& other) const
{
        auto& o = checked_cast<const OsdControlEvent&>(other);
        return getButton() < o.getButton();
}


// class OsdControlReleaseEvent

OsdControlReleaseEvent::OsdControlReleaseEvent(
                unsigned button_, const std::shared_ptr<const Event>& origEvent_)
        : OsdControlEvent(OPENMSX_OSD_CONTROL_RELEASE_EVENT, button_, origEvent_)
{
}

TclObject OsdControlReleaseEvent::toTclList() const
{
        return toTclHelper("RELEASE");
}


// class OsdControlPressEvent

OsdControlPressEvent::OsdControlPressEvent(
                unsigned button_, const std::shared_ptr<const Event>& origEvent_)
        : OsdControlEvent(OPENMSX_OSD_CONTROL_PRESS_EVENT, button_, origEvent_)
{
}

TclObject OsdControlPressEvent::toTclList() const
{
        return toTclHelper("PRESS");
}


// class GroupEvent

GroupEvent::GroupEvent(EventType type_, std::vector<EventType> typesToMatch_, const TclObject& tclListComponents_)
        : Event(type_)
        , typesToMatch(std::move(typesToMatch_))
        , tclListComponents(tclListComponents_)
{
}

TclObject GroupEvent::toTclList() const
{
        return tclListComponents;
}

bool GroupEvent::lessImpl(const Event& /*other*/) const
{
        // All Group events are equivalent
        return false;
}

bool GroupEvent::matches(const Event& other) const
{
        return contains(typesToMatch, other.getType());
}


} // namespace openmsx