[HaBo]

#include <iostream>
#include <fstream>
#include <string>
#include <stdio.h>
#include <stdlib.h>
using namespace std;

void replace(string& text,const string& fnd,const string& rep) 
{ 
  size_t pos = text.find(fnd); 
  while(pos!=string::npos) 
  { 
    text.replace(pos,pos+fnd.length(),rep); 
    pos = text.find(fnd,pos); 
  } 
}

unsigned long int lof(ifstream &f){     //Length Of File
unsigned long int d; 
f.seekg(0,ios::end);    //Zeiger ans Ende der Datei setzen 
d=f.tellg();            //Position des Zeigers auslesen  
f.seekg(0,ios::beg);    //Zeiger zum Anfang der Datei setzen  
return(d);
}



void fencrypt(std::ifstream& srcfile,std::ofstream& dstfile,char *key,bool log, const char *datei)
{
//cout<<"void";
int keypos = 0, strpos = 0,i,f;
char buf, str[lof(srcfile)+1000000];
cout<<"while";
while(!srcfile.eof())
{
str[strpos] = srcfile.get();
strpos++;
//cout<<"sa";
}
cout<<strpos;
cout<<" bytes zu verschluesseln\n";
f=strpos;
str[strpos] = '\0'; strpos = 0;
srcfile.close();
//cout<<str[strpos+1];
i=0;
while(i<f)
{
//cout<<"while";
if(key[keypos] == '\0') keypos = 0;
buf = key[keypos];
if(log){std::cout << "Verschluessel  \"" << str[strpos] << "\" mit  \"" << buf <<"\": ";}
//+
str[strpos] ^= (int)buf;
if(log){std::cout << str[strpos] <<std::endl;}
dstfile.put(str[strpos]);
strpos++; keypos++;i++; 
}
}














void fcrypt(std::ifstream& srcfile,std::ofstream& dstfile,char *key,bool log, const char *datei)
{
//cout<<"void";
int keypos = 0, strpos = 0,i,f;
char buf, str[lof(srcfile)+1000000];
//cout<<"while";
while(!srcfile.eof())
{
str[strpos] = srcfile.get();
strpos++;
//cout<<"sa";
}
cout<<strpos;
f=strpos;
str[strpos] = '\0'; strpos = 0;
cout<<" bytes zu verschluesseln\n";
srcfile.close();
cout<<str[strpos+1];
i=0;
while(i<f)
{
//cout<<"while";
if(key[keypos] == '\0') keypos = 0;
buf = key[keypos];
if(log){std::cout << "Entschluessel  \"" << str[strpos] << "\" mit \"" << buf <<"\": ";}
//-
str[strpos] ^= (int)buf;
if(log){std::cout << str[strpos] <<std::endl;}
dstfile.put(str[strpos]);
strpos++; keypos++;i++; 
}
}











int a, b, c, d, e, falsch, u;
ifstream dat_ein;
ofstream dat_aus;
string zeile, zneu, key, dat;
//char *datei;
char datei[110], adatei[110];
char ki[10000];
string ss, sc, sh;

int main (int argc, char *argv[]){
	u=0;
	//cout<<argc;
	if(argc==4){
		u=1;
		strcpy (datei, argv[1]);
		strcpy (adatei, argv[2]);
		key=argv[3];
	}
	if(argc>1&&argc<4){
		cout<<"Der Funktionsaufruf lautet: [datei], [ausgabedatei], [schluessel]\n";
	}
	if(u==0){
	cout<<"Bls Datei Verschluesselung version 2.0\nc by Moritz Hpkt alle Rechte vorbehalten \n";
	}
	e=1;
	while(e==1){
	falsch=0;	
	if(u==0){
	cout<<"1: Verschluesseln \n2: Entschluesseln\n";
	cin>>a;
	cout<<"datei:\n";
	cin>>datei;
	cout<<"ausgabe Datei (ein und ausgabe Datei dürfen nicht indentisch sein) :\n";
	cin>>adatei;
	}
	if(strcmp(datei, adatei) == 0){
		falsch=1;
	}
	if(falsch==0){
	dat_ein.open(datei, ios::binary);
	dat_aus.open(adatei, ios::binary);
	if(u==0){
	cout<<"key: \n";
	cin>>key;
	}
	strcpy (ki, key.c_str());
	//cout<<"char";
	if(a==1){
		fencrypt(dat_ein,dat_aus,ki, false, datei);
	}
	else
	{
		fcrypt(dat_ein,dat_aus,ki, false, datei);
	}

cout<<"Vorgang erfolgreich ausgabe datei:\n";
cout<<adatei;
	}
	else
	{
		cout<<"Der Vorgang wurde abgebrochen, ein und ausgabe Datei stimmten ueber ein";
	}
if(u==0){
cout<<"\n1: Weitere Dateien ver/entschluesseln\n0: beenden\n";	
cin>>e;	
}
else
{
	e=0;
}
	}
return 0;
}

#include <iostream>
#include <string>
#include <fstream>

using namespace std;

int main()
{

    string Klartext;
    string Geheimtext;
    int Verschieben; 
    int Auswahl;
    int Laenge;
   
    ofstream Ausgabe;
    ifstream Einlesen;
    
    string Pfad_Einlesen;
    string Pfad_Ausgabe;
    
    string Text;
    

  cout <<"1. Verschlüßeln" << endl;
  cout <<"2. Entschlüßeln" << endl;
  cin >> Auswahl;
  
  switch(Auswahl)
  {
  case 1:
  
  cout <<"Geben sie den Pfad der Datei ein, die sie Verschlüßeln wollen";
  cout <<"\n(z.B. E:\\Hallo.txt):\t";
  cin >> Pfad_Einlesen;
  
  Einlesen.open(Pfad_Einlesen.c_str());

  
  while ( !Einlesen.eof() )
  { //Solange nicht das Ende der Datei(EOF) erreicht ist 
  Klartext.push_back( Einlesen.get() ); //Hänge an der string klartext den Buchstaben, den get() liefert an
  } 
  
  cout <<"\nUnd jetzt den Pfad der Datein, wo die Verschlüßelung stehen soll: \n";
  cin >> Pfad_Ausgabe;
  
  Ausgabe.open(Pfad_Ausgabe.c_str());
  
  cout <<"\nUm wie viele Stellen wollen sie die Buchstaben Verschieben?\n";
  cin >>  Verschieben;
  
  Laenge = Klartext.length();
    
    for(int i = 0; i <= Laenge - 1 ; i++)
    {
          if(i == Laenge - 1) break;
          
          Geheimtext[i] = Klartext[i];
          Geheimtext[i] += Verschieben;
    }
    
    cout <<"Jetzt kommt die Verschlüßelung: \n\n";
    
    for(int i = 0; i <= Laenge - 1; i++)     
    {
            cout << Geheimtext[i];
            Ausgabe << Geheimtext[i] ;
    }
    
    cout << Geheimtext;
    
    Ausgabe.close();
    Einlesen.close();
    break;
    
    case 2:
         
  cout <<"Geben sie den Pfad der Datei ein, die sie Entschlüßeln wollen";
  cout <<"\n(z.B. E:\\Hallo.txt):\t";
  cin >> Pfad_Einlesen;
  
  Einlesen.open(Pfad_Einlesen.c_str());

  
  while ( !Einlesen.eof() )
  { //Solange nicht das Ende der Datei(EOF) erreicht ist 
  Klartext.push_back( Einlesen.get() ); //Hänge an der string klartext den Buchstaben, den get() liefert an
  } 
  
  cout <<"\nUnd jetzt den Pfad der Datein, wo die Verschlüßelung stehen soll: \n";
  cin >> Pfad_Ausgabe;
  
  Ausgabe.open(Pfad_Ausgabe.c_str());
  
  cout <<"\nUm wie viele Stellen wollen sie die Buchstaben zurückschieben?\n";
  cin >>  Verschieben;
  
    Laenge = Klartext.length();
    
    for(int i = 0; i <= Laenge - 1 ; i++)
    {
          if(i == Laenge - 1) break;
          
          Geheimtext[i] = Klartext[i];
          Geheimtext[i] -= Verschieben;
    }
    
    cout <<"Jetzt kommt die Verschlüßelung: \n\n";
    
    for(int i = 0; i <= Laenge - 1; i++)     
    {
            cout << Geheimtext[i];
            Ausgabe << Geheimtext[i] ;
    }
    
    cout << Geheimtext;
    
    Ausgabe.close();
    Einlesen.close();
    break;
    
   case 3:
        
  cout <<"\n(z.B. E:\\Hallo.txt):\t";
  cin >> Pfad_Einlesen;
  
  Einlesen.open(Pfad_Einlesen.c_str());

  
  while ( !Einlesen.eof() )
  { //Solange nicht das Ende der Datei(EOF) erreicht ist 
  Klartext.push_back( Einlesen.get() ); //Hänge an der string klartext den Buchstaben, den get() liefert an
  } 
  
  cout <<"\nUnd jetzt den Pfad der Datein, wo die Verschlüßelung stehen soll: \n";
  cin >> Pfad_Ausgabe;
  
  Ausgabe.open(Pfad_Ausgabe.c_str());
   
  Verschieben = 0;
  
    Laenge = Klartext.length();
    
    for(int i = 0; i <= Laenge - 1 ; i++)
    {
          
          if(i == Laenge - 1) break;
          
          Geheimtext[i] = Klartext[i];
          Geheimtext[i] -= Verschieben;
    
    }
    
    cout <<"Jetzt kommt die Verschlüßelung: \n\n";
    
    for(int i = 0; i <= Laenge - 1; i++)     
    {
            cout << Geheimtext[i];
            Ausgabe << Geheimtext[i] ;
    }
    
    cout << Geheimtext;
    
    Ausgabe.close();
    Einlesen.close();
    break;
  
   }
   
   
          
    
int ENDE;
cin >> ENDE;
return 0;
}

#include <cstdlib>
#include <iostream>

using namespace std;

void caesar(char cha[], int schlussel);                 // Mache caesar bekannt

int main()
{
 char ch[50] = {'\0'};                                   // 50x leer
 int key = 0;
 
 cout << "*******************************\n";
 cout << "* Caesar Schiffre by Cr4ckEye *\n";           // Ausgaben
 cout << "*******************************\n\n" << endl;
 cout << "Bitte geben Sie einen Text ein: ";
 cin.getline(ch, 50);                                  // Max 50 Zeichen mit Whitespace
 do
 {
 cout << "Bitte geben Sie den Schluessel ein: ";       
 cin >> key;
 } while(key<=0 && key>=26);                           // Key nicht größer als 25
 cout << "\nVerschluesselt: ";
 caesar(ch, key);                                      // Ver und Entschlüsseln
 cin.get();                                            // Halte Fenster offen
 cin.get();
}

void caesar(char cha[], int schlussel)
{
     for(int i=0; i<50; ++i)                          // Verschlüsselung
     {
     if(cha[i] == '\0') break;                        // 0 Terminator -> Ende
      while(cha[i] == 32)                             // Whitespace ausgeben
      { cout << " "; ++i; }                           
      cha[i] = toupper(cha[i])+schlussel;    // Zu Großbuchstabe und Berechnung
      cout << cha[i];                                 // Ausgabe
     }
     
     cout << "\n\nEntschluesselt: ";                  // Entschlüsselung
     
     for(int j=0; j<50; ++j)                          
     {
     if(cha[j] == '\0') break;                        // 0 Terminator -> Ende
      while(cha[j] == 32)                             // Whitespace ausgeben
      { cout << " "; ++j; }
      cha[j] = cha[j]-(schlussel*2);                  // Konvertrierung und Berechnung (schlussel*2), 
                                                      // da er vorher ja nocheinmal um den selben Schlüssel verschoben wurde.
      cout << cha[j];                                 // Ausgabe
     }
}

import javax.microedition.lcdui.Command;
import javax.microedition.lcdui.CommandListener;
import javax.microedition.lcdui.Display;
import javax.microedition.lcdui.Displayable;
import javax.microedition.lcdui.Form;
import javax.microedition.lcdui.TextField;
import javax.microedition.midlet.MIDlet;

public class CryptIt extends MIDlet implements CommandListener 
{
	private Display display;
	private Form form = new Form("Crypt IT");
	private Command crypt = new Command("Crypt", Command.SCREEN, 1);
	private Command exit = new Command("Exit", Command.EXIT, 1);
	private TextField textfield = new TextField("Standardkey 13:", "", 50, TextField.ANY);

	public static String cryptit( String s )
	{
    	StringBuffer ergebnis = new StringBuffer();
		int key=13;
		
   	 	for( int i = 0; i < s.length(); i++ )
    	{
      		int c = s.charAt( i );

      		if ( (c >= 'A') && (c <= 'z') ) 
      		{
        		c += key;
        		if( c > 'z' )
          		c = 'a' + c % 'z' -1;
        		if( (c > 'Z') && (c < 'a') ) 
          		c = 'A' + c % 'Z' - 1;
      		}
      		ergebnis.append( (char) c );
    	}
    
    	return ergebnis.toString();
  	} 
  
	public CryptIt() 
	{
    	display = Display.getDisplay(this);
    	form.addCommand(exit);
    	form.addCommand(crypt);
    	form.append(textfield);
    	form.setCommandListener(this);
  	}

	public void startApp() 
	{
    	display.setCurrent(form);
 	}

  	public void pauseApp() 
  	{
 	}

	public void destroyApp(boolean unconditional) 
	{
 	}

	public void commandAction(Command command, Displayable displayable) 
	{
    	if (command == crypt) 
    	{
      		String textin = textfield.getString();
      		String encrypt = cryptit(textin);
      
      		textfield.setString(encrypt);
    	} else if (command == exit) 
    	{
      		destroyApp(false);
      		notifyDestroyed();
    	}
  	}
}

chars = [ chr(n) for n in range(65,91) ]

# Caesar
def caesar(text, shift, dec=1):
    return "".join([ chars[(ord(c)-65+(dec*shift))%26] for c in text ])

# Vigenere
def encodeVigenere(text, key, dec=1, idx=0, result=""):
    for c in text:
        result += chars[ (ord(c)-65+(dec*chars.index(key[idx])))%26 ]
        idx = (idx + 1) % len(key)
    return result

if __name__ == '__main__':
    print caesar("FELIX", 3)
    print caesar("IHOLA", 3, -1)
    
    print encodeVigenere("GEHEIMNIS", "AKEY")
    print encodeVigenere("GOLCIWRGS", "AKEY", -1)

class VProg
	def initialize(x)
		@x = x
	end
	def to_s
		if @x == 1
			textv()
		elsif @x == 2
			dateiv()
		else
			exit
		end
	end
	private
	def textv()
		puts "\n\n|-----Caesar-Verschluesselung-----|"
		puts "Geben Sie nun den Text in Kleinbuchstaben ein, der verschluesselt werden soll:\n\n"
		text1 = gets.chomp
		puts "\n\nGeben Sie ein, mit welchem Faktor der Text verschluesselt werden soll:\n\n"
		faktor = gets.to_i; text2 = verschluesseln(text1, faktor)
		puts text2
	end
	def dateiv()
		puts "\n\n|-----Caesar-Verschluesselung-----|"
		puts "Geben Sie nun den kompletten Pfad der Datei an, die verschluesselt werden soll:\n\n"
		pfad = gets.chomp
		puts "\n\nGeben Sie ein, mit welchem Faktor der Text verschluesselt werden soll:\n\n"
		faktor = gets.to_i; file = open(pfad, "r"); text1 = file.read; file.close
		text2 = verschluesseln(text1, faktor); file = open(pfad, "w"); file.print "#{text2}"
		puts "\n\nDatei verschluesselt.\n\n"
	end
	def verschluesseln(text1, faktor)
		a = ["A", "B", "C", "D", "E", "F", "G", "H", "I", "J", "K", "L", "M", "N", "O", "P", "Q", "R", "S", "T", "U", "V", "W", "X", "Y", "Z"]
		b = {"a"=>1, "b"=>2, "c"=>3, "d"=>4, "e"=>5, "f"=>6, "g"=>7, "h"=>8, "i"=>9, "j"=>10, "k"=>11, "l"=>12, "m"=>13, "n"=>14, "o"=>15, "p"=>16, "q"=>17, "r"=>18, "s"=>19, "t"=>20, "u"=>21, "v"=>22, "w"=>23, "x"=>24, "y"=>25, "z"=>26}
		text2 = text1.split(""); text1 = ""
		text2.each { |part|
			if b[part] != nil
				text1 += a[(b[part]-1-(26-faktor))]
			else
				text1 += part
			end
		}
		return text1
	end
end
puts "\n\n|--------------Menue--------------|"
puts "(1) Text verschluesseln"
puts "(2) Datei verschluesseln"
puts "(3) Programm beenden\n\n"
x = gets.to_i; vprog = VProg.new(x); vprog.to_s

import Char
import List

caesar :: String -> (Int, Int) -> String
caesar [] (_, _) = []
caesar (x:xs) (shift, dec) = enc : caesar xs (shift, dec)
  where
    enc = [ 'A'..'Z'] !! (mod (ord x - 65 + (dec * shift)) 26)

vigenere :: String -> String -> (Int, Int) -> String
vigenere [] _ (_, _) = []
vigenere (x:xs) ks (idx, dec) = enc : vigenere xs ks (newIdx, dec)
  where
    alph = [ 'A'..'Z']
    newIdx = mod (idx + 1) (length ks)
    enc = alph !! (mod (ord x - 65 + (dec * (shift (ks !! idx, 0)))) 26)
    shift (k, i) = if i > 25 then 1 else if alph !! i == k then i else shift (k, i+1)

main :: IO()
main = do
  putStrLn $ "FELIX -> " ++ caesar "FELIX" (3, 1)
  putStrLn $ "IHOLA -> " ++ caesar "IHOLA" (3, -1)
  putStrLn $ "GEHEIMNIS -> " ++ vigenere "GEHEIMNIS" "AKEY" (0, 1)
  putStrLn $ "GOLCIWRGS -> " ++ vigenere "GOLCIWRGS" "AKEY" (0, -1)

def encode(char, str):
    clear = "abcdefghijklmnopqrstuvwxyz"
    cryptic = clear[clear.index(char):] + clear[:clear.index(char)]

    crystr = ""

    str = str.lower()
    
    for i in str:
        if i not in clear:
            new = i
        else:
            new = cryptic[clear.index(i)]

        crystr = crystr + new

    return crystr

def decode(char, str):
    clear = "abcdefghijklmnopqrstuvwxyz"
    cryptic = clear[clear.index(char):] + clear[:clear.index(char)]

    enstr = ""

    str = str.lower()

    for i in str:
        if i not in cryptic:
            new = i
        else:
            new = clear[cryptic.index(i)]

        enstr = enstr + new

    return enstr

text="TEST"; key=3; print "".join([chr((ord(c)-65+key)%26+65) for c in text])

text="TEST"; key="ABC"; print "".join([chr((ord(text[i])+ord(key[i%len(key)])-130)%26+65) for i in range(len(text))])

,------------------------------------------------[->+<],>>>,----------[++++++++++<<[->+>+<<]>[-<+>]>.,----------]