Проверка безопасности установленных паролей
Код выводит не установленные пароли, а так же очень простые (1, 123) пароли пользователей. Список можно пополнять.
- Описание
- Подробнее
Описание
Сообщить("Проверка не безопасных паролей");
Количество = 0;
СоответствиеПаролей = Новый Соответствие();
СоответствиеПаролей.Вставить("2jmj7l5rSw0yVb/vlWAYkK/YBwk=", "Пустой пароль");
СоответствиеПаролей.Вставить("", "Пустой пароль");
СоответствиеПаролей.Вставить(Неопределено, "Пустой пароль");
СоответствиеПаролей.Вставить("NWoZK3kTsExUV00Ywo1G5jlUKKs=", "1");
СоответствиеПаролей.Вставить("QL0AFWMIX8NRZTKeof9cXsvbvu8=", "123");
Для Каждого Пользователь Из ПользователиИнформационнойБазы.ПолучитьПользователей() Цикл
Если НЕ Пользователь.АутентификацияСтандартная Тогда
Продолжить;
КонецЕсли;
Значение = Лев(Пользователь.СохраняемоеЗначениеПароля, Найти(Пользователь.СохраняемоеЗначениеПароля, ",") - 1);
//Сообщить(""+Пользователь+": "+Значение);
//Прервать;
Описание = СоответствиеПаролей.Получить(Значение);
Если НЕ Описание = Неопределено Тогда
Сообщить("" + Пользователь + ": " + Описание);
Количество = Количество + 1;
КонецЕсли;
КонецЦикла;
Сообщить("Найдено паролей: " + Количество);
Выводит результат:
Проверка не безопасных паролей
тест - 1: 123
тест - 10 1
Сотрудник_АК: Пустой пароль
Найдено паролей: 3
Рекомендую регламентное задание для запрещения доступа для таких пользователей.
