programs/winedbg/be_sparc.c

   1 /*
   2  * Debugger Sparc specific functions
   3  *
   4  * Copyright 2010 Austin English
   5  *
   6  * This library is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU Lesser General Public
   8  * License as published by the Free Software Foundation; either
   9  * version 2.1 of the License, or (at your option) any later version.
  10  *
  11  * This library is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14  * Lesser General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Lesser General Public
  17  * License along with this library; if not, write to the Free Software
  18  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  19  */
  20
  21 #include "debugger.h"
  22
  23 #if defined(__sparc__)
  24
  25 static unsigned be_sparc_get_addr(HANDLE hThread, const CONTEXT* ctx,
  26                                  enum be_cpu_addr bca, ADDRESS64* addr)
  27 {
  28     switch (bca)
  29     {
  30     case be_cpu_addr_pc:
  31         return be_cpu_build_addr(hThread, ctx, addr, 0, ctx->pc);
  32     case be_cpu_addr_stack:
  33         return be_cpu_build_addr(hThread, ctx, addr, 0, ctx->o6);
  34     case be_cpu_addr_frame:
  35         return be_cpu_build_addr(hThread, ctx, addr, 0, ctx->i6);
  36     }
  37     return FALSE;
  38 }
  39
  40 static unsigned be_sparc_get_register_info(int regno, enum be_cpu_addr* kind)
  41 {
  42     dbg_printf("not done for Sparc\n");
  43     return FALSE;
  44 }
  45
  46 static void be_sparc_single_step(CONTEXT* ctx, unsigned enable)
  47 {
  48     dbg_printf("not done for Sparc\n");
  49 }
  50
  51 static void be_sparc_print_context(HANDLE hThread, const CONTEXT* ctx, int all_regs)
  52 {
  53     dbg_printf("not done for Sparc\n");
  54 }
  55
  56 static void be_sparc_print_segment_info(HANDLE hThread, const CONTEXT* ctx)
  57 {
  58     dbg_printf("not done for Sparc\n");
  59 }
  60
  61 static struct dbg_internal_var be_sparc_ctx[] =
  62 {
  63     {0, NULL, 0, dbg_itype_none}
  64 };
  65
  66 static unsigned be_sparc_is_step_over_insn(const void* insn)
  67 {
  68     dbg_printf("not done for Sparc\n");
  69     return FALSE;
  70 }
  71
  72 static unsigned be_sparc_is_function_return(const void* insn)
  73 {
  74     dbg_printf("not done for Sparc\n");
  75     return FALSE;
  76 }
  77
  78 static unsigned be_sparc_is_break_insn(const void* insn)
  79 {
  80     dbg_printf("not done for Sparc\n");
  81     return FALSE;
  82 }
  83
  84 static unsigned be_sparc_is_func_call(const void* insn, ADDRESS64* callee)
  85 {
  86     return FALSE;
  87 }
  88
  89 static unsigned be_sparc_is_jump(const void* insn, ADDRESS64* jumpee)
  90 {
  91     return FALSE;
  92 }
  93
  94 static void be_sparc_disasm_one_insn(ADDRESS64* addr, int display)
  95 {
  96     dbg_printf("not done for Sparc\n");
  97 }
  98
  99 static unsigned be_sparc_insert_Xpoint(HANDLE hProcess, const struct be_process_io* pio,
 100                                        CONTEXT* ctx, enum be_xpoint_type type,
 101                                        void* addr, unsigned long* val, unsigned size)
 102 {
 103     dbg_printf("not done for Sparc\n");
 104     return 0;
 105 }
 106
 107 static unsigned be_sparc_remove_Xpoint(HANDLE hProcess, const struct be_process_io* pio,
 108                                        CONTEXT* ctx, enum be_xpoint_type type,
 109                                        void* addr, unsigned long val, unsigned size)
 110 {
 111     dbg_printf("not done for Sparc\n");
 112     return FALSE;
 113 }
 114
 115 static unsigned be_sparc_is_watchpoint_set(const CONTEXT* ctx, unsigned idx)
 116 {
 117     dbg_printf("not done for Sparc\n");
 118     return FALSE;
 119 }
 120
 121 static void be_sparc_clear_watchpoint(CONTEXT* ctx, unsigned idx)
 122 {
 123     dbg_printf("not done for Sparc\n");
 124 }
 125
 126 static int be_sparc_adjust_pc_for_break(CONTEXT* ctx, BOOL way)
 127 {
 128     if (way)
 129     {
 130         ctx->pc--;
 131         return -1;
 132     }
 133     ctx->pc++;
 134     return 1;
 135 }
 136
 137 static int be_sparc_fetch_integer(const struct dbg_lvalue* lvalue, unsigned size,
 138                                   unsigned ext_sign, LONGLONG* ret)
 139 {
 140     dbg_printf("not done for Sparc\n");
 141     return FALSE;
 142 }
 143
 144 static int be_sparc_fetch_float(const struct dbg_lvalue* lvalue, unsigned size,
 145                                 long double* ret)
 146 {
 147     dbg_printf("not done for Sparc\n");
 148     return FALSE;
 149 }
 150
 151 static int be_sparc_store_integer(const struct dbg_lvalue* lvalue, unsigned size,
 152                                   unsigned is_signed, LONGLONG val)
 153 {
 154     dbg_printf("be_sparc_store_integer: not done\n");
 155     return FALSE;
 156 }
 157
 158 struct backend_cpu be_sparc =
 159 {
 160     IMAGE_FILE_MACHINE_SPARC,
 161     4,
 162     be_cpu_linearize,
 163     be_cpu_build_addr,
 164     be_sparc_get_addr,
 165     be_sparc_get_register_info,
 166     be_sparc_single_step,
 167     be_sparc_print_context,
 168     be_sparc_print_segment_info,
 169     be_sparc_ctx,
 170     be_sparc_is_step_over_insn,
 171     be_sparc_is_function_return,
 172     be_sparc_is_break_insn,
 173     be_sparc_is_func_call,
 174     be_sparc_is_jump,
 175     be_sparc_disasm_one_insn,
 176     be_sparc_insert_Xpoint,
 177     be_sparc_remove_Xpoint,
 178     be_sparc_is_watchpoint_set,
 179     be_sparc_clear_watchpoint,
 180     be_sparc_adjust_pc_for_break,
 181     be_sparc_fetch_integer,
 182     be_sparc_fetch_float,
 183     be_sparc_store_integer,
 184 };
 185 #endif