oracle登录失败触发器,触发器----记录用户登录失败

CREATE OR REPLACE TRIGGER logon_denied_to_alert

AFTER servererror ON DATABASE

DECLARE

message   VARCHAR2(168);

ip        VARCHAR2(15);

v_os_user VARCHAR2(80);

v_module  VARCHAR2(50);

v_action  VARCHAR2(50);

v_pid     VARCHAR2(10);

v_sid     NUMBER;

v_program VARCHAR2(48);

BEGIN

IF (ora_is_servererror(1017)) THEN

-- get ip FOR remote connections :

IF upper(sys_context('userenv', 'network_protocol')) = 'TCP' THEN

ip := sys_context('userenv', 'ip_address');

END IF;

SELECT sid INTO v_sid FROM sys.v_$mystat WHERE rownum < 2;

SELECT p.spid, v.program

INTO v_pid, v_program

FROM v$process p, v$session v

WHERE p.addr = v.paddr

AND v.sid = v_sid;

v_os_user := sys_context('userenv', 'os_user');

dbms_application_info.read_module(v_module, v_action);

message := to_char(SYSDATE, 'YYYYMMDD HH24MISS') ||

' logon denied from ' || nvl(ip, 'localhost') || ' ' ||

v_pid || ' ' || v_os_user || ' with ' || v_program || ' – ' ||

v_module || ' ' || v_action;

sys.dbms_system.ksdwrt(2, message);

END IF;

END;

/

在alert中会输出以下内容：

Thu Feb 12 04:13:11 2015

20150212 041311 logon denied from 192.168.56.101 1391 chb with plsqldev.exe ? pl

来自 “ ITPUB博客 ” ，链接：http://blog.itpub.net/23988293/viewspace-1434538/，如需转载，请注明出处，否则将追究法律责任。