openocd: src/target: replace the GPL-2.0-or-later license tag
[fw/openocd] / src / target / armv8.c
1 /* SPDX-License-Identifier: GPL-2.0-or-later */
2
3 /***************************************************************************
4  *   Copyright (C) 2015 by David Ung                                       *
5  *                                                                         *
6  *   Copyright (C) 2018 by Liviu Ionescu                                   *
7  *   <ilg@livius.net>                                                      *
8  ***************************************************************************/
9
10 #ifdef HAVE_CONFIG_H
11 #include "config.h"
12 #endif
13
14 #include <helper/replacements.h>
15
16 #include "armv8.h"
17 #include "arm_disassembler.h"
18
19 #include "register.h"
20 #include <helper/binarybuffer.h>
21 #include <helper/command.h>
22
23 #include <stdlib.h>
24 #include <string.h>
25 #include <unistd.h>
26
27 #include "armv8_opcodes.h"
28 #include "target.h"
29 #include "target_type.h"
30 #include "semihosting_common.h"
31
32 static const char * const armv8_state_strings[] = {
33         "AArch32", "Thumb", "Jazelle", "ThumbEE", "AArch64",
34 };
35
36 static const struct {
37         const char *name;
38         unsigned psr;
39 } armv8_mode_data[] = {
40         {
41                 .name = "USR",
42                 .psr = ARM_MODE_USR,
43         },
44         {
45                 .name = "FIQ",
46                 .psr = ARM_MODE_FIQ,
47         },
48         {
49                 .name = "IRQ",
50                 .psr = ARM_MODE_IRQ,
51         },
52         {
53                 .name = "SVC",
54                 .psr = ARM_MODE_SVC,
55         },
56         {
57                 .name = "MON",
58                 .psr = ARM_MODE_MON,
59         },
60         {
61                 .name = "ABT",
62                 .psr = ARM_MODE_ABT,
63         },
64         {
65                 .name = "HYP",
66                 .psr = ARM_MODE_HYP,
67         },
68         {
69                 .name = "UND",
70                 .psr = ARM_MODE_UND,
71         },
72         {
73                 .name = "SYS",
74                 .psr = ARM_MODE_SYS,
75         },
76         {
77                 .name = "EL0T",
78                 .psr = ARMV8_64_EL0T,
79         },
80         {
81                 .name = "EL1T",
82                 .psr = ARMV8_64_EL1T,
83         },
84         {
85                 .name = "EL1H",
86                 .psr = ARMV8_64_EL1H,
87         },
88         {
89                 .name = "EL2T",
90                 .psr = ARMV8_64_EL2T,
91         },
92         {
93                 .name = "EL2H",
94                 .psr = ARMV8_64_EL2H,
95         },
96         {
97                 .name = "EL3T",
98                 .psr = ARMV8_64_EL3T,
99         },
100         {
101                 .name = "EL3H",
102                 .psr = ARMV8_64_EL3H,
103         },
104 };
105
106 /** Map PSR mode bits to the name of an ARM processor operating mode. */
107 const char *armv8_mode_name(unsigned psr_mode)
108 {
109         for (unsigned i = 0; i < ARRAY_SIZE(armv8_mode_data); i++) {
110                 if (armv8_mode_data[i].psr == psr_mode)
111                         return armv8_mode_data[i].name;
112         }
113         LOG_ERROR("unrecognized psr mode: %#02x", psr_mode);
114         return "UNRECOGNIZED";
115 }
116
117 static int armv8_read_reg(struct armv8_common *armv8, int regnum, uint64_t *regval)
118 {
119         struct arm_dpm *dpm = &armv8->dpm;
120         int retval;
121         uint32_t value;
122         uint64_t value_64;
123
124         switch (regnum) {
125         case 0 ... 30:
126                 retval = dpm->instr_read_data_dcc_64(dpm,
127                                 ARMV8_MSR_GP(SYSTEM_DBG_DBGDTR_EL0, regnum), &value_64);
128                 break;
129         case ARMV8_SP:
130                 retval = dpm->instr_read_data_r0_64(dpm,
131                                 ARMV8_MOVFSP_64(0), &value_64);
132                 break;
133         case ARMV8_PC:
134                 retval = dpm->instr_read_data_r0_64(dpm,
135                                 ARMV8_MRS_DLR(0), &value_64);
136                 break;
137         case ARMV8_xPSR:
138                 retval = dpm->instr_read_data_r0(dpm,
139                                 ARMV8_MRS_DSPSR(0), &value);
140                 value_64 = value;
141                 break;
142         case ARMV8_FPSR:
143                 retval = dpm->instr_read_data_r0(dpm,
144                                 ARMV8_MRS_FPSR(0), &value);
145                 value_64 = value;
146                 break;
147         case ARMV8_FPCR:
148                 retval = dpm->instr_read_data_r0(dpm,
149                                 ARMV8_MRS_FPCR(0), &value);
150                 value_64 = value;
151                 break;
152         case ARMV8_ELR_EL1:
153                 retval = dpm->instr_read_data_r0_64(dpm,
154                                 ARMV8_MRS(SYSTEM_ELR_EL1, 0), &value_64);
155                 break;
156         case ARMV8_ELR_EL2:
157                 retval = dpm->instr_read_data_r0_64(dpm,
158                                 ARMV8_MRS(SYSTEM_ELR_EL2, 0), &value_64);
159                 break;
160         case ARMV8_ELR_EL3:
161                 retval = dpm->instr_read_data_r0_64(dpm,
162                                 ARMV8_MRS(SYSTEM_ELR_EL3, 0), &value_64);
163                 break;
164         case ARMV8_ESR_EL1:
165                 retval = dpm->instr_read_data_r0(dpm,
166                                 ARMV8_MRS(SYSTEM_ESR_EL1, 0), &value);
167                 value_64 = value;
168                 break;
169         case ARMV8_ESR_EL2:
170                 retval = dpm->instr_read_data_r0(dpm,
171                                 ARMV8_MRS(SYSTEM_ESR_EL2, 0), &value);
172                 value_64 = value;
173                 break;
174         case ARMV8_ESR_EL3:
175                 retval = dpm->instr_read_data_r0(dpm,
176                                 ARMV8_MRS(SYSTEM_ESR_EL3, 0), &value);
177                 value_64 = value;
178                 break;
179         case ARMV8_SPSR_EL1:
180                 retval = dpm->instr_read_data_r0(dpm,
181                                 ARMV8_MRS(SYSTEM_SPSR_EL1, 0), &value);
182                 value_64 = value;
183                 break;
184         case ARMV8_SPSR_EL2:
185                 retval = dpm->instr_read_data_r0(dpm,
186                                 ARMV8_MRS(SYSTEM_SPSR_EL2, 0), &value);
187                 value_64 = value;
188                 break;
189         case ARMV8_SPSR_EL3:
190                 retval = dpm->instr_read_data_r0(dpm,
191                                 ARMV8_MRS(SYSTEM_SPSR_EL3, 0), &value);
192                 value_64 = value;
193                 break;
194         default:
195                 retval = ERROR_FAIL;
196                 break;
197         }
198
199         if (retval == ERROR_OK && regval)
200                 *regval = value_64;
201         else
202                 retval = ERROR_FAIL;
203
204         return retval;
205 }
206
207 static int armv8_read_reg_simdfp_aarch64(struct armv8_common *armv8, int regnum, uint64_t *lvalue, uint64_t *hvalue)
208 {
209         int retval = ERROR_FAIL;
210         struct arm_dpm *dpm = &armv8->dpm;
211
212         switch (regnum) {
213         case ARMV8_V0 ... ARMV8_V31:
214                 retval = dpm->instr_read_data_r0_64(dpm,
215                                 ARMV8_MOV_GPR_VFP(0, (regnum - ARMV8_V0), 1), hvalue);
216                 if (retval != ERROR_OK)
217                         return retval;
218                 retval = dpm->instr_read_data_r0_64(dpm,
219                                 ARMV8_MOV_GPR_VFP(0, (regnum - ARMV8_V0), 0), lvalue);
220                 break;
221
222         default:
223                 retval = ERROR_FAIL;
224                 break;
225         }
226
227         return retval;
228 }
229
230 static int armv8_write_reg(struct armv8_common *armv8, int regnum, uint64_t value_64)
231 {
232         struct arm_dpm *dpm = &armv8->dpm;
233         int retval;
234         uint32_t value;
235
236         switch (regnum) {
237         case 0 ... 30:
238                 retval = dpm->instr_write_data_dcc_64(dpm,
239                         ARMV8_MRS(SYSTEM_DBG_DBGDTR_EL0, regnum),
240                         value_64);
241                 break;
242         case ARMV8_SP:
243                 retval = dpm->instr_write_data_r0_64(dpm,
244                         ARMV8_MOVTSP_64(0),
245                         value_64);
246                 break;
247         case ARMV8_PC:
248                 retval = dpm->instr_write_data_r0_64(dpm,
249                         ARMV8_MSR_DLR(0),
250                         value_64);
251                 break;
252         case ARMV8_xPSR:
253                 value = value_64;
254                 retval = dpm->instr_write_data_r0(dpm,
255                         ARMV8_MSR_DSPSR(0),
256                         value);
257                 break;
258         case ARMV8_FPSR:
259                 value = value_64;
260                 retval = dpm->instr_write_data_r0(dpm,
261                         ARMV8_MSR_FPSR(0),
262                         value);
263                 break;
264         case ARMV8_FPCR:
265                 value = value_64;
266                 retval = dpm->instr_write_data_r0(dpm,
267                         ARMV8_MSR_FPCR(0),
268                         value);
269                 break;
270         /* registers clobbered by taking exception in debug state */
271         case ARMV8_ELR_EL1:
272                 retval = dpm->instr_write_data_r0_64(dpm,
273                                 ARMV8_MSR_GP(SYSTEM_ELR_EL1, 0), value_64);
274                 break;
275         case ARMV8_ELR_EL2:
276                 retval = dpm->instr_write_data_r0_64(dpm,
277                                 ARMV8_MSR_GP(SYSTEM_ELR_EL2, 0), value_64);
278                 break;
279         case ARMV8_ELR_EL3:
280                 retval = dpm->instr_write_data_r0_64(dpm,
281                                 ARMV8_MSR_GP(SYSTEM_ELR_EL3, 0), value_64);
282                 break;
283         case ARMV8_ESR_EL1:
284                 value = value_64;
285                 retval = dpm->instr_write_data_r0(dpm,
286                                 ARMV8_MSR_GP(SYSTEM_ESR_EL1, 0), value);
287                 break;
288         case ARMV8_ESR_EL2:
289                 value = value_64;
290                 retval = dpm->instr_write_data_r0(dpm,
291                                 ARMV8_MSR_GP(SYSTEM_ESR_EL2, 0), value);
292                 break;
293         case ARMV8_ESR_EL3:
294                 value = value_64;
295                 retval = dpm->instr_write_data_r0(dpm,
296                                 ARMV8_MSR_GP(SYSTEM_ESR_EL3, 0), value);
297                 break;
298         case ARMV8_SPSR_EL1:
299                 value = value_64;
300                 retval = dpm->instr_write_data_r0(dpm,
301                                 ARMV8_MSR_GP(SYSTEM_SPSR_EL1, 0), value);
302                 break;
303         case ARMV8_SPSR_EL2:
304                 value = value_64;
305                 retval = dpm->instr_write_data_r0(dpm,
306                                 ARMV8_MSR_GP(SYSTEM_SPSR_EL2, 0), value);
307                 break;
308         case ARMV8_SPSR_EL3:
309                 value = value_64;
310                 retval = dpm->instr_write_data_r0(dpm,
311                                 ARMV8_MSR_GP(SYSTEM_SPSR_EL3, 0), value);
312                 break;
313         default:
314                 retval = ERROR_FAIL;
315                 break;
316         }
317
318         return retval;
319 }
320
321 static int armv8_write_reg_simdfp_aarch64(struct armv8_common *armv8, int regnum, uint64_t lvalue, uint64_t hvalue)
322 {
323         int retval = ERROR_FAIL;
324         struct arm_dpm *dpm = &armv8->dpm;
325
326         switch (regnum) {
327         case ARMV8_V0 ... ARMV8_V31:
328                 retval = dpm->instr_write_data_r0_64(dpm,
329                                 ARMV8_MOV_VFP_GPR((regnum - ARMV8_V0), 0, 1), hvalue);
330                 if (retval != ERROR_OK)
331                         return retval;
332                 retval = dpm->instr_write_data_r0_64(dpm,
333                                 ARMV8_MOV_VFP_GPR((regnum - ARMV8_V0), 0, 0), lvalue);
334                 break;
335
336         default:
337                 retval = ERROR_FAIL;
338                 break;
339         }
340
341         return retval;
342 }
343
344 static int armv8_read_reg32(struct armv8_common *armv8, int regnum, uint64_t *regval)
345 {
346         struct arm_dpm *dpm = &armv8->dpm;
347         uint32_t value = 0;
348         int retval;
349
350         switch (regnum) {
351         case ARMV8_R0 ... ARMV8_R14:
352                 /* return via DCC:  "MCR p14, 0, Rnum, c0, c5, 0" */
353                 retval = dpm->instr_read_data_dcc(dpm,
354                         ARMV4_5_MCR(14, 0, regnum, 0, 5, 0),
355                         &value);
356                 break;
357         case ARMV8_SP:
358                 retval = dpm->instr_read_data_dcc(dpm,
359                         ARMV4_5_MCR(14, 0, 13, 0, 5, 0),
360                         &value);
361                 break;
362         case ARMV8_PC:
363                 retval = dpm->instr_read_data_r0(dpm,
364                         ARMV8_MRC_DLR(0),
365                         &value);
366                 break;
367         case ARMV8_xPSR:
368                 retval = dpm->instr_read_data_r0(dpm,
369                         ARMV8_MRC_DSPSR(0),
370                         &value);
371                 break;
372         case ARMV8_ELR_EL1: /* mapped to LR_svc */
373                 retval = dpm->instr_read_data_dcc(dpm,
374                                 ARMV4_5_MCR(14, 0, 14, 0, 5, 0),
375                                 &value);
376                 break;
377         case ARMV8_ELR_EL2: /* mapped to ELR_hyp */
378                 retval = dpm->instr_read_data_r0(dpm,
379                                 ARMV8_MRS_T1(0, 14, 0, 1),
380                                 &value);
381                 break;
382         case ARMV8_ELR_EL3: /* mapped to LR_mon */
383                 retval = dpm->instr_read_data_dcc(dpm,
384                                 ARMV4_5_MCR(14, 0, 14, 0, 5, 0),
385                                 &value);
386                 break;
387         case ARMV8_ESR_EL1: /* mapped to DFSR */
388                 retval = dpm->instr_read_data_r0(dpm,
389                                 ARMV4_5_MRC(15, 0, 0, 5, 0, 0),
390                                 &value);
391                 break;
392         case ARMV8_ESR_EL2: /* mapped to HSR */
393                 retval = dpm->instr_read_data_r0(dpm,
394                                 ARMV4_5_MRC(15, 4, 0, 5, 2, 0),
395                                 &value);
396                 break;
397         case ARMV8_ESR_EL3: /* FIXME: no equivalent in aarch32? */
398                 retval = ERROR_FAIL;
399                 break;
400         case ARMV8_SPSR_EL1: /* mapped to SPSR_svc */
401                 retval = dpm->instr_read_data_r0(dpm,
402                                 ARMV8_MRS_xPSR_T1(1, 0),
403                                 &value);
404                 break;
405         case ARMV8_SPSR_EL2: /* mapped to SPSR_hyp */
406                 retval = dpm->instr_read_data_r0(dpm,
407                                 ARMV8_MRS_xPSR_T1(1, 0),
408                                 &value);
409                 break;
410         case ARMV8_SPSR_EL3: /* mapped to SPSR_mon */
411                 retval = dpm->instr_read_data_r0(dpm,
412                                 ARMV8_MRS_xPSR_T1(1, 0),
413                                 &value);
414                 break;
415         case ARMV8_FPSR:
416                 /* "VMRS r0, FPSCR"; then return via DCC */
417                 retval = dpm->instr_read_data_r0(dpm,
418                         ARMV4_5_VMRS(0), &value);
419                 break;
420         default:
421                 retval = ERROR_FAIL;
422                 break;
423         }
424
425         if (retval == ERROR_OK && regval)
426                 *regval = value;
427
428         return retval;
429 }
430
431 static int armv8_read_reg_simdfp_aarch32(struct armv8_common *armv8, int regnum, uint64_t *lvalue, uint64_t *hvalue)
432 {
433         int retval = ERROR_FAIL;
434         struct arm_dpm *dpm = &armv8->dpm;
435         struct reg *reg_r1 = dpm->arm->core_cache->reg_list + ARMV8_R1;
436         uint32_t value_r0 = 0, value_r1 = 0;
437         unsigned num = (regnum - ARMV8_V0) << 1;
438
439         switch (regnum) {
440         case ARMV8_V0 ... ARMV8_V15:
441                 /* we are going to write R1, mark it dirty */
442                 reg_r1->dirty = true;
443                 /* move from double word register to r0:r1: "vmov r0, r1, vm"
444                  * then read r0 via dcc
445                  */
446                 retval = dpm->instr_read_data_r0(dpm,
447                                 ARMV4_5_VMOV(1, 1, 0, (num >> 4), (num & 0xf)),
448                                 &value_r0);
449                 if (retval != ERROR_OK)
450                         return retval;
451                 /* read r1 via dcc */
452                 retval = dpm->instr_read_data_dcc(dpm,
453                                 ARMV4_5_MCR(14, 0, 1, 0, 5, 0),
454                                 &value_r1);
455                 if (retval != ERROR_OK)
456                         return retval;
457                 *lvalue = value_r1;
458                 *lvalue = ((*lvalue) << 32) | value_r0;
459
460                 num++;
461                 /* repeat above steps for high 64 bits of V register */
462                 retval = dpm->instr_read_data_r0(dpm,
463                                 ARMV4_5_VMOV(1, 1, 0, (num >> 4), (num & 0xf)),
464                                 &value_r0);
465                 if (retval != ERROR_OK)
466                         return retval;
467                 retval = dpm->instr_read_data_dcc(dpm,
468                                 ARMV4_5_MCR(14, 0, 1, 0, 5, 0),
469                                 &value_r1);
470                 if (retval != ERROR_OK)
471                         return retval;
472                 *hvalue = value_r1;
473                 *hvalue = ((*hvalue) << 32) | value_r0;
474                 break;
475         default:
476                 retval = ERROR_FAIL;
477                 break;
478         }
479
480         return retval;
481 }
482
483 static int armv8_write_reg32(struct armv8_common *armv8, int regnum, uint64_t value)
484 {
485         struct arm_dpm *dpm = &armv8->dpm;
486         int retval;
487
488         switch (regnum) {
489         case ARMV8_R0 ... ARMV8_R14:
490                 /* load register from DCC:  "MRC p14, 0, Rnum, c0, c5, 0" */
491                 retval = dpm->instr_write_data_dcc(dpm,
492                                 ARMV4_5_MRC(14, 0, regnum, 0, 5, 0), value);
493                 break;
494         case ARMV8_SP:
495                 retval = dpm->instr_write_data_dcc(dpm,
496                                 ARMV4_5_MRC(14, 0, 13, 0, 5, 0), value);
497                         break;
498         case ARMV8_PC:/* PC
499                  * read r0 from DCC; then "MOV pc, r0" */
500                 retval = dpm->instr_write_data_r0(dpm,
501                                 ARMV8_MCR_DLR(0), value);
502                 break;
503         case ARMV8_xPSR: /* CPSR */
504                 /* read r0 from DCC, then "MCR r0, DSPSR" */
505                 retval = dpm->instr_write_data_r0(dpm,
506                                 ARMV8_MCR_DSPSR(0), value);
507                 break;
508         case ARMV8_ELR_EL1: /* mapped to LR_svc */
509                 retval = dpm->instr_write_data_dcc(dpm,
510                                 ARMV4_5_MRC(14, 0, 14, 0, 5, 0),
511                                 value);
512                 break;
513         case ARMV8_ELR_EL2: /* mapped to ELR_hyp */
514                 retval = dpm->instr_write_data_r0(dpm,
515                                 ARMV8_MSR_GP_T1(0, 14, 0, 1),
516                                 value);
517                 break;
518         case ARMV8_ELR_EL3: /* mapped to LR_mon */
519                 retval = dpm->instr_write_data_dcc(dpm,
520                                 ARMV4_5_MRC(14, 0, 14, 0, 5, 0),
521                                 value);
522                 break;
523         case ARMV8_ESR_EL1: /* mapped to DFSR */
524                 retval = dpm->instr_write_data_r0(dpm,
525                                 ARMV4_5_MCR(15, 0, 0, 5, 0, 0),
526                                 value);
527                 break;
528         case ARMV8_ESR_EL2: /* mapped to HSR */
529                 retval = dpm->instr_write_data_r0(dpm,
530                                 ARMV4_5_MCR(15, 4, 0, 5, 2, 0),
531                                 value);
532                 break;
533         case ARMV8_ESR_EL3: /* FIXME: no equivalent in aarch32? */
534                 retval = ERROR_FAIL;
535                 break;
536         case ARMV8_SPSR_EL1: /* mapped to SPSR_svc */
537                 retval = dpm->instr_write_data_r0(dpm,
538                                 ARMV8_MSR_GP_xPSR_T1(1, 0, 15),
539                                 value);
540                 break;
541         case ARMV8_SPSR_EL2: /* mapped to SPSR_hyp */
542                 retval = dpm->instr_write_data_r0(dpm,
543                                 ARMV8_MSR_GP_xPSR_T1(1, 0, 15),
544                                 value);
545                 break;
546         case ARMV8_SPSR_EL3: /* mapped to SPSR_mon */
547                 retval = dpm->instr_write_data_r0(dpm,
548                                 ARMV8_MSR_GP_xPSR_T1(1, 0, 15),
549                                 value);
550                 break;
551         case ARMV8_FPSR:
552                 /* move to r0 from DCC, then "VMSR FPSCR, r0" */
553                 retval = dpm->instr_write_data_r0(dpm,
554                         ARMV4_5_VMSR(0), value);
555                 break;
556         default:
557                 retval = ERROR_FAIL;
558                 break;
559         }
560
561         return retval;
562
563 }
564
565 static int armv8_write_reg_simdfp_aarch32(struct armv8_common *armv8, int regnum, uint64_t lvalue, uint64_t hvalue)
566 {
567         int retval = ERROR_FAIL;
568         struct arm_dpm *dpm = &armv8->dpm;
569         struct reg *reg_r1 = dpm->arm->core_cache->reg_list + ARMV8_R1;
570         uint32_t value_r0 = 0, value_r1 = 0;
571         unsigned num = (regnum - ARMV8_V0) << 1;
572
573         switch (regnum) {
574         case ARMV8_V0 ... ARMV8_V15:
575                 /* we are going to write R1, mark it dirty */
576                 reg_r1->dirty = true;
577                 value_r1 = lvalue >> 32;
578                 value_r0 = lvalue & 0xFFFFFFFF;
579                 /* write value_r1 to r1 via dcc */
580                 retval = dpm->instr_write_data_dcc(dpm,
581                         ARMV4_5_MRC(14, 0, 1, 0, 5, 0),
582                         value_r1);
583                 if (retval != ERROR_OK)
584                         return retval;
585                 /* write value_r0 to r0 via dcc then,
586                  * move to double word register from r0:r1: "vmov vm, r0, r1"
587                  */
588                 retval = dpm->instr_write_data_r0(dpm,
589                         ARMV4_5_VMOV(0, 1, 0, (num >> 4), (num & 0xf)),
590                         value_r0);
591                 if (retval != ERROR_OK)
592                         return retval;
593
594                 num++;
595                 /* repeat above steps for high 64 bits of V register */
596                 value_r1 = hvalue >> 32;
597                 value_r0 = hvalue & 0xFFFFFFFF;
598                 retval = dpm->instr_write_data_dcc(dpm,
599                         ARMV4_5_MRC(14, 0, 1, 0, 5, 0),
600                         value_r1);
601                 if (retval != ERROR_OK)
602                         return retval;
603                 retval = dpm->instr_write_data_r0(dpm,
604                         ARMV4_5_VMOV(0, 1, 0, (num >> 4), (num & 0xf)),
605                         value_r0);
606                 break;
607         default:
608                 retval = ERROR_FAIL;
609                 break;
610         }
611
612         return retval;
613 }
614
615 void armv8_select_reg_access(struct armv8_common *armv8, bool is_aarch64)
616 {
617         if (is_aarch64) {
618                 armv8->read_reg_u64 = armv8_read_reg;
619                 armv8->write_reg_u64 = armv8_write_reg;
620                 armv8->read_reg_u128 = armv8_read_reg_simdfp_aarch64;
621                 armv8->write_reg_u128 = armv8_write_reg_simdfp_aarch64;
622
623         } else {
624                 armv8->read_reg_u64 = armv8_read_reg32;
625                 armv8->write_reg_u64 = armv8_write_reg32;
626                 armv8->read_reg_u128 = armv8_read_reg_simdfp_aarch32;
627                 armv8->write_reg_u128 = armv8_write_reg_simdfp_aarch32;
628         }
629 }
630
631 /*  retrieve core id cluster id  */
632 int armv8_read_mpidr(struct armv8_common *armv8)
633 {
634         int retval = ERROR_FAIL;
635         struct arm *arm = &armv8->arm;
636         struct arm_dpm *dpm = armv8->arm.dpm;
637         uint32_t mpidr;
638
639         retval = dpm->prepare(dpm);
640         if (retval != ERROR_OK)
641                 goto done;
642
643         /* check if we're in an unprivileged mode */
644         if (armv8_curel_from_core_mode(arm->core_mode) < SYSTEM_CUREL_EL1) {
645                 retval = armv8_dpm_modeswitch(dpm, ARMV8_64_EL1H);
646                 if (retval != ERROR_OK)
647                         return retval;
648         }
649
650         retval = dpm->instr_read_data_r0(dpm, armv8_opcode(armv8, READ_REG_MPIDR), &mpidr);
651         if (retval != ERROR_OK)
652                 goto done;
653         if (mpidr & 1U<<31) {
654                 armv8->multi_processor_system = (mpidr >> 30) & 1;
655                 armv8->cluster_id = (mpidr >> 8) & 0xf;
656                 armv8->cpu_id = mpidr & 0x3;
657                 LOG_INFO("%s cluster %x core %x %s", target_name(armv8->arm.target),
658                         armv8->cluster_id,
659                         armv8->cpu_id,
660                         armv8->multi_processor_system == 0 ? "multi core" : "single core");
661         } else
662                 LOG_ERROR("mpidr not in multiprocessor format");
663
664 done:
665         armv8_dpm_modeswitch(dpm, ARM_MODE_ANY);
666         dpm->finish(dpm);
667         return retval;
668 }
669
670 /**
671  * Configures host-side ARM records to reflect the specified CPSR.
672  * Later, code can use arm_reg_current() to map register numbers
673  * according to how they are exposed by this mode.
674  */
675 void armv8_set_cpsr(struct arm *arm, uint32_t cpsr)
676 {
677         uint32_t mode = cpsr & 0x1F;
678
679         /* NOTE:  this may be called very early, before the register
680          * cache is set up.  We can't defend against many errors, in
681          * particular against CPSRs that aren't valid *here* ...
682          */
683         if (arm->cpsr) {
684                 buf_set_u32(arm->cpsr->value, 0, 32, cpsr);
685                 arm->cpsr->valid = true;
686                 arm->cpsr->dirty = false;
687         }
688
689         /* Older ARMs won't have the J bit */
690         enum arm_state state = 0xFF;
691
692         if ((cpsr & 0x10) != 0) {
693                 /* Aarch32 state */
694                 if (cpsr & (1 << 5)) {  /* T */
695                         if (cpsr & (1 << 24)) { /* J */
696                                 LOG_WARNING("ThumbEE -- incomplete support");
697                                 state = ARM_STATE_THUMB_EE;
698                         } else
699                                 state = ARM_STATE_THUMB;
700                 } else {
701                         if (cpsr & (1 << 24)) { /* J */
702                                 LOG_ERROR("Jazelle state handling is BROKEN!");
703                                 state = ARM_STATE_JAZELLE;
704                         } else
705                                 state = ARM_STATE_ARM;
706                 }
707         } else {
708                 /* Aarch64 state */
709                 state = ARM_STATE_AARCH64;
710         }
711
712         arm->core_state = state;
713         arm->core_mode = mode;
714
715         LOG_DEBUG("set CPSR %#8.8x: %s mode, %s state", (unsigned) cpsr,
716                 armv8_mode_name(arm->core_mode),
717                 armv8_state_strings[arm->core_state]);
718 }
719
720 static void armv8_show_fault_registers32(struct armv8_common *armv8)
721 {
722         uint32_t dfsr, ifsr, dfar, ifar;
723         struct arm_dpm *dpm = armv8->arm.dpm;
724         int retval;
725
726         retval = dpm->prepare(dpm);
727         if (retval != ERROR_OK)
728                 return;
729
730         /* ARMV4_5_MRC(cpnum, op1, r0, crn, crm, op2) */
731
732         /* c5/c0 - {data, instruction} fault status registers */
733         retval = dpm->instr_read_data_r0(dpm,
734                         ARMV4_5_MRC(15, 0, 0, 5, 0, 0),
735                         &dfsr);
736         if (retval != ERROR_OK)
737                 goto done;
738
739         retval = dpm->instr_read_data_r0(dpm,
740                         ARMV4_5_MRC(15, 0, 0, 5, 0, 1),
741                         &ifsr);
742         if (retval != ERROR_OK)
743                 goto done;
744
745         /* c6/c0 - {data, instruction} fault address registers */
746         retval = dpm->instr_read_data_r0(dpm,
747                         ARMV4_5_MRC(15, 0, 0, 6, 0, 0),
748                         &dfar);
749         if (retval != ERROR_OK)
750                 goto done;
751
752         retval = dpm->instr_read_data_r0(dpm,
753                         ARMV4_5_MRC(15, 0, 0, 6, 0, 2),
754                         &ifar);
755         if (retval != ERROR_OK)
756                 goto done;
757
758         LOG_USER("Data fault registers        DFSR: %8.8" PRIx32
759                 ", DFAR: %8.8" PRIx32, dfsr, dfar);
760         LOG_USER("Instruction fault registers IFSR: %8.8" PRIx32
761                 ", IFAR: %8.8" PRIx32, ifsr, ifar);
762
763 done:
764         /* (void) */ dpm->finish(dpm);
765 }
766
767 static __attribute__((unused)) void armv8_show_fault_registers(struct target *target)
768 {
769         struct armv8_common *armv8 = target_to_armv8(target);
770
771         if (armv8->arm.core_state != ARM_STATE_AARCH64)
772                 armv8_show_fault_registers32(armv8);
773 }
774
775 static uint8_t armv8_pa_size(uint32_t ps)
776 {
777         uint8_t ret = 0;
778         switch (ps) {
779                 case 0:
780                         ret = 32;
781                         break;
782                 case 1:
783                         ret = 36;
784                         break;
785                 case 2:
786                         ret = 40;
787                         break;
788                 case 3:
789                         ret = 42;
790                         break;
791                 case 4:
792                         ret = 44;
793                         break;
794                 case 5:
795                         ret = 48;
796                         break;
797                 default:
798                         LOG_INFO("Unknown physical address size");
799                         break;
800         }
801         return ret;
802 }
803
804 static __attribute__((unused)) int armv8_read_ttbcr32(struct target *target)
805 {
806         struct armv8_common *armv8 = target_to_armv8(target);
807         struct arm_dpm *dpm = armv8->arm.dpm;
808         uint32_t ttbcr, ttbcr_n;
809         int retval = dpm->prepare(dpm);
810         if (retval != ERROR_OK)
811                 goto done;
812         /*  MRC p15,0,<Rt>,c2,c0,2 ; Read CP15 Translation Table Base Control Register*/
813         retval = dpm->instr_read_data_r0(dpm,
814                         ARMV4_5_MRC(15, 0, 0, 2, 0, 2),
815                         &ttbcr);
816         if (retval != ERROR_OK)
817                 goto done;
818
819         LOG_DEBUG("ttbcr %" PRIx32, ttbcr);
820
821         ttbcr_n = ttbcr & 0x7;
822         armv8->armv8_mmu.ttbcr = ttbcr;
823
824         /*
825          * ARM Architecture Reference Manual (ARMv7-A and ARMv7-R edition),
826          * document # ARM DDI 0406C
827          */
828         armv8->armv8_mmu.ttbr_range[0]  = 0xffffffff >> ttbcr_n;
829         armv8->armv8_mmu.ttbr_range[1] = 0xffffffff;
830         armv8->armv8_mmu.ttbr_mask[0] = 0xffffffff << (14 - ttbcr_n);
831         armv8->armv8_mmu.ttbr_mask[1] = 0xffffffff << 14;
832
833         LOG_DEBUG("ttbr1 %s, ttbr0_mask %" PRIx32 " ttbr1_mask %" PRIx32,
834                   (ttbcr_n != 0) ? "used" : "not used",
835                   armv8->armv8_mmu.ttbr_mask[0],
836                   armv8->armv8_mmu.ttbr_mask[1]);
837
838 done:
839         dpm->finish(dpm);
840         return retval;
841 }
842
843 static __attribute__((unused)) int armv8_read_ttbcr(struct target *target)
844 {
845         struct armv8_common *armv8 = target_to_armv8(target);
846         struct arm_dpm *dpm = armv8->arm.dpm;
847         struct arm *arm = &armv8->arm;
848         uint32_t ttbcr;
849         uint64_t ttbcr_64;
850
851         int retval = dpm->prepare(dpm);
852         if (retval != ERROR_OK)
853                 goto done;
854
855         /* clear ttrr1_used and ttbr0_mask */
856         memset(&armv8->armv8_mmu.ttbr1_used, 0, sizeof(armv8->armv8_mmu.ttbr1_used));
857         memset(&armv8->armv8_mmu.ttbr0_mask, 0, sizeof(armv8->armv8_mmu.ttbr0_mask));
858
859         switch (armv8_curel_from_core_mode(arm->core_mode)) {
860         case SYSTEM_CUREL_EL3:
861                 retval = dpm->instr_read_data_r0(dpm,
862                                 ARMV8_MRS(SYSTEM_TCR_EL3, 0),
863                                 &ttbcr);
864                 retval += dpm->instr_read_data_r0_64(dpm,
865                                 ARMV8_MRS(SYSTEM_TTBR0_EL3, 0),
866                                 &armv8->ttbr_base);
867                 if (retval != ERROR_OK)
868                         goto done;
869                 armv8->va_size = 64 - (ttbcr & 0x3F);
870                 armv8->pa_size = armv8_pa_size((ttbcr >> 16) & 7);
871                 armv8->page_size = (ttbcr >> 14) & 3;
872                 break;
873         case SYSTEM_CUREL_EL2:
874                 retval = dpm->instr_read_data_r0(dpm,
875                                 ARMV8_MRS(SYSTEM_TCR_EL2, 0),
876                                 &ttbcr);
877                 retval += dpm->instr_read_data_r0_64(dpm,
878                                 ARMV8_MRS(SYSTEM_TTBR0_EL2, 0),
879                                 &armv8->ttbr_base);
880                 if (retval != ERROR_OK)
881                         goto done;
882                 armv8->va_size = 64 - (ttbcr & 0x3F);
883                 armv8->pa_size = armv8_pa_size((ttbcr >> 16) & 7);
884                 armv8->page_size = (ttbcr >> 14) & 3;
885                 break;
886         case SYSTEM_CUREL_EL0:
887                 armv8_dpm_modeswitch(dpm, ARMV8_64_EL1H);
888                 /* fall through */
889         case SYSTEM_CUREL_EL1:
890                 retval = dpm->instr_read_data_r0_64(dpm,
891                                 ARMV8_MRS(SYSTEM_TCR_EL1, 0),
892                                 &ttbcr_64);
893                 armv8->va_size = 64 - (ttbcr_64 & 0x3F);
894                 armv8->pa_size = armv8_pa_size((ttbcr_64 >> 32) & 7);
895                 armv8->page_size = (ttbcr_64 >> 14) & 3;
896                 armv8->armv8_mmu.ttbr1_used = (((ttbcr_64 >> 16) & 0x3F) != 0) ? 1 : 0;
897                 armv8->armv8_mmu.ttbr0_mask  = 0x0000FFFFFFFFFFFF;
898                 retval += dpm->instr_read_data_r0_64(dpm,
899                                 ARMV8_MRS(SYSTEM_TTBR0_EL1 | (armv8->armv8_mmu.ttbr1_used), 0),
900                                 &armv8->ttbr_base);
901                 if (retval != ERROR_OK)
902                         goto done;
903                 break;
904         default:
905                 LOG_ERROR("unknown core state");
906                 retval = ERROR_FAIL;
907                 break;
908         }
909         if (retval != ERROR_OK)
910                 goto done;
911
912         if (armv8->armv8_mmu.ttbr1_used == 1)
913                 LOG_INFO("TTBR0 access above %" PRIx64, (uint64_t)(armv8->armv8_mmu.ttbr0_mask));
914
915 done:
916         armv8_dpm_modeswitch(dpm, ARM_MODE_ANY);
917         dpm->finish(dpm);
918         return retval;
919 }
920
921 /*  method adapted to cortex A : reused arm v4 v5 method*/
922 int armv8_mmu_translate_va(struct target *target,  target_addr_t va, target_addr_t *val)
923 {
924         return ERROR_OK;
925 }
926
927 /*  V8 method VA TO PA  */
928 int armv8_mmu_translate_va_pa(struct target *target, target_addr_t va,
929         target_addr_t *val, int meminfo)
930 {
931         struct armv8_common *armv8 = target_to_armv8(target);
932         struct arm *arm = target_to_arm(target);
933         struct arm_dpm *dpm = &armv8->dpm;
934         enum arm_mode target_mode = ARM_MODE_ANY;
935         uint32_t retval;
936         uint32_t instr = 0;
937         uint64_t par;
938
939         static const char * const shared_name[] = {
940                         "Non-", "UNDEFINED ", "Outer ", "Inner "
941         };
942
943         static const char * const secure_name[] = {
944                         "Secure", "Not Secure"
945         };
946
947         if (target->state != TARGET_HALTED) {
948                 LOG_WARNING("target %s not halted", target_name(target));
949                 return ERROR_TARGET_NOT_HALTED;
950         }
951
952         retval = dpm->prepare(dpm);
953         if (retval != ERROR_OK)
954                 return retval;
955
956         switch (armv8_curel_from_core_mode(arm->core_mode)) {
957         case SYSTEM_CUREL_EL0:
958                 instr = ARMV8_SYS(SYSTEM_ATS12E0R, 0);
959                 /* can only execute instruction at EL2 */
960                 target_mode = ARMV8_64_EL2H;
961                 break;
962         case SYSTEM_CUREL_EL1:
963                 instr = ARMV8_SYS(SYSTEM_ATS12E1R, 0);
964                 /* can only execute instruction at EL2 */
965                 target_mode = ARMV8_64_EL2H;
966                 break;
967         case SYSTEM_CUREL_EL2:
968                 instr = ARMV8_SYS(SYSTEM_ATS1E2R, 0);
969                 break;
970         case SYSTEM_CUREL_EL3:
971                 instr = ARMV8_SYS(SYSTEM_ATS1E3R, 0);
972                 break;
973
974         default:
975                 break;
976         };
977
978         if (target_mode != ARM_MODE_ANY)
979                 armv8_dpm_modeswitch(dpm, target_mode);
980
981         /* write VA to R0 and execute translation instruction */
982         retval = dpm->instr_write_data_r0_64(dpm, instr, (uint64_t)va);
983         /* read result from PAR_EL1 */
984         if (retval == ERROR_OK)
985                 retval = dpm->instr_read_data_r0_64(dpm, ARMV8_MRS(SYSTEM_PAR_EL1, 0), &par);
986
987         /* switch back to saved PE mode */
988         if (target_mode != ARM_MODE_ANY)
989                 armv8_dpm_modeswitch(dpm, ARM_MODE_ANY);
990
991         dpm->finish(dpm);
992
993         if (retval != ERROR_OK)
994                 return retval;
995
996         if (par & 1) {
997                 LOG_ERROR("Address translation failed at stage %i, FST=%x, PTW=%i",
998                                 ((int)(par >> 9) & 1)+1, (int)(par >> 1) & 0x3f, (int)(par >> 8) & 1);
999
1000                 *val = 0;
1001                 retval = ERROR_FAIL;
1002         } else {
1003                 *val = (par & 0xFFFFFFFFF000UL) | (va & 0xFFF);
1004                 if (meminfo) {
1005                         int SH = (par >> 7) & 3;
1006                         int NS = (par >> 9) & 1;
1007                         int ATTR = (par >> 56) & 0xFF;
1008
1009                         char *memtype = (ATTR & 0xF0) == 0 ? "Device Memory" : "Normal Memory";
1010
1011                         LOG_USER("%sshareable, %s",
1012                                         shared_name[SH], secure_name[NS]);
1013                         LOG_USER("%s", memtype);
1014                 }
1015         }
1016
1017         return retval;
1018 }
1019
1020 COMMAND_HANDLER(armv8_handle_exception_catch_command)
1021 {
1022         struct target *target = get_current_target(CMD_CTX);
1023         struct armv8_common *armv8 = target_to_armv8(target);
1024         uint32_t edeccr = 0;
1025         unsigned int argp = 0;
1026         int retval;
1027
1028         static const struct jim_nvp nvp_ecatch_modes[] = {
1029                 { .name = "off",       .value = 0 },
1030                 { .name = "nsec_el1",  .value = (1 << 5) },
1031                 { .name = "nsec_el2",  .value = (2 << 5) },
1032                 { .name = "nsec_el12", .value = (3 << 5) },
1033                 { .name = "sec_el1",   .value = (1 << 1) },
1034                 { .name = "sec_el3",   .value = (4 << 1) },
1035                 { .name = "sec_el13",  .value = (5 << 1) },
1036                 { .name = NULL, .value = -1 },
1037         };
1038         const struct jim_nvp *n;
1039
1040         if (CMD_ARGC == 0) {
1041                 const char *sec = NULL, *nsec = NULL;
1042
1043                 retval = mem_ap_read_atomic_u32(armv8->debug_ap,
1044                                         armv8->debug_base + CPUV8_DBG_ECCR, &edeccr);
1045                 if (retval != ERROR_OK)
1046                         return retval;
1047
1048                 n = jim_nvp_value2name_simple(nvp_ecatch_modes, edeccr & 0x0f);
1049                 if (n->name)
1050                         sec = n->name;
1051
1052                 n = jim_nvp_value2name_simple(nvp_ecatch_modes, edeccr & 0xf0);
1053                 if (n->name)
1054                         nsec = n->name;
1055
1056                 if (!sec || !nsec) {
1057                         LOG_WARNING("Exception Catch: unknown exception catch configuration: EDECCR = %02" PRIx32, edeccr & 0xff);
1058                         return ERROR_FAIL;
1059                 }
1060
1061                 command_print(CMD, "Exception Catch: Secure: %s, Non-Secure: %s", sec, nsec);
1062                 return ERROR_OK;
1063         }
1064
1065         while (argp < CMD_ARGC) {
1066                 n = jim_nvp_name2value_simple(nvp_ecatch_modes, CMD_ARGV[argp]);
1067                 if (!n->name) {
1068                         LOG_ERROR("Unknown option: %s", CMD_ARGV[argp]);
1069                         return ERROR_FAIL;
1070                 }
1071
1072                 LOG_DEBUG("found: %s", n->name);
1073
1074                 edeccr |= n->value;
1075                 argp++;
1076         }
1077
1078         retval = mem_ap_write_atomic_u32(armv8->debug_ap,
1079                                 armv8->debug_base + CPUV8_DBG_ECCR, edeccr);
1080         if (retval != ERROR_OK)
1081                 return retval;
1082
1083         return ERROR_OK;
1084 }
1085
1086 int armv8_handle_cache_info_command(struct command_invocation *cmd,
1087         struct armv8_cache_common *armv8_cache)
1088 {
1089         if (armv8_cache->info == -1) {
1090                 command_print(cmd, "cache not yet identified");
1091                 return ERROR_OK;
1092         }
1093
1094         if (armv8_cache->display_cache_info)
1095                 armv8_cache->display_cache_info(cmd, armv8_cache);
1096         return ERROR_OK;
1097 }
1098
1099 static int armv8_setup_semihosting(struct target *target, int enable)
1100 {
1101         return ERROR_OK;
1102 }
1103
1104 int armv8_init_arch_info(struct target *target, struct armv8_common *armv8)
1105 {
1106         struct arm *arm = &armv8->arm;
1107         arm->arch_info = armv8;
1108         target->arch_info = &armv8->arm;
1109         arm->setup_semihosting = armv8_setup_semihosting;
1110         /*  target is useful in all function arm v4 5 compatible */
1111         armv8->arm.target = target;
1112         armv8->arm.common_magic = ARM_COMMON_MAGIC;
1113         armv8->common_magic = ARMV8_COMMON_MAGIC;
1114
1115         armv8->armv8_mmu.armv8_cache.l2_cache = NULL;
1116         armv8->armv8_mmu.armv8_cache.info = -1;
1117         armv8->armv8_mmu.armv8_cache.flush_all_data_cache = NULL;
1118         armv8->armv8_mmu.armv8_cache.display_cache_info = NULL;
1119         return ERROR_OK;
1120 }
1121
1122 static int armv8_aarch64_state(struct target *target)
1123 {
1124         struct arm *arm = target_to_arm(target);
1125
1126         if (arm->common_magic != ARM_COMMON_MAGIC) {
1127                 LOG_ERROR("BUG: called for a non-ARM target");
1128                 return ERROR_FAIL;
1129         }
1130
1131         LOG_USER("%s halted in %s state due to %s, current mode: %s\n"
1132                 "cpsr: 0x%8.8" PRIx32 " pc: 0x%" PRIx64 "%s",
1133                 target_name(target),
1134                 armv8_state_strings[arm->core_state],
1135                 debug_reason_name(target),
1136                 armv8_mode_name(arm->core_mode),
1137                 buf_get_u32(arm->cpsr->value, 0, 32),
1138                 buf_get_u64(arm->pc->value, 0, 64),
1139                 (target->semihosting && target->semihosting->is_active) ? ", semihosting" : "");
1140
1141         return ERROR_OK;
1142 }
1143
1144 int armv8_arch_state(struct target *target)
1145 {
1146         static const char * const state[] = {
1147                 "disabled", "enabled"
1148         };
1149
1150         struct armv8_common *armv8 = target_to_armv8(target);
1151         struct arm *arm = &armv8->arm;
1152
1153         if (armv8->common_magic != ARMV8_COMMON_MAGIC) {
1154                 LOG_ERROR("BUG: called for a non-Armv8 target");
1155                 return ERROR_COMMAND_SYNTAX_ERROR;
1156         }
1157
1158         if (arm->core_state == ARM_STATE_AARCH64)
1159                 armv8_aarch64_state(target);
1160         else
1161                 arm_arch_state(target);
1162
1163         LOG_USER("MMU: %s, D-Cache: %s, I-Cache: %s",
1164                 state[armv8->armv8_mmu.mmu_enabled],
1165                 state[armv8->armv8_mmu.armv8_cache.d_u_cache_enabled],
1166                 state[armv8->armv8_mmu.armv8_cache.i_cache_enabled]);
1167
1168         if (arm->core_mode == ARM_MODE_ABT)
1169                 armv8_show_fault_registers(target);
1170
1171         if (target->debug_reason == DBG_REASON_WATCHPOINT)
1172                 LOG_USER("Watchpoint triggered at " TARGET_ADDR_FMT, armv8->dpm.wp_addr);
1173
1174         return ERROR_OK;
1175 }
1176
1177 static struct reg_data_type aarch64_vector_base_types[] = {
1178         {REG_TYPE_IEEE_DOUBLE, "ieee_double", 0, {NULL} },
1179         {REG_TYPE_UINT64, "uint64", 0, {NULL} },
1180         {REG_TYPE_INT64, "int64", 0, {NULL} },
1181         {REG_TYPE_IEEE_SINGLE, "ieee_single", 0, {NULL} },
1182         {REG_TYPE_UINT32, "uint32", 0, {NULL} },
1183         {REG_TYPE_INT32, "int32", 0, {NULL} },
1184         {REG_TYPE_UINT16, "uint16", 0, {NULL} },
1185         {REG_TYPE_INT16, "int16", 0, {NULL} },
1186         {REG_TYPE_UINT8, "uint8", 0, {NULL} },
1187         {REG_TYPE_INT8, "int8", 0, {NULL} },
1188         {REG_TYPE_UINT128, "uint128", 0, {NULL} },
1189         {REG_TYPE_INT128, "int128", 0, {NULL} }
1190 };
1191
1192 static struct reg_data_type_vector aarch64_vector_types[] = {
1193         {aarch64_vector_base_types + 0, 2},
1194         {aarch64_vector_base_types + 1, 2},
1195         {aarch64_vector_base_types + 2, 2},
1196         {aarch64_vector_base_types + 3, 4},
1197         {aarch64_vector_base_types + 4, 4},
1198         {aarch64_vector_base_types + 5, 4},
1199         {aarch64_vector_base_types + 6, 8},
1200         {aarch64_vector_base_types + 7, 8},
1201         {aarch64_vector_base_types + 8, 16},
1202         {aarch64_vector_base_types + 9, 16},
1203         {aarch64_vector_base_types + 10, 01},
1204         {aarch64_vector_base_types + 11, 01},
1205 };
1206
1207 static struct reg_data_type aarch64_fpu_vector[] = {
1208         {REG_TYPE_ARCH_DEFINED, "v2d",  REG_TYPE_CLASS_VECTOR, {aarch64_vector_types + 0} },
1209         {REG_TYPE_ARCH_DEFINED, "v2u",  REG_TYPE_CLASS_VECTOR, {aarch64_vector_types + 1} },
1210         {REG_TYPE_ARCH_DEFINED, "v2i",  REG_TYPE_CLASS_VECTOR, {aarch64_vector_types + 2} },
1211         {REG_TYPE_ARCH_DEFINED, "v4f",  REG_TYPE_CLASS_VECTOR, {aarch64_vector_types + 3} },
1212         {REG_TYPE_ARCH_DEFINED, "v4u",  REG_TYPE_CLASS_VECTOR, {aarch64_vector_types + 4} },
1213         {REG_TYPE_ARCH_DEFINED, "v4i",  REG_TYPE_CLASS_VECTOR, {aarch64_vector_types + 5} },
1214         {REG_TYPE_ARCH_DEFINED, "v8u",  REG_TYPE_CLASS_VECTOR, {aarch64_vector_types + 6} },
1215         {REG_TYPE_ARCH_DEFINED, "v8i",  REG_TYPE_CLASS_VECTOR, {aarch64_vector_types + 7} },
1216         {REG_TYPE_ARCH_DEFINED, "v16u", REG_TYPE_CLASS_VECTOR, {aarch64_vector_types + 8} },
1217         {REG_TYPE_ARCH_DEFINED, "v16i", REG_TYPE_CLASS_VECTOR, {aarch64_vector_types + 9} },
1218         {REG_TYPE_ARCH_DEFINED, "v1u",  REG_TYPE_CLASS_VECTOR, {aarch64_vector_types + 10} },
1219         {REG_TYPE_ARCH_DEFINED, "v1i",  REG_TYPE_CLASS_VECTOR, {aarch64_vector_types + 11} },
1220 };
1221
1222 static struct reg_data_type_union_field aarch64_union_fields_vnd[] = {
1223         {"f", aarch64_fpu_vector + 0, aarch64_union_fields_vnd + 1},
1224         {"u", aarch64_fpu_vector + 1, aarch64_union_fields_vnd + 2},
1225         {"s", aarch64_fpu_vector + 2, NULL},
1226 };
1227
1228 static struct reg_data_type_union_field aarch64_union_fields_vns[] = {
1229         {"f", aarch64_fpu_vector + 3, aarch64_union_fields_vns + 1},
1230         {"u", aarch64_fpu_vector + 4, aarch64_union_fields_vns + 2},
1231         {"s", aarch64_fpu_vector + 5, NULL},
1232 };
1233
1234 static struct reg_data_type_union_field aarch64_union_fields_vnh[] = {
1235         {"u", aarch64_fpu_vector + 6, aarch64_union_fields_vnh + 1},
1236         {"s", aarch64_fpu_vector + 7, NULL},
1237 };
1238
1239 static struct reg_data_type_union_field aarch64_union_fields_vnb[] = {
1240         {"u", aarch64_fpu_vector + 8, aarch64_union_fields_vnb + 1},
1241         {"s", aarch64_fpu_vector + 9, NULL},
1242 };
1243
1244 static struct reg_data_type_union_field aarch64_union_fields_vnq[] = {
1245         {"u", aarch64_fpu_vector + 10, aarch64_union_fields_vnq + 1},
1246         {"s", aarch64_fpu_vector + 11, NULL},
1247 };
1248
1249 static struct reg_data_type_union aarch64_union_types[] = {
1250         {aarch64_union_fields_vnd},
1251         {aarch64_union_fields_vns},
1252         {aarch64_union_fields_vnh},
1253         {aarch64_union_fields_vnb},
1254         {aarch64_union_fields_vnq},
1255 };
1256
1257 static struct reg_data_type aarch64_fpu_union[] = {
1258         {REG_TYPE_ARCH_DEFINED, "vnd", REG_TYPE_CLASS_UNION, {.reg_type_union = aarch64_union_types + 0} },
1259         {REG_TYPE_ARCH_DEFINED, "vns", REG_TYPE_CLASS_UNION, {.reg_type_union = aarch64_union_types + 1} },
1260         {REG_TYPE_ARCH_DEFINED, "vnh", REG_TYPE_CLASS_UNION, {.reg_type_union = aarch64_union_types + 2} },
1261         {REG_TYPE_ARCH_DEFINED, "vnb", REG_TYPE_CLASS_UNION, {.reg_type_union = aarch64_union_types + 3} },
1262         {REG_TYPE_ARCH_DEFINED, "vnq", REG_TYPE_CLASS_UNION, {.reg_type_union = aarch64_union_types + 4} },
1263 };
1264
1265 static struct reg_data_type_union_field aarch64v_union_fields[] = {
1266         {"d", aarch64_fpu_union + 0, aarch64v_union_fields + 1},
1267         {"s", aarch64_fpu_union + 1, aarch64v_union_fields + 2},
1268         {"h", aarch64_fpu_union + 2, aarch64v_union_fields + 3},
1269         {"b", aarch64_fpu_union + 3, aarch64v_union_fields + 4},
1270         {"q", aarch64_fpu_union + 4, NULL},
1271 };
1272
1273 static struct reg_data_type_union aarch64v_union[] = {
1274         {aarch64v_union_fields}
1275 };
1276
1277 static struct reg_data_type aarch64v[] = {
1278         {REG_TYPE_ARCH_DEFINED, "aarch64v", REG_TYPE_CLASS_UNION,
1279                 {.reg_type_union = aarch64v_union} },
1280 };
1281
1282 static struct reg_data_type_bitfield aarch64_cpsr_bits[] = {
1283         {  0,  0, REG_TYPE_UINT8 },
1284         {  2,  3, REG_TYPE_UINT8 },
1285         {  4,  4, REG_TYPE_UINT8 },
1286         {  6,  6, REG_TYPE_BOOL },
1287         {  7,  7, REG_TYPE_BOOL },
1288         {  8,  8, REG_TYPE_BOOL },
1289         {  9,  9, REG_TYPE_BOOL },
1290         { 20, 20, REG_TYPE_BOOL },
1291         { 21, 21, REG_TYPE_BOOL },
1292         { 28, 28, REG_TYPE_BOOL },
1293         { 29, 29, REG_TYPE_BOOL },
1294         { 30, 30, REG_TYPE_BOOL },
1295         { 31, 31, REG_TYPE_BOOL },
1296 };
1297
1298 static struct reg_data_type_flags_field aarch64_cpsr_fields[] = {
1299         { "SP",  aarch64_cpsr_bits + 0,  aarch64_cpsr_fields + 1 },
1300         { "EL",  aarch64_cpsr_bits + 1,  aarch64_cpsr_fields + 2 },
1301         { "nRW", aarch64_cpsr_bits + 2,  aarch64_cpsr_fields + 3 },
1302         { "F",   aarch64_cpsr_bits + 3,  aarch64_cpsr_fields + 4 },
1303         { "I",   aarch64_cpsr_bits + 4,  aarch64_cpsr_fields + 5 },
1304         { "A",   aarch64_cpsr_bits + 5,  aarch64_cpsr_fields + 6 },
1305         { "D",   aarch64_cpsr_bits + 6,  aarch64_cpsr_fields + 7 },
1306         { "IL",  aarch64_cpsr_bits + 7,  aarch64_cpsr_fields + 8 },
1307         { "SS",  aarch64_cpsr_bits + 8,  aarch64_cpsr_fields + 9 },
1308         { "V",   aarch64_cpsr_bits + 9,  aarch64_cpsr_fields + 10 },
1309         { "C",   aarch64_cpsr_bits + 10, aarch64_cpsr_fields + 11 },
1310         { "Z",   aarch64_cpsr_bits + 11, aarch64_cpsr_fields + 12 },
1311         { "N",   aarch64_cpsr_bits + 12, NULL }
1312 };
1313
1314 static struct reg_data_type_flags aarch64_cpsr_flags[] = {
1315         { 4, aarch64_cpsr_fields }
1316 };
1317
1318 static struct reg_data_type aarch64_flags_cpsr[] = {
1319         {REG_TYPE_ARCH_DEFINED, "cpsr_flags", REG_TYPE_CLASS_FLAGS,
1320                 {.reg_type_flags = aarch64_cpsr_flags} },
1321 };
1322
1323 static const struct {
1324         unsigned id;
1325         const char *name;
1326         unsigned bits;
1327         enum arm_mode mode;
1328         enum reg_type type;
1329         const char *group;
1330         const char *feature;
1331         struct reg_data_type *data_type;
1332 } armv8_regs[] = {
1333         { ARMV8_R0,  "x0",  64, ARM_MODE_ANY, REG_TYPE_UINT64, "general", "org.gnu.gdb.aarch64.core", NULL},
1334         { ARMV8_R1,  "x1",  64, ARM_MODE_ANY, REG_TYPE_UINT64, "general", "org.gnu.gdb.aarch64.core", NULL},
1335         { ARMV8_R2,  "x2",  64, ARM_MODE_ANY, REG_TYPE_UINT64, "general", "org.gnu.gdb.aarch64.core", NULL},
1336         { ARMV8_R3,  "x3",  64, ARM_MODE_ANY, REG_TYPE_UINT64, "general", "org.gnu.gdb.aarch64.core", NULL},
1337         { ARMV8_R4,  "x4",  64, ARM_MODE_ANY, REG_TYPE_UINT64, "general", "org.gnu.gdb.aarch64.core", NULL},
1338         { ARMV8_R5,  "x5",  64, ARM_MODE_ANY, REG_TYPE_UINT64, "general", "org.gnu.gdb.aarch64.core", NULL},
1339         { ARMV8_R6,  "x6",  64, ARM_MODE_ANY, REG_TYPE_UINT64, "general", "org.gnu.gdb.aarch64.core", NULL},
1340         { ARMV8_R7,  "x7",  64, ARM_MODE_ANY, REG_TYPE_UINT64, "general", "org.gnu.gdb.aarch64.core", NULL},
1341         { ARMV8_R8,  "x8",  64, ARM_MODE_ANY, REG_TYPE_UINT64, "general", "org.gnu.gdb.aarch64.core", NULL},
1342         { ARMV8_R9,  "x9",  64, ARM_MODE_ANY, REG_TYPE_UINT64, "general", "org.gnu.gdb.aarch64.core", NULL},
1343         { ARMV8_R10, "x10", 64, ARM_MODE_ANY, REG_TYPE_UINT64, "general", "org.gnu.gdb.aarch64.core", NULL},
1344         { ARMV8_R11, "x11", 64, ARM_MODE_ANY, REG_TYPE_UINT64, "general", "org.gnu.gdb.aarch64.core", NULL},
1345         { ARMV8_R12, "x12", 64, ARM_MODE_ANY, REG_TYPE_UINT64, "general", "org.gnu.gdb.aarch64.core", NULL},
1346         { ARMV8_R13, "x13", 64, ARM_MODE_ANY, REG_TYPE_UINT64, "general", "org.gnu.gdb.aarch64.core", NULL},
1347         { ARMV8_R14, "x14", 64, ARM_MODE_ANY, REG_TYPE_UINT64, "general", "org.gnu.gdb.aarch64.core", NULL},
1348         { ARMV8_R15, "x15", 64, ARM_MODE_ANY, REG_TYPE_UINT64, "general", "org.gnu.gdb.aarch64.core", NULL},
1349         { ARMV8_R16, "x16", 64, ARM_MODE_ANY, REG_TYPE_UINT64, "general", "org.gnu.gdb.aarch64.core", NULL},
1350         { ARMV8_R17, "x17", 64, ARM_MODE_ANY, REG_TYPE_UINT64, "general", "org.gnu.gdb.aarch64.core", NULL},
1351         { ARMV8_R18, "x18", 64, ARM_MODE_ANY, REG_TYPE_UINT64, "general", "org.gnu.gdb.aarch64.core", NULL},
1352         { ARMV8_R19, "x19", 64, ARM_MODE_ANY, REG_TYPE_UINT64, "general", "org.gnu.gdb.aarch64.core", NULL},
1353         { ARMV8_R20, "x20", 64, ARM_MODE_ANY, REG_TYPE_UINT64, "general", "org.gnu.gdb.aarch64.core", NULL},
1354         { ARMV8_R21, "x21", 64, ARM_MODE_ANY, REG_TYPE_UINT64, "general", "org.gnu.gdb.aarch64.core", NULL},
1355         { ARMV8_R22, "x22", 64, ARM_MODE_ANY, REG_TYPE_UINT64, "general", "org.gnu.gdb.aarch64.core", NULL},
1356         { ARMV8_R23, "x23", 64, ARM_MODE_ANY, REG_TYPE_UINT64, "general", "org.gnu.gdb.aarch64.core", NULL},
1357         { ARMV8_R24, "x24", 64, ARM_MODE_ANY, REG_TYPE_UINT64, "general", "org.gnu.gdb.aarch64.core", NULL},
1358         { ARMV8_R25, "x25", 64, ARM_MODE_ANY, REG_TYPE_UINT64, "general", "org.gnu.gdb.aarch64.core", NULL},
1359         { ARMV8_R26, "x26", 64, ARM_MODE_ANY, REG_TYPE_UINT64, "general", "org.gnu.gdb.aarch64.core", NULL},
1360         { ARMV8_R27, "x27", 64, ARM_MODE_ANY, REG_TYPE_UINT64, "general", "org.gnu.gdb.aarch64.core", NULL},
1361         { ARMV8_R28, "x28", 64, ARM_MODE_ANY, REG_TYPE_UINT64, "general", "org.gnu.gdb.aarch64.core", NULL},
1362         { ARMV8_R29, "x29", 64, ARM_MODE_ANY, REG_TYPE_UINT64, "general", "org.gnu.gdb.aarch64.core", NULL},
1363         { ARMV8_R30, "x30", 64, ARM_MODE_ANY, REG_TYPE_UINT64, "general", "org.gnu.gdb.aarch64.core", NULL},
1364
1365         { ARMV8_SP, "sp", 64, ARM_MODE_ANY, REG_TYPE_DATA_PTR, "general", "org.gnu.gdb.aarch64.core", NULL},
1366         { ARMV8_PC, "pc", 64, ARM_MODE_ANY, REG_TYPE_CODE_PTR, "general", "org.gnu.gdb.aarch64.core", NULL},
1367         { ARMV8_xPSR, "cpsr", 32, ARM_MODE_ANY, REG_TYPE_ARCH_DEFINED,
1368                 "general", "org.gnu.gdb.aarch64.core", aarch64_flags_cpsr},
1369         { ARMV8_V0,  "v0",  128, ARM_MODE_ANY, REG_TYPE_ARCH_DEFINED, "simdfp", "org.gnu.gdb.aarch64.fpu", aarch64v},
1370         { ARMV8_V1,  "v1",  128, ARM_MODE_ANY, REG_TYPE_ARCH_DEFINED, "simdfp", "org.gnu.gdb.aarch64.fpu", aarch64v},
1371         { ARMV8_V2,  "v2",  128, ARM_MODE_ANY, REG_TYPE_ARCH_DEFINED, "simdfp", "org.gnu.gdb.aarch64.fpu", aarch64v},
1372         { ARMV8_V3,  "v3",  128, ARM_MODE_ANY, REG_TYPE_ARCH_DEFINED, "simdfp", "org.gnu.gdb.aarch64.fpu", aarch64v},
1373         { ARMV8_V4,  "v4",  128, ARM_MODE_ANY, REG_TYPE_ARCH_DEFINED, "simdfp", "org.gnu.gdb.aarch64.fpu", aarch64v},
1374         { ARMV8_V5,  "v5",  128, ARM_MODE_ANY, REG_TYPE_ARCH_DEFINED, "simdfp", "org.gnu.gdb.aarch64.fpu", aarch64v},
1375         { ARMV8_V6,  "v6",  128, ARM_MODE_ANY, REG_TYPE_ARCH_DEFINED, "simdfp", "org.gnu.gdb.aarch64.fpu", aarch64v},
1376         { ARMV8_V7,  "v7",  128, ARM_MODE_ANY, REG_TYPE_ARCH_DEFINED, "simdfp", "org.gnu.gdb.aarch64.fpu", aarch64v},
1377         { ARMV8_V8,  "v8",  128, ARM_MODE_ANY, REG_TYPE_ARCH_DEFINED, "simdfp", "org.gnu.gdb.aarch64.fpu", aarch64v},
1378         { ARMV8_V9,  "v9",  128, ARM_MODE_ANY, REG_TYPE_ARCH_DEFINED, "simdfp", "org.gnu.gdb.aarch64.fpu", aarch64v},
1379         { ARMV8_V10, "v10", 128, ARM_MODE_ANY, REG_TYPE_ARCH_DEFINED, "simdfp", "org.gnu.gdb.aarch64.fpu", aarch64v},
1380         { ARMV8_V11, "v11", 128, ARM_MODE_ANY, REG_TYPE_ARCH_DEFINED, "simdfp", "org.gnu.gdb.aarch64.fpu", aarch64v},
1381         { ARMV8_V12, "v12", 128, ARM_MODE_ANY, REG_TYPE_ARCH_DEFINED, "simdfp", "org.gnu.gdb.aarch64.fpu", aarch64v},
1382         { ARMV8_V13, "v13", 128, ARM_MODE_ANY, REG_TYPE_ARCH_DEFINED, "simdfp", "org.gnu.gdb.aarch64.fpu", aarch64v},
1383         { ARMV8_V14, "v14", 128, ARM_MODE_ANY, REG_TYPE_ARCH_DEFINED, "simdfp", "org.gnu.gdb.aarch64.fpu", aarch64v},
1384         { ARMV8_V15, "v15", 128, ARM_MODE_ANY, REG_TYPE_ARCH_DEFINED, "simdfp", "org.gnu.gdb.aarch64.fpu", aarch64v},
1385         { ARMV8_V16, "v16", 128, ARM_MODE_ANY, REG_TYPE_ARCH_DEFINED, "simdfp", "org.gnu.gdb.aarch64.fpu", aarch64v},
1386         { ARMV8_V17, "v17", 128, ARM_MODE_ANY, REG_TYPE_ARCH_DEFINED, "simdfp", "org.gnu.gdb.aarch64.fpu", aarch64v},
1387         { ARMV8_V18, "v18", 128, ARM_MODE_ANY, REG_TYPE_ARCH_DEFINED, "simdfp", "org.gnu.gdb.aarch64.fpu", aarch64v},
1388         { ARMV8_V19, "v19", 128, ARM_MODE_ANY, REG_TYPE_ARCH_DEFINED, "simdfp", "org.gnu.gdb.aarch64.fpu", aarch64v},
1389         { ARMV8_V20, "v20", 128, ARM_MODE_ANY, REG_TYPE_ARCH_DEFINED, "simdfp", "org.gnu.gdb.aarch64.fpu", aarch64v},
1390         { ARMV8_V21, "v21", 128, ARM_MODE_ANY, REG_TYPE_ARCH_DEFINED, "simdfp", "org.gnu.gdb.aarch64.fpu", aarch64v},
1391         { ARMV8_V22, "v22", 128, ARM_MODE_ANY, REG_TYPE_ARCH_DEFINED, "simdfp", "org.gnu.gdb.aarch64.fpu", aarch64v},
1392         { ARMV8_V23, "v23", 128, ARM_MODE_ANY, REG_TYPE_ARCH_DEFINED, "simdfp", "org.gnu.gdb.aarch64.fpu", aarch64v},
1393         { ARMV8_V24, "v24", 128, ARM_MODE_ANY, REG_TYPE_ARCH_DEFINED, "simdfp", "org.gnu.gdb.aarch64.fpu", aarch64v},
1394         { ARMV8_V25, "v25", 128, ARM_MODE_ANY, REG_TYPE_ARCH_DEFINED, "simdfp", "org.gnu.gdb.aarch64.fpu", aarch64v},
1395         { ARMV8_V26, "v26", 128, ARM_MODE_ANY, REG_TYPE_ARCH_DEFINED, "simdfp", "org.gnu.gdb.aarch64.fpu", aarch64v},
1396         { ARMV8_V27, "v27", 128, ARM_MODE_ANY, REG_TYPE_ARCH_DEFINED, "simdfp", "org.gnu.gdb.aarch64.fpu", aarch64v},
1397         { ARMV8_V28, "v28", 128, ARM_MODE_ANY, REG_TYPE_ARCH_DEFINED, "simdfp", "org.gnu.gdb.aarch64.fpu", aarch64v},
1398         { ARMV8_V29, "v29", 128, ARM_MODE_ANY, REG_TYPE_ARCH_DEFINED, "simdfp", "org.gnu.gdb.aarch64.fpu", aarch64v},
1399         { ARMV8_V30, "v30", 128, ARM_MODE_ANY, REG_TYPE_ARCH_DEFINED, "simdfp", "org.gnu.gdb.aarch64.fpu", aarch64v},
1400         { ARMV8_V31, "v31", 128, ARM_MODE_ANY, REG_TYPE_ARCH_DEFINED, "simdfp", "org.gnu.gdb.aarch64.fpu", aarch64v},
1401         { ARMV8_FPSR, "fpsr", 32, ARM_MODE_ANY, REG_TYPE_UINT32, "simdfp", "org.gnu.gdb.aarch64.fpu", NULL},
1402         { ARMV8_FPCR, "fpcr", 32, ARM_MODE_ANY, REG_TYPE_UINT32, "simdfp", "org.gnu.gdb.aarch64.fpu", NULL},
1403
1404         { ARMV8_ELR_EL1, "ELR_EL1", 64, ARMV8_64_EL1H, REG_TYPE_CODE_PTR, "banked", "net.sourceforge.openocd.banked",
1405                                                                                                                 NULL},
1406         { ARMV8_ESR_EL1, "ESR_EL1", 32, ARMV8_64_EL1H, REG_TYPE_UINT32, "banked", "net.sourceforge.openocd.banked",
1407                                                                                                                 NULL},
1408         { ARMV8_SPSR_EL1, "SPSR_EL1", 32, ARMV8_64_EL1H, REG_TYPE_UINT32, "banked", "net.sourceforge.openocd.banked",
1409                                                                                                                 NULL},
1410
1411         { ARMV8_ELR_EL2, "ELR_EL2", 64, ARMV8_64_EL2H, REG_TYPE_CODE_PTR, "banked", "net.sourceforge.openocd.banked",
1412                                                                                                                 NULL},
1413         { ARMV8_ESR_EL2, "ESR_EL2", 32, ARMV8_64_EL2H, REG_TYPE_UINT32, "banked", "net.sourceforge.openocd.banked",
1414                                                                                                                 NULL},
1415         { ARMV8_SPSR_EL2, "SPSR_EL2", 32, ARMV8_64_EL2H, REG_TYPE_UINT32, "banked", "net.sourceforge.openocd.banked",
1416                                                                                                                 NULL},
1417
1418         { ARMV8_ELR_EL3, "ELR_EL3", 64, ARMV8_64_EL3H, REG_TYPE_CODE_PTR, "banked", "net.sourceforge.openocd.banked",
1419                                                                                                                 NULL},
1420         { ARMV8_ESR_EL3, "ESR_EL3", 32, ARMV8_64_EL3H, REG_TYPE_UINT32, "banked", "net.sourceforge.openocd.banked",
1421                                                                                                                 NULL},
1422         { ARMV8_SPSR_EL3, "SPSR_EL3", 32, ARMV8_64_EL3H, REG_TYPE_UINT32, "banked", "net.sourceforge.openocd.banked",
1423                                                                                                                 NULL},
1424 };
1425
1426 static const struct {
1427         unsigned id;
1428         unsigned mapping;
1429         const char *name;
1430         unsigned bits;
1431         enum arm_mode mode;
1432         enum reg_type type;
1433         const char *group;
1434         const char *feature;
1435 } armv8_regs32[] = {
1436         { ARMV8_R0, 0,  "r0",  32, ARM_MODE_ANY, REG_TYPE_UINT32, "general", "org.gnu.gdb.arm.core" },
1437         { ARMV8_R1, 0,  "r1",  32, ARM_MODE_ANY, REG_TYPE_UINT32, "general", "org.gnu.gdb.arm.core" },
1438         { ARMV8_R2, 0,  "r2",  32, ARM_MODE_ANY, REG_TYPE_UINT32, "general", "org.gnu.gdb.arm.core" },
1439         { ARMV8_R3, 0,  "r3",  32, ARM_MODE_ANY, REG_TYPE_UINT32, "general", "org.gnu.gdb.arm.core" },
1440         { ARMV8_R4, 0,  "r4",  32, ARM_MODE_ANY, REG_TYPE_UINT32, "general", "org.gnu.gdb.arm.core" },
1441         { ARMV8_R5, 0,  "r5",  32, ARM_MODE_ANY, REG_TYPE_UINT32, "general", "org.gnu.gdb.arm.core" },
1442         { ARMV8_R6, 0,  "r6",  32, ARM_MODE_ANY, REG_TYPE_UINT32, "general", "org.gnu.gdb.arm.core" },
1443         { ARMV8_R7, 0,  "r7",  32, ARM_MODE_ANY, REG_TYPE_UINT32, "general", "org.gnu.gdb.arm.core" },
1444         { ARMV8_R8, 0,  "r8",  32, ARM_MODE_ANY, REG_TYPE_UINT32, "general", "org.gnu.gdb.arm.core" },
1445         { ARMV8_R9, 0,  "r9",  32, ARM_MODE_ANY, REG_TYPE_UINT32, "general", "org.gnu.gdb.arm.core" },
1446         { ARMV8_R10, 0, "r10", 32, ARM_MODE_ANY, REG_TYPE_UINT32, "general", "org.gnu.gdb.arm.core" },
1447         { ARMV8_R11, 0, "r11", 32, ARM_MODE_ANY, REG_TYPE_UINT32, "general", "org.gnu.gdb.arm.core" },
1448         { ARMV8_R12, 0, "r12", 32, ARM_MODE_ANY, REG_TYPE_UINT32, "general", "org.gnu.gdb.arm.core" },
1449         { ARMV8_R13, 0, "sp", 32, ARM_MODE_ANY, REG_TYPE_DATA_PTR, "general", "org.gnu.gdb.arm.core" },
1450         { ARMV8_R14, 0, "lr",  32, ARM_MODE_ANY, REG_TYPE_CODE_PTR, "general", "org.gnu.gdb.arm.core" },
1451         { ARMV8_PC, 0, "pc",   32, ARM_MODE_ANY, REG_TYPE_CODE_PTR, "general", "org.gnu.gdb.arm.core" },
1452         { ARMV8_xPSR, 0, "cpsr", 32, ARM_MODE_ANY, REG_TYPE_UINT32, "general", "org.gnu.gdb.arm.core" },
1453         { ARMV8_V0, 0, "d0",  64, ARM_MODE_ANY, REG_TYPE_IEEE_DOUBLE, NULL, "org.gnu.gdb.arm.vfp"},
1454         { ARMV8_V0, 8, "d1",  64, ARM_MODE_ANY, REG_TYPE_IEEE_DOUBLE, NULL, "org.gnu.gdb.arm.vfp"},
1455         { ARMV8_V1, 0, "d2",  64, ARM_MODE_ANY, REG_TYPE_IEEE_DOUBLE, NULL, "org.gnu.gdb.arm.vfp"},
1456         { ARMV8_V1, 8, "d3",  64, ARM_MODE_ANY, REG_TYPE_IEEE_DOUBLE, NULL, "org.gnu.gdb.arm.vfp"},
1457         { ARMV8_V2, 0, "d4",  64, ARM_MODE_ANY, REG_TYPE_IEEE_DOUBLE, NULL, "org.gnu.gdb.arm.vfp"},
1458         { ARMV8_V2, 8, "d5",  64, ARM_MODE_ANY, REG_TYPE_IEEE_DOUBLE, NULL, "org.gnu.gdb.arm.vfp"},
1459         { ARMV8_V3, 0, "d6",  64, ARM_MODE_ANY, REG_TYPE_IEEE_DOUBLE, NULL, "org.gnu.gdb.arm.vfp"},
1460         { ARMV8_V3, 8, "d7",  64, ARM_MODE_ANY, REG_TYPE_IEEE_DOUBLE, NULL, "org.gnu.gdb.arm.vfp"},
1461         { ARMV8_V4, 0, "d8",  64, ARM_MODE_ANY, REG_TYPE_IEEE_DOUBLE, NULL, "org.gnu.gdb.arm.vfp"},
1462         { ARMV8_V4, 8, "d9",  64, ARM_MODE_ANY, REG_TYPE_IEEE_DOUBLE, NULL, "org.gnu.gdb.arm.vfp"},
1463         { ARMV8_V5, 0, "d10", 64, ARM_MODE_ANY, REG_TYPE_IEEE_DOUBLE, NULL, "org.gnu.gdb.arm.vfp"},
1464         { ARMV8_V5, 8, "d11", 64, ARM_MODE_ANY, REG_TYPE_IEEE_DOUBLE, NULL, "org.gnu.gdb.arm.vfp"},
1465         { ARMV8_V6, 0, "d12", 64, ARM_MODE_ANY, REG_TYPE_IEEE_DOUBLE, NULL, "org.gnu.gdb.arm.vfp"},
1466         { ARMV8_V6, 8, "d13", 64, ARM_MODE_ANY, REG_TYPE_IEEE_DOUBLE, NULL, "org.gnu.gdb.arm.vfp"},
1467         { ARMV8_V7, 0, "d14", 64, ARM_MODE_ANY, REG_TYPE_IEEE_DOUBLE, NULL, "org.gnu.gdb.arm.vfp"},
1468         { ARMV8_V7, 8, "d15", 64, ARM_MODE_ANY, REG_TYPE_IEEE_DOUBLE, NULL, "org.gnu.gdb.arm.vfp"},
1469         { ARMV8_V8, 0, "d16", 64, ARM_MODE_ANY, REG_TYPE_IEEE_DOUBLE, NULL, "org.gnu.gdb.arm.vfp"},
1470         { ARMV8_V8, 8, "d17", 64, ARM_MODE_ANY, REG_TYPE_IEEE_DOUBLE, NULL, "org.gnu.gdb.arm.vfp"},
1471         { ARMV8_V9, 0, "d18", 64, ARM_MODE_ANY, REG_TYPE_IEEE_DOUBLE, NULL, "org.gnu.gdb.arm.vfp"},
1472         { ARMV8_V9, 8, "d19", 64, ARM_MODE_ANY, REG_TYPE_IEEE_DOUBLE, NULL, "org.gnu.gdb.arm.vfp"},
1473         { ARMV8_V10, 0, "d20", 64, ARM_MODE_ANY, REG_TYPE_IEEE_DOUBLE, NULL, "org.gnu.gdb.arm.vfp"},
1474         { ARMV8_V10, 8, "d21", 64, ARM_MODE_ANY, REG_TYPE_IEEE_DOUBLE, NULL, "org.gnu.gdb.arm.vfp"},
1475         { ARMV8_V11, 0, "d22", 64, ARM_MODE_ANY, REG_TYPE_IEEE_DOUBLE, NULL, "org.gnu.gdb.arm.vfp"},
1476         { ARMV8_V11, 8, "d23", 64, ARM_MODE_ANY, REG_TYPE_IEEE_DOUBLE, NULL, "org.gnu.gdb.arm.vfp"},
1477         { ARMV8_V12, 0, "d24", 64, ARM_MODE_ANY, REG_TYPE_IEEE_DOUBLE, NULL, "org.gnu.gdb.arm.vfp"},
1478         { ARMV8_V12, 8, "d25", 64, ARM_MODE_ANY, REG_TYPE_IEEE_DOUBLE, NULL, "org.gnu.gdb.arm.vfp"},
1479         { ARMV8_V13, 0, "d26", 64, ARM_MODE_ANY, REG_TYPE_IEEE_DOUBLE, NULL, "org.gnu.gdb.arm.vfp"},
1480         { ARMV8_V13, 8, "d27", 64, ARM_MODE_ANY, REG_TYPE_IEEE_DOUBLE, NULL, "org.gnu.gdb.arm.vfp"},
1481         { ARMV8_V14, 0, "d28", 64, ARM_MODE_ANY, REG_TYPE_IEEE_DOUBLE, NULL, "org.gnu.gdb.arm.vfp"},
1482         { ARMV8_V14, 8, "d29", 64, ARM_MODE_ANY, REG_TYPE_IEEE_DOUBLE, NULL, "org.gnu.gdb.arm.vfp"},
1483         { ARMV8_V15, 0, "d30", 64, ARM_MODE_ANY, REG_TYPE_IEEE_DOUBLE, NULL, "org.gnu.gdb.arm.vfp"},
1484         { ARMV8_V15, 8, "d31", 64, ARM_MODE_ANY, REG_TYPE_IEEE_DOUBLE, NULL, "org.gnu.gdb.arm.vfp"},
1485         { ARMV8_FPSR, 0, "fpscr", 32, ARM_MODE_ANY, REG_TYPE_UINT32, "float", "org.gnu.gdb.arm.vfp"},
1486 };
1487
1488 #define ARMV8_NUM_REGS ARRAY_SIZE(armv8_regs)
1489 #define ARMV8_NUM_REGS32 ARRAY_SIZE(armv8_regs32)
1490
1491 static int armv8_get_core_reg(struct reg *reg)
1492 {
1493         struct arm_reg *armv8_reg = reg->arch_info;
1494         struct target *target = armv8_reg->target;
1495         struct arm *arm = target_to_arm(target);
1496
1497         if (target->state != TARGET_HALTED)
1498                 return ERROR_TARGET_NOT_HALTED;
1499
1500         return arm->read_core_reg(target, reg, armv8_reg->num, arm->core_mode);
1501 }
1502
1503 static int armv8_set_core_reg(struct reg *reg, uint8_t *buf)
1504 {
1505         struct arm_reg *armv8_reg = reg->arch_info;
1506         struct target *target = armv8_reg->target;
1507         struct arm *arm = target_to_arm(target);
1508         uint64_t value = buf_get_u64(buf, 0, reg->size);
1509
1510         if (target->state != TARGET_HALTED)
1511                 return ERROR_TARGET_NOT_HALTED;
1512
1513         if (reg->size <= 64) {
1514                 if (reg == arm->cpsr)
1515                         armv8_set_cpsr(arm, (uint32_t)value);
1516                 else {
1517                         buf_set_u64(reg->value, 0, reg->size, value);
1518                         reg->valid = true;
1519                 }
1520         } else if (reg->size <= 128) {
1521                 uint64_t hvalue = buf_get_u64(buf + 8, 0, reg->size - 64);
1522
1523                 buf_set_u64(reg->value, 0, 64, value);
1524                 buf_set_u64(reg->value + 8, 0, reg->size - 64, hvalue);
1525                 reg->valid = true;
1526         }
1527
1528         reg->dirty = true;
1529
1530         return ERROR_OK;
1531 }
1532
1533 static const struct reg_arch_type armv8_reg_type = {
1534         .get = armv8_get_core_reg,
1535         .set = armv8_set_core_reg,
1536 };
1537
1538 static int armv8_get_core_reg32(struct reg *reg)
1539 {
1540         struct arm_reg *armv8_reg = reg->arch_info;
1541         struct target *target = armv8_reg->target;
1542         struct arm *arm = target_to_arm(target);
1543         struct reg_cache *cache = arm->core_cache;
1544         struct reg *reg64;
1545         int retval;
1546
1547         if (target->state != TARGET_HALTED)
1548                 return ERROR_TARGET_NOT_HALTED;
1549
1550         /* get the corresponding Aarch64 register */
1551         reg64 = cache->reg_list + armv8_reg->num;
1552         if (reg64->valid) {
1553                 reg->valid = true;
1554                 return ERROR_OK;
1555         }
1556
1557         retval = arm->read_core_reg(target, reg64, armv8_reg->num, arm->core_mode);
1558         if (retval == ERROR_OK)
1559                 reg->valid = reg64->valid;
1560
1561         return retval;
1562 }
1563
1564 static int armv8_set_core_reg32(struct reg *reg, uint8_t *buf)
1565 {
1566         struct arm_reg *armv8_reg = reg->arch_info;
1567         struct target *target = armv8_reg->target;
1568         struct arm *arm = target_to_arm(target);
1569         struct reg_cache *cache = arm->core_cache;
1570         struct reg *reg64 = cache->reg_list + armv8_reg->num;
1571         uint32_t value = buf_get_u32(buf, 0, 32);
1572
1573         if (target->state != TARGET_HALTED)
1574                 return ERROR_TARGET_NOT_HALTED;
1575
1576         if (reg64 == arm->cpsr) {
1577                 armv8_set_cpsr(arm, value);
1578         } else {
1579                 if (reg->size <= 32)
1580                         buf_set_u32(reg->value, 0, 32, value);
1581                 else if (reg->size <= 64) {
1582                         uint64_t value64 = buf_get_u64(buf, 0, 64);
1583                         buf_set_u64(reg->value, 0, 64, value64);
1584                 }
1585                 reg->valid = true;
1586                 reg64->valid = true;
1587         }
1588
1589         reg64->dirty = true;
1590
1591         return ERROR_OK;
1592 }
1593
1594 static const struct reg_arch_type armv8_reg32_type = {
1595         .get = armv8_get_core_reg32,
1596         .set = armv8_set_core_reg32,
1597 };
1598
1599 /** Builds cache of architecturally defined registers.  */
1600 struct reg_cache *armv8_build_reg_cache(struct target *target)
1601 {
1602         struct armv8_common *armv8 = target_to_armv8(target);
1603         struct arm *arm = &armv8->arm;
1604         int num_regs = ARMV8_NUM_REGS;
1605         int num_regs32 = ARMV8_NUM_REGS32;
1606         struct reg_cache **cache_p = register_get_last_cache_p(&target->reg_cache);
1607         struct reg_cache *cache = malloc(sizeof(struct reg_cache));
1608         struct reg_cache *cache32 = malloc(sizeof(struct reg_cache));
1609         struct reg *reg_list = calloc(num_regs, sizeof(struct reg));
1610         struct reg *reg_list32 = calloc(num_regs32, sizeof(struct reg));
1611         struct arm_reg *arch_info = calloc(num_regs, sizeof(struct arm_reg));
1612         struct reg_feature *feature;
1613         int i;
1614
1615         /* Build the process context cache */
1616         cache->name = "Aarch64 registers";
1617         cache->next = cache32;
1618         cache->reg_list = reg_list;
1619         cache->num_regs = num_regs;
1620
1621         for (i = 0; i < num_regs; i++) {
1622                 arch_info[i].num = armv8_regs[i].id;
1623                 arch_info[i].mode = armv8_regs[i].mode;
1624                 arch_info[i].target = target;
1625                 arch_info[i].arm = arm;
1626
1627                 reg_list[i].name = armv8_regs[i].name;
1628                 reg_list[i].size = armv8_regs[i].bits;
1629                 reg_list[i].value = &arch_info[i].value[0];
1630                 reg_list[i].type = &armv8_reg_type;
1631                 reg_list[i].arch_info = &arch_info[i];
1632
1633                 reg_list[i].group = armv8_regs[i].group;
1634                 reg_list[i].number = i;
1635                 reg_list[i].exist = true;
1636                 reg_list[i].caller_save = true; /* gdb defaults to true */
1637
1638                 feature = calloc(1, sizeof(struct reg_feature));
1639                 if (feature) {
1640                         feature->name = armv8_regs[i].feature;
1641                         reg_list[i].feature = feature;
1642                 } else
1643                         LOG_ERROR("unable to allocate feature list");
1644
1645                 reg_list[i].reg_data_type = calloc(1, sizeof(struct reg_data_type));
1646                 if (reg_list[i].reg_data_type) {
1647                         if (!armv8_regs[i].data_type)
1648                                 reg_list[i].reg_data_type->type = armv8_regs[i].type;
1649                         else
1650                                 *reg_list[i].reg_data_type = *armv8_regs[i].data_type;
1651                 } else
1652                         LOG_ERROR("unable to allocate reg type list");
1653         }
1654
1655         arm->cpsr = reg_list + ARMV8_xPSR;
1656         arm->pc = reg_list + ARMV8_PC;
1657         arm->core_cache = cache;
1658
1659         /* shadow cache for ARM mode registers */
1660         cache32->name = "Aarch32 registers";
1661         cache32->next = NULL;
1662         cache32->reg_list = reg_list32;
1663         cache32->num_regs = num_regs32;
1664
1665         for (i = 0; i < num_regs32; i++) {
1666                 reg_list32[i].name = armv8_regs32[i].name;
1667                 reg_list32[i].size = armv8_regs32[i].bits;
1668                 reg_list32[i].value = &arch_info[armv8_regs32[i].id].value[armv8_regs32[i].mapping];
1669                 reg_list32[i].type = &armv8_reg32_type;
1670                 reg_list32[i].arch_info = &arch_info[armv8_regs32[i].id];
1671                 reg_list32[i].group = armv8_regs32[i].group;
1672                 reg_list32[i].number = i;
1673                 reg_list32[i].exist = true;
1674                 reg_list32[i].caller_save = true;
1675
1676                 feature = calloc(1, sizeof(struct reg_feature));
1677                 if (feature) {
1678                         feature->name = armv8_regs32[i].feature;
1679                         reg_list32[i].feature = feature;
1680                 } else
1681                         LOG_ERROR("unable to allocate feature list");
1682
1683                 reg_list32[i].reg_data_type = calloc(1, sizeof(struct reg_data_type));
1684                 if (reg_list32[i].reg_data_type)
1685                         reg_list32[i].reg_data_type->type = armv8_regs32[i].type;
1686                 else
1687                         LOG_ERROR("unable to allocate reg type list");
1688         }
1689
1690         (*cache_p) = cache;
1691         return cache;
1692 }
1693
1694 struct reg *armv8_reg_current(struct arm *arm, unsigned regnum)
1695 {
1696         struct reg *r;
1697
1698         if (regnum > (ARMV8_LAST_REG - 1))
1699                 return NULL;
1700
1701         r = arm->core_cache->reg_list + regnum;
1702         return r;
1703 }
1704
1705 static void armv8_free_cache(struct reg_cache *cache, bool regs32)
1706 {
1707         struct reg *reg;
1708         unsigned int i;
1709
1710         if (!cache)
1711                 return;
1712
1713         for (i = 0; i < cache->num_regs; i++) {
1714                 reg = &cache->reg_list[i];
1715
1716                 free(reg->feature);
1717                 free(reg->reg_data_type);
1718         }
1719
1720         if (!regs32)
1721                 free(cache->reg_list[0].arch_info);
1722         free(cache->reg_list);
1723         free(cache);
1724 }
1725
1726 void armv8_free_reg_cache(struct target *target)
1727 {
1728         struct armv8_common *armv8 = target_to_armv8(target);
1729         struct arm *arm = &armv8->arm;
1730         struct reg_cache *cache = NULL, *cache32 = NULL;
1731
1732         cache = arm->core_cache;
1733         if (cache)
1734                 cache32 = cache->next;
1735         armv8_free_cache(cache32, true);
1736         armv8_free_cache(cache, false);
1737         arm->core_cache = NULL;
1738 }
1739
1740 const struct command_registration armv8_command_handlers[] = {
1741         {
1742                 .name = "catch_exc",
1743                 .handler = armv8_handle_exception_catch_command,
1744                 .mode = COMMAND_EXEC,
1745                 .help = "configure exception catch",
1746                 .usage = "[(nsec_el1,nsec_el2,sec_el1,sec_el3)+,off]",
1747         },
1748         COMMAND_REGISTRATION_DONE
1749 };
1750
1751 const char *armv8_get_gdb_arch(struct target *target)
1752 {
1753         struct arm *arm = target_to_arm(target);
1754         return arm->core_state == ARM_STATE_AARCH64 ? "aarch64" : "arm";
1755 }
1756
1757 int armv8_get_gdb_reg_list(struct target *target,
1758         struct reg **reg_list[], int *reg_list_size,
1759         enum target_register_class reg_class)
1760 {
1761         struct arm *arm = target_to_arm(target);
1762         int i;
1763
1764         if (arm->core_state == ARM_STATE_AARCH64) {
1765
1766                 LOG_DEBUG("Creating Aarch64 register list for target %s", target_name(target));
1767
1768                 switch (reg_class) {
1769                 case REG_CLASS_GENERAL:
1770                         *reg_list_size = ARMV8_V0;
1771                         *reg_list = malloc(sizeof(struct reg *) * (*reg_list_size));
1772
1773                         for (i = 0; i < *reg_list_size; i++)
1774                                         (*reg_list)[i] = armv8_reg_current(arm, i);
1775                         return ERROR_OK;
1776
1777                 case REG_CLASS_ALL:
1778                         *reg_list_size = ARMV8_LAST_REG;
1779                         *reg_list = malloc(sizeof(struct reg *) * (*reg_list_size));
1780
1781                         for (i = 0; i < *reg_list_size; i++)
1782                                         (*reg_list)[i] = armv8_reg_current(arm, i);
1783
1784                         return ERROR_OK;
1785
1786                 default:
1787                         LOG_ERROR("not a valid register class type in query.");
1788                         return ERROR_FAIL;
1789                 }
1790         } else {
1791                 struct reg_cache *cache32 = arm->core_cache->next;
1792
1793                 LOG_DEBUG("Creating Aarch32 register list for target %s", target_name(target));
1794
1795                 switch (reg_class) {
1796                 case REG_CLASS_GENERAL:
1797                         *reg_list_size = ARMV8_R14 + 3;
1798                         *reg_list = malloc(sizeof(struct reg *) * (*reg_list_size));
1799
1800                         for (i = 0; i < *reg_list_size; i++)
1801                                 (*reg_list)[i] = cache32->reg_list + i;
1802
1803                         return ERROR_OK;
1804                 case REG_CLASS_ALL:
1805                         *reg_list_size = cache32->num_regs;
1806                         *reg_list = malloc(sizeof(struct reg *) * (*reg_list_size));
1807
1808                         for (i = 0; i < *reg_list_size; i++)
1809                                 (*reg_list)[i] = cache32->reg_list + i;
1810
1811                         return ERROR_OK;
1812                 default:
1813                         LOG_ERROR("not a valid register class type in query.");
1814                         return ERROR_FAIL;
1815                 }
1816         }
1817 }
1818
1819 int armv8_set_dbgreg_bits(struct armv8_common *armv8, unsigned int reg, unsigned long mask, unsigned long value)
1820 {
1821         uint32_t tmp;
1822
1823         /* Read register */
1824         int retval = mem_ap_read_atomic_u32(armv8->debug_ap,
1825                         armv8->debug_base + reg, &tmp);
1826         if (retval != ERROR_OK)
1827                 return retval;
1828
1829         /* clear bitfield */
1830         tmp &= ~mask;
1831         /* put new value */
1832         tmp |= value & mask;
1833
1834         /* write new value */
1835         retval = mem_ap_write_atomic_u32(armv8->debug_ap,
1836                         armv8->debug_base + reg, tmp);
1837         return retval;
1838 }