问题提出:
pub上有网友提出了一个会话如何自杀,因为一个会话是不能杀死自己的,如果直接执行alter system kill session 来杀死自己,则报错如下:
SQL> select sid,serial# from v$session where sid in (select sid from v$mystat);
SID SERIAL#
---------- ----------
855 27
SQL> alter system kill session '855,27';
alter system kill session '855,27'
*
ERROR at line 1:
ORA-00027: cannot kill current session
那来看一下如何把kill session的任务扔给job,让job充当另一个会话来杀掉自己:
CREATE OR REPLACE PROCEDURE PRC_KILLSELF(V_SID VARCHAR2, V_SERIAL VARCHAR2) IS
BEGIN
EXECUTE IMMEDIATE 'alter system kill session ''' || V_SID || ',' ||
V_SERIAL || '''';
END PRC_KILLSELF;
上面是自杀的程序。
CREATE OR REPLACE PROCEDURE PRC_COMMITJOB(V_SID NUMBER, V_SERIAL NUMBER) IS
V_RETURN NUMBER;
BEGIN
DBMS_JOB.SUBMIT(JOB => V_RETURN,
WHAT => 'prc_killself(' || V_SID || ',' || V_SERIAL || ');');
COMMIT;
END PRC_COMMITJOB;
上面是把自杀过程提交为job的程序。下面来看看执行的结果:
SQL> select distinct sid from v$mystat;
SID
----------
843
SQL> select sid,serial# from v$session where sid=843;
SID SERIAL#
---------- ----------
843 243
SQL> exec PRC_COMMITJOB(843,243);
PL/SQL procedure successfully completed.
SQL> desc v$session;
ERROR:
ORA-00028: your session has been killed
可以看到自己的session已经被杀掉了,desc命令已经不能执行。
附:此过程是在sys用户下直接做的测试,如果其他用户下,kill session需要alter system的权限(网上搜来的,偶未测试)。
来自 “ ITPUB博客 ” ,链接:http://blog.itpub.net/25016/viewspace-925655/,如需转载,请注明出处,否则将追究法律责任。
转载于:http://blog.itpub.net/25016/viewspace-925655/