Context Navigation

sha1_one.c@ 331

Last change on this file since 331 was 331, checked in by coas-nagasima, 6 years ago
prototoolに関連するプロジェクトをnewlibからmuslを使うよう変更・更新 ntshellをnewlibの下位の実装から、muslのsyscallの実装に変更・更新以下のOSSをアップデート・mruby-1.3.0 ・musl-1.1.18 ・onigmo-6.1.3 ・tcc-0.9.27 以下のOSSを追加・openssl-1.1.0e ・curl-7.57.0 ・zlib-1.2.11 以下のmrbgemsを追加・iij/mruby-digest ・iij/mruby-env ・iij/mruby-errno ・iij/mruby-iijson ・iij/mruby-ipaddr ・iij/mruby-mock ・iij/mruby-require ・iij/mruby-tls-openssl
Property svn:eol-style set to `native` Property svn:mime-type set to `text/x-csrc`
File size: 752 bytes

Line
1	/*
2	* Copyright 1995-2016 The OpenSSL Project Authors. All Rights Reserved.
3	*
4	* Licensed under the OpenSSL license (the "License"). You may not use
5	* this file except in compliance with the License. You can obtain a copy
6	* in the file LICENSE in the source distribution or at
7	* https://www.openssl.org/source/license.html
8	*/
9
10	#include <stdio.h>
11	#include <string.h>
12	#include <openssl/crypto.h>
13	#include <openssl/sha.h>
14
15	unsigned char SHA1(const unsigned char d, size_t n, unsigned char *md)
16	{
17	SHA_CTX c;
18	static unsigned char m[SHA_DIGEST_LENGTH];
19
20	if (md == NULL)
21	md = m;
22	if (!SHA1_Init(&c))
23	return NULL;
24	SHA1_Update(&c, d, n);
25	SHA1_Final(md, &c);
26	OPENSSL_cleanse(&c, sizeof(c));
27	return (md);
28	}

Note: See TracBrowser for help on using the repository browser.