Kryptering

http://www.google.com/search?hl=en&safe=off&q=how+to+crypting

masser af gode links

http://members.ozemail.com.au/~firstpr/crypto/

Her er der vist rigtig meget guf at hente :)

Eller på : http://www.bitvise.com/crypto++.html

http://www.google.com/search?q=how+to+Cryptography+

jeg har lidt simple kryptering her ... det er godtnok Delphi kode, men hvis det volder dir problemer vil jeg meget gerne porte det til C++

procedure FastCrypt(ptrBuffer: Pointer; iSize: Integer; uiInit: Byte = $00);
var
  iIdx      : Integer;
  uiCurrByte : Integer;
  uiLastByte : Integer;
begin
  uiLastByte := 0;

  for iIdx := 1 to iSize do
  begin
    uiCurrByte := Byte(ptrBuffer^);
    uiCurrByte := uiCurrByte xor uiLastByte;
    uiCurrByte := not uiCurrByte;
    uiCurrByte := uiCurrByte xor uiInit;
    uiCurrByte := ((uiCurrByte and $0F) shl 4) or ((uiCurrByte and $F0) shr 4);
    uiLastByte := uiCurrByte;
    Char(ptrBuffer^) := Char(uiCurrByte);
    inc(pChar(ptrBuffer));
  end;
end;

procedure FastDeCrypt(ptrBuffer: Pointer; iSize: Integer; uiInit: Byte = $00);
var
  iIdx      : Integer;
  uiCurrByte : Byte;
  uiLastByte : Byte;
begin
  uiLastByte := 0;
  for iIdx := 1 to iSize do
  begin
    uiCurrByte := Byte(ptrBuffer^);
    uiCurrByte := ((uiCurrByte and $0F) shl 4) or ((uiCurrByte and $F0) shr 4);
    uiCurrByte := uiCurrByte xor uiInit;
    uiCurrByte := not uiCurrByte;
    uiCurrByte := uiCurrByte xor uiLastByte;
    uiLastByte := Byte(ptrBuffer^);
    Char(ptrBuffer^) := char(uiCurrByte);
    inc(pChar(ptrBuffer));
  end;
end;


Jens B http://fotx.net/borrisholt

eller endnu nemmere gør som DSITekst gjorde ved passwords.

XOR alle karaktere med 0xff

Ellers har er par herrer skrevet en bog der hedder \"Data Structures and Algorithms\"

den finder du her :
http://www.ourstillwaters.org/stillwaters/csteaching/DataStructuresAndAlgorithms/toc.htm

Jens B

borris: Fed bog, jeg er selv uddannet i dette emne fra den bog. Den er KANON god.

borrisholt -> hvis du vil må du gerne oversætte det...

En af mine kammeratter spørger om I også ved hvor man kan finde nogle tutorials om pakning

100 point for et svar der kan bruges og selvfølgelig 150 der deles ud blandt de svar jeg allerede af fået om kryptering

Du kan prøve at rode lidt her : http://dogma.net/DataCompression/SourceCode.shtml

partio:
http://www.google.com/search?hl=en&safe=off&q=how+to+compression

Men søg dog på www.google.com der er meget nemmere.

Jeg ved godt, dette spørgsmål er lidt gammelt... Men jeg er helt ny på Eksperten, og jeg kunne ikke undgå at se indlægget af borisholt.
Det, du laver med din Delphi-kode, er på ingen måde kryptering. Og hvad værre er, det er på ingen måde sikkert. Simpel xor-'kryptering' kan brydes på sekunder på en normal PC. Jeg har ikke et program til at gøre dette, men det er et faktum, at det kan lade sig gøre.
Hvis I virkelig er interesserede i at lære kryptografi, bør I læse en begynderbog som fx Applied Cryptography af Bruce Schneier. Den er en glimrende introduktion til emnet og indeholder også C-source.
Jeg vil personligt våve at påstå, at læsning af en sådan bog er et krav, inden man begynder at beskæftige sig med kryptografi - ellers kommer man alt for let til at tro, at noget er sikkert - uden det over hovedet er det.
Til kryptering af egne filer vil jeg desuden stærkt anbefale PGPfreeware og ikke et eget program, da fatale bugs meget let opstår. PGP er, som navnet antyder, gratis. www.pgp.com el. www.pgpi.org.