141 lines
5.0 KiB
C
141 lines
5.0 KiB
C
/* $NetBSD: cosdata.c,v 1.3 2017/01/30 15:50:21 christos Exp $ */
|
|
|
|
/*-
|
|
* Copyright (c) 2015 - 2016 Nathanial Sloss <nathanialsloss@yahoo.com.au>
|
|
* All rights reserved.
|
|
*
|
|
* This software is dedicated to the memory of -
|
|
* Baron James Anlezark (Barry) - 1 Jan 1949 - 13 May 2012.
|
|
*
|
|
* Barry was a man who loved his music.
|
|
*
|
|
* Redistribution and use in source and binary forms, with or without
|
|
* modification, are permitted provided that the following conditions
|
|
* are met:
|
|
* 1. Redistributions of source code must retain the above copyright
|
|
* notice, this list of conditions and the following disclaimer.
|
|
* 2. Redistributions in binary form must reproduce the above copyright
|
|
* notice, this list of conditions and the following disclaimer in the
|
|
* documentation and/or other materials provided with the distribution.
|
|
*
|
|
* THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
|
|
* ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
|
|
* TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
|
|
* PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
|
|
* BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
|
|
* CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
|
|
* SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
|
|
* INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
|
|
* CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
|
|
* ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
|
|
* POSSIBILITY OF SUCH DAMAGE.
|
|
*/
|
|
|
|
#include <math.h>
|
|
#include <stdio.h>
|
|
|
|
static const double sbc_coeffs8[] = {
|
|
0.00000000e+00, 1.56575398e-04, 3.43256425e-04, 5.54620202e-04,
|
|
8.23919506e-04, 1.13992507e-03, 1.47640169e-03, 1.78371725e-03,
|
|
2.01182542e-03, 2.10371989e-03, 1.99454554e-03, 1.61656283e-03,
|
|
9.02154502e-04, -1.78805361e-04, -1.64973098e-03, -3.49717454e-03,
|
|
5.65949473e-03, 8.02941163e-03, 1.04584443e-02, 1.27472335e-02,
|
|
1.46525263e-02, 1.59045603e-02, 1.62208471e-02, 1.53184106e-02,
|
|
1.29371806e-02, 8.85757540e-03, 2.92408442e-03, -4.91578024e-03,
|
|
-1.46404076e-02, -2.61098752e-02, -3.90751381e-02, -5.31873032e-02,
|
|
6.79989431e-02, 8.29847578e-02, 9.75753918e-02, 1.11196689e-01,
|
|
1.23264548e-01, 1.33264415e-01, 1.40753505e-01, 1.45389847e-01,
|
|
1.46955068e-01, 1.45389847e-01, 1.40753505e-01, 1.33264415e-01,
|
|
1.23264548e-01, 1.11196689e-01, 9.75753918e-02, 8.29847578e-02,
|
|
-6.79989431e-02, -5.31873032e-02, -3.90751381e-02, -2.61098752e-02,
|
|
-1.46404076e-02, -4.91578024e-03, 2.92408442e-03, 8.85757540e-03,
|
|
1.29371806e-02, 1.53184106e-02, 1.62208471e-02, 1.59045603e-02,
|
|
1.46525263e-02, 1.27472335e-02, 1.04584443e-02, 8.02941163e-03,
|
|
-5.65949473e-03, -3.49717454e-03, -1.64973098e-03, -1.78805361e-04,
|
|
9.02154502e-04, 1.61656283e-03, 1.99454554e-03, 2.10371989e-03,
|
|
2.01182542e-03, 1.78371725e-03, 1.47640169e-03, 1.13992507e-03,
|
|
8.23919506e-04, 5.54620202e-04, 3.43256425e-04, 1.56575398e-04,
|
|
};
|
|
|
|
static const double sbc_coeffs4[] = {
|
|
0.00000000e+00, 5.36548976e-04, 1.49188357e-03, 2.73370904e-03,
|
|
3.83720193e-03, 3.89205149e-03, 1.86581691e-03,-3.06012286e-03,
|
|
1.09137620e-02, 2.04385087e-02, 2.88757392e-02, 3.21939290e-02,
|
|
2.58767811e-02, 6.13245186e-03,-2.88217274e-02,-7.76463494e-02,
|
|
1.35593274e-01, 1.94987841e-01, 2.46636662e-01, 2.81828203e-01,
|
|
2.94315332e-01, 2.81828203e-01, 2.46636662e-01, 1.94987841e-01,
|
|
-1.35593274e-01,-7.76463494e-02,-2.88217274e-02, 6.13245186e-03,
|
|
2.58767811e-02, 3.21939290e-02, 2.88757392e-02, 2.04385087e-02,
|
|
-1.09137620e-02,-3.06012286e-03, 1.86581691e-03, 3.89205149e-03,
|
|
3.83720193e-03, 2.73370904e-03, 1.49188357e-03, 5.36548976e-04,
|
|
};
|
|
|
|
#define COEFFS_MULTI (1 << 12)
|
|
#define SI_MULTI 512
|
|
|
|
static void
|
|
arrayprint(const char *name, const double *arr, size_t len)
|
|
{
|
|
size_t k, count;
|
|
|
|
printf("static const int32_t %s[] = {\n\t", name);
|
|
for (count = k = 0; k < len; k++, count++) {
|
|
if (count % 8 == 0 && count != 0)
|
|
printf("\n\t");
|
|
printf("%d, ", (int)roundf((float)arr[k] * COEFFS_MULTI));
|
|
}
|
|
printf("\n};\n");
|
|
}
|
|
|
|
#define ARRAYPRINT(a) arrayprint(#a, a, sizeof(a) / sizeof(a[0]))
|
|
|
|
static void
|
|
cosprint(int lim, int sgn)
|
|
{
|
|
size_t count, i, k;
|
|
size_t mi = lim * 4;
|
|
size_t mk = mi * 2;
|
|
int dk = sgn * lim * 2;
|
|
double mp = M_PI_4 / lim;
|
|
float val;
|
|
|
|
printf("static const int32_t cos%sdata%zu[%zu][%zu] = {\n\t",
|
|
sgn == -1 ? "" : "dec", mi, mi, mk);
|
|
|
|
for (count = 0, i = 0; i < mi; i++) {
|
|
for (k = 0; k < mk; k++, count++) {
|
|
if (count % 8 == 0 && count != 0)
|
|
printf("\n\t");
|
|
if (k == 0)
|
|
printf("{ ");
|
|
|
|
val = cosf((i + 0.5) * ((int)k + dk) * mp);
|
|
printf("%d, ", (int)roundf(val * SI_MULTI));
|
|
|
|
if (k == mk - 1)
|
|
printf("},");
|
|
}
|
|
}
|
|
printf("\n};\n");
|
|
}
|
|
|
|
int
|
|
main(void)
|
|
{
|
|
printf("/* sbc_coeffs.h - Automatically generated by cosdata.c. */\n"
|
|
"\n");
|
|
|
|
printf("#define\tSIMULTI\t%d\n\n", SI_MULTI);
|
|
printf("#define\tCOEFFSMULTI\t%d\n\n", COEFFS_MULTI);
|
|
|
|
ARRAYPRINT(sbc_coeffs8);
|
|
ARRAYPRINT(sbc_coeffs4);
|
|
|
|
cosprint(2, -1);
|
|
cosprint(1, -1);
|
|
cosprint(2, 1);
|
|
cosprint(1, 1);
|
|
|
|
return 0;
|
|
}
|