关于Oracle数据库替代加密算法

替代密码算法的原理是使用替代法进行加密，就是将明文中的字符用其它字符替代 后形成密文。例如：明文字母a、b、c、d ，用D、E、F、G做对应替换后形成密文。

这里在Oracle的存储过程，通过替换加密算法来实现密码存入数据库时的加密。

1.--------------------------------

2.--------------------------------

3.--Oracle数据库加密----替代算法---

4.--

5.--------------------------------

TE OR REPLACE PROCEDURE pro_insert(

7. uName IN e%TYPE, --用户名

8. uPwd IN %TYPE --密码，这个要加密

9.) IS

N

11.

12.--定义变量

ARE

14. insertSQL nvarchar2(200 ); --一个待构造的sql语句

15. key numeric(2); --密钥

16. totALLetter numeric(2); --字母的总个数

17. targetCode nvarchar2(15); --转化后的字符密码表示

18. lengthUpwd numeric(2); --密码长度

19. initCodeVal numeric(3); --原始密码每位上字符对应的数值

20. targetCodeVal numeric(3);

21. BEGIN

22.

23. key := 3; --密钥赋值

24. totalLetter := 26; --字母总数

25. targetCode := ''; --转化后的'字符

26.

27.

28. --获取初始密钥的长度

29. lengthUpwd := LENGTH(uPwd);

30. 31. --逐个对初始密钥进行加密

32. FOR i IN thUpwd

33. LOOP

34.

35. initCodeVal := ASCII(SUBSTR(uPwd,i,1) ) -96 ;

36. --如果替代后的字母超过了z

37. targetCodeVal := MOD((initCodeVal + key), totalLetter );

38.

39. --如果是字母z

40. IF targetCodeVal = 0 THEN

41. targetCodeVal := 26;

42. END IF;

43.

44. targetCodeVal := targetCodeVal + 96;

45.

46. --将加密后的字符拼装

47. targetCode := targetCode || CHR(targetCodeVal);

48. END LOOP;

49.

50. --构造一个sql语句

51. insertSQL := 'INSERT INTO users (uName, uPwd ) VALUES('''

52. ||uName||''','''||targetCode||''')';

53. EXECUTE IMMEDIATE TO_CHAR(insertSQL);

54.

55. END;

pro_insert;