Revision 2cdaf225 htools/Ganeti/Hash.hs

b/htools/Ganeti/Hash.hs
47 47 

  		





  48
  48
  
    
-- | Converts a list of bytes to a string.


  		





  49
  49
  
    
word8ToString :: HashKey -> String


  		





  50
  
  
    
word8ToString = concat . map (printf "%02x")


  		





  
  50
  
    
word8ToString = concatMap (printf "%02x")


  		





  51
  51
  
    

  		





  52
  52
  
    
-- | Computes the HMAC for a given key/test and salt.


  		





  53
  53
  
    
computeMac :: HashKey -> Maybe String -> String -> String


  		












Also available in:
  Unified diff