Home | History | Annotate | Line # | Download | only in cosdata-gen
cosdata.c revision 1.2
      1  1.2  jakllsch /* $NetBSD: cosdata.c,v 1.2 2017/01/30 14:55:17 jakllsch Exp $ */
      2  1.1       nat 
      3  1.1       nat /*-
      4  1.1       nat  * Copyright (c) 2015 - 2016 Nathanial Sloss <nathanialsloss (at) yahoo.com.au>
      5  1.1       nat  * All rights reserved.
      6  1.1       nat  *
      7  1.1       nat  *		This software is dedicated to the memory of -
      8  1.1       nat  *	   Baron James Anlezark (Barry) - 1 Jan 1949 - 13 May 2012.
      9  1.1       nat  *
     10  1.1       nat  *		Barry was a man who loved his music.
     11  1.1       nat  *
     12  1.1       nat  * Redistribution and use in source and binary forms, with or without
     13  1.1       nat  * modification, are permitted provided that the following conditions
     14  1.1       nat  * are met:
     15  1.1       nat  * 1. Redistributions of source code must retain the above copyright
     16  1.1       nat  *    notice, this list of conditions and the following disclaimer.
     17  1.1       nat  * 2. Redistributions in binary form must reproduce the above copyright
     18  1.1       nat  *    notice, this list of conditions and the following disclaimer in the
     19  1.1       nat  *    documentation and/or other materials provided with the distribution.
     20  1.1       nat  *
     21  1.1       nat  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     22  1.1       nat  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     23  1.1       nat  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     24  1.1       nat  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     25  1.1       nat  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     26  1.1       nat  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     27  1.1       nat  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     28  1.1       nat  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     29  1.1       nat  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     30  1.1       nat  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     31  1.1       nat  * POSSIBILITY OF SUCH DAMAGE.
     32  1.1       nat  */
     33  1.1       nat 
     34  1.1       nat #include <math.h>
     35  1.1       nat #include <stdio.h>
     36  1.1       nat 
     37  1.1       nat static const double sbc8_coeffs[] = {
     38  1.1       nat 	0.00000000e+00, 1.56575398e-04, 3.43256425e-04, 5.54620202e-04,
     39  1.1       nat 	8.23919506e-04, 1.13992507e-03, 1.47640169e-03, 1.78371725e-03,
     40  1.1       nat 	2.01182542e-03, 2.10371989e-03, 1.99454554e-03, 1.61656283e-03,
     41  1.1       nat 	9.02154502e-04, -1.78805361e-04, -1.64973098e-03, -3.49717454e-03,
     42  1.1       nat 	5.65949473e-03, 8.02941163e-03, 1.04584443e-02, 1.27472335e-02,
     43  1.1       nat 	1.46525263e-02, 1.59045603e-02, 1.62208471e-02, 1.53184106e-02,
     44  1.1       nat 	1.29371806e-02, 8.85757540e-03, 2.92408442e-03, -4.91578024e-03,
     45  1.1       nat 	-1.46404076e-02, -2.61098752e-02, -3.90751381e-02, -5.31873032e-02,
     46  1.1       nat 	6.79989431e-02, 8.29847578e-02, 9.75753918e-02, 1.11196689e-01,
     47  1.1       nat 	1.23264548e-01, 1.33264415e-01, 1.40753505e-01, 1.45389847e-01,
     48  1.1       nat 	1.46955068e-01, 1.45389847e-01, 1.40753505e-01, 1.33264415e-01,
     49  1.1       nat 	1.23264548e-01, 1.11196689e-01, 9.75753918e-02, 8.29847578e-02,
     50  1.1       nat 	-6.79989431e-02, -5.31873032e-02, -3.90751381e-02, -2.61098752e-02,
     51  1.1       nat 	-1.46404076e-02, -4.91578024e-03, 2.92408442e-03, 8.85757540e-03,
     52  1.1       nat 	1.29371806e-02, 1.53184106e-02, 1.62208471e-02, 1.59045603e-02,
     53  1.1       nat 	1.46525263e-02, 1.27472335e-02, 1.04584443e-02, 8.02941163e-03,
     54  1.1       nat 	-5.65949473e-03, -3.49717454e-03, -1.64973098e-03, -1.78805361e-04,
     55  1.1       nat 	9.02154502e-04, 1.61656283e-03, 1.99454554e-03, 2.10371989e-03,
     56  1.1       nat 	2.01182542e-03, 1.78371725e-03, 1.47640169e-03, 1.13992507e-03,
     57  1.1       nat 	8.23919506e-04, 5.54620202e-04, 3.43256425e-04, 1.56575398e-04,
     58  1.1       nat };
     59  1.1       nat 
     60  1.1       nat static const double sbc4_coeffs[] = {
     61  1.1       nat 	 0.00000000e+00, 5.36548976e-04, 1.49188357e-03, 2.73370904e-03,
     62  1.1       nat 	 3.83720193e-03, 3.89205149e-03, 1.86581691e-03,-3.06012286e-03,
     63  1.1       nat 	 1.09137620e-02, 2.04385087e-02, 2.88757392e-02, 3.21939290e-02,
     64  1.1       nat 	 2.58767811e-02, 6.13245186e-03,-2.88217274e-02,-7.76463494e-02,
     65  1.1       nat 	 1.35593274e-01, 1.94987841e-01, 2.46636662e-01, 2.81828203e-01,
     66  1.1       nat 	 2.94315332e-01, 2.81828203e-01, 2.46636662e-01, 1.94987841e-01,
     67  1.1       nat 	-1.35593274e-01,-7.76463494e-02,-2.88217274e-02, 6.13245186e-03,
     68  1.1       nat 	 2.58767811e-02, 3.21939290e-02, 2.88757392e-02, 2.04385087e-02,
     69  1.1       nat 	-1.09137620e-02,-3.06012286e-03, 1.86581691e-03, 3.89205149e-03,
     70  1.1       nat 	 3.83720193e-03, 2.73370904e-03, 1.49188357e-03, 5.36548976e-04,
     71  1.1       nat };
     72  1.1       nat 
     73  1.1       nat #define COEFFS_MULTI	(float)(1 << 12)
     74  1.1       nat #define SI_MULTI	(float)512
     75  1.1       nat 
     76  1.1       nat int
     77  1.1       nat main (void)
     78  1.1       nat {
     79  1.1       nat 	float S[8][16], val;
     80  1.1       nat 	int i,k, count = 0;
     81  1.1       nat 	int vali;
     82  1.1       nat 
     83  1.1       nat 	printf("/* sbc_coeffs.h - Automatically generated by cosdata.c. */\n"
     84  1.1       nat 	    "\n");
     85  1.1       nat 
     86  1.1       nat 	vali = SI_MULTI;
     87  1.1       nat 	printf("#define SIMULTI\t%d\n\n", vali);
     88  1.1       nat 	vali = COEFFS_MULTI;
     89  1.1       nat 	printf("#define COEFFSMULTI\t%d\n\n", vali);
     90  1.1       nat 
     91  1.1       nat 	printf("static const int32_t sbc_coeffs8[] = {\n    ");
     92  1.2  jakllsch 	for (k = 0;k < (int)(sizeof(sbc8_coeffs)/sizeof(sbc8_coeffs[0]));k++) {
     93  1.1       nat 		if (count % 8 == 0 && count != 0)
     94  1.1       nat 			printf("\n    ");
     95  1.1       nat 		val = (float)(sbc8_coeffs[k] * COEFFS_MULTI);
     96  1.1       nat 		vali = (int)roundf(val);
     97  1.1       nat 		printf("%d, ",vali);
     98  1.1       nat 		count++;
     99  1.1       nat 	}
    100  1.1       nat 	printf("\n};\n");
    101  1.1       nat 
    102  1.1       nat 	count = 0;
    103  1.1       nat 	printf("static const int32_t sbc_coeffs4[] = {\n    ");
    104  1.2  jakllsch 	for (k = 0;k < (int)(sizeof(sbc4_coeffs)/sizeof(sbc4_coeffs[0]));k++) {
    105  1.1       nat 		if (count % 8 == 0 && count != 0)
    106  1.1       nat 			printf("\n    ");
    107  1.1       nat 		val = (float)(sbc4_coeffs[k] * COEFFS_MULTI);
    108  1.1       nat 		vali = (int)roundf(val);
    109  1.1       nat 		printf("%d, ",vali);
    110  1.1       nat 		count++;
    111  1.1       nat 	}
    112  1.1       nat 	printf("\n};\n");
    113  1.1       nat 
    114  1.1       nat 	count = 0;
    115  1.1       nat 	printf("static const int32_t cosdata8[8][16] = {\n    ");
    116  1.1       nat 	for (i = 0; i < 8; i++) {
    117  1.1       nat 		for (k = 0;k < 16;k++) {
    118  1.1       nat 			S[i][k] = cosf((float)((i+0.5)*(k-4)*(M_PI_4/2)));
    119  1.1       nat 
    120  1.1       nat 			if (count % 8 == 0 && count != 0)
    121  1.1       nat 				printf("\n    ");
    122  1.1       nat 			if (k == 0)
    123  1.1       nat 				printf("{ ");
    124  1.1       nat 			val = S[i][k] * SI_MULTI;
    125  1.1       nat 			vali = (int)roundf(val);
    126  1.1       nat 			printf("%d, ",vali);
    127  1.1       nat 
    128  1.1       nat 			if (k == 15)
    129  1.1       nat 				printf("},");
    130  1.1       nat 			count++;
    131  1.1       nat 		}
    132  1.1       nat 	}
    133  1.1       nat 	printf("\n};\n");
    134  1.1       nat 
    135  1.1       nat 	count = 0;
    136  1.1       nat 	printf("static const int32_t cosdata4[4][8] = {\n    ");
    137  1.1       nat 	for (i = 0; i < 4; i++) {
    138  1.1       nat 		for (k = 0;k < 8;k++) {
    139  1.1       nat 			S[i][k] = cosf((float)((i+0.5)*(k-2)*(M_PI_4)));
    140  1.1       nat 
    141  1.1       nat 			if (count % 8 == 0 && count != 0)
    142  1.1       nat 				printf("\n    ");
    143  1.1       nat 			if (k == 0)
    144  1.1       nat 				printf("{ ");
    145  1.1       nat 
    146  1.1       nat 			val = S[i][k] * SI_MULTI;
    147  1.1       nat 			vali = (int)roundf(val);
    148  1.1       nat 			printf("%d, ",vali);
    149  1.1       nat 
    150  1.1       nat 			if (k == 7)
    151  1.1       nat 				printf("},");
    152  1.1       nat 			count++;
    153  1.1       nat 		}
    154  1.1       nat 	}
    155  1.1       nat 	printf("\n};\n");
    156  1.1       nat 
    157  1.1       nat 	count = 0;
    158  1.1       nat 	printf("static const int32_t cosdecdata8[8][16] = {\n    ");
    159  1.1       nat 	for (i = 0; i < 8; i++) {
    160  1.1       nat 		for (k = 0;k < 16;k++) {
    161  1.1       nat 			S[i][k] = cosf((float)((i+0.5)*(k+4)*(M_PI_4/2)));
    162  1.1       nat 
    163  1.1       nat 			if (count % 8 == 0 && count != 0)
    164  1.1       nat 				printf("\n    ");
    165  1.1       nat 			if (k == 0)
    166  1.1       nat 				printf("{ ");
    167  1.1       nat 			val = S[i][k] * SI_MULTI;
    168  1.1       nat 			vali = (int)roundf(val);
    169  1.1       nat 			printf("%d, ",vali);
    170  1.1       nat 
    171  1.1       nat 			if (k == 15)
    172  1.1       nat 				printf("},");
    173  1.1       nat 			count++;
    174  1.1       nat 		}
    175  1.1       nat 	}
    176  1.1       nat 	printf("\n};\n");
    177  1.1       nat 
    178  1.1       nat 	count = 0;
    179  1.1       nat 	printf("static const int32_t cosdecdata4[4][8] = {\n    ");
    180  1.1       nat 	for (i = 0; i < 4; i++) {
    181  1.1       nat 		for (k = 0;k < 8;k++) {
    182  1.1       nat 			S[i][k] = cosf((float)((i+0.5)*(k+2)*(M_PI_4)));
    183  1.1       nat 
    184  1.1       nat 			if (count % 8 == 0 && count != 0)
    185  1.1       nat 				printf("\n    ");
    186  1.1       nat 			if (k == 0)
    187  1.1       nat 				printf("{ ");
    188  1.1       nat 
    189  1.1       nat 			val = S[i][k] * SI_MULTI;
    190  1.1       nat 			vali = (int)roundf(val);
    191  1.1       nat 			printf("%d, ",vali);
    192  1.1       nat 
    193  1.1       nat 			if (k == 7)
    194  1.1       nat 				printf("},");
    195  1.1       nat 			count++;
    196  1.1       nat 		}
    197  1.1       nat 	}
    198  1.1       nat 	printf("\n};\n");
    199  1.1       nat 
    200  1.1       nat 	return 0;
    201  1.1       nat }
    202  1.1       nat 
    203