bulkmail_simple_checksum stringWhat it does:
Computes a trivial checksum for a string. The checksum is the sum of the ascii values for each character of the string. Note that we're not trying to bolt things down. We're trying to keep the lazy,malicious attacker at bay. Someone who really wanted to come after us would figure out anything we could reasonably do here.Defined in: /web/philip/tcl/bulkmail-utils.tcl
Source code:
set string_chars [split $string {}] set total 0 foreach char $string_chars { scan $char "%c" value incr total $value } return $total