# crypto - Tcl bindings for parts of the `nettle' crypto library
-# Copyright 2006 Ian Jackson
+# Copyright 2006-2012 Ian Jackson
#
# This program is free software; you can redistribute it and/or
# modify it under the terms of the GNU General Public License as
# General Public License for more details.
#
# You should have received a copy of the GNU General Public License
-# along with this library; if not, write to the Free Software
-# Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA
-# 02110-1301, USA.
+# along with this library; if not, see <http://www.gnu.org/licenses/>.
Table *hbcryptotoplevel TopLevel_Command
alg enum(HashAlgInfo/, "hash alg")
message hb
=> hb
+ hash-init
+ alg enum(HashAlgInfo/, "hash alg")
+ => iddata(&cht_hash_states)
+ hash-update
+ stateh iddata(&cht_hash_states)
+ message hb
+ hash-final
+ stateh iddata(&cht_hash_states)
+ => hb
+ hash-discard
+ stateh iddata(&cht_hash_states)
+ hash-clonestate
+ stateh iddata(&cht_hash_states)
+ => iddata(&cht_hash_states)
hmac
alg enum(HashAlgInfo/, "hash alg for hmac")
message hb