DJB Hash

DJB is a hash function algorithm.

• C#
• VB.Net
• C
• C++

									Public Shared Function DJBHash(str As String) As UInteger
	Dim hash As ULong = 5381
	Dim i As UInteger = 0

	For i = 0 To str.Length - 1
		hash = (((hash << 5) + hash) + CByte(AscW(str(CInt(i)))) And UInteger.MaxValue)
	Next

	Return hash
End Function
								

Example

									Dim data = "jdfgsdhfsdfsd 6445dsfsd7fg/*/+bfjsdgf%$^"
Dim value = DJBHash(data)
								

Output

									2562861588