From a30cbb586a36c7f3485b46e990ef485fd8a8da58 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?IOhannes=20m=20zm=C3=B6lnig?=
 <zmoelnig@users.sourceforge.net>
Date: Tue, 13 Jan 2009 18:00:10 +0000
Subject: hopefully made 64bit able

svn path=/trunk/externals/iem/iem_bin_ambi/; revision=10534
---
 src/bin_ambi_reduced_decode.c | 47 +++++++++++++++++++++++--------------------
 1 file changed, 25 insertions(+), 22 deletions(-)

(limited to 'src/bin_ambi_reduced_decode.c')

diff --git a/src/bin_ambi_reduced_decode.c b/src/bin_ambi_reduced_decode.c
index 949c715..971ed64 100644
--- a/src/bin_ambi_reduced_decode.c
+++ b/src/bin_ambi_reduced_decode.c
@@ -45,10 +45,10 @@ typedef struct _bin_ambi_reduced_decode
 	int						*x_sym_flag;
 	BIN_AMBI_COMPLEX	*x_spec;
 	BIN_AMBI_COMPLEX	*x_sin_cos;
-	float					*x_beg_fade_out_hrir;
-	float					*x_beg_hrir;
-	float					**x_beg_hrtf_re;
-	float					**x_beg_hrtf_im;
+	iemarray_t					*x_beg_fade_out_hrir;
+	float				*x_beg_hrir;
+	iemarray_t			**x_beg_hrtf_re;
+	iemarray_t			**x_beg_hrtf_im;
 	t_symbol			**x_hrir_filename;
 	t_symbol			**x_s_hrir;
 	t_symbol			**x_s_hrtf_re;
@@ -638,9 +638,9 @@ static void bin_ambi_reduced_decode_calc_pinv(t_bin_ambi_reduced_decode *x)
 {
 	t_garray *a;
 	int npoints;
-	t_float *fadevec;
+	iemarray_t *fadevec;
 
-	if((int)(x->x_beg_fade_out_hrir) == 0)
+	if(x->x_beg_fade_out_hrir == 0)
 	{
 		if (!(a = (t_garray *)pd_findbyclass(x->x_s_fade_out_hrir, garray_class)))
 			error("%s: no such array", x->x_s_fade_out_hrir->s_name);
@@ -698,8 +698,10 @@ static void bin_ambi_reduced_decode_check_arrays(t_bin_ambi_reduced_decode *x, f
 	int fs2=fftsize/2;
 	t_garray *a;
 	int npoints;
-	t_float *vec_hrir, *vec, *vec_fade_out_hrir;
-	t_float *vec_hrtf_re, *vec_hrtf_im;
+	iemarray_t *vec_hrir;
+	t_float *vec;
+	iemarray_t *vec_fade_out_hrir;
+	iemarray_t *vec_hrtf_re, *vec_hrtf_im;
 	t_symbol *hrir, *hrtf_re, *hrtf_im;
 	float decr, sum;
 
@@ -740,11 +742,11 @@ static void bin_ambi_reduced_decode_check_arrays(t_bin_ambi_reduced_decode *x, f
 		vec = x->x_beg_hrir;
 		vec += index * fftsize;
 	
-		if((int)(x->x_beg_fade_out_hrir))
+		if(x->x_beg_fade_out_hrir)
 		{
 			vec_fade_out_hrir = x->x_beg_fade_out_hrir;
 			for(j=0; j<fs2; j++)
-				vec[j] = vec_hrir[j]*vec_fade_out_hrir[j];
+			  vec[j] = iemarray_getfloat(vec_hrir,j)*iemarray_getfloat(vec_fade_out_hrir,j);
 		}
 		else
 		{
@@ -752,13 +754,13 @@ static void bin_ambi_reduced_decode_check_arrays(t_bin_ambi_reduced_decode *x, f
 			n = fs2 * 3;
 			n /= 4;
 			for(j=0; j<n; j++)
-				vec[j] = vec_hrir[j];
+			  vec[j] = iemarray_getfloat(vec_hrir,j);
 			sum = 1.0f;
 			decr = 4.0f / (float)fs2;
 			for(j=n, k=0; j<fs2; j++, k++)
 			{
 				sum -= decr;
-				vec[j] = vec_hrir[j] * sum;
+				vec[j] = iemarray_getfloat(vec_hrir,j) * sum;
 			}
 		}
 	}
@@ -772,7 +774,8 @@ static void bin_ambi_reduced_decode_calc_reduced(t_bin_ambi_reduced_decode *x, f
 	BIN_AMBI_COMPLEX old1, old2, w;
 	BIN_AMBI_COMPLEX *sincos = x->x_sin_cos;
 	BIN_AMBI_COMPLEX *val = x->x_spec;
-	t_float *vec_hrir, *vec_hrtf_re, *vec_hrtf_im;
+	t_float *vec_hrir;
+	iemarray_t *vec_hrtf_re, *vec_hrtf_im;
 	double *dv, *db=x->x_inv_work2;
 	int n_ambi = x->x_n_ambi;
 	int n_ambi2 = 2*n_ambi;
@@ -854,15 +857,15 @@ static void bin_ambi_reduced_decode_calc_reduced(t_bin_ambi_reduced_decode *x, f
 	}
 	for(i = 0; i<fs2; i++)
 	{
-		vec_hrtf_re[i] = val[i].real;
-		vec_hrtf_im[i] = val[i].imag;
+	  iemarray_getfloat(vec_hrtf_re,i) = val[i].real;
+	  iemarray_getfloat(vec_hrtf_im,i) = val[i].imag;
 	}
-	vec_hrtf_re[fs2] = val[fs2].real;
-	vec_hrtf_im[fs2] = 0.0f;
+	iemarray_getfloat(vec_hrtf_re,fs2) = val[fs2].real;
+	iemarray_getfloat(vec_hrtf_im,fs2) = 0.0f;
 	for(i = fs2+1; i < fftsize; i++)
 	{
-		vec_hrtf_re[i] = 0.0f;
-		vec_hrtf_im[i] = 0.0f;
+	  iemarray_getfloat(vec_hrtf_re,i) = 0.0f;
+	  iemarray_getfloat(vec_hrtf_im,i) = 0.0f;
 	}
 }
 
@@ -1207,10 +1210,10 @@ static void *bin_ambi_reduced_decode_new(t_symbol *s, int argc, t_atom *argv)
 		x->x_spec				= (BIN_AMBI_COMPLEX *)getbytes(x->x_fftsize * sizeof(BIN_AMBI_COMPLEX));
 		x->x_sin_cos		= (BIN_AMBI_COMPLEX *)getbytes(x->x_fftsize * sizeof(BIN_AMBI_COMPLEX));
 
-		x->x_beg_fade_out_hrir	= (float *)0;
+		x->x_beg_fade_out_hrir	= 0;
 		x->x_beg_hrir						= (float *)getbytes(x->x_fftsize * x->x_n_ambi * sizeof(float));
-		x->x_beg_hrtf_re				= (float **)getbytes(x->x_n_ambi * sizeof(float *));
-		x->x_beg_hrtf_im				= (float **)getbytes(x->x_n_ambi * sizeof(float *));
+		x->x_beg_hrtf_re				= (iemarray_t **)getbytes(x->x_n_ambi * sizeof(iemarray_t *));
+		x->x_beg_hrtf_im				= (iemarray_t **)getbytes(x->x_n_ambi * sizeof(iemarray_t *));
 
 		x->x_sqrt3				= sqrt(3.0);
 		x->x_sqrt5_2			= sqrt(5.0) / 2.0;
-- 
cgit v1.2.1