Mkb, think about the JOE considerations !!

-----Original Message-----
Sent: Wednesday, October 30, 2002 5:19 PM
To: Multiple recipients of list ORACLE-L


Ramon,

Thank you.  I like the ideas in this trigger.  I will
certainly try this.

mkb

--- "Ramon E. Estevez" <[EMAIL PROTECTED]>
wrote:
> Hi, mkb
> 
> I made this one, hope it works for you as it did for
> me.
> 
> It validates also some roles that were assigned to
> the DBA group.
> 
> 
> Luck,
> 
> Ramonaa
> 
>
----------------------------------------------------------------
> CREATE OR REPLACE TRIGGER sys.Block_Tools_T
> after logon on database
> 
> Declare
>  user_name varchar2(30);
>  program_name varchar2(40);
>  machine_name varchar2(40);
>  logon_date date;
>  sesiones  integer := 0;
>  autorizado varchar2(1) := 'N';
>  external_tool boolean := false;
> 
>  cursor c1 is select username, program , machine,
> sysdate 
>               from v$session
>               where audsid=userenv('sessionid');
> Begin
>   open c1;
>   fetch c1 into user_name, program_name,
> machine_name, logon_date; 
>   close c1;
> 
>   select count(*) into sesiones
>   from   v$session
>   where  username = user_name
>   and    machine = machine_name;
> 
>   select 'S' into autorizado from dba_role_privs
>   where grantee = user_name
>   and granted_role in
>
('DBA_JUNIOR','DBA_SENIOR','INTEGRIDAD','ANALISTA_TEM');
> 
>   if upper(program_name) LIKE '%PLUS%' or
>      upper(program_name) LIKE '%TOAD%' or
>      upper(program_name) LIKE 'SQLNAV%' then
>      external_tool := true;
>   end if ;
>   if (external_tool and autorizado = 'N') then
>      raise_application_error(-20001,'Usted No puede conectarse
> utilizando esta aplicacion.');
>   elsif (autorizado = 'N' and sesiones >= 1) then
>      raise_application_error(-20001,'No puede hacer
> mas conexiones desde
> esta terminal.');
>   end if;
> 
>   Exception when others then
>     raise_application_error(-20001,'No tiene ningun privilegio 
> asignado, contacte el depto de seguridad de sistemas.');
> End;
> /
> 
> 
> 
> -----Original Message-----
> Sent: Tuesday, October 29, 2002 12:29 PM
> To: Multiple recipients of list ORACLE-L
> 
> 
> Sorry in advance, but I didn't think I'd need this.
> 
> There was a discussion about 4 weeks ago if memory
> serves correct, about denying users logging on to
> Oracle directly either through SQL*Plus or other
> tools
> such as TOAD.  Tried searching the archives but
> getting too many hits.
> 
> Someone posted trigger code that did this.  Anyone
> have a copy of this?
> 
> Thanks
> 
> mkb
> 
> 
> __________________________________________________
> Do you Yahoo!?
> HotJobs - Search new jobs daily now
> http://hotjobs.yahoo.com/
> --
> Please see the official ORACLE-L FAQ:
> http://www.orafaq.com
> -- 
> Author: mkb
>   INET: [EMAIL PROTECTED]
> 
> Fat City Network Services    -- 858-538-5051
> http://www.fatcity.com
> San Diego, California        -- Mailing list and web
> hosting services
>
---------------------------------------------------------------------
> To REMOVE yourself from this mailing list, send an
> E-Mail message
> to: [EMAIL PROTECTED] (note EXACT spelling of
> 'ListGuru') and in the
> message BODY, include a line containing: UNSUB
> ORACLE-L (or the name of
> mailing list you want to be removed from).  You may
> also send the HELP
> command for other information (like subscribing).
> 
> --
> Please see the official ORACLE-L FAQ:
> http://www.orafaq.com
> -- 
> Author: Ramon E. Estevez
>   INET: [EMAIL PROTECTED]
> 
> Fat City Network Services    -- 858-538-5051
> http://www.fatcity.com
> San Diego, California        -- Mailing list and web
> hosting services
>
---------------------------------------------------------------------
> To REMOVE yourself from this mailing list, send an
> E-Mail message
> to: [EMAIL PROTECTED] (note EXACT spelling of
> 'ListGuru') and in
> the message BODY, include a line containing: UNSUB
> ORACLE-L
> (or the name of mailing list you want to be removed
> from).  You may
> also send the HELP command for other information
> (like subscribing).


__________________________________________________
Do you Yahoo!?
HotJobs - Search new jobs daily now
http://hotjobs.yahoo.com/
-- 
Please see the official ORACLE-L FAQ: http://www.orafaq.com
-- 
Author: mkb
  INET: [EMAIL PROTECTED]

Fat City Network Services    -- 858-538-5051 http://www.fatcity.com
San Diego, California        -- Mailing list and web hosting services
---------------------------------------------------------------------
To REMOVE yourself from this mailing list, send an E-Mail message
to: [EMAIL PROTECTED] (note EXACT spelling of 'ListGuru') and in the
message BODY, include a line containing: UNSUB ORACLE-L (or the name of
mailing list you want to be removed from).  You may also send the HELP
command for other information (like subscribing).

-- 
Please see the official ORACLE-L FAQ: http://www.orafaq.com
-- 
Author: Ramon E. Estevez
  INET: [EMAIL PROTECTED]

Fat City Network Services    -- 858-538-5051 http://www.fatcity.com
San Diego, California        -- Mailing list and web hosting services
---------------------------------------------------------------------
To REMOVE yourself from this mailing list, send an E-Mail message
to: [EMAIL PROTECTED] (note EXACT spelling of 'ListGuru') and in
the message BODY, include a line containing: UNSUB ORACLE-L
(or the name of mailing list you want to be removed from).  You may
also send the HELP command for other information (like subscribing).

Reply via email to