在Oracle 8x中实现自动断开后再连接

　　在实际的数据库应用中，我们经常遇到这样一个问题，连接到Oracle数据库的用户在作了一次操作后，再也没有后续操作，但却长时间没有和数据库断开连接。对于一个小型的应用系统来讲，本身的连接数目就有限，这好像没有什么严重的后果，但如果对于一个大型的数据库应用。如税务、工商等，如果数据库的连接数目很多，对于数据库服务器来讲，多一个连接就要多消耗一份资源，如果大量用户连接进入数据库系统但却不进行任何的操作，这无形之中就白白造成了服务器系统资源的浪费，同时造成服务器负载的提高，对于那些确实在工作的用户来讲，就不能最大限度的利用服务器的资源，严重情况下可能造成系统性能的急剧下降。



　　针对这种问题，该如何处理呢？对于目前流行的三层结构（Browser/Application/Server）开发来讲，这个问题可以通过设置应用服务器端的连接共享池（shared pool）来避免。但对于传统的两层结构（Client/Server）应用，就必须由我们人为干预来避免这种资源浪费情况。具体可以通过一个后台任务来监控系统中的所有进程，对于那些空闲超过一定时间的进程采取一定的特殊处理措施，如在客户端提示用户连接时间太长，如果没有后续操作系统将自动杀掉该连接或者直接将该空闲连接杀掉。下面就来具体讨论如何在Oracle 8x环境下实现用户进程的自动监控及其对对超过一定空闲时间连接的处理办法。


一、识别系统中超过一定空闲时间的连接


　　要实现后台任务自动对超过一定时间空闲连接的处理，首先第一步工作就是要从所有与数据库服务器的连接中识别出那些连接需要处理，也就是需要获得与服务器连接的每个用户的登陆时间及其最后一次操作后的空闲时间。在Oracle系统中，有一个动态性能视图v$session，该视图保存着系统当前连接的各种动态信息。其中，有两个字段LOGON_TIME和 LAST_CALL_ET可以得到上面的两个答案。


l LOGON_TIME是一个日期型（Date）字段，为用户登陆时间；


　　l LAST_CALL_ET是一个数字型（Number）字段，其含义是用户最后一条语句执行完毕后的时间，单位为秒。每次用户执行一个新的语句后，该字段复位为0，重新开始记数。我们可以通过该字段来获得一个连接用户最后一次操作数据库后的空闲时间。


　　下面的SQL查询语句可以得到与当前数据库连接的所有用户的一些基本情况，如用户名、状态、连接机器的名称，操作系统中用户的名称，UNIX系统的进程号，在UNIX操作系统级断开连接的语句，Oracle数据库系统断开连接的语句，登陆时间以及最后一次操作到现在的空闲时间等等。


SELECT s.username 用户名称, s.status 状态,s.machine 机器名称,
    　　　　osuser 操作系统用户名称,spid UNIX进程号,
    'kill -9 '||spid UNIX级断开连接,
    'alter system kill session ' ||''''||s.sid||',
  '||s.serial# || ''';' Oracle级断开连接,
    TO_CHAR (logon_time, 'dd/mm/yyyy hh24:mi:ss') 登陆时间,
    last_call_et 空闲时间秒,
    TO_CHAR (TRUNC (last_call_et / 3600, 0))||' '||' HRS '||
    TO_CHAR (
    TRUNC ((last_call_et - TRUNC
   (last_call_et / 3600, 0) * 3600) / 60, 0)
    ) ||' MINS' 空闲时间小时分钟,
    module 模块
    FROM v$session s, v$process p
    WHERE TYPE = 'USER'
    AND p.addr = s.paddr
    AND status != 'KILLED'
    -- AND SUBSTR (machine, 1, 19) NOT IN ('机器名')
    AND last_call_et > 60 * 60 * 1
    -- 空闲时间超过1小时的连接
    ORDER BY last_call_et desc;



　　在上面的查询中，我们可以通过SUBSTR (machine, 1, 19) NOT IN ('机器名')这个条件来屏蔽一些机器，这些机器可能需要运行一些耗费很长时间的SQL语句或其他一些特殊情况的机器。屏蔽这些机器的原因就是在后面的后台自动识别及处理任务中对这些机器不作处理。

二、识别及断开空闲用户的存储过程


　　上面的查询语句可以得到系统中所有的连接用户的一些基本情况，但是又如何来实现系统自动判断空闲超过一定时间的连接并将其自动断开呢？Oracle系统提供了一种称之为后台任务（Job）自动处理的机制。我们可以编写一个后台任务来定时执行，从而判断是否存在这样的用户连接，如果存在，则通过后台任务将其自动断开。


　　首先创建一个存储过程来完成空闲一定时间用户的识别和断开工作，然后添加一个后台任务来定时（根据空闲时间长短来确定）执行该过程，即可实现自动断开系统中空闲超过一定时间用户的需求。


　　存储过程p_monitor见下，其中参数an_nimutes为用户输入参数，用来确定识别和断开多长空闲时间连接的用户，单位为分钟，默认为60分钟，也就是1小时。需要注意一点的是，该存储过程，需要以sys用户身份运行。相应，调用该存储过程的后台任务也需要以SYS身份来添加。



CREATE OR REPLACE PROCEDURE P_MONITOR(
    AN_MINUTES NUMBER DEFAULT 60)
    /**//*******************************************
    存储过程用途：识别出系统中超过一定空闲连接时间(
    　 AS_MINUTES)的用户，并将其kill掉参数:
    　 AN_MINUTES 空闲时间数，单位为分钟，默认为60分钟
    ********************************************/
    AS
    　v_Str VARCHAR2(100);
    　CURSOR C_users(v_minutes number) IS 　SELECT s.username,
    　s.status, s.machine, 'alter system kill session '
    　||''''||s.sid||','||s.serial# ||'''' operates
    　FROM v$session s, v$process p
    　WHERE TYPE = 'USER'
    　AND p.addr = s.paddr
    　AND status != 'KILLED'
    　-- AND SUBSTR (machine, 1, 19) NOT IN ('需要屏蔽不被处理的机器名')
    　AND last_call_et > v_minutes*60
    　ORDER BY last_call_et desc;
    BEGIN
    FOR T_users IN C_users(an_minutes) LOOP
    v_Str := T_USERS.OPERATES;
    EXECUTE IMMEDIATE v_str;
    END LOOP;
    END;
    /




三、后台任务的定时执行


　　最后，我们为系统添加一个定时任务，定时调用上面创建的存储过程，即可完成系统自动识别和处理空闲用户的工作。


　　下面是一个实际调用的例子，在sys用户下，首先添加一个任务，该任务每隔半小时运行一次，每次均调用P_monitor存储过程，找出系统中空闲时间超过1小时的连接，然后自动断开。



DECLARE
    jobno number;
    BEGIN
    DBMS_JOB.SUBMIT(
    job => jobno,
    what => 'p_monitor(60);',
    next_date => SYSDATE,
    interval => '/*1:Hr*/ sysdate + 30/1440); -- 每半小时运行一次
    END;
    /