#include <math.h>
#include <stdio.h>
#include <stdlib.h>
 
#include "symbolmap_code.h"
#include "CSymbolmap.h"
//#include "outputs.h"


void symbolmap (int *array_in, int longin, symbol *array_out, int MOD)
{

	int t;

	if (MOD==_BPSK){
		for (t=0;t<longin;t++){
			array_out[t].re=(-2.0)*array_in[t]+1.0;
			array_out[t].im=0.0;
		}
	}
	
	if (MOD==_QPSK){
		longin=longin/_QPSK;
		for (t=0;t<longin;t++){
			if (array_in[2*t]==0) array_out[t].re=1.0;
			else array_out[t].re=-1.0;
			if (array_in[2*t+1]==0) array_out[t].im=1.0;
			else array_out[t].im=-1.0;
		array_out[t].re=array_out[t].re/sqrt(2.0);
		array_out[t].im=array_out[t].im/sqrt(2.0);		
		}
	}
	
	if (MOD==_16QAM){
		longin=longin/_16QAM;
		for (t=0;t<longin;t++){
			if ((array_in[4*t]==0)&&(array_in[4*t+1]==0)) array_out[t].re=1.0;
			else if ((array_in[4*t]==0)&&(array_in[4*t+1]==1)) array_out[t].re=-1.0;
			else if ((array_in[4*t]==1)&&(array_in[4*t+1]==1)) array_out[t].re=-3.0;
			else  array_out[t].re=3.0;
			
			if ((array_in[4*t+2]==0)&&(array_in[4*t+3]==0)) array_out[t].im=1.0;
			else if ((array_in[4*t+2]==0)&&(array_in[4*t+3]==1)) array_out[t].im=-1.0;
			else if ((array_in[4*t+2]==1)&&(array_in[4*t+3]==1)) array_out[t].im=-3.0;
			else  array_out[t].im=3.0;
			
			array_out[t].re=array_out[t].re/sqrt(10);	//CHECK 10	
			array_out[t].im=array_out[t].im/sqrt(10);
		}
	}
	
	if (MOD==_64QAM){
		longin=longin/_64QAM;
		for (t=0;t<longin;t++){
			if ((array_in[6*t]==0)&&(array_in[6*t+1]==0)&&(array_in[6*t+2]==0)) 
				array_out[t].re=3.0;
			else if ((array_in[6*t]==0)&&(array_in[6*t+1]==0)&&(array_in[6*t+2]==1))
				array_out[t].re=-3.0;
			else if ((array_in[6*t]==0)&&(array_in[6*t+1]==1)&&(array_in[6*t+2]==1))
				array_out[t].re=-5.0;
			else if ((array_in[6*t]==0)&&(array_in[6*t+1]==1)&&(array_in[6*t+2]==0))
				array_out[t].re=5.0;
			else if ((array_in[6*t]==1)&&(array_in[6*t+1]==1)&&(array_in[6*t+2]==0))
				array_out[t].re=7.0;
			else if ((array_in[6*t]==1)&&(array_in[6*t+1]==1)&&(array_in[6*t+2]==1))
				array_out[t].re=-7.0;
			else if ((array_in[6*t]==1)&&(array_in[6*t+1]==0)&&(array_in[6*t+2]==1))
				array_out[t].re=-1.0;
			else array_out[t].re=1.0;
			
			if ((array_in[6*t+3]==0)&&(array_in[6*t+4]==0)&&(array_in[6*t+5]==0))
				array_out[t].im=3.0;
			else if ((array_in[6*t+3]==0)&&(array_in[6*t+4]==0)&&(array_in[6*t+5]==1))
				array_out[t].im=-3.0;
			else if ((array_in[6*t+3]==0)&&(array_in[6*t+4]==1)&&(array_in[6*t+5]==1))
				array_out[t].im=-5.0;
			else if ((array_in[6*t+3]==0)&&(array_in[6*t+4]==1)&&(array_in[6*t+5]==0))
				array_out[t].im=5.0;
			else if ((array_in[6*t+3]==1)&&(array_in[6*t+4]==1)&&(array_in[6*t+5]==0))
				array_out[t].im=7.0;
			else if ((array_in[6*t+3]==1)&&(array_in[6*t+4]==1)&&(array_in[6*t+5]==1))
				array_out[t].im=-7.0;
			else if ((array_in[6*t+3]==1)&&(array_in[6*t+4]==0)&&(array_in[6*t+5]==1))
				array_out[t].im=-1.0;
			else array_out[t].im=1.0;
			
			array_out[t].re=array_out[t].re/sqrt(42.0); //CHECK 42
			array_out[t].im=array_out[t].im/sqrt(42.0);
			
		}
	}
}