Anonymous user
Time-based one-time password algorithm: Difference between revisions
Time-based one-time password algorithm (view source)
Revision as of 23:12, 23 September 2014
, 9 years agono edit summary
(Generate a time-limited token based on a shared secret key) |
mNo edit summary |
||
Line 81:
Set b32str=$ZConvert(b32str,"U")
Set b32alp="ABCDEFGHIJKLMNOPQRSTUVWXYZ234567"
Set (bits,
For i=1:1:$Length(b32str) {
Set val=$Find(b32alp, $Extract(b32str, i))-2
Line 88:
For i=1:8:$Length(bits) {
Set chunk=$Extract(bits, i, i+7)
Set
}
Quit
}
| |||