backends/sh_regs.c

   1 /* Register names and numbers for SH DWARF.
   2    Copyright (C) 2010 Red Hat, Inc.
   3    This file is part of elfutils.
   4    Contributed by Matt Fleming <matt@console-pimps.org>.
   5
   6    This file is free software; you can redistribute it and/or modify
   7    it under the terms of either
   8
   9      * the GNU Lesser General Public License as published by the Free
  10        Software Foundation; either version 3 of the License, or (at
  11        your option) any later version
  12
  13    or
  14
  15      * the GNU General Public License as published by the Free
  16        Software Foundation; either version 2 of the License, or (at
  17        your option) any later version
  18
  19    or both in parallel, as here.
  20
  21    elfutils is distributed in the hope that it will be useful, but
  22    WITHOUT ANY WARRANTY; without even the implied warranty of
  23    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  24    General Public License for more details.
  25
  26    You should have received copies of the GNU General Public License and
  27    the GNU Lesser General Public License along with this program.  If
  28    not, see <http://www.gnu.org/licenses/>.  */
  29
  30 #ifdef HAVE_CONFIG_H
  31 # include <config.h>
  32 #endif
  33
  34 #include <assert.h>
  35 #include <dwarf.h>
  36 #include <string.h>
  37
  38 #define BACKEND sh_
  39 #include "libebl_CPU.h"
  40
  41 ssize_t
  42 sh_register_info (Ebl *ebl __attribute__ ((unused)),
  43                   int regno, char *name, size_t namelen,
  44                   const char **prefix, const char **setname,
  45                   int *bits, int *type)
  46 {
  47   if (name == NULL)
  48     return 104;
  49
  50   if (regno < 0 || regno > 103 || namelen < 6)
  51     return -1;
  52
  53   *prefix = NULL;
  54   *bits = 32;
  55   *type = DW_ATE_signed;
  56
  57   switch (regno)
  58     {
  59     case 0 ... 9:
  60       *setname = "integer";
  61       name[0] = 'r';
  62       name[1] = regno + '0';
  63       namelen = 2;
  64       break;
  65
  66     case 10 ... 15:
  67       *setname = "integer";
  68       name[0] = 'r';
  69       name[1] = '1';
  70       name[2] = regno - 10 + '0';
  71       namelen = 3;
  72       break;
  73
  74     case 16:
  75       *setname = "system";
  76       *type = DW_ATE_address;
  77       name[0] = 'p';
  78       name[1] = 'c';
  79       namelen = 2;
  80       break;
  81
  82     case 17:
  83       *setname = "system";
  84       *type = DW_ATE_address;
  85       name[0] = 'p';
  86       name[1] = 'r';
  87       namelen = 2;
  88       break;
  89
  90     case 18:
  91       *setname = "control";
  92       *type = DW_ATE_unsigned;
  93       name[0] = 's';
  94       name[1] = 'r';
  95       namelen = 2;
  96       break;
  97
  98     case 19:
  99       *setname = "control";
 100       *type = DW_ATE_unsigned;
 101       name[0] = 'g';
 102       name[1] = 'b';
 103       name[2] = 'r';
 104       namelen = 3;
 105       break;
 106
 107     case 20:
 108       *setname = "system";
 109       name[0] = 'm';
 110       name[1] = 'a';
 111       name[2] = 'c';
 112       name[3] = 'h';
 113       namelen = 4;
 114       break;
 115
 116     case 21:
 117       *setname = "system";
 118       name[0] = 'm';
 119       name[1] = 'a';
 120       name[2] = 'c';
 121       name[3] = 'l';
 122       namelen = 4;
 123
 124       break;
 125
 126     case 23:
 127       *setname = "system";
 128       *type = DW_ATE_unsigned;
 129       name[0] = 'f';
 130       name[1] = 'p';
 131       name[2] = 'u';
 132       name[3] = 'l';
 133       namelen = 4;
 134       break;
 135
 136     case 24:
 137       *setname = "system";
 138       *type = DW_ATE_unsigned;
 139       name[0] = 'f';
 140       name[1] = 'p';
 141       name[2] = 's';
 142       name[3] = 'c';
 143       name[4] = 'r';
 144       namelen = 5;
 145       break;
 146
 147     case 25 ... 34:
 148       *setname = "fpu";
 149       *type = DW_ATE_float;
 150       name[0] = 'f';
 151       name[1] = 'r';
 152       name[2] = regno - 25 + '0';
 153       namelen = 3;
 154       break;
 155
 156     case 35 ... 40:
 157       *setname = "fpu";
 158       *type = DW_ATE_float;
 159       name[0] = 'f';
 160       name[1] = 'r';
 161       name[2] = '1';
 162       name[3] = regno - 35 + '0';
 163       namelen = 4;
 164       break;
 165
 166     case 87 ... 96:
 167       *type = DW_ATE_float;
 168       *setname = "fpu";
 169       name[0] = 'x';
 170       name[1] = 'f';
 171       name[2] = regno - 87 + '0';
 172       namelen = 3;
 173       break;
 174
 175     case 97 ... 103:
 176       *type = DW_ATE_float;
 177       *setname = "fpu";
 178       name[0] = 'x';
 179       name[1] = 'f';
 180       name[2] = '1';
 181       name[3] = regno - 97 + '0';
 182       namelen = 4;
 183       break;
 184
 185     default:
 186       return 0;
 187     }
 188
 189   name[namelen++] = '\0';
 190   return namelen;
 191 }