input: support analog read
[libpicofe.git] / gp2x / in_gp2x.c
1 #include <stdio.h>
2 #include <stdlib.h>
3 #include <string.h>
4 #include <sys/types.h>
5 #include <sys/stat.h>
6 #include <fcntl.h>
7 #include <unistd.h>
8
9 #include "../common/input.h"
10 #include "in_gp2x.h"
11 #include "plat_gp2x.h"
12
13 #define IN_PREFIX "gp2x:"
14 #define IN_GP2X_NBUTTONS 32
15
16 /* note: in_gp2x hadles combos (if 2 btns have the same bind,
17  * both must be pressed for action to happen) */
18 static int in_gp2x_combo_keys = 0;
19 static int in_gp2x_combo_acts = 0;
20 static int gpiodev = -1;        /* Wiz only */
21
22 static int (*in_gp2x_get_bits)(void);
23
24 enum  { BTN_UP = 0,      BTN_LEFT = 2,      BTN_DOWN = 4,  BTN_RIGHT = 6,
25         BTN_START = 8,   BTN_SELECT = 9,    BTN_L = 10,    BTN_R = 11,
26         BTN_A = 12,      BTN_B = 13,        BTN_X = 14,    BTN_Y = 15,
27         BTN_VOL_UP = 23, BTN_VOL_DOWN = 22, BTN_PUSH = 27 };
28
29 static const char * const in_gp2x_prefix = IN_PREFIX;
30 static const char *in_gp2x_keys[IN_GP2X_NBUTTONS] = {
31         [0 ... IN_GP2X_NBUTTONS-1] = NULL,
32         [BTN_UP]    = "Up",    [BTN_LEFT]   = "Left",   [BTN_DOWN] = "Down", [BTN_RIGHT] = "Right",
33         [BTN_START] = "Start", [BTN_SELECT] = "Select", [BTN_L]    = "L",    [BTN_R]     = "R",
34         [BTN_A]     = "A",     [BTN_B]      = "B",      [BTN_X]    = "X",    [BTN_Y]     = "Y",
35         [BTN_VOL_DOWN]= "VOL DOWN",                     [BTN_VOL_UP] = "VOL UP",
36         [BTN_PUSH] = "PUSH"
37 };
38
39
40 static int in_gp2x_get_mmsp2_bits(void)
41 {
42         extern volatile unsigned short *gp2x_memregs;
43         int value;
44         value = gp2x_memregs[0x1198>>1] & 0xff; // GPIO M
45         if (value == 0xFD) value = 0xFA;
46         if (value == 0xF7) value = 0xEB;
47         if (value == 0xDF) value = 0xAF;
48         if (value == 0x7F) value = 0xBE;
49         value |= gp2x_memregs[0x1184>>1] & 0xFF00; // GPIO C
50         value |= gp2x_memregs[0x1186>>1] << 16; // GPIO D
51         value = ~value & 0x08c0ff55;
52
53         return value;
54 }
55
56 static int in_gp2x_get_wiz_bits(void)
57 {
58         int r, value = 0;
59         r = read(gpiodev, &value, 4);
60         if (value & 0x02)
61                 value |= 0x05;
62         if (value & 0x08)
63                 value |= 0x14;
64         if (value & 0x20)
65                 value |= 0x50;
66         if (value & 0x80)
67                 value |= 0x41;
68
69         /* convert to GP2X style */
70         value &= 0x7ff55;
71         if (value & (1 << 16))
72                 value |= 1 << BTN_VOL_UP;
73         if (value & (1 << 17))
74                 value |= 1 << BTN_VOL_DOWN;
75         if (value & (1 << 18))
76                 value |= 1 << BTN_PUSH;
77         value &= ~0x70000;
78
79         return value;
80 }
81
82 #ifdef FAKE_IN_GP2X
83 volatile unsigned short *gp2x_memregs;
84 int gp2x_dev_id = -1;
85
86 static int in_gp2x_get_fake_bits(void)
87 {
88         extern int current_keys;
89         return current_keys;
90 }
91 #endif
92
93 static void in_gp2x_probe(void)
94 {
95         switch (gp2x_dev_id)
96         {
97         case GP2X_DEV_GP2X:
98                 in_gp2x_get_bits = in_gp2x_get_mmsp2_bits;
99                 break;
100         case GP2X_DEV_WIZ:
101                 gpiodev = open("/dev/GPIO", O_RDONLY);
102                 if (gpiodev < 0) {
103                         perror("in_gp2x: couldn't open /dev/GPIO");
104                         return;
105                 }
106                 in_gp2x_get_bits = in_gp2x_get_wiz_bits;
107                 break;
108         // we'll use evdev for Caanoo
109         default:
110 #ifdef FAKE_IN_GP2X
111                 in_gp2x_get_bits = in_gp2x_get_fake_bits;
112                 break;
113 #endif
114                 return;
115         }
116
117         in_register(IN_PREFIX "GP2X pad", IN_DRVID_GP2X, -1, (void *)1,
118                 IN_GP2X_NBUTTONS, in_gp2x_keys, 1);
119 }
120
121 static void in_gp2x_free(void *drv_data)
122 {
123         if (gpiodev >= 0) {
124                 close(gpiodev);
125                 gpiodev = -1;
126         }
127 }
128
129 static int in_gp2x_get_bind_count(void)
130 {
131         return IN_GP2X_NBUTTONS;
132 }
133
134 /* ORs result with pressed buttons */
135 int in_gp2x_update(void *drv_data, const int *binds, int *result)
136 {
137         int type_start = 0;
138         int i, t, keys;
139
140         keys = in_gp2x_get_bits();
141
142         if (keys & in_gp2x_combo_keys) {
143                 result[IN_BINDTYPE_EMU] = in_combos_do(keys, binds, BTN_PUSH,
144                                                 in_gp2x_combo_keys, in_gp2x_combo_acts);
145                 type_start = IN_BINDTYPE_PLAYER12;
146         }
147
148         for (i = 0; keys; i++, keys >>= 1) {
149                 if (!(keys & 1))
150                         continue;
151
152                 for (t = type_start; t < IN_BINDTYPE_COUNT; t++)
153                         result[t] |= binds[IN_BIND_OFFS(i, t)];
154         }
155
156         return 0;
157 }
158
159 int in_gp2x_update_keycode(void *data, int *is_down)
160 {
161         static int old_val = 0;
162         int val, diff, i;
163
164         val = in_gp2x_get_bits();
165         diff = val ^ old_val;
166         if (diff == 0)
167                 return -1;
168
169         /* take one bit only */
170         for (i = 0; i < sizeof(diff)*8; i++)
171                 if (diff & (1<<i))
172                         break;
173
174         old_val ^= 1 << i;
175
176         if (is_down)
177                 *is_down = !!(val & (1<<i));
178         return i;
179 }
180
181 static const struct {
182         short key;
183         short pbtn;
184 } key_pbtn_map[] =
185 {
186         { BTN_UP,       PBTN_UP },
187         { BTN_DOWN,     PBTN_DOWN },
188         { BTN_LEFT,     PBTN_LEFT },
189         { BTN_RIGHT,    PBTN_RIGHT },
190         { BTN_B,        PBTN_MOK },
191         { BTN_X,        PBTN_MBACK },
192         { BTN_A,        PBTN_MA2 },
193         { BTN_Y,        PBTN_MA3 },
194         { BTN_L,        PBTN_L },
195         { BTN_R,        PBTN_R },
196         { BTN_SELECT,   PBTN_MENU },
197 };
198
199 #define KEY_PBTN_MAP_SIZE (sizeof(key_pbtn_map) / sizeof(key_pbtn_map[0]))
200
201 static int in_gp2x_menu_translate(void *drv_data, int keycode)
202 {
203         int i;
204         if (keycode < 0)
205         {
206                 /* menu -> kc */
207                 keycode = -keycode;
208                 for (i = 0; i < KEY_PBTN_MAP_SIZE; i++)
209                         if (key_pbtn_map[i].pbtn == keycode)
210                                 return key_pbtn_map[i].key;
211         }
212         else
213         {
214                 for (i = 0; i < KEY_PBTN_MAP_SIZE; i++)
215                         if (key_pbtn_map[i].key == keycode)
216                                 return key_pbtn_map[i].pbtn;
217         }
218
219         return 0;
220 }
221
222 static const struct {
223         short code;
224         char btype;
225         char bit;
226 } in_gp2x_def_binds[] =
227 {
228         /* MXYZ SACB RLDU */
229         { BTN_UP,       IN_BINDTYPE_PLAYER12, 0 },
230         { BTN_DOWN,     IN_BINDTYPE_PLAYER12, 1 },
231         { BTN_LEFT,     IN_BINDTYPE_PLAYER12, 2 },
232         { BTN_RIGHT,    IN_BINDTYPE_PLAYER12, 3 },
233         { BTN_X,        IN_BINDTYPE_PLAYER12, 4 },      /* B */
234         { BTN_B,        IN_BINDTYPE_PLAYER12, 5 },      /* C */
235         { BTN_A,        IN_BINDTYPE_PLAYER12, 6 },      /* A */
236         { BTN_START,    IN_BINDTYPE_PLAYER12, 7 },
237         { BTN_SELECT,   IN_BINDTYPE_EMU, PEVB_MENU },
238 //      { BTN_Y,        IN_BINDTYPE_EMU, PEVB_SWITCH_RND },
239         { BTN_L,        IN_BINDTYPE_EMU, PEVB_STATE_SAVE },
240         { BTN_R,        IN_BINDTYPE_EMU, PEVB_STATE_LOAD },
241         { BTN_VOL_UP,   IN_BINDTYPE_EMU, PEVB_VOL_UP },
242         { BTN_VOL_DOWN, IN_BINDTYPE_EMU, PEVB_VOL_DOWN },
243 };
244
245 #define DEF_BIND_COUNT (sizeof(in_gp2x_def_binds) / sizeof(in_gp2x_def_binds[0]))
246
247 static void in_gp2x_get_def_binds(int *binds)
248 {
249         int i;
250
251         for (i = 0; i < DEF_BIND_COUNT; i++)
252                 binds[IN_BIND_OFFS(in_gp2x_def_binds[i].code, in_gp2x_def_binds[i].btype)] =
253                         1 << in_gp2x_def_binds[i].bit;
254 }
255
256 /* remove binds of missing keys, count remaining ones */
257 static int in_gp2x_clean_binds(void *drv_data, int *binds, int *def_binds)
258 {
259         int i, count = 0, have_vol = 0, have_menu = 0;
260
261         for (i = 0; i < IN_GP2X_NBUTTONS; i++) {
262                 int t, eb, offs;
263                 for (t = 0; t < IN_BINDTYPE_COUNT; t++) {
264                         offs = IN_BIND_OFFS(i, t);
265                         if (in_gp2x_keys[i] == NULL)
266                                 binds[offs] = def_binds[offs] = 0;
267                         if (binds[offs])
268                                 count++;
269                 }
270                 eb = binds[IN_BIND_OFFS(i, IN_BINDTYPE_EMU)];
271                 if (eb & (PEV_VOL_DOWN|PEV_VOL_UP))
272                         have_vol = 1;
273                 if (eb & PEV_MENU)
274                         have_menu = 1;
275         }
276
277         /* autobind some important keys, if they are unbound */
278         if (!have_vol && binds[BTN_VOL_UP] == 0 && binds[BTN_VOL_DOWN] == 0) {
279                 binds[IN_BIND_OFFS(BTN_VOL_UP, IN_BINDTYPE_EMU)]   = PEV_VOL_UP;
280                 binds[IN_BIND_OFFS(BTN_VOL_DOWN, IN_BINDTYPE_EMU)] = PEV_VOL_DOWN;
281                 count += 2;
282         }
283
284         if (!have_menu) {
285                 binds[IN_BIND_OFFS(BTN_SELECT, IN_BINDTYPE_EMU)] = PEV_MENU;
286                 count++;
287         }
288
289         in_combos_find(binds, BTN_PUSH, &in_gp2x_combo_keys, &in_gp2x_combo_acts);
290
291         return count;
292 }
293
294 void in_gp2x_init(void *vdrv)
295 {
296         in_drv_t *drv = vdrv;
297
298         if (gp2x_dev_id == GP2X_DEV_WIZ)
299                 in_gp2x_keys[BTN_START] = "MENU";
300         
301         in_gp2x_combo_keys = in_gp2x_combo_acts = 0;
302
303         drv->prefix = in_gp2x_prefix;
304         drv->probe = in_gp2x_probe;
305         drv->free = in_gp2x_free;
306         drv->get_bind_count = in_gp2x_get_bind_count;
307         drv->get_def_binds = in_gp2x_get_def_binds;
308         drv->clean_binds = in_gp2x_clean_binds;
309         drv->menu_translate = in_gp2x_menu_translate;
310         drv->update_keycode = in_gp2x_update_keycode;
311 }
312