////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////

// UTN FRGP TSP 
// BS
// EMAIL: david_bs@live.com
// 09-09-2011

////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////

#ifndef _PILA_H_
#define _PILA_H_

//

char pila[256];

//

const char* P_Pila()
{
	return pila;
}

void P_Constructor(int cantidad_de_elementos)
{
	memset(pila, 'X', sizeof(char)*(cantidad_de_elementos));
	memset(&pila[cantidad_de_elementos], 0, sizeof(char));
}

void P_Destructor()
{
}

void P_Inicializar(const char* buffer)
{
	int len=strlen(buffer);
	char backup[256];

	int index;
	for(index=0;index<len;index++)
		backup[index]=buffer[index];
	backup[len]=0;
	strcpy(pila, backup);
}

void P_Push(int len, char elemento)
{
	int index;
	for(index=0; index<len;index++){
		if(pila[index]=='X'){
			pila[index]=elemento;
			break;
		}
	}
}

void P_Pop(int len)
{
	int index;
	for(index=(len-1); index>=0;index--){
		if(pila[index]!='X'){

			V_Push(len,pila[index]);
			pila[index]='X';
			break;
		}
	}
}

void P_Quitar(int pos_elemento)
{
	pila[pos_elemento]='X';
}

int P_Tope(int len)
{
	int index;
	for(index=0; index<len;index++){
		if(pila[index]=='X'){
			return index;
		}
	}
	return len-1;
}

int P_Elementos(int len)	
{
	int elementos=0;
	int index;
	for(index=0; index<len;index++){
		if(pila[index]!='X'){
			elementos++;
		}
	}
	return elementos;
}

/*void P_Mostrar(int len)
{
	int c=0;
	int index;
	//int len=strlen(pila);
	for(index=0;index<len;index++){
		if(pila[index] != 'X'){
			printf("%c", pila[index]);
			c++;
		}
	}

	if(c==0) printf("vacia\n");
	printf("\n");
}*/

//

#endif

char texto[200] = {


	'a','s','d','x','x','x','x','x','x','x',
	'x','a','s','d','x','x','x','x','x','x',
	'a','s','d','x','x','x','x','x','x','x',
	'a','s','d','x','x','x','x','x','x','x',
	'a','s','d','x','x','x','x','x','x','x',
	'a','s','d','x','x','x','x','x','x','x',
	'a','s','d','x','x','x','x','x','x','x',
	'a','s','d','x','x','x','x','x','x','x',
	'a','s','d','x','x','x','x','x','x','x',
	'a','s','d','x','x','x','x','x','x','x',
	'a','s','d','x','x','x','x','x','x','x',
	'a','s','d','x','x','x','x','x','x','x',
	'a','s','d','x','x','x','x','x','x','x',
	'a','s','d','x','x',' ','x','x','x','x',
	'a','s','d','x','x','x','x','x','x','x',
	'a','s','d','x','x','x','x','x','x','x',
	'a','s','d','x','x','x','x','x','x','x',
	'a','s','d','x','x','x','x','x','x','x',
	'a','s','d','x','x','x','x','x','x','x',
	'a','s','d','x','x','x','x','x','x',0};

int* arreglo_final_re(char* str, char letra){

	static int vec[4]={0};
	int estado=0;
	if(*str!=NULL){
		if(*str==letra) estado=1;
		if((*str=='a')||(*str=='e')||(*str=='i')||(*str=='o')||(*str=='u')) estado=2;
		if((*str!='a')&&(*str!='e')&&(*str!='i')&&(*str!='o')&&(*str!='u')) estado=3;
		if(*str==' ') estado=4;
		str++;
		for(unsigned int i=1; i<=estado;i++){
			if(estado==3&&i==2)continue;
			if(estado==4&&(i==2||i==3))continue;
			vec[i-1]++;
		}

		//arreglo_final_re(str,letra);//esto dejaria en la pila varios ret+address los cuales deben popearse luego..
		return arreglo_final_re(str,letra);
	}

	printf("----------------------------------------\n");
	printf("cantidad letras: %d\n",vec[0]);
	printf("cantidad vocales: %d\n",vec[1]);
	printf("cantidad consonantes: %d\n",vec[2]);
	printf("cantidad blancos: %d\n",vec[3]);
	printf("----------------------------------------\n");
	printf("----------------------------------------\n");
	printf("Direccion del vector static: %x\n",vec);
	printf("----------------------------------------\n");

	return &vec[0];

}

int main(){

	char* t = texto;
	printf("Texto: %s\n",t);
	printf("----------------------------------------\n");

	int* p =arreglo_final_re(t,'x');
	printf("----------------------------------------\n");
	printf("Direccion rescatada desde el Main: %x\n",p);
	printf("----------------------------------------\n");
	printf("Letras: %d\n",*(p+0));
	printf("Vocales: %d\n",*(p+1));
	printf("Consonantes: %d\n",*(p+2));
	printf("Blancos: %d\n",*(p+3));
	printf("----------------------------------------\n");

	system("pause");
	return 0;
}

void func(){

	DWORD addressx = (DWORD)&ExitProcess;
	//DWORD RetFakeSinPrologo;

	__asm{

		mov edx, RetFakeSinPrologo
		mov dword ptr [ebx],edx

		mov eax, addressx
RetFakeSinPrologo:
		jmp eax;
	}
}