Newest functions Upload a function Leave a tip My account

There are 2,570 functions in this library.

ChecksumAdler32 ( text ; seed1 ; seed2 )

Creates a checksum of the input text bases on the Adler-32 algorithm.

  Average rating: 4.3 (38 votes) Log in to vote

Vaughan Bromfield - Show more from this author

  Function definition: (Copy & paste into FileMaker's Edit Custom Function window)

// ChecksumAdler32 ( text ; 1 ; 0 ) // The initial values for seed1 and seed2 must be 1 and 0 respectively. // // Adler-32 is a checksum algorithm which was invented by Mark Adler. // This custom function was written by Vaughan Bromfield // vbromfield@optusnet.com.au // // This function is based on the algorithm published on the // Adler-32 page on Wikipedia (accessed 2010-02-17) // http://en.wikipedia.org/wiki/Adler-32 // The published algorithm used ASCII encoding and returns a hexadecimal result; // this cf uses Unicode encoding and returns a decimal (base 10) result. // There may be other differences. Case ( Length( text ) = 0 ; Mod ( seed2 ; 65521 ) * 65536 + Mod ( seed1 ; 65521 ) ; Let( [ chr = Left ( text ; 1 ) ; nextxt = Right ( text ; Length( text ) - 1 ) ; nextseed1 = seed1 + Code ( chr ) ; nextseed2 = seed2 + nextseed1 ] ; ChecksumAdler32 ( nextxt ; nextseed1 ; nextseed2 ) ) //end let ) //end case Click to copy

ChecksumAdler32 ( text ; seed1 ; seed2 )

The initial values for seed1 and seed2 must be 1 and 0 respectively.

Adler-32 is a checksum algorithm which was invented by Mark Adler.
This custom function was written by Vaughan Bromfield .

This function is based on the algorithm published on the Adler-32 page on Wikipedia (accessed 2010-02-17)

http://en.wikipedia.org/wiki/Adler-32

The published algorithm used ASCII encoding and returns a hexadecimal result; this cf implementation uses Unicode encoding and returns a decimal (base 10) result.

There may be other differences.

All care taken but no responsibility. Your mileage may vary.

 

Comments

		Vaughan Bromfield Nov 11, 2010
Could the people that rate the function poorly please add a comment to let me know what the disappointment is. Thanks - Vaughan.

Log in to post comments.

 

Note: these functions are not guaranteed or supported by BrianDunning.com. Please contact the individual developer with any questions or problems.

Support this website.

This library has been a free commmunity resource for FileMaker users and developers for 20 years. It receives no funding and has no advertisements. If it has helped you out, I'd really appreciate it if you could contribute whatever you think it's worth: