common

var (
	// name of the environment variable carrying the openSSL binary
	KeyEnvOpenSSL = "OPENSSL_BIN"

	// default name of the openSSL binary
	DefaultOpenSSL = "openssl"

	GetPath    = T.First[string, string]
	GetVersion = T.Second[string, string]

	// tests if a string contains "OpenSSL"
	IncludesOpenSSL = S.Includes("OpenSSL")

	// name of the open SSL binary either from the environment or a fallback
	OpenSSLBinary = F.Pipe2(
		KeyEnvOpenSSL,
		CIOO.LookupEnv,
		IOO.Fold(L.Of(IO.Of(DefaultOpenSSL)), IO.Of[string]),
	)
)

var (
	GetPwd   = T.First[string, string]
	GetToken = T.Second[string, string]

	// IsHyperProtectBasic tests if a string is a hyper protect token
	IsHyperProtectBasic = tokenRe.MatchString
)

var IsType = F.Flow2(
	S.Equals,
	P.ContraMap(GetTypeFromBlock),
)