---------------------------------------------
-- НАСТРАИВАЕМЫЕ ПАРАМЕТРЫ
-- Условие для выборки, '%' - все базы данных
DECLARE @namelike varchar(100) = '%fto%'
-- Имя почтового профиля, для отправки электонной почты
DECLARE @profilename as nvarchar(100) = 'ОсновнойПрофиль'
-- Получатели сообщений электронной почты, разделенные знаком ";"
DECLARE @recipients as nvarchar(500) = 'admin@mydomen.com'
-------------------------------------------
-- СЛУЖЕБНЫЕ ПЕРЕМЕННЫЕ
DECLARE @SQLString NVARCHAR(4000)
DECLARE @DBName varchar(100)
DECLARE @DBLogName varchar(100)
DECLARE @subject as NVARCHAR(1000) = ''
DECLARE @finalmassage as NVARCHAR(4000) = ''
-------------------------------------------
-- ТЕЛО СКРИПТА
-- Отберем базы для выполнения операций
DECLARE DBcursor CURSOR FOR
(
SELECT
t_Name.name as DatabaseName,
t_LogName.name as DatabaseLogName
FROM sys.databases as t_Name
Inner join sys.master_files as t_LogName
on t_Name.database_id = t_LogName.database_id
WHERE t_Name.database_id > 4
AND t_Name.state_desc = 'ONLINE' -- база должна быть в сети
AND t_Name.name like @namelike -- база должна содержать указанное слово
AND t_LogName.type = 1
)
-- Цикл по всем базам, попавшим в выборку
OPEN DBcursor
FETCH NEXT FROM DBcursor INTO @DBName, @DBLogName
WHILE @@FETCH_STATUS = 0
BEGIN
-- Переводим базы в простую модель восстановления
SET @SQLString = 'ALTER DATABASE ' + @DBName + ' SET RECOVERY SIMPLE WITH NO_WAIT;'
PRINT @SQLString
BEGIN TRY
EXEC sp_executesql @SQLString
END TRY
BEGIN CATCH
-- Ошбика выполнения операции
SET @finalmassage = @finalmassage + 'ОШИБКА перевода базы данных ' + @DBName + ' в простую модель восстановоления ' + CHAR(13) + CHAR(13)
+ 'Код ошибки: ' + CAST(ERROR_NUMBER() as nvarchar(10)) + CHAR(13) + CHAR(13)
+ 'Текст ошибки: ' + ERROR_MESSAGE() + CHAR(13) + CHAR(13)
+ 'Текст T-SQL:' + CHAR(13) + @SQLString + CHAR(13) + CHAR(13)
END CATCH;
-- Запускаем сжатие лога базы данных
SET @SQLString = 'USE [' + @DBName + ']; DBCC SHRINKFILE(' + @DBLogName + ', 0, truncateonly);'
PRINT @SQLString
BEGIN TRY
EXEC sp_executesql @SQLString
END TRY
BEGIN CATCH
-- Ошбика выполнения операции
SET @finalmassage = @finalmassage + 'ОШИБКА сжатия базы данных ' + @DBName + ' в простую модель восстановоления ' + CHAR(13) + CHAR(13)
+ 'Код ошибки: ' + CAST(ERROR_NUMBER() as nvarchar(10)) + CHAR(13) + CHAR(13)
+ 'Текст ошибки: ' + ERROR_MESSAGE() + CHAR(13) + CHAR(13)
+ 'Текст T-SQL:' + CHAR(13) + @SQLString + CHAR(13) + CHAR(13)
END CATCH;
-- Следующий элемент цикла
FETCH NEXT FROM DBcursor
INTO @DBName, @DBLogName
END
CLOSE DBcursor;
DEALLOCATE DBcursor;
-- Формируем сообщение об успешном или не успешном выполнении операций
IF @finalmassage = ''
BEGIN
-- Успешное выполнение всех операций
SET @subject = 'Успешное выполнение операций с базами данных '
SET @finalmassage = 'Успешный перевод в простую модель восстановления и сжатие файла журнала транзакций'
END
ELSE
-- Были ошибки
SET @subject = 'БЫЛИ ОШИБКИ при выполненит операций с базами данных '
-- Если задан профиль электронной почты, отправим сообщение
IF @profilename <> ''
EXEC msdb.dbo.sp_send_dbmail
@profile_name = @profilename,
@recipients = @recipients,
@body = @finalmassage,
@subject = @subject;
-- Выводим сообщение о результате
SELECT
@subject as subject,
@finalmassage as finalmassage
GO
-- Параметры скрипта
declare @database_names as nvarchar(max) = N''; -- имена баз задавать через запятую, если не заданы, то все несистемные базы
-- пока парсер примитивный - строка просто делится по запятым и обрезаются крайние пробелы
-- (если в имени базы будет запятая или в начале или конце имени пробел, то система не работает)
-- если указано "-ИмяБазы", то база будет исключена,
declare @index_size_threshhold as int = 1024; -- минимальный размер в КБ для перестраиваемого индекса. Нет смысла перестраивать индексы на десяток страниц
declare @index_rebuild_threshhold as numeric(5,2) = 25; -- показатель фрагментации, начиная с которого происходит перестроение индекса
declare @index_defrag_threshhold as numeric(5,2) = 12; -- показатель фрагментации, начиная с которого происходит дефрагментация индекса
declare @index_rebuild_space_used_threshhold as numeric(5,2) = 50; -- процент заполненности страниц меньше которого требуется перестроение индекса
declare @timeout as int = 7200; -- максимальное время работы скрипта
declare @max_size as bigint = 536870912; -- максимальный суммарный обрабатываемый размер в КБ (чтобы не нагенерировать логов на терабайты) -- 512*1024*1024 КБ = 0,5 ТБ
declare @is_emulate as bit = 1; -- 0 - выполнять, 1 - только вывести команды
set nocount on;
use master;
declare @indexes as table (
database_name nvarchar(128) not null,
schema_name nvarchar(128) not null,
table_name nvarchar(128) not null,
index_name nvarchar(128) not null,
is_clustered bit not null,
size_kb bigint not null,
fragmentation numeric(5,2) not null
);
declare @database_names_table as table (
name nvarchar(128) not null primary key
);
if object_id('tempdb..#index_stats') is not null
drop table #index_stats;
create table #index_stats (
database_id smallint not null,
object_id int not null,
index_id int not null,
index_type_desc nvarchar(60) not null,
avg_fragmentation_in_percent float not null,
page_count bigint not null,
avg_page_space_used_in_percent float not null,
record_count bigint not null,
index_name nvarchar(128),
table_name nvarchar(128),
schema_name nvarchar(128),
db_name nvarchar(128)
)
print '-- ' + convert(nvarchar(max), getdate(), 121) + ' -- Поиск баз данных для обслуживания'
declare @timeout_datetime datetime = dateadd(second, @timeout, getdate());
-- Создание списка обслуживаемых БД по @database_names
with database_name_table(database_names_tail, database_name) as
(
select
substring(@database_names, nullif(charindex(',', @database_names, 1), 0) + 1, len(@database_names) + 1),
rtrim(ltrim(left(@database_names, isnull(nullif(charindex(',', @database_names, 1), 0) - 1, len(@database_names)))))
where
@database_names is not null
union all
select
substring(database_names_tail, nullif(charindex(',', database_names_tail, 1), 0) + 1, len(database_names_tail) + 1),
rtrim(ltrim(left(database_names_tail, isnull(nullif(charindex(',', database_names_tail, 1), 0) - 1, len(database_names_tail)))))
from database_name_table db
where
database_names_tail is not null
),
database_names_with_indicator(database_name, indicator) as
(
select
db_name(db_id(case when database_name like '-%' then rtrim(ltrim(substring(database_name, 2, len(database_name)))) else database_name end)),
case when database_name like '-%' then 1 else 0 end
from database_name_table db
where db_name(db_id(case when database_name like '-%' then rtrim(ltrim(substring(database_name, 2, len(database_name)))) else database_name end)) is not null
)
insert @database_names_table (name)
select name
from sys.databases db
where
db.name not in ('master', 'model', 'tempdb', 'msdb') -- системные базы данных обычно не требуется переиндексировать
and db.name not in (select dbi.database_name from database_names_with_indicator dbi where indicator = 1)
and ((select top 1 dbi.database_name from database_names_with_indicator dbi where indicator = 0) is null or
db.name in (select dbi.database_name from database_names_with_indicator dbi where indicator = 0))
;
print '-- ' + convert(nvarchar(max), getdate(), 121) + ' -- найдено ' + convert(nvarchar(max), @@rowcount) + ' баз данных для обслуживания'
print '-- ' + convert(nvarchar(max), getdate(), 121) + ' -- Поиск индексов для обслуживания'
-- курсором обходим выбранные БД и ищем индексы и данные по их фрагментации
declare @database_cursor as cursor;
declare @current_database as nvarchar(128);
set @database_cursor = cursor forward_only for
select name from @database_names_table;
open @database_cursor;
fetch @database_cursor into @current_database;
while (@@FETCH_STATUS = 0)
begin
insert #index_stats
(database_id, object_id, index_id, index_type_desc, avg_fragmentation_in_percent,
page_count, avg_page_space_used_in_percent, record_count)
select
database_id, object_id, index_id, index_type_desc, max(avg_fragmentation_in_percent),
sum(page_count), sum(avg_page_space_used_in_percent*page_count)/isnull(nullif(sum(page_count),0),1), sum(record_count)
from
sys.dm_db_index_physical_stats( db_id(@current_database), null, null, null, 'DETAILED') ips
where
ips.index_id>0 -- убираем кучи (heap)
and ips.index_type_desc in (N'CLUSTERED INDEX', N'NONCLUSTERED INDEX') -- всякие хитрые индексы не обрабатываем
and ips.alloc_unit_type_desc = N'IN_ROW_DATA' -- обрабатываем только по "обычным" записям
and ips.index_level = 0
group by database_id, object_id, index_id, index_type_desc
having sum(page_count)*8 >= @index_size_threshhold
exec ('use [' + @current_database + '];
update i
set
i.db_name = db_name(),
i.table_name = t.name,
i.schema_name = s.name,
i.index_name = ci.name
from #index_stats i
left join sys.tables t on i.object_id = t.object_id
left join sys.schemas s on t.schema_id = s.schema_id
left join sys.indexes ci on i.object_id = ci.object_id and i.index_id = ci.index_id
where
i.database_id = db_id();');
fetch @database_cursor into @current_database;
end;
use master;
close @database_cursor;
deallocate @database_cursor;
declare @WithOptionsRebuild nvarchar(100) = 'WITH (SORT_IN_TEMPDB = ON); '; -- в Enterprise/Developer можно добавить в скобки ", ONLINE = ON"
print '-- ' + convert(nvarchar(max), getdate(), 121) + ' -- Обработка найденных индексов'
-- Курсором обходим выбранные индексы и ищем те, которые надо обслуживать в порядке убывания размера (без упорядочнивания по БД!)
declare @index_cursor as cursor;
set @index_cursor = cursor forward_only for
select
'ALTER INDEX ' + i.index_name + ' ON [' + i.db_name + '].[' + i.schema_name + '].[' + i.table_name + '] ' +
case
when @index_rebuild_threshhold <= i.avg_fragmentation_in_percent then 'REBUILD ' + @WithOptionsRebuild
when @index_rebuild_space_used_threshhold >= i.avg_page_space_used_in_percent then 'REBUILD ' + @WithOptionsRebuild
when @index_defrag_threshhold <= i.avg_fragmentation_in_percent then 'REORGANIZE '
end sql_command,
case -- оценка влияния на журнал транзакций (неточная!)
when @index_rebuild_threshhold <= i.avg_fragmentation_in_percent then i.page_count*8
when @index_rebuild_space_used_threshhold >= i.avg_page_space_used_in_percent then i.page_count*8
when @index_defrag_threshhold <= i.avg_fragmentation_in_percent then i.page_count*8*4*i.avg_fragmentation_in_percent/100
end size
from #index_stats i
where
@index_rebuild_threshhold <= i.avg_fragmentation_in_percent or
@index_defrag_threshhold <= i.avg_fragmentation_in_percent or
@index_rebuild_space_used_threshhold >= i.avg_page_space_used_in_percent
order by i.page_count desc
declare @database_id as smallint;
declare @object_id as int;
declare @index_id as int;
declare @partition_number as int;
declare @sql nvarchar(max);
declare @size numeric(20,4);
open @index_cursor;
fetch @index_cursor into @sql, @size;
print '-- ' + convert(nvarchar(max), getdate(), 121) + ' -- Начало обновления индексов'
while (@@FETCH_STATUS = 0)
begin
set @max_size = @max_size - @size;
print '';
print '-- ' + convert(nvarchar(max), getdate(), 121);
print @sql;
print '-- Размер индекса: ' + cast(@size as nvarchar(max));
print '-- Остаток @max_size: ' + cast(@max_size as nvarchar(max));
if (@is_emulate = 0)
exec(@sql);
if (@timeout_datetime<getdate())
begin
print '-- Выполнение прекращено по таймауту!';
break;
end;
if (@max_size<0)
begin
print '-- Достигнут предел обслуживаемого размера, выполнение прекращено!';
break;
end;
fetch @index_cursor into @sql, @size;
end;
print '-- ' + convert(nvarchar(max), getdate(), 121) + ' -- Окончание обновления индексов'
close @index_cursor;
deallocate @index_cursor;
-- обновление частотных статистик
declare @dbstat_cursor as cursor;
set @dbstat_cursor = cursor forward_only for
select 'use [' + d.name + ']; exec sp_updatestats @resample = ''resample'';'
from @database_names_table d
print '-- ' + convert(nvarchar(max), getdate(), 121) + ' -- Начало обновления частотных статистик'
open @dbstat_cursor;
fetch @dbstat_cursor into @sql;
while (@@FETCH_STATUS = 0)
begin
print '';
print '-- ' + convert(nvarchar(max), getdate(), 121);
print @sql;
if (@is_emulate = 0)
exec(@sql);
if (@timeout_datetime<getdate())
begin
print '-- Выполнение прекращено по таймауту!';
break;
end;
fetch @dbstat_cursor into @sql;
end;
print '-- ' + convert(nvarchar(max), getdate(), 121) + ' -- Окончание обновления частотных статистик'
if (@is_emulate = 1)
select * from #index_stats i order by i.avg_fragmentation_in_percent desc
drop table #index_stats;
sq
ALTER INDEX <НаименованиеИндекса> ON <НаименованиеТаблици>
SET (ALLOW_PAGE_LOCKS = ON)
GO
sqUSE <НаименованиеБазы>
EXEC sp_MSforeachtable 'ALTER INDEX ALL ON ? SET (ALLOW_PAGE_LOCKS = ON)'
GO
