 5b50e790f9
			
		
	
	
		5b50e790f9
		
	
	
	
	
		
			
			Completes migration of target-specific code to new target-*/gdbstub.c. Acked-by: Michael Walle <michael@walle.cc> (for lm32) Acked-by: Max Filippov <jcmvbkbc@gmail.com> (for xtensa) Signed-off-by: Andreas Färber <afaerber@suse.de>
		
			
				
	
	
		
			94 lines
		
	
	
		
			2.4 KiB
		
	
	
	
		
			C
		
	
	
	
	
	
			
		
		
	
	
			94 lines
		
	
	
		
			2.4 KiB
		
	
	
	
		
			C
		
	
	
	
	
	
| /*
 | |
|  * Alpha gdb server stub
 | |
|  *
 | |
|  * Copyright (c) 2003-2005 Fabrice Bellard
 | |
|  * Copyright (c) 2013 SUSE LINUX Products GmbH
 | |
|  *
 | |
|  * This library is free software; you can redistribute it and/or
 | |
|  * modify it under the terms of the GNU Lesser General Public
 | |
|  * License as published by the Free Software Foundation; either
 | |
|  * version 2 of the License, or (at your option) any later version.
 | |
|  *
 | |
|  * This library 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
 | |
|  * Lesser General Public License for more details.
 | |
|  *
 | |
|  * You should have received a copy of the GNU Lesser General Public
 | |
|  * License along with this library; if not, see <http://www.gnu.org/licenses/>.
 | |
|  */
 | |
| #include "config.h"
 | |
| #include "qemu-common.h"
 | |
| #include "exec/gdbstub.h"
 | |
| 
 | |
| int alpha_cpu_gdb_read_register(CPUState *cs, uint8_t *mem_buf, int n)
 | |
| {
 | |
|     AlphaCPU *cpu = ALPHA_CPU(cs);
 | |
|     CPUAlphaState *env = &cpu->env;
 | |
|     uint64_t val;
 | |
|     CPU_DoubleU d;
 | |
| 
 | |
|     switch (n) {
 | |
|     case 0 ... 30:
 | |
|         val = env->ir[n];
 | |
|         break;
 | |
|     case 32 ... 62:
 | |
|         d.d = env->fir[n - 32];
 | |
|         val = d.ll;
 | |
|         break;
 | |
|     case 63:
 | |
|         val = cpu_alpha_load_fpcr(env);
 | |
|         break;
 | |
|     case 64:
 | |
|         val = env->pc;
 | |
|         break;
 | |
|     case 66:
 | |
|         val = env->unique;
 | |
|         break;
 | |
|     case 31:
 | |
|     case 65:
 | |
|         /* 31 really is the zero register; 65 is unassigned in the
 | |
|            gdb protocol, but is still required to occupy 8 bytes. */
 | |
|         val = 0;
 | |
|         break;
 | |
|     default:
 | |
|         return 0;
 | |
|     }
 | |
|     return gdb_get_regl(mem_buf, val);
 | |
| }
 | |
| 
 | |
| int alpha_cpu_gdb_write_register(CPUState *cs, uint8_t *mem_buf, int n)
 | |
| {
 | |
|     AlphaCPU *cpu = ALPHA_CPU(cs);
 | |
|     CPUAlphaState *env = &cpu->env;
 | |
|     target_ulong tmp = ldtul_p(mem_buf);
 | |
|     CPU_DoubleU d;
 | |
| 
 | |
|     switch (n) {
 | |
|     case 0 ... 30:
 | |
|         env->ir[n] = tmp;
 | |
|         break;
 | |
|     case 32 ... 62:
 | |
|         d.ll = tmp;
 | |
|         env->fir[n - 32] = d.d;
 | |
|         break;
 | |
|     case 63:
 | |
|         cpu_alpha_store_fpcr(env, tmp);
 | |
|         break;
 | |
|     case 64:
 | |
|         env->pc = tmp;
 | |
|         break;
 | |
|     case 66:
 | |
|         env->unique = tmp;
 | |
|         break;
 | |
|     case 31:
 | |
|     case 65:
 | |
|         /* 31 really is the zero register; 65 is unassigned in the
 | |
|            gdb protocol, but is still required to occupy 8 bytes. */
 | |
|         break;
 | |
|     default:
 | |
|         return 0;
 | |
|     }
 | |
|     return 8;
 | |
| }
 |