POT is an Erlang library for generating Google Authenticator compatible one time passwords
MIT License
POT is an Erlang library for generating one time passwords. It supports both HMAC-based one time passwords (HOTP) and time based ones (TOTP). The generated passwords are based on RFC 4226 and RFC 6238, compatible with Google Authenticator.
POT is an almost direct translation of the Python OneTimePass library.
POT should work with any recent version of Erlang/OTP, Elixir, and other Erlang VM based languages.
In order to learn more about one time password generation, see the following Wikipedia articles:
Released version 1.0.2 with the following changes:
Released version 1.0.1 with the following changes:
Released version 1.0.0 with the following changes:
Released version 0.11.0 with the following changes:
Released version 0.10.2 with the following change:
Released version 0.10.1 with the following change:
base32
module was renamed to pot_base32
.Released version 0.9.8 with the following bug fix:
pot:totp/2
supports setting the timestamp (Thanks to Julius Beckmann)See the sections below on using pot
in your Erlang and Elixir project.
We recommend using rebar3 for managing dependencies and building the library. POT is available on hex.pm, so you can just include the following in your rebar.config
:
{deps, [pot]}.
See the Erlang examples
Include POT in your mix.exs
as a dependency:
defp deps do
[{:pot, "~> 1.0"}]
end
The functions below refer to the following common parameters:
Parameter | Type |
---|---|
Interval |
integer |
Secret |
string* |
Token |
string* |
Interval
is an integer that represents the counter value, the "moving factor" referenced in RFC 4226. It is an 8 byte unsigned integer; if a negative and/or too large integer is passed, it will be 2's complemented and truncated appropriately.Secret
is a base-32-encoded secret key. Generally, it should be at least 128 bits, preferably 160 bits.Token
is a HOTP/TOTP value represented as a string*. This is generally a 6-digit number, e.g., "123456", but its length may be modulated with the token_length
option.*Note: for Erlang uses of pot
, all strings should be in binary()
format.
hotp/2,3
Generate an RFC 4226 compatible HOTP token.
Erlang:
pot:hotp(Secret, Interval) -> Token
pot:hotp(Secret, Interval, Options) -> Token
Elixir:
:pot.hotp(Secret, Interval) -> Token
:pot.hotp(Secret, Interval, Options) -> Token
The following Options
are allowed:
Option | Type | Default |
---|---|---|
digest_method |
atom | sha |
token_length |
integer > 0 | 6 |
digest_method
controls the signing algorithm passed to the Erlang crypto
module's hmac
function. For RFC 4226 compliant tokens, it must be set to sha
. For RFC 6238 compliant tokens, additional values such as sha256
or sha512
may be used.token_length
controls the number of digits in output Token
.totp/1,2
Generate an RFC 6238 compatible TOTP token.
Erlang:
pot:totp(Secret) -> Token
pot:totp(Secret, Options) -> Token
Elixir:
:pot.totp(Secret) -> Token
:pot.totp(Secret, Options) -> Token
The following Options
are allowed:
Option | Type | Default/Reference |
---|---|---|
addwindow |
integer | 0 |
digest_method |
atom | from hotp/2,3 |
interval_length |
integer > 0 | 30 |
timestamp |
timestamp | os:timestamp() |
token_length |
integer > 0 | from hotp/2,3 |
addwindow
acts as an offset to the Interval
extrapolated from dividing the timestamp
by the interval_length
per the algorithm described in RFC 6238.interval_length
controls the number of seconds for the Interval
computation.timestamp
may be passed to specify a custom timestamp (in Erlang timestamp format) to use for computing the Interval
used to generate a Token
.valid_token/1,2
Validate that a given Token
has the correct format (correct length, all digits).
Erlang:
pot:valid_token(Token) -> Boolean
pot:valid_token(Token, Options) -> Boolean
Elixir:
:pot.valid_token(Token) -> Boolean
:pot.valid_token(Token, Options) -> Boolean
The following Options
are allowed:
Option | Type | Default/Reference |
---|---|---|
token_length |
integer > 0 | from hotp/2,3 |
valid_hotp/2,3
Validate an RFC 4226 compatible HOTP token. Returns true
if the Token
is valid.
Erlang:
pot:valid_hotp(Token, Secret) -> Boolean
pot:valid_hotp(Token, Secret, Options) -> Boolean | {true, interval()}
Elixir:
:pot.valid_hotp(Token, Secret) -> Boolean
:pot.valid_hotp(Token, Secret, Options) -> Boolean | {true, interval()}
The following Options
are allowed:
Option | Type | Default/Reference |
---|---|---|
digest_method |
atom | from hotp/2,3 |
last |
integer | 1 |
return_interval |
boolean | false |
token_length |
integer > 0 | from hotp/2,3 |
trials |
integer > 0 | 1000 |
last
is the Interval
value of the previous valid Token
; the next Interval
after last
is used as the first candidate for validating the Token
.trials
controls the number of incremental Interval
values after last
to try when validating the Token
. If a matching candidate is not found within trials
attempts, the Token
is considered invalid.return_interval
controls whether the matching Interval
of a valid Token
is returned with the result. if set to true
, then valid_hotp/2
will return {true, Interval}
(e.g., {true, 123}
) when a valid Token
is provided.valid_totp/2,3
Validate an RFC 6238 compatible TOTP token. Returns true
if the Token
is valid.
Erlang:
pot:valid_totp(Token, Secret) -> Boolean
pot:valid_totp(Token, Secret, Options) -> Boolean
Elixir:
:pot.valid_totp(Token, Secret) -> Boolean
:pot.valid_totp(Token, Secret, Options) -> Boolean
The following Options
are allowed:
Option | Type | Default/Reference |
---|---|---|
addwindow |
integer | from totp/1,2 |
digest_method |
atom | from hotp/2,3 |
interval_length |
integer > 0 | from totp/1,2 |
timestamp |
timestamp | from totp/1,2 |
token_length |
integer > 0 | from hotp/2,3 |
window |
integer > 0 | 0 |
window
is a range used for expanding Interval
value derived from the timestamp
. This is done by considering the window
Interval
s before and after the one derived from the timestamp
. This allows validation to be relaxed to allow for successful validation of TOTP Token
s generated by clients with some degree of unknown clock drift from the server, as well as some client entry delay.POT works with binary tokens and secrets.
Secret = <<"MFRGGZDFMZTWQ2LK">>,
Token = pot:totp(Secret),
% Do something with the token
Secret = <<"MFRGGZDFMZTWQ2LK">>,
CurrentTrial = 3,
Token = pot:hotp(Secret, CurrentTrial),
% Do something with the token
Secret = <<"MFRGGZDFMZTWQ2LK">>,
Token = <<"123456">>,
IsValid = pot:valid_totp(Token, Secret),
% Do something
Secret = <<"MFRGGZDFMZTWQ2LK">>,
Token = <<"123456">>,
LastUsed = 5, % last successful trial
IsValid = pot:valid_hotp(Token, Secret, [{last, LastUsed}]),
% Do something
Alternatively, to get the last interval from a validated token:
Secret = <<"MFRGGZDFMZTWQ2LK">>,
Token = <<"123456">>,
LastUsed = 5, % last successful trial
Options = [{last, LastUsed}, {return_interval, true}],
NewLastUsed = case pot:valid_hotp(Token, Secret, Options) of
{true, LastInterval} -> LastInterval;
false -> LastUsed
end,
% Do something
Secret = <<"MFRGGZDFMZTWQ2LK">>,
Token = pot:totp(Secret, [{addwindow, 1}]),
% Do something
Secret = <<"MFRGGZDFMZTWQ2LK">>,
Token = <<"123456">>,
IsValid = pot:valid_totp(Token, Secret, [{window, 1}, {addwindow, 1}]),
% Do something
Time format is {MegaSecs, Secs, MicroSecs}
received by os:timestamp()
Secret = <<"MFRGGZDFMZTWQ2LK">>,
Token = pot:totp(Secret, [{timestamp, {1518, 179058, 919315}}]),
% Token will be <<"151469">>
secret = "MFRGGZDFMZTWQ2LK"
token = :pot.totp(secret)
# Do something with the token
secret = "MFRGGZDFMZTWQ2LK"
current_trial = 3
token = :pot.hotp(secret, current_trial)
# Do something with the token
secret = "MFRGGZDFMZTWQ2LK"
token = "123456"
is_valid = :pot.valid_totp(token, secret)
# Do something
secret = "MFRGGZDFMZTWQ2LK"
token = "123456"
last_used = 5 # last successful trial
is_valid = :pot.valid_hotp(token, secret, [{:last, last_used}])
# Do something
Alternatively, to get the last interval from a validated token:
secret = "MFRGGZDFMZTWQ2LK"
token = "123456"
last_used = 5 # last successful trial
options = [{:last, last_used}, {:return_token, true}]
new_last_used =
case :pot.valid_hotp(token, secret, options) do
{true, last_interval} -> last_interval
false -> last_used
end
# Do something
secret = "MFRGGZDFMZTWQ2LK"
token = :pot.totp(secret, [addwindow: 1])
# Do something
secret = "MFRGGZDFMZTWQ2LK"
token = "123456"
is_valid = :pot.valid_totp(token, secret, [window: 1, addwindow: 1])
# Do something
Time format is {MegaSecs, Secs, MicroSecs}
received by :os.timestamp()
secret = "MFRGGZDFMZTWQ2LK"
token = :pot.totp(secret, [timestamp: {1518, 179058, 919315}])
# Token will be <<"151469">>
Thanks to contributors.
Copyright (c) 2014-2021 POT Contributors
Permission is hereby granted, free of charge, to any person obtaining a copy of this software and associated documentation files (the "Software"), to deal in the Software without restriction, including without limitation the rights to use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies of the Software, and to permit persons to whom the Software is furnished to do so, subject to the following conditions:
The above copyright notice and this permission notice shall be included in all copies or substantial portions of the Software.
THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.