处理死锁sql代码

处理死锁代码

USE   [ master ]
GO
/* ***** 对象:  StoredProcedure [dbo].[p_lockinfo]    脚本日期: 07/29/2010 20:35:56 ***** */
SET  ANSI_NULLS  ON
GO
SET  QUOTED_IDENTIFIER  ON
GO
  /**//* --处理死锁
 
        查看当前进程,或死锁进程,并能自动杀掉死进程

        因为是针对死锁的,所以如果有死锁进程,只能查看死锁进程
       当然,你可以通过参数控制,不管有没有死锁,都只查看死锁进程

        感谢: caiyunxia,jiangopen 两位提供的参考信息

--邹建 2004.04(引用请保留此信息)-- */

/**//* --调用示例

        exec p_lockinfo
-- */
CREATE   proc   [ dbo ] . [ p_lockinfo ]
@kill_lock_spid   bit = 1 ,                 -- 是否杀掉死锁的进程,1 杀掉, 0 仅显示
@show_spid_if_nolock   bit = 1          -- 如果没有死锁的进程,是否显示正常进程信息,1 显示,0 不显示
as
-- sysprocesses 的blocked 注释 smallint
-- 正在阻塞请求的会话的 ID。如果此列为 NULL，则表示请求未被阻塞，或锁定会话的会话信息不可用（或无法进行标识）。
-- -2 = 阻塞资源由孤立的分布式事务拥有。
-- -3 = 阻塞资源由延迟的恢复事务拥有。
-- -4 = 由于内部闩锁状态转换而无法确定阻塞闩锁所有者的会话 ID。

set  nocount  on
declare   @count   int , @s   nvarchar ( 1000 ), @i   int

-- 把死锁信息存到临时表#t

select  id = identity ( int , 1 , 1 ),标志,
        进程ID = spid,线程ID = kpid,块进程ID = blocked,数据库ID = dbid,
       数据库名 = db_name (dbid),用户ID = uid,用户名 = loginame,累计CPU时间 = cpu,
        登陆时间 = login_time,打开事务数 = open_tran,        进程状态 = status,
       工作站名 = hostname,应用程序名 = program_name,工作站进程ID = hostprocess,
       域名 = nt_domain,网卡地址 = net_address
into  #t  from (
        select  标志 = ' 死锁的进程 ' ,
                spid,kpid,a.blocked,dbid,uid,loginame,cpu,login_time,open_tran,
               status,hostname,program_name,hostprocess,nt_domain,net_address,
               s1 = a.spid,s2 = 0
         from  master..sysprocesses a  join  (
                 select  blocked  from  master..sysprocesses  group   by  blocked
                )b  on  a.spid = b.blocked  where  a.blocked = 0
         union   all
         select   ' |_牺牲品_> ' ,
                spid,kpid,blocked,dbid,uid,loginame,cpu,login_time,open_tran,
                status,hostname,program_name,hostprocess,nt_domain,net_address,
                s1 = blocked,s2 = 1
         from  master..sysprocesses a  where  blocked <> 0
)a  order   by  s1,s2

select   @count = @@rowcount , @i = 1

if   @count = 0   and   @show_spid_if_nolock = 1      --  没有死锁的进程,是否显示正常进程信息,1 显示,0 不显示
begin
         insert  #t
         select  标志 = ' 正常的进程 ' ,
                spid,kpid,blocked,dbid, db_name (dbid),uid,loginame,cpu,login_time,
                open_tran,status,hostname,program_name,hostprocess,nt_domain,net_address
         from  master..sysprocesses
         set   @count = @@rowcount
end

if   @count > 0      --  有死锁的进程
begin
         create   table  #t1(id  int   identity ( 1 , 1 ),a  nvarchar ( 100 ),b  Int ,EventInfo  nvarchar ( 1000 ))
         if   @kill_lock_spid = 1   -- 是否杀掉死锁的进程,1 杀掉, 0 仅显示
         begin
                 declare   @spid   varchar ( 10 ), @标志   varchar ( 10 )
                 while   @i <= @count
                 begin
                         select   @spid = 进程ID, @标志 = 标志  from  #t  where  id = @i
                         insert  #t1  exec ( ' dbcc inputbuffer( ' + @spid + ' ) ' )
                         if   @@rowcount = 0   insert  #t1(a)  values ( null )
                         if   @标志 = ' 死锁的进程 '   exec ( ' kill  ' + @spid )  --   杀掉
                         set   @i = @i + 1
                 end
         end
         else       -- 是否杀掉死锁的进程 0 仅显示
                 while   @i <= @count
                 begin
                         select   @s = ' dbcc inputbuffer( ' + cast (进程ID  as   varchar ) + ' ) '   from  #t  where  id = @i
                        insert  #t1  exec ( @s )
                         if   @@rowcount = 0   insert  #t1(a)  values ( null )
                         set   @i = @i + 1
                end
        select  a. * ,进程的SQL语句 = b.EventInfo
         from  #t a  join  #t1 b  on  a.id = b.id
         order   by  进程ID
end
set  nocount  off

稍微增加了一些注释与原理解释