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

发布时间:2016-12-27 00:00:00 编辑:嘉辉 手机版

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

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

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

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

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

  4.--

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

  6.CREATE OR REPLACE PROCEDURE pro_insert(

  7. uName IN scott.users.uname%TYPE, --用户名

  8. uPwd IN scott.users.upwd%TYPE --密码,这个要加密

  9.) IS

  10.BEGIN

  11.

  12.--定义变量

  13.DECLARE

  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 1..lengthUpwd

  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;

  56.END pro_insert;

本文已影响863
+1
0