createhash.pl 2.2 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859
  1. #!/usr/bin/env perl
  2. #
  3. # Copyright (C) 2011-2017 Intel Corporation. All rights reserved.
  4. #
  5. # Redistribution and use in source and binary forms, with or without
  6. # modification, are permitted provided that the following conditions
  7. # are met:
  8. #
  9. # * Redistributions of source code must retain the above copyright
  10. # notice, this list of conditions and the following disclaimer.
  11. # * Redistributions in binary form must reproduce the above copyright
  12. # notice, this list of conditions and the following disclaimer in
  13. # the documentation and/or other materials provided with the
  14. # distribution.
  15. # * Neither the name of Intel Corporation nor the names of its
  16. # contributors may be used to endorse or promote products derived
  17. # from this software without specific prior written permission.
  18. #
  19. # THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
  20. # "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
  21. # LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
  22. # A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
  23. # OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
  24. # SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
  25. # LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
  26. # DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
  27. # THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  28. # (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
  29. # OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  30. #
  31. #
  32. #generate default hash values for VMC hash tree
  33. use Digest::SHA qw(sha256_hex);
  34. open (OUT,">hashtable.txt");
  35. select OUT;
  36. #create an empty array whose size is sizeof(vmc_entry) x 2
  37. #sizeof(vmc_entry) == 70
  38. @data = chr(0x0) x 140;
  39. $digest = sha256_hex(@data);
  40. @arr = unpack("a2"x32,$digest);
  41. $len=@arr;
  42. $line = "{0x".join(",0x",@arr)."},\n";
  43. print($line);
  44. for($i=0;$i<22;$i++) {
  45. @data=();
  46. for($k=0;$k<2;$k++) {
  47. for($j=0;$j<32;$j++) {
  48. push(@data,chr(hex($arr[$j])));
  49. }
  50. }
  51. #print(@data);
  52. $digest = sha256_hex(@data);
  53. @arr = unpack("a2"x32,$digest);
  54. $line = "{0x".join(",0x",@arr)."},\n";
  55. print($line);
  56. }
  57. select STDOUT;