触发器禁止exp导出数据

xifenfei

1. --触发器禁止exp   dba权限用户不能被控制
   
2. create or replace
   
3. TRIGGER DISABLE_EXP
   
4. AFTER logon ON DATABASE
   
5. DECLARE
   
6. mtSession v$session%ROWTYPE;
   
7. CURSOR cSession(iiQuerySid IN NUMBER) IS
   
8.    SELECT * FROM v$session where USERNAME is not null
   
9.     and nvl(osuser,'x') <> 'SYSTEM'   and type <> 'BACKGROUND' and upper(module) like 'EXP%' and audsid = iiQuerySid;
   
10.   V_SQL VARCHAR2(100);
    
11. BEGIN
    
12. OPEN cSession(userenv('SESSIONID'));
    
13.   FETCH cSession INTO mtSession;
    
14.   IF cSession%FOUND THEN
    
15.   V_SQL:=' alter system kill session '||''''||mtSession.Sid||','||mtSession.Serial#||'''';
    
16.   EXECUTE IMMEDIATE V_SQL;
    
17.   END IF;
    
18.   CLOSE cSession;
    
19. EXCEPTION
    
20.   WHEN OTHERS THEN
    
21.     RAISE;
    
22. END;
    
23. 
    
24. 
    
25. --10G及其以上版本,9i中无sys_context('USERENV', 'MODULE')
    
26. CREATE OR REPLACE TRIGGER DISABLE_EXP
    
27.   AFTER LOGON ON DATABASE
    
28. DECLARE
    
29.   my_forced_exception EXCEPTION;
    
30.   PRAGMA EXCEPTION_INIT(MY_FORCED_EXCEPTION, -20101);
    
31. BEGIN
    
32.     IF (UPPER(sys_context('USERENV', 'MODULE')) LIKE 'EXP%')
    
33.      THEN
    
34.       RAISE my_forced_exception;
    
35.    END IF;
    
36. EXCEPTION
    
37.   WHEN my_forced_exception THEN
    
38.     RAISE_APPLICATION_ERROR(-20101,
    
39.                             'USER ' ||
    
40.                             sys_context('USERENV', 'SESSION_USER') || ' ' ||
    
41.                             'MODULE ' ||
    
42.                             UPPER(sys_context('USERENV', 'MODULE')) || ' ' || ' Ban export data !');
    
43.   WHEN OTHERS THEN
    
44.     null;
    
45. END;
    
46. /

复制代码