方法一、oracle自带工具
1、c:/>set NLS_LANG=AMERICAN_AMERICA.USACII7
或c:/>set NLS_LANG=AMERICAN_AMERICA.WE8ISO8859P1
或c:/>set NLS_LANG=AMERICAN_AMERICA.ZHS16GBK(当遇到加密报错,且有中文的情况下可以使用)
2、把存储过程保存成sql文件
3、c:>wrap iname=Procedures.sql edebug=wrap_new_sql 在目录下面会产生Procedures.plb文件,
4、
SQL PLUS中@Procedures.plb就可以完成加密
SQL> @c:/Procedures.plb
oracle提供了wrap工具来加密包括procedure、function、package等的PL/SQL源代码
wrap的执行在OS的命令行环境下
语法:wrap iname=input_file [oname=output_file]
限制:字符串、数字、变量名、表名、字段名被保留在加密文件中的,仅加密运算法则并限制被解密。所以,也就无法隐藏表名或者密码等
有些新的sql语法,需要指定选项edebug=wrap_new_sql,否则不能被支持
PLS-00753:包装的单元格式错误
一般都是pl/sql根据编译造成
在sqlplus中SQL> @c:/Procedures.plb,选择其中的过程或方法测试。
注意:
1、wrap只能检测出基本的语法错误,而由于不登录数据库所以无法检查出语义的错误
2、向上兼容,而不能向下兼容,即低版本加密的过程可以到高版本上编译,反之不行
3、加密package是仅加密package body,而不加密包声明
4、windows平台上执行时显示错误:kgepop: no error frame to pop to for error 1801
需要先定义 set NLS_LANG=AMERICAN_AMERICA.ZHS16GBK
加密文件名如果不指定的话,就是原文件主文件.plb
加密后使用 SQL> @加密文件名 编译到库中,查看的时候显示已经被加密
比如在pl/sql developer查看是显示 /* Source is wrapped */
方法二、创建加密的存储过程
[sql] CREATE OR REPLACE PROCEDURE p_wraped_user(p_packename in varchar default '') AUTHID CURRENT_USER AS --p_packename 加密的存储过程名字 --For:批量加密本用户下的所有代码,包括存储过程、函数、包。 v_procs dbms_sql.varchar2a; BEGIN IF p_packename IS NULL THEN FOR n IN (SELECT DISTINCT NAME, TYPE FROM user_source WHERE NAME <> 'P_WRAPED_USER' AND TYPE <> 'TYPE' AND NAME = 'PACK_JC_LPRY_T' MINUS SELECT DISTINCT NAME, TYPE FROM user_source WHERE line = 1 AND instr(text, 'wrapped') > 0 --WHERE NAME = 'GET_CLERK' --AND -- TYPE = 'PACKAGE BODY' ORDER BY TYPE) LOOP FOR i IN (SELECT rownum rn, text FROM (SELECT decode(line, 1, 'create or replace ') || text text FROM user_source WHERE NAME = n.NAME AND TYPE = n.TYPE ORDER BY line)) LOOP v_procs(i.rn) := i.text; END LOOP; dbms_ddl.create_wrapped(v_procs, 1, v_procs.COUNT); v_procs.DELETE; END LOOP; ELSE FOR n IN (SELECT DISTINCT NAME, TYPE FROM user_source WHERE NAME <> 'P_WRAPED_USER' AND TYPE <> 'TYPE' AND NAME = p_packename MINUS SELECT DISTINCT NAME, TYPE FROM user_source WHERE line = 1 AND instr(text, 'wrapped') > 0 --WHERE NAME = 'GET_CLERK' --AND -- TYPE = 'PACKAGE BODY' ORDER BY TYPE) LOOP FOR i IN (SELECT rownum rn, text FROM (SELECT decode(line, 1, 'create or replace ') || text text FROM user_source WHERE NAME = n.NAME AND TYPE = n.TYPE ORDER BY line)) LOOP v_procs(i.rn) := i.text; END LOOP; dbms_ddl.create_wrapped(v_procs, 1, v_procs.COUNT); v_procs.DELETE; END LOOP; END IF; END;