backends/x86_64_regs.c

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