openocd/src/target/dsp563xx_once.c

125 lines
3.9 KiB
C

/***************************************************************************
* Copyright (C) 2009 by Mathias Kuester *
* mkdorg@users.sourceforge.net *
* *
* 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. *
***************************************************************************/
#ifdef HAVE_CONFIG_H
#include "config.h"
#endif
#include <jim.h>
#include "target.h"
#include "target_type.h"
#include "register.h"
#include "dsp563xx.h"
#include "dsp563xx_once.h"
/** single word instruction */
static int dsp563xx_once_ir_exec(struct jtag_tap *tap, uint8_t instr, uint8_t rw,
uint8_t go, uint8_t ex)
{
dsp563xx_write_dr_u8(tap, 0,
instr | (ex << 5) | (go << 6) | (rw << 7), 8, 0);
dsp563xx_execute_queue();
return ERROR_OK;
}
/** single word instruction */
static int dsp563xx_once_ir_exec_nq(struct jtag_tap *tap, uint8_t instr, uint8_t rw,
uint8_t go, uint8_t ex)
{
dsp563xx_write_dr_u8(tap, 0,
instr | (ex << 5) | (go << 6) | (rw << 7), 8, 0);
return ERROR_OK;
}
/** once read register */
int dsp563xx_once_reg_read(struct jtag_tap *tap, uint8_t reg, uint32_t * data)
{
uint32_t dr_in;
dr_in = 0;
dsp563xx_once_ir_exec(tap, reg, 1, 0, 0);
dsp563xx_write_dr_u32(tap, &dr_in, 0x00, 24, 0);
dsp563xx_execute_queue();
*data = dr_in;
return ERROR_OK;
}
/** once write register */
int dsp563xx_once_reg_write(struct jtag_tap *tap, uint8_t reg, uint32_t data)
{
dsp563xx_once_ir_exec(tap, reg, 0, 0, 0);
dsp563xx_write_dr_u32(tap, 0x00, data, 24, 0);
dsp563xx_execute_queue();
return ERROR_OK;
}
/** single word instruction */
int dsp563xx_once_execute_sw_ir(struct jtag_tap *tap, uint32_t opcode)
{
dsp563xx_once_ir_exec(tap, DSP563XX_ONCE_OPDBR, 0, 1, 0);
dsp563xx_write_dr_u32(tap, 0, opcode, 24, 0);
dsp563xx_execute_queue();
return ERROR_OK;
}
/** double word instruction */
int dsp563xx_once_execute_dw_ir(struct jtag_tap *tap, uint32_t opcode,
uint32_t operand)
{
dsp563xx_once_ir_exec(tap, DSP563XX_ONCE_OPDBR, 0, 0, 0);
dsp563xx_write_dr_u32(tap, 0, opcode, 24, 0);
dsp563xx_execute_queue();
dsp563xx_once_ir_exec(tap, DSP563XX_ONCE_OPDBR, 0, 1, 0);
dsp563xx_write_dr_u32(tap, 0, operand, 24, 0);
dsp563xx_execute_queue();
return ERROR_OK;
}
/** single word instruction */
int dsp563xx_once_execute_sw_ir_nq(struct jtag_tap *tap, uint32_t opcode)
{
dsp563xx_once_ir_exec_nq(tap, DSP563XX_ONCE_OPDBR, 0, 1, 0);
dsp563xx_write_dr_u32(tap, 0, opcode, 24, 0);
return ERROR_OK;
}
/** double word instruction */
int dsp563xx_once_execute_dw_ir_nq(struct jtag_tap *tap, uint32_t opcode,
uint32_t operand)
{
dsp563xx_once_ir_exec_nq(tap, DSP563XX_ONCE_OPDBR, 0, 0, 0);
dsp563xx_write_dr_u32(tap, 0, opcode, 24, 0);
dsp563xx_once_ir_exec_nq(tap, DSP563XX_ONCE_OPDBR, 0, 1, 0);
dsp563xx_write_dr_u32(tap, 0, operand, 24, 0);
return ERROR_OK;
}