summaryrefslogtreecommitdiff
path: root/sim/ppc/registers.c
diff options
context:
space:
mode:
Diffstat (limited to 'sim/ppc/registers.c')
-rw-r--r--sim/ppc/registers.c169
1 files changed, 169 insertions, 0 deletions
diff --git a/sim/ppc/registers.c b/sim/ppc/registers.c
new file mode 100644
index 00000000000..2181cedd94a
--- /dev/null
+++ b/sim/ppc/registers.c
@@ -0,0 +1,169 @@
+/* This file is part of the program psim.
+
+ Copyright (C) 1994-1995, Andrew Cagney <cagney@highland.com.au>
+
+ This program is free software; you can redistribute it and/or modify
+ it under the terms of the GNU General Public License as published by
+ the Free Software Foundation; either version 2 of the License, or
+ (at your option) any later version.
+
+ This program is distributed in the hope that it will be useful,
+ but WITHOUT ANY WARRANTY; without even the implied warranty of
+ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ GNU General Public License for more details.
+
+ You should have received a copy of the GNU General Public License
+ along with this program; if not, write to the Free Software
+ Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+
+ */
+
+
+#ifndef _REGISTERS_C_
+#define _REGISTERS_C_
+
+#include <ctype.h>
+
+#include "basics.h"
+#include "registers.h"
+
+#ifdef HAVE_STDLIB_H
+#include <stdlib.h>
+#endif
+
+#ifdef HAVE_STRING_H
+#include <string.h>
+#else
+#ifdef HAVE_STRINGS_H
+#include <strings.h>
+#endif
+#endif
+
+
+INLINE_REGISTERS\
+(void)
+registers_dump(registers *registers)
+{
+ int i;
+ int j;
+ for (i = 0; i < 8; i++) {
+ printf_filtered("GPR %2d:", i*4);
+ for (j = 0; j < 4; j++) {
+ printf_filtered(" 0x%08lx", (long)registers->gpr[i*4 + j]);
+ }
+ printf_filtered("\n");
+ }
+}
+
+STATIC_INLINE_REGISTERS\
+(sprs)
+find_spr(const char name[])
+{
+ sprs spr;
+ for (spr = 0; spr < nr_of_sprs; spr++)
+ if (spr_is_valid(spr)
+ && !strcmp(name, spr_name(spr))
+ && spr_index(spr) == spr)
+ return spr;
+ return nr_of_sprs;
+}
+
+STATIC_INLINE_REGISTERS\
+(int)
+are_digits(const char *digits)
+{
+ while (isdigit(*digits))
+ digits++;
+ return *digits == '\0';
+}
+
+
+INLINE_REGISTERS\
+(register_descriptions)
+register_description(const char reg[])
+{
+ register_descriptions description;
+
+ /* try for a general-purpose integer or floating point register */
+ if (reg[0] == 'r' && are_digits(reg + 1)) {
+ description.type = reg_gpr;
+ description.index = atoi(reg+1);
+ description.size = sizeof(gpreg);
+ }
+ else if (reg[0] == 'f' && are_digits(reg + 1)) {
+ description.type = reg_fpr;
+ description.index = atoi(reg+1);
+ description.size = sizeof(fpreg);
+ }
+ else if (!strcmp(reg, "pc") || !strcmp(reg, "nia")) {
+ description.type = reg_pc;
+ description.index = 0;
+ description.size = sizeof(unsigned_word);
+ }
+ else if (!strcmp(reg, "sp")) {
+ description.type = reg_gpr;
+ description.index = 1;
+ description.size = sizeof(gpreg);
+ }
+ else if (!strcmp(reg, "toc")) {
+ description.type = reg_gpr;
+ description.index = 2;
+ description.size = sizeof(gpreg);
+ }
+ else if (!strcmp(reg, "cr") || !strcmp(reg, "cnd")) {
+ description.type = reg_cr;
+ description.index = 0;
+ description.size = sizeof(creg); /* FIXME */
+ }
+ else if (!strcmp(reg, "msr") || !strcmp(reg, "ps")) {
+ description.type = reg_msr;
+ description.index = 0;
+ description.size = sizeof(msreg);
+ }
+ else if (!strcmp(reg, "fpscr")) {
+ description.type = reg_fpscr;
+ description.index = 0;
+ description.size = sizeof(fpscreg);
+ }
+ else if (!strncmp(reg, "sr", 2) && are_digits(reg + 2)) {
+ description.type = reg_sr;
+ description.index = atoi(reg+2);
+ description.size = sizeof(sreg);
+ }
+ else if (!strcmp(reg, "cnt")) {
+ description.type = reg_spr;
+ description.index = spr_ctr;
+ description.size = sizeof(spreg);
+ }
+ else if (!strcmp(reg, "insns")) {
+ description.type = reg_insns;
+ description.index = spr_ctr;
+ description.size = sizeof(unsigned_word);
+ }
+ else if (!strcmp(reg, "stalls")) {
+ description.type = reg_stalls;
+ description.index = spr_ctr;
+ description.size = sizeof(unsigned_word);
+ }
+ else if (!strcmp(reg, "cycles")) {
+ description.type = reg_cycles;
+ description.index = spr_ctr;
+ description.size = sizeof(unsigned_word);
+ }
+ else {
+ sprs spr = find_spr(reg);
+ if (spr != nr_of_sprs) {
+ description.type = reg_spr;
+ description.index = spr;
+ description.size = sizeof(spreg);
+ }
+ else {
+ description.type = reg_invalid;
+ description.index = 0;
+ description.size = 0;
+ }
+ }
+ return description;
+}
+
+#endif /* _REGISTERS_C_ */