pike.git / src / post_modules / Nettle / nettle.cmod

version» Context lines:

pike.git/src/post_modules/Nettle/nettle.cmod:1:   /* nettle.cmod -*- c -*- */      #include "global.h" - RCSID("$Id: nettle.cmod,v 1.15 2003/08/07 20:32:37 nilsson Exp $"); + RCSID("$Id: nettle.cmod,v 1.16 2003/08/24 18:28:24 nilsson Exp $");   #include "interpret.h"   #include "svalue.h"   /* For this_object() */   #include "object.h"   #include "module_support.h"      #include "nettle_config.h"      #ifdef HAVE_LIBNETTLE   
pike.git/src/post_modules/Nettle/nettle.cmod:178:    EXIT    {    if(THIS->ctx->nsources) free(THIS->sources);    free(THIS->ctx);    }   }      /*! @endclass    */    + char *crypt_md5(int pl, const char *pw, int sl, const char *salt); +  + /*! Does the crypt_md5 abrakadabra (MD5 + snakeoil). +  *! It is assumed that @[salt] does not contain "$". +  */ + PIKEFUN string crypt_md5(string pw, string salt) + { +  NO_WIDE_STRING(pw); +  NO_WIDE_STRING(salt); +  RETURN make_shared_string(crypt_md5(pw->len, pw->str, +  salt->len, salt->str)); + } +    /*! @endmodule    */      #endif /* HAVE_LIBNETTLE */      PIKE_MODULE_INIT   {    INIT;   #ifdef HAVE_LIBNETTLE    hash_init();