Re: [Re: Column encryption]

From: Yigal Ran <ydran_at_usa.net>
Date: 22 Sep 00 12:46:18 EDT
Message-Id: <10627.117676@fatcity.com>

Jared,

Thanks for the information, I did resolve the problem, see attached code.=

Yigal

-------------------------------------------------------------------------=

set echo off
set verify off
set term on
set heading off
set wrap off
set feedback off
set heading off
set truncate off
set recsep off
set serveroutput on; =

CLEAR BUFFER
-- @encrypt.sql =

undefine PASSWD
 =

ACCEPT PASSWD CHAR PROMPT 'Please enter a password - Must be up to 8 characters : ' =

PROMPT =  =

DECLARE

• input_string VARCHAR2(16) :=3D '&&passwd'; input_string VARCHAR2(8) :=3D rpad('&&passwd',8,' '); raw_input RAW(128) :=3D UTL_RAW.CAST_TO_RAW(input_string); key_string VARCHAR2(8) :=3D 'scottsco'; raw_key RAW(128) :=3D UTL_RAW.CAST_TO_RAW(key_string); encrypted_raw RAW(2048); encrypted_string VARCHAR2(2048); decrypted_raw RAW(2048); decrypted_string VARCHAR2(2048); error_in_input_buffer_length EXCEPTION; PRAGMA EXCEPTION_INIT(error_in_input_buffer_length, -28232); INPUT_BUFFER_LENGTH_ERR_MSG VARCHAR2(100) :=3D '*** INPUT STRING MUST BE= 8 BYTES LONG - IGNORING EXCEPTION ***';

BEGIN
        dbms_obfuscation_toolkit.DESEncrypt(input =3D> raw_input, key =3D> raw_k= ey,
encrypted_data =3D> encrypted_raw );

        dbms_output.put_line('> encrypted hex value : ' || rawtohex(encrypted_ra= w));

        dbms_obfuscation_toolkit.DESDecrypt(input =3D> encrypted_raw,key =3D> ra= w_key,
decrypted_data =3D> decrypted_raw);

	dbms_output.put_line('> Decrypted raw output : '
||UTL_RAW.CAST_TO_VARCHAR2(decrypted_raw));
	dbms_output.put_line('> ');
	if UTL_RAW.CAST_TO_VARCHAR2(raw_input) =3D
UTL_RAW.CAST_TO_VARCHAR2(decrypted_raw) THEN
		dbms_output.put_line('> Raw DES Encyption and Decryption successful');
	END if;
	EXCEPTION =

		WHEN error_in_input_buffer_length THEN
			dbms_output.put_line('> ' || INPUT_BUFFER_LENGTH_ERR_MSG);
	dbms_output.put_line('> ');

END; /

Jared Still <jkstill_at_bcbso.com> wrote:
> =

> Take a look at the article on encryption
> at www.teleport.com/~jkstill/util
> =

> Jared
> =

> On Wed, 20 Sep 2000, Yigal Ran wrote:
> =

> > Is there a way to do a column encryption? =

> > =

> > Yigal
> > =

> > ____________________________________________________________________
> > Get free email and a permanent address at http://www.amexmail.com/?A=3D=
1
> > --
> > Please see the official ORACLE-L FAQ: http://www.orafaq.com
> > --
> > Author: Yigal Ran
> > INET: ydran_at_usa.net
> > =

> > Fat City Network Services -- (858) 538-5051 FAX: (858) 538-5051
> > San Diego, California -- Public Internet access / Mailing List=
s
> > --------------------------------------------------------------------
> > To REMOVE yourself from this mailing list, send an E-Mail message
> > to: ListGuru_at_fatcity.com (note EXACT spelling of 'ListGuru') and in
> > the message BODY, include a line containing: UNSUB ORACLE-L
> > (or the name of mailing list you want to be removed from). You may
> > also send the HELP command for other information (like subscribing).
> > =

> =

> =

> Jared Still
> Certified Oracle DBA and Part Time Perl Evangelist ;-)
> Regence BlueCross BlueShield of Oregon
> jkstill_at_bcbso.com - Work - preferred address
> jkstill_at_teleport.com - private
> =

> =

> -- =

> Please see the official ORACLE-L FAQ: http://www.orafaq.com
> -- =

> Author: Jared Still
> INET: jkstill_at_bcbso.com
> =

> Fat City Network Services -- (858) 538-5051 FAX: (858) 538-5051
> San Diego, California -- Public Internet access / Mailing Lists
> --------------------------------------------------------------------
> To REMOVE yourself from this mailing list, send an E-Mail message
> to: ListGuru_at_fatcity.com (note EXACT spelling of 'ListGuru') and in
> the message BODY, include a line containing: UNSUB ORACLE-L
> (or the name of mailing list you want to be removed from). You may
> also send the HELP command for other information (like subscribing).

---

Get free email and a permanent address at http://www.amexmail.com/?A=3D1

---

 From: Yigal Ran <ydran_at_usa.net>
 Date: 22 Sep 00 12:46:18 EDT
 Subject: Re: [Re: Column encryption]

Jared,

Thanks for the information, I did resolve the problem, see attached code.=

Yigal

-------------------------------------------------------------------------=

Received on Fri Sep 22 2000 - 11:46:18 CDT