Patch by Michael Schwingen that
[fw/openocd] / src / jtag / at91rm9200.c
1 /***************************************************************************
2  *   Copyright (C) 2006 by Anders Larsen                                   *
3  *   al@alarsen.net                                                        *
4  *                                                                         *
5  *   This program is free software; you can redistribute it and/or modify  *
6  *   it under the terms of the GNU General Public License as published by  *
7  *   the Free Software Foundation; either version 2 of the License, or     *
8  *   (at your option) any later version.                                   *
9  *                                                                         *
10  *   This program is distributed in the hope that it will be useful,       *
11  *   but WITHOUT ANY WARRANTY; without even the implied warranty of        *
12  *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the         *
13  *   GNU General Public License for more details.                          *
14  *                                                                         *
15  *   You should have received a copy of the GNU General Public License     *
16  *   along with this program; if not, write to the                         *
17  *   Free Software Foundation, Inc.,                                       *
18  *   59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.             *
19  ***************************************************************************/
20 #ifdef HAVE_CONFIG_H
21 #include "config.h"
22 #endif
23
24 #include "log.h"
25 #include "jtag.h"
26 #include "bitbang.h"
27
28 /* system includes */
29 #include <string.h>
30 #include <stdlib.h>
31 #include <stdio.h>
32 #include <sys/mman.h>
33 #include <unistd.h>
34 #include <fcntl.h>
35
36 /* AT91RM9200 */
37 #define AT91C_BASE_SYS  (0xfffff000)
38
39 /* GPIO assignment */
40 #define PIOA    (0 << 7)
41 #define PIOB    (1 << 7)
42 #define PIOC    (2 << 7)
43 #define PIOD    (3 << 7)
44
45 #define PIO_PER         (0)             /* PIO enable */
46 #define PIO_OER         (4)             /* output enable */
47 #define PIO_ODR         (5)             /* output disable */
48 #define PIO_SODR        (12)            /* set output data */
49 #define PIO_CODR        (13)            /* clear output data */
50 #define PIO_PDSR        (15)            /* pin data status */
51 #define PIO_PPUER       (25)            /* pull-up enable */
52
53 #define NC      (0)                     /* not connected */
54 #define P0      (1 << 0)
55 #define P1      (1 << 1)
56 #define P2      (1 << 2)
57 #define P3      (1 << 3)
58 #define P4      (1 << 4)
59 #define P5      (1 << 5)
60 #define P6      (1 << 6)
61 #define P7      (1 << 7)
62 #define P8      (1 << 8)
63 #define P9      (1 << 9)
64 #define P10     (1 << 10)
65 #define P11     (1 << 11)
66 #define P12     (1 << 12)
67 #define P13     (1 << 13)
68 #define P14     (1 << 14)
69 #define P15     (1 << 15)
70 #define P16     (1 << 16)
71 #define P17     (1 << 17)
72 #define P18     (1 << 18)
73 #define P19     (1 << 19)
74 #define P20     (1 << 20)
75 #define P21     (1 << 21)
76 #define P22     (1 << 22)
77 #define P23     (1 << 23)
78 #define P24     (1 << 24)
79 #define P25     (1 << 25)
80 #define P26     (1 << 26)
81 #define P27     (1 << 27)
82 #define P28     (1 << 28)
83 #define P29     (1 << 29)
84 #define P30     (1 << 30)
85 #define P31     (1 << 31)
86
87 struct device_t
88 {
89         char* name;
90         int TDO_PIO;    /* PIO holding TDO */
91         u32 TDO_MASK;   /* TDO bitmask */
92         int TRST_PIO;   /* PIO holding TRST */
93         u32 TRST_MASK;  /* TRST bitmask */
94         int TMS_PIO;    /* PIO holding TMS */
95         u32 TMS_MASK;   /* TMS bitmask */
96         int TCK_PIO;    /* PIO holding TCK */
97         u32 TCK_MASK;   /* TCK bitmask */
98         int TDI_PIO;    /* PIO holding TDI */
99         u32 TDI_MASK;   /* TDI bitmask */
100         int SRST_PIO;   /* PIO holding SRST */
101         u32 SRST_MASK;  /* SRST bitmask */
102 };
103
104 struct device_t devices[] =
105 {
106         { "rea_ecr", PIOD, P27, PIOA, NC, PIOD, P23, PIOD, P24, PIOD, P26, PIOC, P5 },
107         { NULL, 0 }
108 };
109
110 /* configuration */
111 char* at91rm9200_device;
112
113 /* interface variables
114  */
115 static struct device_t* device;
116 static int dev_mem_fd;
117 static void *sys_controller;
118 static u32* pio_base;
119
120 /* low level command set
121  */
122 int at91rm9200_read(void);
123 void at91rm9200_write(int tck, int tms, int tdi);
124 void at91rm9200_reset(int trst, int srst);
125
126 int at91rm9200_speed(int speed);
127 int at91rm9200_register_commands(struct command_context_s *cmd_ctx);
128 int at91rm9200_init(void);
129 int at91rm9200_quit(void);
130
131 jtag_interface_t at91rm9200_interface =
132 {
133         .name = "at91rm9200",
134
135         .execute_queue = bitbang_execute_queue,
136
137         .support_pathmove = 0,
138
139         .speed = at91rm9200_speed,
140         .register_commands = at91rm9200_register_commands,
141         .init = at91rm9200_init,
142         .quit = at91rm9200_quit,
143 };
144
145 bitbang_interface_t at91rm9200_bitbang =
146 {
147         .read = at91rm9200_read,
148         .write = at91rm9200_write,
149         .reset = at91rm9200_reset,
150         .blink = 0
151 };
152
153 int at91rm9200_read(void)
154 {
155         return (pio_base[device->TDO_PIO + PIO_PDSR] & device->TDO_MASK) != 0;
156 }
157
158 void at91rm9200_write(int tck, int tms, int tdi)
159 {
160         if (tck)
161                 pio_base[device->TCK_PIO + PIO_SODR] = device->TCK_MASK;
162         else
163                 pio_base[device->TCK_PIO + PIO_CODR] = device->TCK_MASK;
164
165         if (tms)
166                 pio_base[device->TMS_PIO + PIO_SODR] = device->TMS_MASK;
167         else
168                 pio_base[device->TMS_PIO + PIO_CODR] = device->TMS_MASK;
169
170         if (tdi)
171                 pio_base[device->TDI_PIO + PIO_SODR] = device->TDI_MASK;
172         else
173                 pio_base[device->TDI_PIO + PIO_CODR] = device->TDI_MASK;
174 }
175
176 /* (1) assert or (0) deassert reset lines */
177 void at91rm9200_reset(int trst, int srst)
178 {
179         if (trst == 0)
180                 pio_base[device->TRST_PIO + PIO_SODR] = device->TRST_MASK;
181         else if (trst == 1)
182                 pio_base[device->TRST_PIO + PIO_CODR] = device->TRST_MASK;
183
184         if (srst == 0)
185                 pio_base[device->SRST_PIO + PIO_SODR] = device->SRST_MASK;
186         else if (srst == 1)
187                 pio_base[device->SRST_PIO + PIO_CODR] = device->SRST_MASK;
188 }
189
190 int at91rm9200_speed(int speed)
191 {
192
193         return ERROR_OK;
194 }
195
196 int at91rm9200_handle_device_command(struct command_context_s *cmd_ctx, char *cmd, char **args, int argc)
197 {
198         if (argc == 0)
199                 return ERROR_OK;
200
201         /* only if the device name wasn't overwritten by cmdline */
202         if (at91rm9200_device == 0)
203         {
204                 at91rm9200_device = malloc(strlen(args[0]) + sizeof(char));
205                 strcpy(at91rm9200_device, args[0]);
206         }
207
208         return ERROR_OK;
209 }
210
211 int at91rm9200_register_commands(struct command_context_s *cmd_ctx)
212 {
213         register_command(cmd_ctx, NULL, "at91rm9200_device", at91rm9200_handle_device_command,
214                 COMMAND_CONFIG, NULL);
215         return ERROR_OK;
216 }
217
218 int at91rm9200_init(void)
219 {
220         struct device_t *cur_device;
221
222         cur_device = devices;
223
224         if (at91rm9200_device == NULL || at91rm9200_device[0] == 0)
225         {
226                 at91rm9200_device = "rea_ecr";
227                 WARNING("No at91rm9200 device specified, using default 'rea_ecr'");
228         }
229
230         while (cur_device->name)
231         {
232                 if (strcmp(cur_device->name, at91rm9200_device) == 0)
233                 {
234                         device = cur_device;
235                         break;
236                 }
237                 cur_device++;
238         }
239
240         if (!device)
241         {
242                 ERROR("No matching device found for %s", at91rm9200_device);
243                 return ERROR_JTAG_INIT_FAILED;
244         }
245
246         bitbang_interface = &at91rm9200_bitbang;
247
248         dev_mem_fd = open("/dev/mem", O_RDWR | O_SYNC);
249         if (dev_mem_fd < 0) {
250                 perror("open");
251                 return ERROR_JTAG_INIT_FAILED;
252         }
253
254         sys_controller = mmap(NULL, 4096, PROT_READ | PROT_WRITE,
255                                 MAP_SHARED, dev_mem_fd, AT91C_BASE_SYS);
256         if (sys_controller == MAP_FAILED) {
257                 perror("mmap");
258                 close(dev_mem_fd);
259                 return ERROR_JTAG_INIT_FAILED;
260         }
261         pio_base = (u32*)sys_controller + 0x100;
262
263         /*
264          * Configure TDO as an input, and TDI, TCK, TMS, TRST, SRST
265          * as outputs.  Drive TDI and TCK low, and TMS/TRST/SRST high.
266          */
267         pio_base[device->TDI_PIO + PIO_CODR] = device->TDI_MASK;
268         pio_base[device->TDI_PIO + PIO_OER] = device->TDI_MASK;
269         pio_base[device->TDI_PIO + PIO_PER] = device->TDI_MASK;
270         pio_base[device->TCK_PIO + PIO_CODR] = device->TCK_MASK;
271         pio_base[device->TCK_PIO + PIO_OER] = device->TCK_MASK;
272         pio_base[device->TCK_PIO + PIO_PER] = device->TCK_MASK;
273         pio_base[device->TMS_PIO + PIO_SODR] = device->TMS_MASK;
274         pio_base[device->TMS_PIO + PIO_OER] = device->TMS_MASK;
275         pio_base[device->TMS_PIO + PIO_PER] = device->TMS_MASK;
276         pio_base[device->TRST_PIO + PIO_SODR] = device->TRST_MASK;
277         pio_base[device->TRST_PIO + PIO_OER] = device->TRST_MASK;
278         pio_base[device->TRST_PIO + PIO_PER] = device->TRST_MASK;
279         pio_base[device->SRST_PIO + PIO_SODR] = device->SRST_MASK;
280         pio_base[device->SRST_PIO + PIO_OER] = device->SRST_MASK;
281         pio_base[device->SRST_PIO + PIO_PER] = device->SRST_MASK;
282         pio_base[device->TDO_PIO + PIO_ODR] = device->TDO_MASK;
283         pio_base[device->TDO_PIO + PIO_PPUER] = device->TDO_MASK;
284         pio_base[device->TDO_PIO + PIO_PER] = device->TDO_MASK;
285
286         return ERROR_OK;
287 }
288
289 int at91rm9200_quit(void)
290 {
291
292         return ERROR_OK;
293 }