Paweł Domański
135 lines
4.4 KiB
Transact-SQL
135 lines
4.4 KiB
Transact-SQL
USE master
|
|
GO
|
|
IF OBJECT_ID ('sp_hexadecimal') IS NOT NULL
|
|
DROP PROCEDURE sp_hexadecimal
|
|
GO
|
|
CREATE PROCEDURE sp_hexadecimal
|
|
@binvalue varbinary(256),
|
|
@hexvalue varchar (514) OUTPUT
|
|
AS
|
|
DECLARE @charvalue varchar (514)
|
|
DECLARE @i int
|
|
DECLARE @length int
|
|
DECLARE @hexstring char(16)
|
|
SELECT @charvalue = '0x'
|
|
SELECT @i = 1
|
|
SELECT @length = DATALENGTH (@binvalue)
|
|
SELECT @hexstring = '0123456789ABCDEF'
|
|
WHILE (@i <= @length)
|
|
BEGIN
|
|
DECLARE @tempint int
|
|
DECLARE @firstint int
|
|
DECLARE @secondint int
|
|
SELECT @tempint = CONVERT(int, SUBSTRING(@binvalue,@i,1))
|
|
SELECT @firstint = FLOOR(@tempint/16)
|
|
SELECT @secondint = @tempint - (@firstint*16)
|
|
SELECT @charvalue = @charvalue +
|
|
SUBSTRING(@hexstring, @firstint+1, 1) +
|
|
SUBSTRING(@hexstring, @secondint+1, 1)
|
|
SELECT @i = @i + 1
|
|
END
|
|
|
|
SELECT @hexvalue = @charvalue
|
|
GO
|
|
|
|
IF OBJECT_ID ('sp_help_revlogin') IS NOT NULL
|
|
DROP PROCEDURE sp_help_revlogin
|
|
GO
|
|
CREATE PROCEDURE sp_help_revlogin @login_name sysname = NULL AS
|
|
DECLARE @name sysname
|
|
DECLARE @type varchar (1)
|
|
DECLARE @hasaccess int
|
|
DECLARE @denylogin int
|
|
DECLARE @is_disabled int
|
|
DECLARE @PWD_varbinary varbinary (256)
|
|
DECLARE @PWD_string varchar (514)
|
|
DECLARE @SID_varbinary varbinary (85)
|
|
DECLARE @SID_string varchar (514)
|
|
DECLARE @tmpstr varchar (1024)
|
|
DECLARE @is_policy_checked varchar (3)
|
|
DECLARE @is_expiration_checked varchar (3)
|
|
|
|
DECLARE @defaultdb sysname
|
|
|
|
IF (@login_name IS NULL)
|
|
DECLARE login_curs CURSOR FOR
|
|
|
|
SELECT p.sid, p.name, p.type, p.is_disabled, p.default_database_name, l.hasaccess, l.denylogin FROM
|
|
sys.server_principals p LEFT JOIN sys.syslogins l
|
|
ON ( l.name = p.name ) WHERE p.type IN ( 'S', 'G', 'U' ) AND p.name <> 'sa'
|
|
ELSE
|
|
DECLARE login_curs CURSOR FOR
|
|
|
|
|
|
SELECT p.sid, p.name, p.type, p.is_disabled, p.default_database_name, l.hasaccess, l.denylogin FROM
|
|
sys.server_principals p LEFT JOIN sys.syslogins l
|
|
ON ( l.name = p.name ) WHERE p.type IN ( 'S', 'G', 'U' ) AND p.name = @login_name
|
|
OPEN login_curs
|
|
|
|
FETCH NEXT FROM login_curs INTO @SID_varbinary, @name, @type, @is_disabled, @defaultdb, @hasaccess, @denylogin
|
|
IF (@@fetch_status = -1)
|
|
BEGIN
|
|
PRINT 'No login(s) found.'
|
|
CLOSE login_curs
|
|
DEALLOCATE login_curs
|
|
RETURN -1
|
|
END
|
|
SET @tmpstr = '/* sp_help_revlogin script '
|
|
PRINT @tmpstr
|
|
SET @tmpstr = '** Generated ' + CONVERT (varchar, GETDATE()) + ' on ' + @@SERVERNAME + ' */'
|
|
PRINT @tmpstr
|
|
PRINT ''
|
|
WHILE (@@fetch_status <> -1)
|
|
BEGIN
|
|
IF (@@fetch_status <> -2)
|
|
BEGIN
|
|
PRINT ''
|
|
SET @tmpstr = '-- Login: ' + @name
|
|
PRINT @tmpstr
|
|
IF (@type IN ( 'G', 'U'))
|
|
BEGIN -- NT authenticated account/group
|
|
|
|
SET @tmpstr = 'CREATE LOGIN ' + QUOTENAME( @name ) + ' FROM WINDOWS WITH DEFAULT_DATABASE = [' + @defaultdb + ']'
|
|
END
|
|
ELSE BEGIN -- SQL Server authentication
|
|
-- obtain password and sid
|
|
SET @PWD_varbinary = CAST( LOGINPROPERTY( @name, 'PasswordHash' ) AS varbinary (256) )
|
|
EXEC sp_hexadecimal @PWD_varbinary, @PWD_string OUT
|
|
EXEC sp_hexadecimal @SID_varbinary,@SID_string OUT
|
|
|
|
-- obtain password policy state
|
|
SELECT @is_policy_checked = CASE is_policy_checked WHEN 1 THEN 'ON' WHEN 0 THEN 'OFF' ELSE NULL END FROM sys.sql_logins WHERE name = @name
|
|
SELECT @is_expiration_checked = CASE is_expiration_checked WHEN 1 THEN 'ON' WHEN 0 THEN 'OFF' ELSE NULL END FROM sys.sql_logins WHERE name = @name
|
|
|
|
SET @tmpstr = 'CREATE LOGIN ' + QUOTENAME( @name ) + ' WITH PASSWORD = ' + @PWD_string + ' HASHED, SID = ' + @SID_string + ', DEFAULT_DATABASE = [' + @defaultdb + ']'
|
|
|
|
IF ( @is_policy_checked IS NOT NULL )
|
|
BEGIN
|
|
SET @tmpstr = @tmpstr + ', CHECK_POLICY = ' + @is_policy_checked
|
|
END
|
|
IF ( @is_expiration_checked IS NOT NULL )
|
|
BEGIN
|
|
SET @tmpstr = @tmpstr + ', CHECK_EXPIRATION = ' + @is_expiration_checked
|
|
END
|
|
END
|
|
IF (@denylogin = 1)
|
|
BEGIN -- login is denied access
|
|
SET @tmpstr = @tmpstr + '; DENY CONNECT SQL TO ' + QUOTENAME( @name )
|
|
END
|
|
ELSE IF (@hasaccess = 0)
|
|
BEGIN -- login exists but does not have access
|
|
SET @tmpstr = @tmpstr + '; REVOKE CONNECT SQL TO ' + QUOTENAME( @name )
|
|
END
|
|
IF (@is_disabled = 1)
|
|
BEGIN -- login is disabled
|
|
SET @tmpstr = @tmpstr + '; ALTER LOGIN ' + QUOTENAME( @name ) + ' DISABLE'
|
|
END
|
|
PRINT @tmpstr
|
|
END
|
|
|
|
FETCH NEXT FROM login_curs INTO @SID_varbinary, @name, @type, @is_disabled, @defaultdb, @hasaccess, @denylogin
|
|
END
|
|
CLOSE login_curs
|
|
DEALLOCATE login_curs
|
|
RETURN 0
|
|
GO |