Skip to main content

MD5 Hash Function for Oracle

Basically there are 2 functions needed. Some people prefer the raw hash instead of the hex equivalent.
1. md5raw - for encoding text in raw md5 hash
2. md5 - for converting raw md5 hash to hex.


Here’s the code for the md5raw function.



create or replace
function md5raw (text in varchar2)
return varchar2 is
hash_value varchar2(20);
begin
hash_value := dbms_obfuscation_toolkit.md5 (input_string => text);
return hash_value;
end;

and the code for the md5 function.



create or replace
function md5(text in varchar2)
return varchar2 is
hash_value varchar2(32);
begin
select lower(rawtohex(md5raw(text)))
into hash_value
from dual;
return hash_value;
end;

Now you can do something like this.



select md5('koala') from dual;

|---------------------------------------|
|MD5('koala') |
|---------------------------------------|
|a564de63c2d0da68cf47586ee05984d7 |
|---------------------------------------|

Comments

Popular posts from this blog

Architecture Complexity

Here are the items to consider: Coding to an interface Service Oriented Architecture Automated Testing Domain Driven Design Custom Data Access Layer Layered architecture Complexity is relatively equal the number of lines of code. Note that complexity is not bad. It must be justified.

Moving on

So I bought my self a 2.5″ hard drive enclosure for about 750 bucks. I wish I have my own tools for constructing a device as such. Instead of going for a 2GB USB flash drive, I chose to salvage the 30GB hard drive of an incapacitated laptop. Cool isn’t it? Though relatively slower than a typical USB flash drive, the storage capacity outweighs it. [To God] Thanks for being there always.

Bin to hex converter in 16-bit DOS assembly

Just a quick code like putting your keyboard where your brain is. There should be another way of doing this. I hate this code. start: xor al, al xor bl, bl xor cl, cl mov dl, 4 ; use dl as counter input: mov ah, 00 int 16h cmp ah, 1ch je exit cmp al, '0' jb input cmp al, '1' ja input convert: mov cl, dl dec cl ; dl - 1 sub al, 30h ; get original value shl al, cl ; place in the appropriate bit position or bl, al ; save in bl dec dl ; prepare for the next bit jnz input ; must be 4 bits cmp bl, 9 ja letter jbe number letter: add bl, 37h ; because 'A' - 37h is 0Ah jmp here number: add bl, 30h ; because '0' - 30h is 00h here: call display jmp start display: mov ah, 02h ...