mcs/class/corlib/System.Security.Cryptography/HMACSHA512.cs

   1 //
   2 // HMACSHA512.cs: HMAC implementation using SHA512
   3 //
   4 // Author:
   5 //      Sebastien Pouliot  <sebastien@xamarin.com>
   6 //
   7 // (C) 2003 Motus Technologies Inc. (http://www.motus.com)
   8 // Copyright (C) 2004-2005, 2007 Novell, Inc (http://www.novell.com)
   9 // Copyright 2013 Xamarin Inc. (http://www.xamarin.com)
  10 //
  11 // Permission is hereby granted, free of charge, to any person obtaining
  12 // a copy of this software and associated documentation files (the
  13 // "Software"), to deal in the Software without restriction, including
  14 // without limitation the rights to use, copy, modify, merge, publish,
  15 // distribute, sublicense, and/or sell copies of the Software, and to
  16 // permit persons to whom the Software is furnished to do so, subject to
  17 // the following conditions:
  18 //
  19 // The above copyright notice and this permission notice shall be
  20 // included in all copies or substantial portions of the Software.
  21 //
  22 // THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
  23 // EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
  24 // MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
  25 // NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
  26 // LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
  27 // OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
  28 // WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
  29 //
  30
  31 using System.Runtime.InteropServices;
  32
  33 using Mono.Security.Cryptography;
  34
  35 namespace System.Security.Cryptography {
  36
  37         [ComVisible (true)]
  38         public class HMACSHA512 : HMAC {
  39
  40                 private bool legacy;
  41
  42 #if !FULL_AOT_RUNTIME
  43                 static bool legacy_mode;
  44
  45                 static HMACSHA512 ()
  46                 {
  47                         legacy_mode = (Environment.GetEnvironmentVariable ("legacyHMACMode") == "1");
  48                 }
  49 #endif
  50
  51                 public HMACSHA512 ()
  52                         : this (KeyBuilder.Key (8))
  53                 {
  54                 }
  55
  56                 public HMACSHA512 (byte[] key)
  57                 {
  58 #if FULL_AOT_RUNTIME
  59                         BlockSizeValue = 128;
  60                         SetHash ("SHA512", new SHA512Managed ());
  61 #else
  62                         ProduceLegacyHmacValues = legacy_mode;
  63                         HashName = "SHA512";
  64 #endif
  65                         HashSizeValue = 512;
  66                         Key = key;
  67                 }
  68
  69                 // this property will appear in the next .NET service pack
  70                 // http://blogs.msdn.com/shawnfa/archive/2007/01/31/please-do-not-use-the-net-2-0-hmacsha512-and-hmacsha384-classes.aspx
  71                 public bool ProduceLegacyHmacValues {
  72                         get { return legacy; }
  73                         set {
  74                                 legacy = value;
  75                                 BlockSizeValue = legacy ? 64 : 128;
  76                         }
  77                 }
  78         }
  79 }