BlowfishMBS.Decrypt(iodata as memoryblock)

input and output are in host endian format.
memoryblock must be not nil and has a size of 8 bytes.

See also:

• Decrypt(key as string, data as string) as string

BlowfishMBS.DecryptCBC(data as string, byref temp as memoryblock) as string

dim b as new BlowfishMBS

dim s as string = "UTYbBEZSMLfa0kvNDSla/n/GSUcA/545gp7LcA330Nw="
dim x as string = DecodeBase64(s)

dim m as MemoryBlock = nil
b = new BlowfishMBS
b.SetKey "geheim"
dim t1 as string = b.DecryptCBC(x,m)

// shows SD10003$$2012.03.16 11:00
MsgBox t1

data: data to be decrypted
temp: memoryblock for temporary data. Is created when called with nil value. Pass on following calls to allow data to be shared between function calls.

Returns "" on invalid input.
You can create yourself an eight byte memoryblock with a starting value you want.
Be aware that this CBC method works with data in 8 byte blocks, so you need to unpad data if needed.

See also:

• DecryptCBC(idata as memoryblock, odata as memoryblock, offset as Integer, length as Integer, ivec as memoryblock)

BlowfishMBS.DecryptCBC(idata as memoryblock, odata as memoryblock, offset as Integer, length as Integer, ivec as memoryblock)

idata: memoryblock for input data, 8 bytes in size and not nil.
odata: memoryblock for output data, 8 bytes in size and not nil.
offset: offset in input and output memoryblocks
length: length of data in memoryblock in bytes. Multiply of 8.
ivec: memoryblock for temporary data, 8 bytes in size and not nil.

ivec should be a memoryblock of 8 bytes size which you create before calling the function for the first time. On the next time you passed the same block, so the function can store data inside this memoryblock between function calls.
Be aware that this CBC method works with data in 8 byte blocks, so you need to unpad data if needed.

See also:

• DecryptCBC(data as string, byref temp as memoryblock) as string

BlowfishMBS.DecryptCFB64(data as string, byref temp as memoryblock) as string

data: data to be decrypted
temp: memoryblock for temporary data. Is created when called with nil value. Pass on following calls to allow data to be shared between function calls.

Returns "" on invalid input.
You can create yourself a twelve byte memoryblock with a starting value you want. First four bytes are position and next 8 bytes the current vector.

See also:

• DecryptCFB64(idata as memoryblock, odata as memoryblock, offset as Integer, length as Integer, ivec as memoryblock, byref num as Integer)

BlowfishMBS.DecryptCFB64(idata as memoryblock, odata as memoryblock, offset as Integer, length as Integer, ivec as memoryblock, byref num as Integer)

dim b as BlowfishMBS

b=new BlowfishMBS
b.SetKey "Key"

dim temp as MemoryBlock
dim s as string

s=b.EncryptCFB64("Hello World",temp)

MsgBox s

temp=nil // reset
s=b.DecryptCFB64(s,temp)

MsgBox s

idata: memoryblock for input data, 8 bytes in size and not nil.
odata: memoryblock for output data, 8 bytes in size and not nil.
offset: offset in input and output memoryblocks
length: length of data in memoryblock in bytes. Multiply of 8.
ivec: memoryblock for temporary data, 8 bytes in size and not nil.
num: current position in ivec. Pass 0 as start value and pass the value you get back to the next function call.

Returns "" on invalid input.
You can create yourself a twelve byte memoryblock with a starting value you want. First four bytes are position and next 8 bytes the current vector.

See also:

• DecryptCFB64(data as string, byref temp as memoryblock) as string

BlowfishMBS.DecryptECB(data as string) as string

This function decrypts only 8 bytes. For more, please use other functions!

data: data to be decrypted
Returns "" on invalid input.

See also:

• DecryptECB(idata as memoryblock, odata as memoryblock, offset as Integer)

BlowfishMBS.DecryptECB(idata as memoryblock, odata as memoryblock, offset as Integer)

idata: memoryblock for input data, 8 bytes in size and not nil.
odata: memoryblock for output data, 8 bytes in size and not nil.
offset: offset in input and output memoryblocks

See also:

• DecryptECB(data as string) as string

BlowfishMBS.DecryptOFB64(data as string, byref temp as memoryblock) as string

data: data to be decrypted
temp: memoryblock for temporary data. Is created when called with nil value. Pass on following calls to allow data to be shared between function calls.

Returns "" on invalid input.
You can create yourself a twelve byte memoryblock with a starting value you want. First four bytes are position and next 8 bytes the current vector.

This is output feedback mode. Encryption is the same a decryption.

See also:

• DecryptOFB64(idata as memoryblock, odata as memoryblock, offset as Integer, length as Integer, ivec as memoryblock, byref num as Integer)

Some examples using this method:

• /Encryption/Blowfish Test

BlowfishMBS.DecryptOFB64(idata as memoryblock, odata as memoryblock, offset as Integer, length as Integer, ivec as memoryblock, byref num as Integer)

dim b as BlowfishMBS

b=new BlowfishMBS
b.SetKey "Key"

dim temp as MemoryBlock
dim s as string

s=b.EncryptCFB64("Hello World",temp)

MsgBox s

temp=nil // reset
s=b.DecryptCFB64(s,temp)

MsgBox s

idata: memoryblock for input data, 8 bytes in size and not nil.
odata: memoryblock for output data, 8 bytes in size and not nil.
offset: offset in input and output memoryblocks
length: length of data in memoryblock in bytes. Multiply of 8.
ivec: memoryblock for temporary data, 8 bytes in size and not nil.
num: current position in ivec. Pass 0 as start value and pass the value you get back to the next function call.

Returns "" on invalid input.
You can create yourself a twelve byte memoryblock with a starting value you want. First four bytes are position and next 8 bytes the current vector.

This is output feedback mode. Encryption is the same a decryption.

See also:

• DecryptOFB64(data as string, byref temp as memoryblock) as string

BlowfishMBS.Encrypt(iodata as memoryblock)

input and output are in host endian format.
memoryblock must be not nil and has a size of 8 bytes.

See also:

• Encrypt(key as string, data as string) as string

BlowfishMBS.EncryptCBC(data as string, byref temp as memoryblock) as string

dim m as memoryblock // temporary storage of current state
dim b as blowfishmbs
dim s as string

b=new blowfishmbs
b.SetKey "EinKey1234567890" // some key

s=b.EncryptCBC("Hallo",m)
s=s+b.EncryptCBC(" ",m)
s=s+b.EncryptCBC("Leute",m)
s=s+b.EncryptCBC("!",m)

data: data to be encrypted
temp: memoryblock for temporary data. Is created when called with nil value. Pass on following calls to allow data to be shared between function calls.

Returns "" on invalid input.
You can create yourself an eight byte memoryblock with a starting value you want.
Be aware that this CBC method works with data in 8 byte blocks, so you need to pad data if needed.

Returned string does not contain text, but binary data.
Please do not store in text fields in database without using EncodeHex or EncodeBase64 to make it a text string.

See also:

• EncryptCBC(idata as memoryblock, odata as memoryblock, offset as Integer, length as Integer, ivec as memoryblock)

BlowfishMBS.EncryptCBC(idata as memoryblock, odata as memoryblock, offset as Integer, length as Integer, ivec as memoryblock)

idata: memoryblock for input data, at least 8 bytes in size and not nil.
odata: memoryblock for output data, at least 8 bytes in size and not nil.
offset: offset in input and output memoryblocks
length: length of data in memoryblock in bytes. Multiply of 8.
ivec: memoryblock for temporary data, 8 bytes in size and not nil.

ivec should be a memoryblock of 8 bytes size which you create before calling the function for the first time. On the next time you passed the same block, so the function can store data inside this memoryblock between function calls.
Be aware that this CBC method works with data in 8 byte blocks, so you need to pad data if needed.

See also:

• EncryptCBC(data as string, byref temp as memoryblock) as string

BlowfishMBS.EncryptCFB64(data as string, byref temp as memoryblock) as string

data: data to be encrypted
temp: memoryblock for temporary data. Is created when called with nil value. Pass on following calls to allow data to be shared between function calls.

Returns "" on invalid input.
You can create yourself a twelve byte memoryblock with a starting value you want. First four bytes are position and next 8 bytes the current vector.

Returned string does not contain text, but binary data.
Please do not store in text fields in database without using EncodeHex or EncodeBase64 to make it a text string.

See also:

• EncryptCFB64(idata as memoryblock, odata as memoryblock, offset as Integer, length as Integer, ivec as memoryblock, byref num as Integer)

BlowfishMBS.EncryptCFB64(idata as memoryblock, odata as memoryblock, offset as Integer, length as Integer, ivec as memoryblock, byref num as Integer)

idata: memoryblock for input data, 8 bytes in size and not nil.
odata: memoryblock for output data, 8 bytes in size and not nil.
offset: offset in input and output memoryblocks
length: length of data in memoryblock in bytes. Multiply of 8.
ivec: memoryblock for temporary data, 8 bytes in size and not nil.
num: current position in ivec. Pass 0 as start value and pass the value you get back to the next function call.

Returns "" on invalid input.
You can create yourself a twelve byte memoryblock with a starting value you want. First four bytes are position and next 8 bytes the current vector.

See also:

• EncryptCFB64(data as string, byref temp as memoryblock) as string

BlowfishMBS.EncryptECB(data as string) as string

This function encrypts only 8 bytes. For more, please use other functions!

data: data to be encrypted
Returns "" on invalid input.

Returned string does not contain text, but binary data.
Please do not store in text fields in database without using EncodeHex or EncodeBase64 to make it a text string.

See also:

• EncryptECB(idata as memoryblock, odata as memoryblock, offset as Integer)

BlowfishMBS.EncryptECB(idata as memoryblock, odata as memoryblock, offset as Integer)

This function encrypts only 8 bytes. For more, please use other functions!

idata: memoryblock for input data, 8 bytes in size and not nil.
odata: memoryblock for output data, 8 bytes in size and not nil.
offset: offset in input and output memoryblocks
length: length of data in memoryblock in bytes. Multiply of 8.

See also:

• EncryptECB(data as string) as string

BlowfishMBS.EncryptOFB64(data as string, byref temp as memoryblock) as string

data: data to be encrypted
temp: memoryblock for temporary data. Is created when called with nil value. Pass on following calls to allow data to be shared between function calls.

Returns "" on invalid input.
You can create yourself a twelve byte memoryblock with a starting value you want. First four bytes are position and next 8 bytes the current vector.

This is output feedback mode. Encryption is the same a decryption.

Returned string does not contain text, but binary data.
Please do not store in text fields in database without using EncodeHex or EncodeBase64 to make it a text string.

See also:

• EncryptOFB64(idata as memoryblock, odata as memoryblock, offset as Integer, length as Integer, ivec as memoryblock, byref num as Integer)

BlowfishMBS.EncryptOFB64(idata as memoryblock, odata as memoryblock, offset as Integer, length as Integer, ivec as memoryblock, byref num as Integer)

idata: memoryblock for input data, 8 bytes in size and not nil.
odata: memoryblock for output data, 8 bytes in size and not nil.
offset: offset in input and output memoryblocks
length: length of data in memoryblock in bytes. Multiply of 8.
ivec: memoryblock for temporary data, 8 bytes in size and not nil.
num: current position in ivec. Pass 0 as start value and pass the value you get back to the next function call.

Returns "" on invalid input.
You can create yourself a twelve byte memoryblock with a starting value you want. First four bytes are position and next 8 bytes the current vector.

This is output feedback mode. Encryption is the same a decryption.

See also:

• EncryptOFB64(data as string, byref temp as memoryblock) as string

BlowfishMBS.SetKey(key as string)

The longer the key, the better. Suggested is at least 16 bytes.