diff options
Diffstat (limited to 'apps/plugins')
-rw-r--r-- | apps/plugins/bounce.c | 4 | ||||
-rw-r--r-- | apps/plugins/bubbles.c | 20 | ||||
-rw-r--r-- | apps/plugins/clock/clock_draw_analog.c | 6 | ||||
-rw-r--r-- | apps/plugins/cube.c | 12 | ||||
-rw-r--r-- | apps/plugins/lib/fixedpoint.c | 239 | ||||
-rw-r--r-- | apps/plugins/lib/fixedpoint.h | 45 | ||||
-rw-r--r-- | apps/plugins/plasma.c | 2 | ||||
-rw-r--r-- | apps/plugins/vu_meter.c | 4 |
8 files changed, 65 insertions, 267 deletions
diff --git a/apps/plugins/bounce.c b/apps/plugins/bounce.c index ee4c3e443c..14bc7dea98 100644 --- a/apps/plugins/bounce.c +++ b/apps/plugins/bounce.c @@ -344,7 +344,7 @@ static void init_tables(void) phase = pfrac = 0; for (i = 0; i < TABLE_SIZE; i++) { - sin = fsincos(phase, NULL); + sin = fp_sincos(phase, NULL); xtable[i] = RADIUS_X + sin / DIV_X; ytable[i] = RADIUS_Y + sin / DIV_Y; @@ -411,7 +411,7 @@ static void init_clock(void) phase = pfrac = 0; for (i = 0; i < 60; i++) { - sin = fsincos(phase, &cos); + sin = fp_sincos(phase, &cos); xminute[i] = LCD_WIDTH/2 + sin / DIV_MX; yminute[i] = LCD_HEIGHT/2 - cos / DIV_MY; xhour[i] = LCD_WIDTH/2 + sin / DIV_HX; diff --git a/apps/plugins/bubbles.c b/apps/plugins/bubbles.c index 4146b45b36..44d172c4ee 100644 --- a/apps/plugins/bubbles.c +++ b/apps/plugins/bubbles.c @@ -1469,17 +1469,17 @@ static void bubbles_drawboard(struct game_context* bb) { ROW_HEIGHT*(BB_HEIGHT-2)+BUBBLE_HEIGHT); /* draw arrow */ - tipx = SHOTX+BUBBLE_WIDTH/2+(((sin_int(bb->angle)>>4)*BUBBLE_WIDTH*3/2)>>10); - tipy = SHOTY+BUBBLE_HEIGHT/2-(((cos_int(bb->angle)>>4)*BUBBLE_HEIGHT*3/2)>>10); + tipx = SHOTX+BUBBLE_WIDTH/2+(((fp14_sin(bb->angle)>>4)*BUBBLE_WIDTH*3/2)>>10); + tipy = SHOTY+BUBBLE_HEIGHT/2-(((fp14_cos(bb->angle)>>4)*BUBBLE_HEIGHT*3/2)>>10); - rb->lcd_drawline(SHOTX+BUBBLE_WIDTH/2+(((sin_int(bb->angle)>>4)*BUBBLE_WIDTH/2)>>10), - SHOTY+BUBBLE_HEIGHT/2-(((cos_int(bb->angle)>>4)*BUBBLE_HEIGHT/2)>>10), + rb->lcd_drawline(SHOTX+BUBBLE_WIDTH/2+(((fp14_sin(bb->angle)>>4)*BUBBLE_WIDTH/2)>>10), + SHOTY+BUBBLE_HEIGHT/2-(((fp14_cos(bb->angle)>>4)*BUBBLE_HEIGHT/2)>>10), tipx, tipy); xlcd_filltriangle(tipx, tipy, - tipx+(((sin_int(bb->angle-135)>>4)*BUBBLE_WIDTH/3)>>10), - tipy-(((cos_int(bb->angle-135)>>4)*BUBBLE_HEIGHT/3)>>10), - tipx+(((sin_int(bb->angle+135)>>4)*BUBBLE_WIDTH/3)>>10), - tipy-(((cos_int(bb->angle+135)>>4)*BUBBLE_HEIGHT/3)>>10)); + tipx+(((fp14_sin(bb->angle-135)>>4)*BUBBLE_WIDTH/3)>>10), + tipy-(((fp14_cos(bb->angle-135)>>4)*BUBBLE_HEIGHT/3)>>10), + tipx+(((fp14_sin(bb->angle+135)>>4)*BUBBLE_WIDTH/3)>>10), + tipy-(((fp14_cos(bb->angle+135)>>4)*BUBBLE_HEIGHT/3)>>10)); /* draw text */ rb->lcd_getstringsize(level, &w, &h); @@ -1524,8 +1524,8 @@ static int bubbles_fire(struct game_context* bb) { /* get current bubble */ bubblecur = bb->queue[bb->nextinq]; - shotxinc = ((sin_int(bb->angle)>>4)*BUBBLE_WIDTH)/3; - shotyinc = ((-1*(cos_int(bb->angle)>>4))*BUBBLE_HEIGHT)/3; + shotxinc = ((fp14_sin(bb->angle)>>4)*BUBBLE_WIDTH)/3; + shotyinc = ((-1*(fp14_cos(bb->angle)>>4))*BUBBLE_HEIGHT)/3; shotxofs = shotyofs = 0; /* advance the queue */ diff --git a/apps/plugins/clock/clock_draw_analog.c b/apps/plugins/clock/clock_draw_analog.c index c41ec3b24c..9efe3623a3 100644 --- a/apps/plugins/clock/clock_draw_analog.c +++ b/apps/plugins/clock/clock_draw_analog.c @@ -41,11 +41,11 @@ void polar_to_cartesian(int a, int r, int* x, int* y) { #if CONFIG_LCD == LCD_SSD1815 /* Correct non-square pixel aspect of archos recorder LCD */ - *x = (sin_int(a) * 5 / 4 * r) >> 14; + *x = (fp14_sin(a) * 5 / 4 * r) >> 14; #else - *x = (sin_int(a) * r) >> 14; + *x = (fp14_sin(a) * r) >> 14; #endif - *y = (sin_int(a-90) * r) >> 14; + *y = (fp14_sin(a-90) * r) >> 14; } void polar_to_cartesian_screen_centered(struct screen * display, diff --git a/apps/plugins/cube.c b/apps/plugins/cube.c index 55219e5a5e..c770214700 100644 --- a/apps/plugins/cube.c +++ b/apps/plugins/cube.c @@ -433,12 +433,12 @@ static void cube_rotate(int xa, int ya, int za) /* Just to prevent unnecessary lookups */ long sxa, cxa, sya, cya, sza, cza; - sxa = sin_int(xa); - cxa = cos_int(xa); - sya = sin_int(ya); - cya = cos_int(ya); - sza = sin_int(za); - cza = cos_int(za); + sxa = fp14_sin(xa); + cxa = fp14_cos(xa); + sya = fp14_sin(ya); + cya = fp14_cos(ya); + sza = fp14_sin(za); + cza = fp14_cos(za); /* calculate overall translation matrix */ matrice[0][0] = (cza * cya) >> 14; diff --git a/apps/plugins/lib/fixedpoint.c b/apps/plugins/lib/fixedpoint.c index 0ae2cded69..352e246673 100644 --- a/apps/plugins/lib/fixedpoint.c +++ b/apps/plugins/lib/fixedpoint.c @@ -1,238 +1 @@ -/*************************************************************************** - * __________ __ ___. - * Open \______ \ ____ ____ | | _\_ |__ _______ ___ - * Source | _// _ \_/ ___\| |/ /| __ \ / _ \ \/ / - * Jukebox | | ( <_> ) \___| < | \_\ ( <_> > < < - * Firmware |____|_ /\____/ \___ >__|_ \|___ /\____/__/\_ \ - * \/ \/ \/ \/ \/ - * $Id$ - * - * Copyright (C) 2006 Jens Arnold - * - * Fixed point library for plugins - * - * 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 software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY - * KIND, either express or implied. - * - ****************************************************************************/ - -#include <inttypes.h> -#include "plugin.h" -#include "fixedpoint.h" - -/* Inverse gain of circular cordic rotation in s0.31 format. */ -static const long cordic_circular_gain = 0xb2458939; /* 0.607252929 */ - -/* Table of values of atan(2^-i) in 0.32 format fractions of pi where pi = 0xffffffff / 2 */ -static const unsigned long atan_table[] = { - 0x1fffffff, /* +0.785398163 (or pi/4) */ - 0x12e4051d, /* +0.463647609 */ - 0x09fb385b, /* +0.244978663 */ - 0x051111d4, /* +0.124354995 */ - 0x028b0d43, /* +0.062418810 */ - 0x0145d7e1, /* +0.031239833 */ - 0x00a2f61e, /* +0.015623729 */ - 0x00517c55, /* +0.007812341 */ - 0x0028be53, /* +0.003906230 */ - 0x00145f2e, /* +0.001953123 */ - 0x000a2f98, /* +0.000976562 */ - 0x000517cc, /* +0.000488281 */ - 0x00028be6, /* +0.000244141 */ - 0x000145f3, /* +0.000122070 */ - 0x0000a2f9, /* +0.000061035 */ - 0x0000517c, /* +0.000030518 */ - 0x000028be, /* +0.000015259 */ - 0x0000145f, /* +0.000007629 */ - 0x00000a2f, /* +0.000003815 */ - 0x00000517, /* +0.000001907 */ - 0x0000028b, /* +0.000000954 */ - 0x00000145, /* +0.000000477 */ - 0x000000a2, /* +0.000000238 */ - 0x00000051, /* +0.000000119 */ - 0x00000028, /* +0.000000060 */ - 0x00000014, /* +0.000000030 */ - 0x0000000a, /* +0.000000015 */ - 0x00000005, /* +0.000000007 */ - 0x00000002, /* +0.000000004 */ - 0x00000001, /* +0.000000002 */ - 0x00000000, /* +0.000000001 */ - 0x00000000, /* +0.000000000 */ -}; - -/* Precalculated sine and cosine * 16384 (2^14) (fixed point 18.14) */ -static const short sin_table[91] = -{ - 0, 285, 571, 857, 1142, 1427, 1712, 1996, 2280, 2563, - 2845, 3126, 3406, 3685, 3963, 4240, 4516, 4790, 5062, 5334, - 5603, 5871, 6137, 6401, 6663, 6924, 7182, 7438, 7691, 7943, - 8191, 8438, 8682, 8923, 9161, 9397, 9630, 9860, 10086, 10310, - 10531, 10748, 10963, 11173, 11381, 11585, 11785, 11982, 12175, 12365, - 12550, 12732, 12910, 13084, 13254, 13420, 13582, 13740, 13894, 14043, - 14188, 14329, 14466, 14598, 14725, 14848, 14967, 15081, 15190, 15295, - 15395, 15491, 15582, 15668, 15749, 15825, 15897, 15964, 16025, 16082, - 16135, 16182, 16224, 16261, 16294, 16321, 16344, 16361, 16374, 16381, - 16384 -}; - -/** - * Implements sin and cos using CORDIC rotation. - * - * @param phase has range from 0 to 0xffffffff, representing 0 and - * 2*pi respectively. - * @param cos return address for cos - * @return sin of phase, value is a signed value from LONG_MIN to LONG_MAX, - * representing -1 and 1 respectively. - */ -long fsincos(unsigned long phase, long *cos) -{ - int32_t x, x1, y, y1; - unsigned long z, z1; - int i; - - /* Setup initial vector */ - x = cordic_circular_gain; - y = 0; - z = phase; - - /* The phase has to be somewhere between 0..pi for this to work right */ - if (z < 0xffffffff / 4) { - /* z in first quadrant, z += pi/2 to correct */ - x = -x; - z += 0xffffffff / 4; - } else if (z < 3 * (0xffffffff / 4)) { - /* z in third quadrant, z -= pi/2 to correct */ - z -= 0xffffffff / 4; - } else { - /* z in fourth quadrant, z -= 3pi/2 to correct */ - x = -x; - z -= 3 * (0xffffffff / 4); - } - - /* Each iteration adds roughly 1-bit of extra precision */ - for (i = 0; i < 31; i++) { - x1 = x >> i; - y1 = y >> i; - z1 = atan_table[i]; - - /* Decided which direction to rotate vector. Pivot point is pi/2 */ - if (z >= 0xffffffff / 4) { - x -= y1; - y += x1; - z -= z1; - } else { - x += y1; - y -= x1; - z += z1; - } - } - - if (cos) - *cos = x; - - return y; -} - -/** - * Fixed point square root via Newton-Raphson. - * @param a square root argument. - * @param fracbits specifies number of fractional bits in argument. - * @return Square root of argument in same fixed point format as input. - */ -long fsqrt(long a, unsigned int fracbits) -{ - long b = a/2 + BIT_N(fracbits); /* initial approximation */ - unsigned n; - const unsigned iterations = 4; - - for (n = 0; n < iterations; ++n) - b = (b + (long)(((long long)(a) << fracbits)/b))/2; - - return b; -} - -/** - * Fixed point sinus using a lookup table - * don't forget to divide the result by 16384 to get the actual sinus value - * @param val sinus argument in degree - * @return sin(val)*16384 - */ -long sin_int(int val) -{ - val = (val+360)%360; - if (val < 181) - { - if (val < 91)/* phase 0-90 degree */ - return (long)sin_table[val]; - else/* phase 91-180 degree */ - return (long)sin_table[180-val]; - } - else - { - if (val < 271)/* phase 181-270 degree */ - return -(long)sin_table[val-180]; - else/* phase 270-359 degree */ - return -(long)sin_table[360-val]; - } - return 0; -} - -/** - * Fixed point cosinus using a lookup table - * don't forget to divide the result by 16384 to get the actual cosinus value - * @param val sinus argument in degree - * @return cos(val)*16384 - */ -long cos_int(int val) -{ - val = (val+360)%360; - if (val < 181) - { - if (val < 91)/* phase 0-90 degree */ - return (long)sin_table[90-val]; - else/* phase 91-180 degree */ - return -(long)sin_table[val-90]; - } - else - { - if (val < 271)/* phase 181-270 degree */ - return -(long)sin_table[270-val]; - else/* phase 270-359 degree */ - return (long)sin_table[val-270]; - } - return 0; -} - -/** - * Fixed-point natural log - * taken from http://www.quinapalus.com/efunc.html - * "The code assumes integers are at least 32 bits long. The (positive) - * argument and the result of the function are both expressed as fixed-point - * values with 16 fractional bits, although intermediates are kept with 28 - * bits of precision to avoid loss of accuracy during shifts." - */ - -long flog(int x) { - long t,y; - - y=0xa65af; - if(x<0x00008000) x<<=16, y-=0xb1721; - if(x<0x00800000) x<<= 8, y-=0x58b91; - if(x<0x08000000) x<<= 4, y-=0x2c5c8; - if(x<0x20000000) x<<= 2, y-=0x162e4; - if(x<0x40000000) x<<= 1, y-=0x0b172; - t=x+(x>>1); if((t&0x80000000)==0) x=t,y-=0x067cd; - t=x+(x>>2); if((t&0x80000000)==0) x=t,y-=0x03920; - t=x+(x>>3); if((t&0x80000000)==0) x=t,y-=0x01e27; - t=x+(x>>4); if((t&0x80000000)==0) x=t,y-=0x00f85; - t=x+(x>>5); if((t&0x80000000)==0) x=t,y-=0x007e1; - t=x+(x>>6); if((t&0x80000000)==0) x=t,y-=0x003f8; - t=x+(x>>7); if((t&0x80000000)==0) x=t,y-=0x001fe; - x=0x80000000-x; - y-=x>>15; - return y; -} +#include "../../fixedpoint.c" diff --git a/apps/plugins/lib/fixedpoint.h b/apps/plugins/lib/fixedpoint.h index dfabbad8dc..ef50dd0085 100644 --- a/apps/plugins/lib/fixedpoint.h +++ b/apps/plugins/lib/fixedpoint.h @@ -21,11 +21,44 @@ * ****************************************************************************/ -long fsincos(unsigned long phase, long *cos); -long fsqrt(long a, unsigned int fracbits); -long cos_int(int val); -long sin_int(int val); -long flog(int x); +/** PLUGINS - FIXED POINT MATH ROUTINES - USAGE + * + * - x and y arguments are fixed point integers + * - fracbits is the number of fractional bits in the argument(s) + * - functions return long fixed point integers with the specified number + * of fractional bits unless otherwise specified + * + * Calculate sin and cos of an angle: + * fp_sincos(phase, *cos) + * where phase is a 32 bit unsigned integer with 0 representing 0 + * and 0xFFFFFFFF representing 2*pi, and *cos is the address to + * a long signed integer. Value returned is a long signed integer + * from LONG_MIN to LONG_MAX, representing -1 to 1 respectively. + * That is, value is a fixed point integer with 31 fractional bits. + * + * Take square root of a fixed point number: + * fp_sqrt(x, fracbits) + * + * Calculate sin or cos of an angle (very fast, from a table): + * fp14_sin(angle) + * fp14_cos(angle) + * where angle is a non-fixed point integer in degrees. Value + * returned is a fixed point integer with 14 fractional bits. + * + * Calculate the natural log of a positive fixed point integer + * fp16_log(x) + * where x and the value returned are fixed point integers + * with 16 fractional bits. + */ + +#ifndef _FIXEDPOINT_H_PLUGINS +#define _FIXEDPOINT_H_PLUGINS + +long fp_sincos(unsigned long phase, long *cos); +long fp_sqrt(long a, unsigned int fracbits); +long fp14_cos(int val); +long fp14_sin(int val); +long fp16_log(int x); /* fast unsigned multiplication (16x16bit->32bit or 32x32bit->32bit, * whichever is faster for the architecture) */ @@ -34,3 +67,5 @@ long flog(int x); #else /* SH1, coldfire */ #define FMULU(a, b) ((uint32_t) (((uint16_t) (a)) * ((uint16_t) (b)))) #endif + +#endif diff --git a/apps/plugins/plasma.c b/apps/plugins/plasma.c index 2a3e43e6b8..00287eb0b8 100644 --- a/apps/plugins/plasma.c +++ b/apps/plugins/plasma.c @@ -198,7 +198,7 @@ static void wave_table_generate(void) for (i=0;i<256;++i) { wave_array[i] = (unsigned char)((WAV_AMP - * (sin_int((i * 360 * plasma_frequency) / 256))) / 16384); + * (fp14_sin((i * 360 * plasma_frequency) / 256))) / 16384); } } diff --git a/apps/plugins/vu_meter.c b/apps/plugins/vu_meter.c index 16aac3a011..74c3b1cf97 100644 --- a/apps/plugins/vu_meter.c +++ b/apps/plugins/vu_meter.c @@ -415,7 +415,7 @@ void calc_scales(void) for (i=1; i <= half_width; i++) { /* analog scale */ - y = (half_width/5)*flog(i*fx_log_factor); + y = (half_width/5)*fp16_log(i*fx_log_factor); /* better way of checking for negative values? */ z = y>>16; @@ -431,7 +431,7 @@ void calc_scales(void) k = nh2 - ( j * j ); /* fsqrt+1 seems to give a closer approximation */ - y_values[i-1] = LCD_HEIGHT - (fsqrt(k, 16)>>8) - 1; + y_values[i-1] = LCD_HEIGHT - (fp_sqrt(k, 16)>>8) - 1; rb->yield(); } } |