Sha1.cpp File Reference

#include <string.h>
#include <stdio.h>
#include <rms/util/Sha1.h>

Go to the source code of this file.

Macros
#define	_CRT_SECURE_NO_DEPRECATE   1
#define	GET_UINT32_BE(n, b, i)
#define	PUT_UINT32_BE(n, b, i)
#define	S(x, n)   ((x << n) | ((x & 0xFFFFFFFF) >> (32 - n)))
#define	R(t)
#define	P(a, b, c, d, e, x)
#define	F(x, y, z)   (z ^ (x & (y ^ z)))
#define	K   0x5A827999
#define	F(x, y, z)   (x ^ y ^ z)
#define	K   0x6ED9EBA1
#define	F(x, y, z)   ((x & y) | (z & (x | y)))
#define	K   0x8F1BBCDC
#define	F(x, y, z)   (x ^ y ^ z)
#define	K   0xCA62C1D6

Functions
void	sha1_forRMS_starts (sha1_forRMS_context *ctx)
	SHA-1 context setup. More...
static void	sha1_forRMS_process (sha1_forRMS_context *ctx, unsigned char data[64])
void	sha1_forRMS_update (sha1_forRMS_context *ctx, unsigned char *input, int ilen)
	SHA-1 process buffer. More...
void	sha1_forRMS_finish (sha1_forRMS_context *ctx, unsigned char output[20])
	SHA-1 final digest. More...
int	sha1_forRMS_file (char *path, unsigned char output[20])
	Output = SHA-1( file contents ) More...
void	sha1_forRMS_csum (unsigned char *input, int ilen, unsigned char output[20])
	Output = SHA-1( input buffer ) More...
void	sha1_forRMS_hmac (unsigned char *key, int keylen, unsigned char *input, int ilen, unsigned char output[20])
	Output = HMAC-SHA-1( input buffer, hmac key ) More...
int	sha1_forRMS_self_test (void)
	Checkup routine. More...

Variables
static const unsigned char	sha1_forRMS_padding [64]

Macro Definition Documentation

#define _CRT_SECURE_NO_DEPRECATE   1

Definition at line 27 of file Sha1.cpp.

#define F	(		x,
			y,
			z
	)		(z ^ (x & (y ^ z)))

Referenced by stan::math::matrix_exp_action_handler::action(), stan::math::beta_binomial_cdf(), stan::math::beta_binomial_lccdf(), stan::math::beta_binomial_lcdf(), genie::SmithMonizUtils::DMINFC(), stan::math::gaussian_dlm_obs_log(), stan::math::gaussian_dlm_obs_lpdf(), stan::math::internal::get_num_threads(), main(), stan::math::internal::map_rect_reduce< F, var, var >::operator()(), stan::math::internal::map_rect_reduce< F, double, double >::operator()(), stan::math::internal::map_rect_reduce< F, double, var >::operator()(), stan::math::internal::map_rect_reduce< F, var, double >::operator()(), rsim::FPGA_MatchedFiltering::PerfectASICCurve(), and stan::math::promote_common().

#define F	(		x,
			y,
			z
	)		(x ^ y ^ z)

#define F	(		x,
			y,
			z
	)		((x & y) | (z & (x | y)))

#define F	(		x,
			y,
			z
	)		(x ^ y ^ z)

#define GET_UINT32_BE	(		n,
			b,
			i
	)

Value:

{                                                       \
    (n) = ( (unsigned long) (b)[(i)    ] << 24 )        \
        | ( (unsigned long) (b)[(i) + 1] << 16 )        \
        | ( (unsigned long) (b)[(i) + 2] <<  8 )        \
        | ( (unsigned long) (b)[(i) + 3]       );       \
}

Definition at line 39 of file Sha1.cpp.

Referenced by sha1_forRMS_process().

#define K   0x5A827999

#define K   0x6ED9EBA1

#define K   0x8F1BBCDC

#define K   0xCA62C1D6

#define P	(		a,
			b,
			c,
			d,
			e,
			x
	)

Value:

{                                                       \
    e += S(a,5) + F(b,c,d) + K + x; b = S(b,30);        \
}

Referenced by osc::_OscCalcDMP< T >::_OscCalcDMP(), osc::_PMNS_DMP< T >::_PMNS_DMP(), slicer::S4DParamCalc::analyze(), genie::HadronizationModelBase::ApplyRijk(), stan::math::bernoulli_cdf(), stan::math::bernoulli_lccdf(), stan::math::bernoulli_lcdf(), stan::math::beta_binomial_cdf(), stan::math::beta_binomial_lccdf(), stan::math::beta_binomial_lcdf(), stan::math::beta_cdf(), BicountEllipse_dCP(), stan::math::binomial_cdf(), stan::math::binomial_lccdf(), stan::math::binomial_lcdf(), BiprobEllipse_dCP(), stan::math::cauchy_cdf(), genie::GMCJDriver::ComputeEventProbability(), ConvertToGTracker(), genie::utils::phys::FormationZone(), lem::Library::FromTrees(), stan::math::gamma_cdf(), stan::math::gamma_lccdf(), stan::math::gamma_lcdf(), om::HitMaps::GetNanoSliceSummary(), genie::utils::hadxs::InelasticPionNucleonXSec(), stan::math::inv_chi_square_cdf(), stan::math::inv_chi_square_lccdf(), stan::math::inv_chi_square_lcdf(), stan::math::inv_gamma_cdf(), stan::math::inv_gamma_lccdf(), stan::math::inv_gamma_lcdf(), levy_func_problem(), stan::math::log_modified_bessel_first_kind(), stan::math::logistic_cdf(), stan::math::logistic_lccdf(), stan::math::logistic_lcdf(), genie::KNOHadronization::MultiplicityProb(), stan::math::neg_binomial_2_cdf(), stan::math::neg_binomial_cdf(), stan::math::neg_binomial_lccdf(), stan::math::neg_binomial_lcdf(), osc::OscCalcPMNSOptEigen::OscCalcPMNSOptEigen(), osc::_IOscCalc< T >::P(), osc::_OscCalcDMP< T >::P(), osc::_PMNS_DMP< T >::P(), stan::math::pareto_cdf(), stan::math::pareto_lccdf(), stan::math::pareto_lcdf(), stan::math::pareto_type_2_cdf(), stan::math::pareto_type_2_lccdf(), stan::math::pareto_type_2_lcdf(), plot_multiplicity_prob(), stan::math::poisson_cdf(), stan::math::poisson_lccdf(), stan::math::poisson_lcdf(), prob_biprob_pedagogical(), Prob_me(), prob_method0(), prob_method1(), prob_method2(), art::ProductRegistryHelper::produces(), art::MixHelper::produces(), art::rangeSetFor(), art::ProductRegistryHelper::reconstitutes(), stan::math::scaled_inv_chi_square_cdf(), stan::math::scaled_inv_chi_square_lccdf(), stan::math::scaled_inv_chi_square_lcdf(), trk::KalmanTrack::SegmentFinder(), beamlinereco::CFDHitFinder< T >::SetWaveform(), sha1_forRMS_process(), trk::KalmanTrack::SingleSegment(), osc::SolveCubic(), stan::math::student_t_cdf(), stan::math::student_t_lccdf(), stan::math::student_t_lcdf(), TheoryEllipse_dCP(), genie::utils::hadxs::TotalPionNucleonXSec(), bpfit::Path::TPBG(), genie::NievesSimoVacasMECPXSec2016::XSec(), and daqchannelmap::HardwareDisplay::XYPix().

#define PUT_UINT32_BE	(		n,
			b,
			i
	)

Value:

{                                                       \
    (b)[(i)    ] = (unsigned char) ( (n) >> 24 );       \
    (b)[(i) + 1] = (unsigned char) ( (n) >> 16 );       \
    (b)[(i) + 2] = (unsigned char) ( (n) >>  8 );       \
    (b)[(i) + 3] = (unsigned char) ( (n)       );       \
}

Definition at line 48 of file Sha1.cpp.

Referenced by sha1_forRMS_finish().

#define R

(

t

)

Value:

(                                                       \
    temp = W[(t -  3) & 0x0F] ^ W[(t - 8) & 0x0F] ^     \
           W[(t - 14) & 0x0F] ^ W[ t      & 0x0F],      \
    ( W[t & 0x0F] = S(temp,1) )                         \
)

Referenced by sha1_forRMS_process().

#define S	(		x,
			n
	)		((x << n) | ((x & 0xFFFFFFFF) >> (32 - n)))

Referenced by Analyse_Data2DataComp(), Analyse_Data2DataComp_HigherEnergyCuts(), Analyse_Data2DataComp_kNumu2020ND(), red::EnergystimatterConst::EforX(), extract_hadnucleus_xsec(), stan::math::gamma_q(), stan::math::grad_reg_inc_gamma(), hA_basic_analysis(), stan::math::cvodes_integrator< Lmm >::integrate(), stan::math::inv_wishart_log(), stan::math::inv_wishart_lpdf(), fuzz::ViewMatchAlg::Matching(), nerd::ViewMatchAlg::Matching(), plot_prediction_systs(), Plotting_Data2DataComp(), Plotting_Data2DataComp_SingleCanvas(), genie::FKR::Print(), reduce_the_predfile_nue_numu(), genie::FKR::Reset(), red::EnergystimatterConst::SetS(), TEST(), stan::math::wishart_log(), and stan::math::wishart_lpdf().

Function Documentation

void sha1_forRMS_csum	(	unsigned char *	input,
		int	ilen,
		unsigned char	output[20]
	)

Output = SHA-1( input buffer )

Parameters

input	buffer holding the data
ilen	length of the input data
output	SHA-1 checksum result

Definition at line 338 of file Sha1.cpp.

References sha1_forRMS_finish(), sha1_forRMS_starts(), and sha1_forRMS_update().

{
  sha1_forRMS_context ctx;

  sha1_forRMS_starts( &ctx );
  sha1_forRMS_update( &ctx, input, ilen );
  sha1_forRMS_finish( &ctx, output );
}

int sha1_forRMS_file	(	char *	path,
		unsigned char	output[20]
	)

Output = SHA-1( file contents )

Parameters

path	input file name
output	SHA-1 checksum result

Returns

0 if successful, or 1 if fopen failed

Definition at line 314 of file Sha1.cpp.

References MakeMiniprodValidationCuts::f, fclose(), getGoodRuns4SAM::n, sha1_forRMS_finish(), sha1_forRMS_starts(), and sha1_forRMS_update().

{
  FILE *f;
  size_t n;
  sha1_forRMS_context ctx;
  unsigned char buf[1024];

  if( ( f = fopen( path, "rb" ) ) == NULL )
    return( 1 );

  sha1_forRMS_starts( &ctx );

  while( ( n = fread( buf, 1, sizeof( buf ), f ) ) > 0 )
    sha1_forRMS_update( &ctx, buf, (int) n );

  sha1_forRMS_finish( &ctx, output );

  fclose( f );
  return( 0 );
}

void sha1_forRMS_finish	(	sha1_forRMS_context *	ctx,
		unsigned char	output[20]
	)

SHA-1 final digest.

Parameters

ctx	SHA-1 context
output	SHA-1 checksum result

Definition at line 285 of file Sha1.cpp.

References PUT_UINT32_BE, sha1_forRMS_padding, sha1_forRMS_update(), sha1_forRMS_context::state, and sha1_forRMS_context::total.

Referenced by sha1_forRMS_csum(), sha1_forRMS_file(), sha1_forRMS_hmac(), and gov::fnal::cd::rms::util::UUIDGenerator::UUIDGenerator().

{
  unsigned long last, padn;
  unsigned long high, low;
  unsigned char msglen[8];

  high = ( ctx->total[0] >> 29 )
    | ( ctx->total[1] <<  3 );
  low  = ( ctx->total[0] <<  3 );

  PUT_UINT32_BE( high, msglen, 0 );
  PUT_UINT32_BE( low,  msglen, 4 );

  last = ctx->total[0] & 0x3F;
  padn = ( last < 56 ) ? ( 56 - last ) : ( 120 - last );

  sha1_forRMS_update( ctx, (unsigned char *) sha1_forRMS_padding, padn );
  sha1_forRMS_update( ctx, msglen, 8 );

  PUT_UINT32_BE( ctx->state[0], output,  0 );
  PUT_UINT32_BE( ctx->state[1], output,  4 );
  PUT_UINT32_BE( ctx->state[2], output,  8 );
  PUT_UINT32_BE( ctx->state[3], output, 12 );
  PUT_UINT32_BE( ctx->state[4], output, 16 );
}

void sha1_forRMS_hmac	(	unsigned char *	key,
		int	keylen,
		unsigned char *	input,
		int	ilen,
		unsigned char	output[20]
	)

Output = HMAC-SHA-1( input buffer, hmac key )

Parameters

key	HMAC secret key
keylen	length of the HMAC key
input	buffer holding the data
ilen	length of the input data
output	HMAC-SHA-1 result

Definition at line 351 of file Sha1.cpp.

References MECModelEnuComparisons::i, calib::j, printf(), sha1_forRMS_finish(), sha1_forRMS_self_test(), sha1_forRMS_starts(), and sha1_forRMS_update().

{
  int i;
  sha1_forRMS_context ctx;
  unsigned char k_ipad[64];
  unsigned char k_opad[64];
  unsigned char tmpbuf[20];

  memset( k_ipad, 0x36, 64 );
  memset( k_opad, 0x5C, 64 );

  for( i = 0; i < keylen; i++ )
    {
      if( i >= 64 ) break;

      k_ipad[i] ^= key[i];
      k_opad[i] ^= key[i];
    }

  sha1_forRMS_starts( &ctx );
  sha1_forRMS_update( &ctx, k_ipad, 64 );
  sha1_forRMS_update( &ctx, input, ilen );
  sha1_forRMS_finish( &ctx, tmpbuf );

  sha1_forRMS_starts( &ctx );
  sha1_forRMS_update( &ctx, k_opad, 64 );
  sha1_forRMS_update( &ctx, tmpbuf, 20 );
  sha1_forRMS_finish( &ctx, output );

  memset( k_ipad, 0, 64 );
  memset( k_opad, 0, 64 );
  memset( tmpbuf, 0, 20 );
  memset( &ctx, 0, sizeof( sha1_forRMS_context ) );
}

static void sha1_forRMS_process ( sha1_forRMS_context *  ctx, unsigned char  data[64]  )

static

Definition at line 72 of file Sha1.cpp.

References genie::units::A, C, E, GET_UINT32_BE, P, R, sha1_forRMS_context::state, APDHVSetting::temp, and W.

Referenced by sha1_forRMS_update().

{
  unsigned long temp, W[16], A, B, C, D, E;

  GET_UINT32_BE( W[0],  data,  0 );
  GET_UINT32_BE( W[1],  data,  4 );
  GET_UINT32_BE( W[2],  data,  8 );
  GET_UINT32_BE( W[3],  data, 12 );
  GET_UINT32_BE( W[4],  data, 16 );
  GET_UINT32_BE( W[5],  data, 20 );
  GET_UINT32_BE( W[6],  data, 24 );
  GET_UINT32_BE( W[7],  data, 28 );
  GET_UINT32_BE( W[8],  data, 32 );
  GET_UINT32_BE( W[9],  data, 36 );
  GET_UINT32_BE( W[10], data, 40 );
  GET_UINT32_BE( W[11], data, 44 );
  GET_UINT32_BE( W[12], data, 48 );
  GET_UINT32_BE( W[13], data, 52 );
  GET_UINT32_BE( W[14], data, 56 );
  GET_UINT32_BE( W[15], data, 60 );

#define S(x,n) ((x << n) | ((x & 0xFFFFFFFF) >> (32 - n)))

#define R(t)                                            \
(                                                       \
    temp = W[(t -  3) & 0x0F] ^ W[(t - 8) & 0x0F] ^     \
           W[(t - 14) & 0x0F] ^ W[ t      & 0x0F],      \
    ( W[t & 0x0F] = S(temp,1) )                         \
)

#define P(a,b,c,d,e,x)                                  \
{                                                       \
    e += S(a,5) + F(b,c,d) + K + x; b = S(b,30);        \
}

  A = ctx->state[0];
  B = ctx->state[1];
  C = ctx->state[2];
  D = ctx->state[3];
  E = ctx->state[4];

#define F(x,y,z) (z ^ (x & (y ^ z)))
#define K 0x5A827999

  P( A, B, C, D, E, W[0]  );
  P( E, A, B, C, D, W[1]  );
  P( D, E, A, B, C, W[2]  );
  P( C, D, E, A, B, W[3]  );
  P( B, C, D, E, A, W[4]  );
  P( A, B, C, D, E, W[5]  );
  P( E, A, B, C, D, W[6]  );
  P( D, E, A, B, C, W[7]  );
  P( C, D, E, A, B, W[8]  );
  P( B, C, D, E, A, W[9]  );
  P( A, B, C, D, E, W[10] );
  P( E, A, B, C, D, W[11] );
  P( D, E, A, B, C, W[12] );
  P( C, D, E, A, B, W[13] );
  P( B, C, D, E, A, W[14] );
  P( A, B, C, D, E, W[15] );
  P( E, A, B, C, D, R(16) );
  P( D, E, A, B, C, R(17) );
  P( C, D, E, A, B, R(18) );
  P( B, C, D, E, A, R(19) );

#undef K
#undef F

#define F(x,y,z) (x ^ y ^ z)
#define K 0x6ED9EBA1

  P( A, B, C, D, E, R(20) );
  P( E, A, B, C, D, R(21) );
  P( D, E, A, B, C, R(22) );
  P( C, D, E, A, B, R(23) );
  P( B, C, D, E, A, R(24) );
  P( A, B, C, D, E, R(25) );
  P( E, A, B, C, D, R(26) );
  P( D, E, A, B, C, R(27) );
  P( C, D, E, A, B, R(28) );
  P( B, C, D, E, A, R(29) );
  P( A, B, C, D, E, R(30) );
  P( E, A, B, C, D, R(31) );
  P( D, E, A, B, C, R(32) );
  P( C, D, E, A, B, R(33) );
  P( B, C, D, E, A, R(34) );
  P( A, B, C, D, E, R(35) );
  P( E, A, B, C, D, R(36) );
  P( D, E, A, B, C, R(37) );
  P( C, D, E, A, B, R(38) );
  P( B, C, D, E, A, R(39) );

#undef K
#undef F

#define F(x,y,z) ((x & y) | (z & (x | y)))
#define K 0x8F1BBCDC

  P( A, B, C, D, E, R(40) );
  P( E, A, B, C, D, R(41) );
  P( D, E, A, B, C, R(42) );
  P( C, D, E, A, B, R(43) );
  P( B, C, D, E, A, R(44) );
  P( A, B, C, D, E, R(45) );
  P( E, A, B, C, D, R(46) );
  P( D, E, A, B, C, R(47) );
  P( C, D, E, A, B, R(48) );
  P( B, C, D, E, A, R(49) );
  P( A, B, C, D, E, R(50) );
  P( E, A, B, C, D, R(51) );
  P( D, E, A, B, C, R(52) );
  P( C, D, E, A, B, R(53) );
  P( B, C, D, E, A, R(54) );
  P( A, B, C, D, E, R(55) );
  P( E, A, B, C, D, R(56) );
  P( D, E, A, B, C, R(57) );
  P( C, D, E, A, B, R(58) );
  P( B, C, D, E, A, R(59) );

#undef K
#undef F

#define F(x,y,z) (x ^ y ^ z)
#define K 0xCA62C1D6

  P( A, B, C, D, E, R(60) );
  P( E, A, B, C, D, R(61) );
  P( D, E, A, B, C, R(62) );
  P( C, D, E, A, B, R(63) );
  P( B, C, D, E, A, R(64) );
  P( A, B, C, D, E, R(65) );
  P( E, A, B, C, D, R(66) );
  P( D, E, A, B, C, R(67) );
  P( C, D, E, A, B, R(68) );
  P( B, C, D, E, A, R(69) );
  P( A, B, C, D, E, R(70) );
  P( E, A, B, C, D, R(71) );
  P( D, E, A, B, C, R(72) );
  P( C, D, E, A, B, R(73) );
  P( B, C, D, E, A, R(74) );
  P( A, B, C, D, E, R(75) );
  P( E, A, B, C, D, R(76) );
  P( D, E, A, B, C, R(77) );
  P( C, D, E, A, B, R(78) );
  P( B, C, D, E, A, R(79) );

#undef K
#undef F

  ctx->state[0] += A;
  ctx->state[1] += B;
  ctx->state[2] += C;
  ctx->state[3] += D;
  ctx->state[4] += E;
}

int sha1_forRMS_self_test

(

void

)

Checkup routine.

Returns

0 if successful, or 1 if the test failed

Definition at line 450 of file Sha1.cpp.

Referenced by sha1_forRMS_hmac().

{
  return( 0 );
}

void sha1_forRMS_starts

(

sha1_forRMS_context *

ctx

)

SHA-1 context setup.

Parameters

ctx	SHA-1 context to be initialized

Definition at line 60 of file Sha1.cpp.

References sha1_forRMS_context::state, and sha1_forRMS_context::total.

Referenced by sha1_forRMS_csum(), sha1_forRMS_file(), sha1_forRMS_hmac(), and gov::fnal::cd::rms::util::UUIDGenerator::UUIDGenerator().

{
  ctx->total[0] = 0;
  ctx->total[1] = 0;

  ctx->state[0] = 0x67452301;
  ctx->state[1] = 0xEFCDAB89;
  ctx->state[2] = 0x98BADCFE;
  ctx->state[3] = 0x10325476;
  ctx->state[4] = 0xC3D2E1F0;
}

void sha1_forRMS_update	(	sha1_forRMS_context *	ctx,
		unsigned char *	input,
		int	ilen
	)

SHA-1 process buffer.

Parameters

ctx	SHA-1 context
input	buffer holding the data
ilen	length of the input data

Definition at line 232 of file Sha1.cpp.

References sha1_forRMS_context::buffer, stan::math::fill(), art::left(), sha1_forRMS_process(), and sha1_forRMS_context::total.

Referenced by sha1_forRMS_csum(), sha1_forRMS_file(), sha1_forRMS_finish(), sha1_forRMS_hmac(), and gov::fnal::cd::rms::util::UUIDGenerator::UUIDGenerator().

{
  int fill;
  unsigned long left;

  if( ilen <= 0 )
    return;

  left = ctx->total[0] & 0x3F;
  fill = 64 - left;

  ctx->total[0] += ilen;
  ctx->total[0] &= 0xFFFFFFFF;

  if( ctx->total[0] < (unsigned long) ilen )
    ctx->total[1]++;

  if( left && ilen >= fill )
    {
      memcpy( (void *) (ctx->buffer + left),
              (void *) input, fill );
      sha1_forRMS_process( ctx, ctx->buffer );
      input += fill;
      ilen  -= fill;
      left = 0;
    }

  while( ilen >= 64 )
    {
      sha1_forRMS_process( ctx, input );
      input += 64;
      ilen  -= 64;
    }

  if( ilen > 0 )
    {
      memcpy( (void *) (ctx->buffer + left),
              (void *) input, ilen );
    }
}

Variable Documentation

const unsigned char sha1_forRMS_padding[64]

static

Initial value:

=
  {
    0x80, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
  }

Definition at line 274 of file Sha1.cpp.

Referenced by sha1_forRMS_finish().