Hi,
for all my MYSQL Routines, you have to fill in 2 Bytes in Declaration of Variables.
Before Bascom 2.0.7.7 it worked without; dont know why :lol:
I made a String overlay on 5 long variables. But in fact the String needs one more byte, because of the ending Zero. So the String is defined as string *21
Setting the 21st char of string to zero causes overwriting following variable in Bascom 2.0.7.7 and later.
Please fill in 2 dummy Bytes as following:
Dim Sha1_stage1_hash(5) As Long
Dim Sha1_stage1_hash_1 As Long At Sha1_stage1_hash Overlay
Dim Sha1_stage1_hash_2 As Long At Sha1_stage1_hash + 4 Overlay
Dim Sha1_stage1_hash_3 As Long At Sha1_stage1_hash + 8 Overlay
Dim Sha1_stage1_hash_4 As Long At Sha1_stage1_hash + 12 Overlay
Dim Sha1_stage1_hash_5 As Long At Sha1_stage1_hash + 16 Overlay
[b:3e896f45bd] Dim Dummy1 As Byte ' this is for the String overlay very important, because the String has an chr(0) as String end marker![/b:3e896f45bd]
Dim Sha1_stage1_str As String * 21 At Sha1_stage1_hash Overlay
Dim Sha1_stage2_hash(5) As Long
Dim Sha1_stage2_hash_1 As Long At Sha1_stage2_hash Overlay
Dim Sha1_stage2_hash_2 As Long At Sha1_stage2_hash + 4 Overlay
Dim Sha1_stage2_hash_3 As Long At Sha1_stage2_hash + 8 Overlay
Dim Sha1_stage2_hash_4 As Long At Sha1_stage2_hash + 12 Overlay
Dim Sha1_stage2_hash_5 As Long At Sha1_stage2_hash + 16 Overlay
[b:3e896f45bd] Dim Dummy2 As Byte ' this is for the String overlay very important, because the String has an chr(0) as String end marker![/b:3e896f45bd]
Dim Sha1_stage2_str As String * 21 At Sha1_stage2_hash Overlay
↧