0..2^32-1 रेंज में पर्ल पैदा मूल्यों में एक त्वरित स्ट्रिंग चेकसम समारोह

Question

मैं निम्नलिखित गुणों के साथ एक पर्ल स्ट्रिंग चेकसम समारोह के लिए देख रहा हूँ:

• इनपुट: अपरिभाषित के यूनिकोड स्ट्रिंग लंबाई ($string)
• आउटपुट: अहस्ताक्षरित पूर्णांक ($hash), जिसके लिए 0 <= $hash <= 2^32-1 रखती

छद्म कोड (0 4294967295, एक 4-बाइट MySQL अहस्ताक्षरित int के आकार मिलान करने के लिए):

sub checksum { 
    my $string = shift; 
    my $hash; 
    ... checksum logic goes here ... 
    die unless ($hash >= 0); 
    die unless ($hash <= 4_294_967_295); 
    return $hash; 
} 

आदर्श रूप में चेकसम समारोह को चलाने के लिए त्वरित किया जाना चाहिए और कुछ हद तक लक्ष्य अंतरिक्ष (0 .. 2^32-1) टकराव से बचने के लिए समान रूप से मान उत्पन्न करनी चाहिए। इस एप्लिकेशन में यादृच्छिक टकराव पूरी तरह से घातक हैं, लेकिन जाहिर है, मैं उन हद तक उनसे बचना चाहता हूं कि यह संभव है।

इन आवश्यकताओं को देखते हुए, इसे हल करने का सबसे अच्छा तरीका क्या है?

Answer 1

कोई हैश फ़ंक्शन पर्याप्त होगा - इसे 4-बाइट्स पर छोटा कर दें और किसी संख्या में कनवर्ट करें। अच्छे हैश फ़ंक्शंस में एक यादृच्छिक वितरण होता है, और यह वितरण स्थिर रहेगा चाहे आप स्ट्रिंग को छोटा कर दें।

मैं Digest::MD5 का सुझाव देता हूं क्योंकि यह सबसे तेज़ हैश कार्यान्वयन है जो पर्ल के साथ मानक के रूप में आता है। स्ट्रिंग :: सीआरसी, जैसा कि पिम उल्लेख है, सी में भी लागू किया गया है और तेजी से होना चाहिए।

use Digest::MD5 qw(md5); 
my $str = substr(md5("String-to-hash"), 0, 4); 
print unpack('L', $str); # Convert to 4-byte integer (long) 

Answer 2

यह नहीं पता कि यह कितनी जल्दी है, लेकिन आप String::CRC आज़मा सकते हैं।

Answer 3

से perldoc -f unpack:

यहाँ कैसे हैश की गणना और यह एक पूर्णांक में बदलने के लिए है

 For example, the following computes the same number as the 
     System V sum program: 

      $checksum = do { 
       local $/; # slurp! 
       unpack("%32W*",<>) % 65535; 
      };