Einzigartigen Zeitstempel erzeugen (solved) (Allgemeines zu Perl)

[thread]20138[/thread]

Einzigartigen Zeitstempel erzeugen [solved]

Tags: perl5 Similar Threads

Readers: 18

Articles: hide open all | hide show old branches

+6 replies
Gustl

2016-08-18 10:13
User since
2011-01-27
443 articles
BenutzerIn
Hallo,

ich programmiere gerade ein Double Opt-In Verfahren, hierfür benötige ich einen Bestätigungslink. Am besten einen der von Datetime abhängig ist, damit er nie doppelt vorkommen kann.

Beispiel: 2016-06-06 18:59:06 --> in etwa: d748f1d8b1db2a2

Wie bekomme ich das hin?

Bis jetzt nutze ich folgendes, was aber doppelt vorkommen kann:
Code (perl): (dl )

1 2 3 4 5 6

sub get_new_confirm_number{ my @numbers; foreach(0..14){ $numbers[$_] = int(rand(10)); } my $regnummer = join("", @numbers); return $regnummer; }
Vielen Dank schonmal.

Gruß.
Gustl

modedit Editiert von GwenDragon: Titel eingedeutscht
Last edited: 2016-08-18 11:51:09 +0200 (CEST)
- +5 replies
- GwenDragon
  
  2016-08-18 11:36
  User since
  2005-01-17
  14835 articles
  Admin1
  Könnte so sinnvoll sein:
  SHA1-Prüfsumme(Mailadresse) + "-" + SHA1-Prüfsumme(Username) + "-" + SHA1-Prüfsumme(Time::Hires::gettimeofday)
  
  Code (perl): (dl )
  
  1 2 3 4 5
  
  use Digest::SHA1 qw(sha1_hex); use Time::HiRes qw(gettimeofday); my ($seconds, $microseconds) = gettimeofday; my $t = $seconds * 1_000_000 + $microseconds; my $UID = sha1_hex($mail) . '-' . sha1_hex($username) . '-' . sha1_hex($t);
  
  die Drachin Gwen
  
  Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
  - Gustl
    
    2016-08-18 11:43
    
    User since
    2011-01-27
    443 articles
    BenutzerIn
    
    Dann muss ich $t als Prüfsumme in der DB speichern und dann immer vergleichen.
    
    Danke, so werde ich es machen.
    
    Gruß,
    Gustl
  - murphy
    
    2016-08-19 00:45
    
    User since
    2004-07-19
    1776 articles
    HausmeisterIn
    
    Ich würde sagen, einen kurzen Wert wie einen Benutzernamen alleine muss man eigentlich nicht hashen, sondern kann ihn auch einfach kompakt kodieren.
    
    Wenn man aber mehrere Daten zusammen hasht und darunter auch Dinge wie ein Zeitstempel sind, dann wird der Hash schwierig zu erraten. Aber für die Nicht-Reproduzierbarkeit des Ergebnisses wäre eine HMAC-Konstruktion natürlich noch besser als ein einfacher Hash.
    When C++ is your hammer, every problem looks like your thumb.
  - +2 replies
  - Muffi
    
    2016-08-19 09:16
    
    User since
    2012-07-18
    1465 articles
    BenutzerIn
    
    Sowas ohne secret key ist gefährlich.
    Wenn ich rausgefunden hab wie der Hash erstellt wird, dann steckt plötzlich erstaunlich wenig Entropie in dem Time::Hires.
    
    Ich würd sowas nicht machen ohne noch ein Passwort zu verwurschten. Das am besten nicht mit in der Datei steht.
    Oder wie schon vorgeschlagen wurde HMAC. Das versucht genau solche Probleme zu lösen.
    
    Quark. Ich hab den Verwendungszweck falsch verstanden. Du willst ja einfach nur einen unique key haben.
    Nimm halt einfach sowas:
    
    $user_id.'_'.rand(10000000000000000)
    
    Dann siehst du z.B. bei Problemen auch im Log ganz einfach welcher User das war.
    
    Falls sich der User für mehr Sachen anmelden kann z.B.
    
    $user_id.'_news_'.rand(10000000000000000)
    
    edit: Und falls du die Sachen zum Verifizieren nicht noch zusätzlich in die DB speichern willst:
    
    $user_id.'_news_'.HMAC($user_id.'_news_', $secret_key)
    Last edited: 2016-08-19 09:30:26 +0200 (CEST)
    1 + 1 = 10
    - BernhardSchmalhofer
      
      2016-08-19 21:14
      
      User since
      2009-03-26
      56 articles
      BenutzerIn
      
      Wenn es nur eine unique ID sein soll, dann kann man ja gleich UUID nehmen.

View all threads created 2016-08-18 10:13.