Kodirni program ADFGX oz. ADFGVX

extern "C" __declspec(dllexport)BSTR sifriraj(char* besedilo, int dolzinaBesedila, char matrika[6][6], char* geslo, int dolzinaGesla)
{
	string zakodiranoBesedilo;
	int stevec = 0;

	for(int st = 0; st < dolzinaBesedila; st++)
	{
		besedilo[st] = tolower(besedilo[st]);

		if(besedilo[st]=='š')
		{
			besedilo[st]='s';
		}

		else if(besedilo[st] == 'č')
		{
			besedilo[st] = 'c';
		}

		else if(besedilo[st] == 'ž')
		{
			besedilo[st] = 'z';
		}

		else if(besedilo[st] == 'j')
		{
			besedilo[st] = 'i';
		}

		else if(besedilo[st] < 'a' || besedilo[st] > 'z')
		{
			for(int st1=st; st<dolzinaBesedila; st++)
			{
				besedilo[st1] = besedilo[st1 + 1];
			}

			dolzinaBesedila--;
		} 
	}
	stevec=0;
	for(int st = 0; st < dolzinaBesedila; st++)
	{
		for(int st1=1; st1<6; st1++)
		{
			for(int st2=1; st2<6; st2++)
			{
				if(besedilo[st] == matrika[st1][st2])
				{
					zakodiranoBesedilo+=matrika[st1][0];
					zakodiranoBesedilo+=matrika[0][st2];
					break;
				}
			}
		}
	}

	stevec=zakodiranoBesedilo.length();
	
	char tabela[1000][1000];
	int vrstice[1000];
	for(int st=0; st<dolzinaGesla; st++)
	{
		tabela[0][st]=geslo[st];
	}

	for(int st = 0; st < stevec; st++)
	{
		int st1 = (st / dolzinaGesla) + 1;
		vrstice[st % dolzinaGesla]=st1;
		tabela[st1][st % dolzinaGesla]=zakodiranoBesedilo[st];
	}
	
	int najvec=vrstice[0];
	for (int prehod = 0; prehod < dolzinaGesla-1 ; prehod++)
    {
		for(int i = 0; i < dolzinaGesla-1; i++)
		{
			
            if (int(tabela[0][i]) > int(tabela[0][i + 1]))
            {
				for(int st=0; st <=najvec; st++)
				{
				    char a = tabela[st][i];
				    tabela[st][i]=tabela[st][i+1];
				    tabela[st][i+1]=a;
				}

				int c=vrstice[i];
				vrstice[i]=vrstice[i+1];
				vrstice[i+1]=c;
            }
        }
    }

	stevec=0;
	for(int st=0; st < dolzinaGesla; st++)
	{
		for(int st1=1; st1<=vrstice[st];st1++)
		{
			zakodiranoBesedilo[stevec]=tabela[st1][st];
			stevec++;
		}
	}	
	
	int wslen = ::MultiByteToWideChar(CP_ACP, 0,
								zakodiranoBesedilo.data(), zakodiranoBesedilo.length(),
								NULL, 0);

    BSTR wsdata = ::SysAllocStringLen(NULL, wslen);
    ::MultiByteToWideChar(CP_ACP, 0,
		zakodiranoBesedilo.data(), zakodiranoBesedilo.length(),
                          wsdata, wslen);

	return wsdata;
}