fix trig funcs; idle sleep w/ button to wake for debug

pull/3/head
Clyne 4 years ago
parent e132d52adf
commit 1a14ef827e

@ -148,7 +148,7 @@ CPPWARN = -Wall -Wextra -Wundef
# #
# List all user C define here, like -D_DEBUG=1 # List all user C define here, like -D_DEBUG=1
UDEFS = -DCORTEX_ENABLE_WFI_IDLE=FALSE -DPORT_USE_SYSCALL=TRUE UDEFS = -DCORTEX_ENABLE_WFI_IDLE=TRUE -DPORT_USE_SYSCALL=TRUE
# Define ASM defines here # Define ASM defines here
UADEFS = UADEFS =

@ -12,71 +12,79 @@ static void prepare() {
while (CORDIC->CSR & CORDIC_CSR_RRDY) while (CORDIC->CSR & CORDIC_CSR_RRDY)
asm("mov r0, %0" :: "r" (CORDIC->RDATA)); asm("mov r0, %0" :: "r" (CORDIC->RDATA));
} }
static uint32_t dtoq(double in) {
double res = in * 0x7FFFFFFF; static uint32_t dtoq(double) {
int32_t resi = res; uint32_t res;
return resi; asm("vcvt.s32.f64 d0, d0, #31;"
"vmov %0, r5, d0"
: "=r" (res));
return res;
} }
static double qtod(uint32_t in) { __attribute__((naked))
int32_t ini = in; static double qtod(uint32_t) {
double res = ini; asm("eor r1, r1;"
return res / 0x7FFFFFFF; "vmov d0, r0, r1;"
"vcvt.f64.s32 d0, d0, #31;"
"bx lr");
return 0;
} }
__attribute__((naked)) __attribute__((naked))
double mod(double n, double) { double mod(double, double) {
asm("vdiv.f64 d2, d0, d1;" asm("vdiv.f64 d2, d0, d1;"
"vrintz.f64 d2;" "vrintz.f64 d2;"
"vmul.f64 d1, d1, d2;" "vmul.f64 d1, d1, d2;"
"vsub.f64 d0, d0, d1;" "vsub.f64 d0, d0, d1;"
"bx lr"); "bx lr");
return n; return 0;
} }
double cos(double x) { double cos(double x) {
x = (mod(x, 2 * math::PI) - math::PI) / math::PI; x = mod(x, 2 * math::PI) / math::PI;
auto input = dtoq(x > 1. ? x - 2 : x);
prepare(); prepare();
CORDIC->CSR = CORDIC_CSR_NARGS | CORDIC_CSR_NRES | CORDIC->CSR = CORDIC_CSR_NARGS | CORDIC_CSR_NRES |
(6 << CORDIC_CSR_PRECISION_Pos) | (6 << CORDIC_CSR_PRECISION_Pos) |
(0 << CORDIC_CSR_FUNC_Pos); (0 << CORDIC_CSR_FUNC_Pos);
auto in = dtoq(x); CORDIC->WDATA = input;
CORDIC->WDATA = in; CORDIC->WDATA = input;
CORDIC->WDATA = in & 0x7FFFFFFF;
while (!(CORDIC->CSR & CORDIC_CSR_RRDY)); while (!(CORDIC->CSR & CORDIC_CSR_RRDY));
double cosx = qtod(CORDIC->RDATA) / x; double cosx = qtod(CORDIC->RDATA) / x;
in = CORDIC->RDATA; [[maybe_unused]] auto sinx = CORDIC->RDATA;
return cosx; return cosx;
} }
double sin(double x) { double sin(double x) {
x = (mod(x, 2 * math::PI) - math::PI) / math::PI; x = mod(x, 2 * math::PI) / math::PI;
auto input = dtoq(x > 1. ? x - 2 : x);
prepare(); prepare();
CORDIC->CSR = CORDIC_CSR_NARGS | CORDIC_CSR_NRES | CORDIC->CSR = CORDIC_CSR_NARGS | CORDIC_CSR_NRES |
(6 << CORDIC_CSR_PRECISION_Pos) | (6 << CORDIC_CSR_PRECISION_Pos) |
(1 << CORDIC_CSR_FUNC_Pos); (1 << CORDIC_CSR_FUNC_Pos);
auto in = dtoq(x); CORDIC->WDATA = input;
CORDIC->WDATA = in; CORDIC->WDATA = input;
CORDIC->WDATA = in & 0x7FFFFFFF;
while (!(CORDIC->CSR & CORDIC_CSR_RRDY)); while (!(CORDIC->CSR & CORDIC_CSR_RRDY));
double sinx = qtod(CORDIC->RDATA) / x; double sinx = qtod(CORDIC->RDATA) / x;
in = CORDIC->RDATA; [[maybe_unused]] auto cosx = CORDIC->RDATA;
return sinx; return sinx;
} }
double tan(double x) { double tan(double x) {
x = (mod(x, 2 * math::PI) - math::PI) / math::PI; x = mod(x, 2 * math::PI) / math::PI;
auto input = dtoq(x > 1. ? x - 2 : x);
prepare(); prepare();
CORDIC->CSR = CORDIC_CSR_NARGS | CORDIC_CSR_NRES | CORDIC->CSR = CORDIC_CSR_NARGS | CORDIC_CSR_NRES |
(6 << CORDIC_CSR_PRECISION_Pos) | (6 << CORDIC_CSR_PRECISION_Pos) |
(1 << CORDIC_CSR_FUNC_Pos); (1 << CORDIC_CSR_FUNC_Pos);
auto in = dtoq(x); CORDIC->WDATA = input;
CORDIC->WDATA = in; CORDIC->WDATA = input;
CORDIC->WDATA = in & 0x7FFFFFFF;
while (!(CORDIC->CSR & CORDIC_CSR_RRDY)); while (!(CORDIC->CSR & CORDIC_CSR_RRDY));
double sinx = qtod(CORDIC->RDATA) / x; double sinx = qtod(CORDIC->RDATA) / x;
@ -85,9 +93,9 @@ double tan(double x) {
} }
__attribute__((naked)) __attribute__((naked))
double sqrt(double x) { double sqrt(double) {
asm("vsqrt.f64 d0, d0; bx lr"); asm("vsqrt.f64 d0, d0; bx lr");
return x; return 0.;
} }
} }

@ -75,6 +75,8 @@ int main()
halInit(); halInit();
chSysInit(); chSysInit();
palSetLineMode(LINE_BUTTON, PAL_MODE_INPUT);
// Enable FPU // Enable FPU
SCB->CPACR |= 0xF << 20; SCB->CPACR |= 0xF << 20;
@ -353,6 +355,18 @@ THD_FUNCTION(Thread1, arg)
palClearLine(led); palClearLine(led);
chThdSleepMilliseconds(delay); chThdSleepMilliseconds(delay);
if (run_status == RunStatus::Idle && palReadLine(LINE_BUTTON)) {
palSetLine(LINE_LED_RED);
palSetLine(LINE_LED_YELLOW);
asm("cpsid i");
while (!palReadLine(LINE_BUTTON))
asm("nop");
asm("cpsie i");
palClearLine(LINE_LED_RED);
palClearLine(LINE_LED_YELLOW);
chThdSleepMilliseconds(500);
}
if (auto err = EM.hasError(); err ^ erroron) { if (auto err = EM.hasError(); err ^ erroron) {
erroron = err; erroron = err;
if (err) if (err)

Loading…
Cancel
Save