Mega Code Archive

 

Categories / Oracle PLSQL / System Packages

 

AES192

SQL> SQL> SQL> CREATE OR REPLACE FUNCTION get_enc_val (   2     p_in_val      IN   VARCHAR2,   3     p_key         IN   VARCHAR2,   4     p_iv          IN   VARCHAR2 := NULL   5  )   6     RETURN VARCHAR2   7  IS   8     l_enc_val    RAW (4000);   9     l_enc_algo   PLS_INTEGER;  10     l_in         RAW (4000);  11     l_iv         RAW (4000);  12     l_key        RAW (4000);  13     l_ret        VARCHAR2 (4000);  14  BEGIN  15     l_enc_algo := dbms_crypto.encrypt_aes192;  16     l_in := utl_i18n.string_to_raw (p_in_val, 'AL32UTF8');  17     l_iv := utl_i18n.string_to_raw (p_iv, 'AL32UTF8');  18     l_key := utl_i18n.string_to_raw (p_key, 'AL32UTF8');  19     l_enc_val :=  20        dbms_crypto.encrypt (src      => l_in,  21                             KEY      => l_key,  22                             iv       => l_iv,  23                             typ      =>   l_enc_algo  24                                         + dbms_crypto.chain_cbc  25                                         + dbms_crypto.pad_pkcs5  26                            );  27     l_ret := RAWTOHEX (l_enc_val);  28     RETURN l_ret;  29  END;  30  / Function created.