Чтобы не лазили из под супермага всякой фигней, работает следующий триггер:
Код:
CREATE OR REPLACE TRIGGER BLOCK_TOOLS_FROM_PROD
AFTER LOGON ON DATABASE
DECLARE
V_PROG VARCHAR2 (256);
V_USER VARCHAR2 (64);
BEGIN
SELECT sys_context('userenv','module'),
sys_context('userenv','session_user')
INTO V_PROG, V_USER
FROM dual;
IF V_USER IN ('SUPERMAG') THEN
IF UPPER(V_PROG) LIKE '%TOAD%' OR -- TOAD
UPPER(V_PROG) LIKE '%T.O.A.D%' OR -- TOAD
UPPER(V_PROG) LIKE '%SQLNAV%' OR -- SQL NAVIGATOR
UPPER(V_PROG) LIKE '%PLSQLDEV%' OR -- PLSQL DEVELOPER
UPPER(V_PROG) LIKE '%BUSOBJ%' OR -- BUSINESS OBJECTS
UPPER(V_PROG) LIKE '%EXCEL%' OR -- MS-EXCEL PLUG-IN
UPPER(V_PROG) LIKE '%ACC%' -- Access
THEN
RAISE_APPLICATION_ERROR(-20000, 'Ошибка приложения!');
END IF;
END IF;
END;