AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Sprachen und Entwicklungsumgebungen Sonstige Fragen zu Delphi Delphi RSA Algorithmus - Geheimer Schlüssel
Thema durchsuchen
Ansicht
Themen-Optionen

RSA Algorithmus - Geheimer Schlüssel

Ein Thema von d4rkf · begonnen am 19. Jun 2005 · letzter Beitrag vom 21. Jun 2005
Antwort Antwort
d4rkf
(Gast)

n/a Beiträge
 
#1

RSA Algorithmus - Geheimer Schlüssel

  Alt 19. Jun 2005, 21:48
Hallo zusammen!

Mal wieder ein kleines Problem. Mittlerweile steht fest, dass ich den RSA-Algorithmus im Abi als Präsentationsthema hab. Den Algorithmus hab ich soweit verstanden und auch begonnen ihn umzusetzen. Mein Problem ist jetzt der private Schlüssel.

So wie ichs verstanden hab müsste das ganze so aussehen:

e·d ≡ 1 mod φ(N)

e und φ(N) hab ich ja schon, die Frage ist jetzt nur wie ich das in Delphi umsetzen kann?
Hat irgendjemand nen Quellcodefetzen um mir das zu veranschaulichen?

Danke im vorraus!
Gruß d4rkf
  Mit Zitat antworten Zitat
CalganX

Registriert seit: 21. Jul 2002
Ort: Bonn
5.403 Beiträge
 
Turbo Delphi für Win32
 
#2

Re: RSA Algorithmus - Geheimer Schlüssel

  Alt 19. Jun 2005, 22:01
Hi,
Codefetzen habe ich jetzt direkt keine, aber ich verstehe gerade deine Frage nicht.
Willst du Modulo-Arithmetik und das Eulersche Phi umsetzen?

Für Ersteres: einfach per Delphi-Referenz durchsuchenmod. Dein Beispiel würde also ungefähr so aussehen:
(e * d) mod phi(N) = 1 Und wenn du das Eulers. Phi umsetzen willst. Überlege dir einfach, wie du alle Zahlen zwischen 1 und n herausfindest, die mit n den ggT 1 haben. Das sollte also soweit klar sein (für den ggT kannst du dir den euklidischen Algorithmus ansehen).

Hope that helps,
Chris
  Mit Zitat antworten Zitat
BenjaminH

Registriert seit: 14. Okt 2004
Ort: Freiburg im Breisgau
713 Beiträge
 
Turbo Delphi für Win32
 
#3

Re: RSA Algorithmus - Geheimer Schlüssel

  Alt 19. Jun 2005, 22:34
Die Eulerfunktion ergibt sich, wenn N als Produkt zweier Primzahlen gewählt wird so:
Code:
(p-1)*(q-1)
Ich hoffe mich da richtig zu erinnern, ich hab da letztes Jahr ne AG drüber belegt.
[Edit="Zu schnell gelesen"]
Zitat von d4rkf:
e und φ(N) hab ich ja schon
Benjamin
  Mit Zitat antworten Zitat
d4rkf
(Gast)

n/a Beiträge
 
#4

Re: RSA Algorithmus - Geheimer Schlüssel

  Alt 20. Jun 2005, 00:09
Erstmal danke für die Antwort!
Ich versuchs mal genauer zu schildern:

Zitat:
1. Für die beiden Primzahlen p und q nehmen wir p = 11 und q = 13. Damit wird N = 143.
2. Die Eulerfunktion nimmt damit den Wert φ(N) = φ(143) = (p-1)(q-1) = 120 an.
3. Für die zu φ(143) = 120 teilerfremde neue Zahl e wähle man e = 23.
4. Mit diesen Werten erhalten wir die Bedingung: 23·d ≡ 1 mod 120. Das heißt: Das Produkt soll bei Division durch 120 den Rest 1 lassen. Man kann damit die Kongruenz als Gleichung schreiben: 23·d = k·120 + 1. Dabei ist k eine ganze Zahl. Als eine Lösung dieser diophantischen Gleichung 120·k - 23·d = -1 ergibt sich d = 47 und k = 9. Damit wird d = 47 der geheime Schlüssel, e = 23 und N = 143 der öffentliche Schlüssel.
*Stammt von Wikipedia

Also ich will noch den 4. Punkt (s.o.) in Delphi umsetzen und hab eigentlich nur Probleme mit dem Aufbau des Codes. Mitm Taschenrechner klappt alles prima, nur in Delphi wills nicht!
  Mit Zitat antworten Zitat
d4rkf
(Gast)

n/a Beiträge
 
#5

Re: RSA Algorithmus - Geheimer Schlüssel

  Alt 21. Jun 2005, 12:00
Problem hat sich erledigt!
Jetzt muss ich nur noch mit großen Zahlen arbeiten können... 1000^1000 und mehr
  Mit Zitat antworten Zitat
alzaimar
(Moderator)

Registriert seit: 6. Mai 2005
Ort: Berlin
4.956 Beiträge
 
Delphi 2007 Enterprise
 
#6

Re: RSA Algorithmus - Geheimer Schlüssel

  Alt 21. Jun 2005, 12:27
Such mal nach TBigNum
"Wenn ist das Nunstruck git und Slotermeyer? Ja! Beiherhund das Oder die Flipperwaldt gersput!"
(Monty Python "Joke Warefare")
  Mit Zitat antworten Zitat
Benutzerbild von TeronG
TeronG

Registriert seit: 19. Jul 2004
Ort: München
960 Beiträge
 
Delphi 2007 Professional
 
#7

Re: RSA Algorithmus - Geheimer Schlüssel

  Alt 21. Jun 2005, 12:35
Zitat von d4rkf:
Jetzt muss ich nur noch mit großen Zahlen arbeiten können... 1000^1000 und mehr
warum muss ich nun Plötzlich an Hagen denken ???
龍 Der Unterschied zwischen Theorie und Praxis ist in der Praxis größer als in der Theorie.
  Mit Zitat antworten Zitat
d4rkf
(Gast)

n/a Beiträge
 
#8

Re: RSA Algorithmus - Geheimer Schlüssel

  Alt 21. Jun 2005, 12:41
hab mich schon an ihn gewendet!

ich brauch nur ne möglichst einfache möglichkeit, schnell muss das programm nicht rechnen, nur genau!
da ich relativer delphi-neuling bin, weiß ich nicht wie ich zum beispiel die TBigNumber benutzen muss... könnte mir das jemand erklären?
  Mit Zitat antworten Zitat
Benutzerbild von TeronG
TeronG

Registriert seit: 19. Jul 2004
Ort: München
960 Beiträge
 
Delphi 2007 Professional
 
#9

Re: RSA Algorithmus - Geheimer Schlüssel

  Alt 21. Jun 2005, 12:46
Hab mit Delphi noch net so viel gerechnet ... aber evtl. hilft dir DAS weiter ... (da findest du auch die 3 DECMath's drinnen ..)
龍 Der Unterschied zwischen Theorie und Praxis ist in der Praxis größer als in der Theorie.
  Mit Zitat antworten Zitat
d4rkf
(Gast)

n/a Beiträge
 
#10

Re: RSA Algorithmus - Geheimer Schlüssel

  Alt 21. Jun 2005, 12:51
der beitrag wurde mir von hagen auch schon empfohlen, mein problem is nur, dass ich vermutlich vor lauter bäumen den wald nicht seh und nicht weiß wie ich das in meinem projekt integrieren kann...
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 06:51 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz