RetroArch/input/input_mapper.c

/*  RetroArch - A frontend for libretro.
 *  Copyright (C) 2010-2014 - Hans-Kristian Arntzen
 *  Copyright (C) 2011-2017 - Daniel De Matteis
 *  Copyright (C) 2016-2017 - Andrés Suárez
 *
 *  RetroArch 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 Found-
 *  ation, either version 3 of the License, or (at your option) any later version.
 *
 *  RetroArch 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 RetroArch.
 *  If not, see <http://www.gnu.org/licenses/>.
 */


#include <stdio.h>
#include <stdlib.h>
#include <string.h>

#ifdef _WIN32
#include <direct.h>
#else
#include <unistd.h>
#endif

#include <compat/strl.h>
#include <compat/posix_string.h>
#include <retro_miscellaneous.h>
#include <libretro.h>

#ifdef HAVE_MENU
#include "../menu/menu_driver.h"
#endif

#ifdef HAVE_CONFIG_H
#include "../config.h"
#endif

#include "input_mapper.h"

#include "../configuration.h"
#include "../msg_hash.h"
#include "../verbosity.h"

#define MAPPER_GET_KEY(state, key) (((state)->keys[(key) / 32] >> ((key) % 32)) & 1)
#define MAPPER_SET_KEY(state, key) (state)->keys[(key) / 32] |= 1 << ((key) % 32)

struct input_mapper
{
   /* The controller port that will be polled*/
   uint8_t port;
   /* Left X, Left Y, Right X, Right Y */
   int16_t analog[4];
   /* the whole keyboard state */
   uint32_t keys[RETROK_LAST / 32 + 1];
   /* This is a bitmask of (1 << key_bind_id). */
   retro_bits_t buttons;
};

input_mapper_t *input_mapper_new(uint16_t port)
{
   input_mapper_t* handle = (input_mapper_t*)
      calloc(1, sizeof(*handle));

   if (!handle)
      return NULL;

   handle->port = port;

   return handle;
}

void input_mapper_free(input_mapper_t *handle)
{
   if (!handle)
      return;
   free (handle);
}

bool flag = false;

bool input_mapper_button_pressed(input_mapper_t *handle, int id)
{
   return BIT256_GET(handle->buttons, id);
}

void input_mapper_poll(input_mapper_t *handle)
{
   int i, j;
   settings_t *settings = config_get_ptr();
   retro_bits_t current_input;
   unsigned device      = settings->uints.input_libretro_device[handle->port];
   unsigned current_button_value;
   unsigned remap_button;
   bool key_event[RARCH_CUSTOM_BIND_LIST_END];
#ifdef HAVE_MENU
   bool menu_is_alive   = menu_driver_is_alive();
#endif

   device              &= RETRO_DEVICE_MASK;

#ifdef HAVE_MENU
   if (menu_is_alive)
      return;
#endif

   memset(handle->keys, 0, sizeof(handle->keys));
   i = 0;
   if (device == RETRO_DEVICE_KEYBOARD)
   {
      for (i = 0; i < MAX_USERS; i++)
      {
         for (j = 0; j < RARCH_CUSTOM_BIND_LIST_END; j++)
         {
            if (j < RETROK_LAST)
            {
               if (input_state(i, RETRO_DEVICE_JOYPAD, 0, j) && 
                  settings->uints.input_keymapper_ids[i][j] != RETROK_UNKNOWN)
               {
                  MAPPER_SET_KEY (handle,
                     settings->uints.input_keymapper_ids[i][j]);
                  input_keyboard_event(true,
                        settings->uints.input_keymapper_ids[i][j],
                        0, 0, RETRO_DEVICE_KEYBOARD);
                  key_event[j] = true;
               }
               else
               {
                  if (key_event[j] == false && 
                     settings->uints.input_keymapper_ids[i][j] != RETROK_UNKNOWN)
                  {
                     input_keyboard_event(false,
                           settings->uints.input_keymapper_ids[i][j],
                           0, 0, RETRO_DEVICE_KEYBOARD);
                  }
               }
            }
         }
      }
   }
   if (device == RETRO_DEVICE_JOYPAD)
   {
      input_keys_pressed(settings, &current_input);
      BIT256_CLEAR_ALL(handle->buttons);
      for (i = 0; i < MAX_USERS; i++)
      {
         /* this loop iterates on all users and all buttons, and checks if a pressed button
            is assigned to any other button than the default one, then it sets the bit on the
            mapper input bitmap, later on the original input is cleared in input_state */

         for (j = 0; j < RARCH_FIRST_CUSTOM_BIND; j++)
         {
            current_button_value = BIT256_GET(current_input, j);
            remap_button = settings->uints.input_remap_ids[i][j];
            if (current_button_value == 1 && j != remap_button &&
                remap_button != RARCH_UNMAPPED)
               BIT256_SET(handle->buttons, remap_button);
         }
#if 0
         /* --CURRENTLY NOT IMPLEMENTED--
            this loop should iterate on all users and all analog stick axes and if the axes are
            moved and is assigned to a button it should set the bit on the mapper input bitmap.
            Once implemented we should make sure to clear the original analog 
            stick input in input_state in input_driver.c */

         for (j = RARCH_FIRST_CUSTOM_BIND; j < RARCH_CUSTOM_BIND_LIST_END; j++)
         {

         }
#endif
      }
   }
   if (device == RETRO_DEVICE_ANALOG)
   {
      input_keys_pressed(settings, &current_input);
      BIT256_CLEAR_ALL(handle->buttons);
      for (i = 0; i < MAX_USERS; i++)
      {
         /* this loop iterates on all users and all buttons, and checks if a pressed button
            is assigned to any other button than the default one, then it sets the bit on the
            mapper input bitmap, later on the original input is cleared in input_state */

         for (j = 0; j < RARCH_FIRST_CUSTOM_BIND; j++)
         {
            current_button_value = BIT256_GET(current_input, j);
            remap_button = settings->uints.input_remap_ids[i][j];
            if (current_button_value == 1 && j != remap_button &&
                remap_button != RARCH_UNMAPPED)
               BIT256_SET(handle->buttons, remap_button);
         }
#if 0
         /* --CURRENTLY NOT IMPLEMENTED--
            this loop should iterate on all users and all analog stick axes and if the axes are
            moved and is assigned to a button or another stick, it should set the bit on the
            mapper input bitmap. Once implemented we should make sure to clear the original analog 
            stick input in input_state in input_driver.c */

         for (j = RARCH_FIRST_CUSTOM_BIND; j < RARCH_CUSTOM_BIND_LIST_END; j++)
         {

         }
#endif
      }
   }
}

void input_mapper_state(
      input_mapper_t *handle,
      int16_t *ret,
      unsigned port,
      unsigned device,
      unsigned idx,
      unsigned id)
{
   if (!handle)
      return;

   switch (device)
   {
      case RETRO_DEVICE_JOYPAD:
         if (input_mapper_button_pressed(handle, id))
            *ret = 1;
         break;
      case RETRO_DEVICE_KEYBOARD:
         if (id < RETROK_LAST)
         {
            if (MAPPER_GET_KEY(handle, id))
               *ret |= 1;
         }
         break;
      default:
         break;
   }
   return;
}