Undernet Radius
Добавить в пул ip поле для гостевых подключений
alter table ip_pool add guest varchar(60) not null default ''; alter table ip_pool add key (guest); alter table ip_pool add last_session varchar(64) not null default ''; alter table ip_pool change `type` `type` enum( 'static','dynamic','reserved', 'pool_0', 'pool_1', 'pool_2', 'pool_3', 'pool_4', 'pool_5', 'pool_6', 'pool_7', 'pool_8', 'pool_9' ) NOT NULL; CREATE TABLE `pod_queue` ( `id` int(10) unsigned NOT NULL AUTO_INCREMENT, `usr_ip` varchar(16) NOT NULL DEFAULT '', `nas_ip` varchar(16) NOT NULL DEFAULT '', `session` varchar(128) NOT NULL DEFAULT '', `created_at` int(10) unsigned NOT NULL DEFAULT 0, PRIMARY KEY (`id`), KEY `created_at` (`created_at`) ) ENGINE=InnoDB AUTO_INCREMENT=1; CREATE TABLE `rad_log` ( `id` int(11) NOT NULL AUTO_INCREMENT, `created_at` DATETIME DEFAULT NOW(), `username` varchar(127) NULL, `nas_name` varchar(32) NULL, `svlan` varchar(32) NULL, `cvlan` varchar(32) NULL, `user_id` int(11) NULL, `user_ip` varchar(15) NULL, PRIMARY KEY (`id`) ) ENGINE=InnoDB AUTO_INCREMENT=1 DEFAULT CHARSET=utf8;
Настройка NoDeny
Установить модуль radius атрибутов
Создать тариф 1Мбит, параметр radius установить в:
ERX-Service-Activate:1+= "svc-global-ipoe(128000, 128000)" ERX-Virtual-Router-Name = "brs"
Создать группу
- имя: switch
- галки только на:
- К учетным записям подключаются ip, имеют трафик
- Учетные записи имеют сущность «Порты»
Дополнительные поля
- Имя поля: BRAS
- Имя поля в бд: _bras
- Тип поля: выпадающий список
- Галки по усмотрению
- Тип объекта: bras
- Группы: switch
- Имя поля: Service VLAN
- Имя поля в бд: _svlan
- Тип поля: целое положительное
- Группы: switch
- Имя поля: Client VLAN
- Имя поля в бд: _cvlan
- Тип поля: целое положительное
- Группы: switch
- Имя поля: MAC адрес
- Имя поля в бд: _mac
- Тип поля: мак
- Группы: switch
В Настроках-Dhcp/оборудование
Имя дополнительного поля, в котором хранится мак-адрес свича установить в _mac
Тестовые данные
Создаем switch:
- MAC адрес: 001122334455
- BRAS: lesnoy
- SVLAN: 3571
Создаем клиента. Данные неважны. Добавляем услугу: 1 Мбит Добавляем ip: 10.0.0.5
Добавляем подключение:
- мак: e89a8f2db9f3
- Мак или идентификатор устройства - выбираем созданный switch
- Порт устройства или vlan: 3019
- ip: 10.0.0.5
Установка Radius
apt install freeradius freeradius-mysql
rm /etc/freeradius/3.0/sites-enabled/default
cp /usr/local/nodeny/etc/raddb/clients.conf /etc/freeradius/3.0/
Конфигурирование
nano /etc/freeradius/3.0/sites-enabled/nodeny
Вставляем следующий текст:
server default {
listen {
type = auth
ipaddr = *
port = 1812
}
listen {
type = acct
ipaddr = *
port = 0
}
authorize {
sql
update control {
Auth-Type := Accept
}
}
authenticate {
}
preacct {
acct_unique
preprocess
}
accounting {
sql
ok
}
session {
radutmp
sql
}
post-auth {
sql
ok
}
Post-Auth-Type ACCEPT {
sql
}
}
Sql конфиг
В консоли:
nano /etc/freeradius/3.0/mods-enabled/sql
Вставляем следующий текст:
sql {
driver = "rlm_sql_mysql"
mysql {
warnings = auto
}
server = "91.193.33.65"
port = 3306
login = "nodeny-radius"
password = "hardpass"
radius_db = "nodeny"
read_groups = no
authorize_reply_query = "call radreply('%{User-Name}', '%{NAS-IP-Address}')"
accounting {
reference = "%{tolower:type.%{Acct-Status-Type}.query}"
type {
start {
query = "call radupdate(\
'%{ERX-Dhcp-Mac-Addr}', '%{Framed-IP-Address}',\
'%{NAS-IP-Address}', '%{Acct-Session-Id}', '',\
(%{%{Acct-Input-Gigawords}:-0} * POWER(2, 32)) + %{%{Acct-Input-Octets}:-0},\
(%{%{Acct-Output-Gigawords}:-0} * POWER(2, 32)) + %{%{Acct-Output-Octets}:-0})"
}
interim-update {
query = "${..start.query}"
}
stop {
query = "call radstop('%{Framed-IP-Address}', '%{NAS-IP-Address}')"
}
}
}
post-auth {
query = "call radupdate(\
'%{ERX-Dhcp-Mac-Addr}', '%{reply:Framed-IP-Address}',\
'%{NAS-IP-Address}', '%{Acct-Session-Id}', ';first_response=1',\
0, 0)"
}
pool {
start = 5
min = 5
max = 130
spare = 30
uses = 0
retry_delay = 30
lifetime = 0
idle_timeout = 60
}
}
Логика radreply
В БД у свичей есть параметры:
- svlan - vlan свича
- cvlan - vlan, с которого начинается отсчет клиентских vlan. Клиентский vlan = cvlan + № порта
Например, если клиент подключен к порту 5 свича с cvlan=3000, то у клиента vlan будет 3005
На Radius UserName приходит в закодированном виде: lesnoy|e89a.8f2d.b9f3|ps50:3571-3019
Здесь:
- lesnoy - имя BRAS
- e89a.8f2d.b9f3 - мак клиента
- ps50:3571-3019 - параметры подключения, могут иметь формат:
- aaa:bbb-ccc (bbb - vlan свича, ccc - vlan клиента)
- aaa:bbb (bbb - vlan свича)
Алгоритм:
- В зависимости от формата подключения:
- Если aaa:bbb-ccc, то из базы выбираем подключение где: BRAS.name=lesnoy, BRAS.svlan=bbb, USER.port=ccc-BRAS.cvlan
- Если aaa:bbb, то из базы выбираем подключение где: USER.mac=e89a.8f2d.b9f3
- Если подключение не найдено, то
- Находим в базе NAS (группа 6) по ip из атрибута NAS-IP-Address
- В данных NAS в параметре _ip_pool содержится номер пула. Далее мы обрабатываем записи в ip_pool только с типом = 'pool_№пула'
- Сначала смотрим выдавался ли ранее данному клиенту какой либо ip. И если выдавался, выдадим его. Как определяем какой ip выдавался:
- в поле guest хранится полный UserName клиента
- поле release указывает когда ip можно освободить
- Если не выдавался, то выдаем рандомный ip из пула
- Устанавливаем release = now + 1 час
- return svc-guest-ipoe(svc-filter-notregistered)
- Если не подвязан ip, то return svc-guest-ipoe(svc-filter-disable)
- В ответ добавляем строку: Framed-IP-Address = хх.хх.хх.хх
- Если не подвязана услуга типа "интернет", то return svc-guest-ipoe(svc-filter-disable)
- Если баланс меньше 0, то return svc-guest-ipoe(svc-filter-nomoney)
- В ответ добавляем атрибуты из услуги
Mysql процедуры
ALTER DATABASE nodeny CHARACTER SET utf8 COLLATE utf8_general_ci;
DELIMITER $$
CREATE FUNCTION `strSplit`(x MEDIUMTEXT, delim MEDIUMTEXT, pos int) RETURNS mediumtext CHARSET utf8
DETERMINISTIC
RETURN
TRIM(BOTH '\r' FROM TRIM(
REPLACE(SUBSTRING(SUBSTRING_INDEX(x, delim, pos), LENGTH(SUBSTRING_INDEX(x, delim, pos - 1)) + 1), delim, '')
))$$
DELIMITER ;
radreply
DROP PROCEDURE IF EXISTS `radreply`;
DELIMITER $$
CREATE PROCEDURE `radreply`(IN encoded_user_name VARCHAR(60), IN nas_ip VARCHAR(15))
BEGIN
DECLARE nas_name VARCHAR(32);
DECLARE usr_mac VARCHAR(12);
DECLARE vlans VARCHAR(50);
DECLARE svlan VARCHAR(6);
DECLARE cvlan VARCHAR(6);
DECLARE usr_id INT;
DECLARE usr_ip VARCHAR(15) DEFAULT NULL;
DECLARE usr_state VARCHAR(10);
DECLARE usr_balance FLOAT(10,2);
DECLARE add_attr MEDIUMTEXT;
DECLARE line MEDIUMTEXT;
DECLARE i INT DEFAULT 1;
DECLARE ip_pool INT;
SELECT strSplit(encoded_user_name, '=7C', 1) INTO nas_name;
SELECT REPLACE(strSplit(encoded_user_name, '=7C', 2), '.', '') INTO usr_mac;
SELECT strSplit(encoded_user_name, '=7C', 3) INTO vlans;
SELECT strSplit(vlans, ':', 2) INTO vlans;
SELECT strSplit(vlans, '-', 1) INTO svlan;
SELECT strSplit(vlans, '-', 2) INTO cvlan;
IF( LENGTH(cvlan) > 0 ) THEN
SELECT m.uid, INET_NTOA(m.ip) INTO usr_id, usr_ip
FROM mac_uid m
JOIN data0 d ON m.device_mac=d._mac
WHERE d._bras=nas_name
AND d._svlan=svlan
AND m.device_port=cvlan-d._cvlan
LIMIT 1;
ELSE
SELECT m.uid, INET_NTOA(m.ip) INTO usr_id, usr_ip
FROM mac_uid m
WHERE m.mac=usr_mac;
END IF;
INSERT INTO rad_log
SET username=encoded_user_name,
nas_name=nas_name,
svlan=svlan,
cvlan=cvlan,
user_id=usr_id,
user_ip=usr_ip;
SELECT NULL,encoded_user_name,'ERX-Virtual-Router-Name','"brs"','=';
IF( usr_id IS NULL OR usr_id=0 ) THEN
SELECT d._ip_pool INTO ip_pool
FROM data0 d JOIN users u ON d.uid=u.id
WHERE u.grp=6
AND d._nas_ip=nas_ip
LIMIT 1;
UPDATE ip_pool
SET `release`=UNIX_TIMESTAMP()+3600
WHERE type=CONCAT('pool_', ip_pool)
AND guest=encoded_user_name
LIMIT 1;
IF( ROW_COUNT() < 1 ) THEN
UPDATE ip_pool SET guest='', `release`=0
WHERE `release`>0 AND `release`<UNIX_TIMESTAMP();
UPDATE ip_pool
SET `release`=UNIX_TIMESTAMP()+3600,
guest=encoded_user_name
WHERE type=CONCAT('pool_', ip_pool)
AND guest=''
LIMIT 1;
END IF;
SELECT INET_NTOA(ip) INTO usr_ip
FROM ip_pool
WHERE type=CONCAT('pool_', ip_pool)
AND guest=encoded_user_name
LIMIT 1;
SELECT NULL,encoded_user_name,'Framed-IP-Address',usr_ip,'=';
SELECT NULL,encoded_user_name,'ERX-Service-Activate:1',
'svc-guest-ipoe-new(svc-filter-notregistered)','+=';
ELSE
SELECT NULL,encoded_user_name,'Callback-Number',usr_id,'=';
SELECT INET_NTOA(ip) INTO usr_ip FROM ip_pool
WHERE uid=usr_id AND type='static'
ORDER BY INET_NTOA(ip)=usr_ip DESC LIMIT 1;
IF( usr_ip IS NOT NULL ) THEN
SELECT NULL,encoded_user_name,'Framed-IP-Address',usr_ip,'=';
END IF;
SELECT radius_attr INTO add_attr FROM users_services
WHERE uid=usr_id AND tags LIKE '%,inet,%' LIMIT 1;
SELECT balance, state INTO usr_balance, usr_state FROM users
WHERE id=usr_id LIMIT 1;
IF( add_attr IS NULL OR usr_ip IS NULL ) THEN
SELECT NULL,encoded_user_name,'ERX-Service-Activate:1','svc-guest-ipoe-new(svc-filter-disable)','+=';
ELSEIF( usr_state = 'off' AND usr_balance < 0 ) THEN
SELECT NULL,encoded_user_name,'ERX-Service-Activate:1','svc-guest-ipoe-new(svc-filter-nomoney)','+=';
ELSEIF( usr_state = 'off' ) THEN
SELECT NULL,encoded_user_name,'ERX-Service-Activate:1','svc-guest-ipoe-new(svc-filter-disable)','+=';
ELSE
attr_loop: WHILE TRUE DO
SELECT strSplit(add_attr, '\n', i) INTO line;
IF LENGTH(line) = 0 OR i > 20 THEN LEAVE attr_loop; END IF;
IF line LIKE '%+=%' THEN
SELECT NULL,encoded_user_name,strSplit(line, '+=', 1),strSplit(line, '+=', 2),'+=';
ELSEIF line LIKE '%=%' THEN
SELECT NULL,encoded_user_name,strSplit(line, '=', 1),strSplit(line, '=', 2),'=';
END IF;
SET i = i + 1;
END WHILE;
END IF;
END IF;
END$$
DELIMITER ;
radupdate
DROP PROCEDURE IF EXISTS `radupdate`;
DELIMITER $$
CREATE PROCEDURE `radupdate`(
IN usr_mac VARCHAR(20),
IN usr_ip VARCHAR(16),
IN nas_ip VARCHAR(16),
IN ses VARCHAR(64),
IN properties VARCHAR(64),
IN trafin BIGINT(20),
IN trafout BIGINT(20)
)
BEGIN
DECLARE user_id INT UNSIGNED;
SELECT uid INTO user_id FROM ip_pool WHERE ip=INET_ATON(usr_ip);
IF( user_id IS NOT NULL AND user_id > 0 ) THEN
INSERT INTO ses_traf
SET ses_id=ses, traf_in=trafin, traf_out=trafout, time=UNIX_TIMESTAMP(), uid=user_id;
END IF;
CALL set_auth(usr_ip, CONCAT(
'nas=', nas_ip, ';ses=', ses, properties, ';mod=dhcp;user=', REPLACE(usr_mac, '.', '')
));
UPDATE mac_uid SET time=UNIX_TIMESTAMP() WHERE ip=INET_ATON(usr_ip) LIMIT 1;
UPDATE ip_pool
SET `release`=UNIX_TIMESTAMP()+3600,
last_session=CONCAT(nas_ip, ' ', ses)
WHERE ip=INET_ATON(usr_ip) AND type LIKE 'pool_%';
END$$
DELIMITER ;
radstop
Авторизация завершается только если radstop послал bras, который последним делал аккаунтинг. Это ситуация от заказчика: bras1 становится недоступным, клиент переключается на bras2, bras1 возвращается и посылает radstop. Этот radstop мы игнорируем т.к. клиент подключен через bras1
Обратить внимание, что ip bras-а сохраняем в поле properties первым параметром, чтобы работал LIKE CONCAT('nas=', nas_ipa, '%'). Поэтому:
- mods-enabled/sql в параметре 'nas=%{NAS-IP-Address};...;...' nas на первом месте
- в radupdate переменная properties идет на первом месте при вызове set_auth
DROP PROCEDURE IF EXISTS `radstop`;
DELIMITER $$
CREATE PROCEDURE `radstop`(IN user_ipa VARCHAR(16), IN nas_ipa VARCHAR(16))
BEGIN
DECLARE auth_prop VARCHAR(255);
DECLARE user_id INT UNSIGNED;
DECLARE start_auth INT UNSIGNED;
SELECT a.properties, a.start, i.uid INTO auth_prop, start_auth, user_id
FROM ip_pool i
JOIN auth_now a ON i.ip = INET_ATON(user_ipa)
JOIN users u ON i.uid=u.id
WHERE a.ip=user_ipa;
IF( user_id<>0 AND auth_prop IS NOT NULL AND auth_prop LIKE CONCAT('nas=', nas_ipa, '%') ) THEN
INSERT INTO auth_log (uid, ip, start, end, properties) VALUES
(user_id, INET_ATON(user_ipa), start_auth, UNIX_TIMESTAMP(), auth_prop);
DELETE FROM auth_now WHERE ip=user_ipa LIMIT 1;
END IF;
END$$
DELIMITER ;
Тестирование
Запускаем радиус в режиме вывода в консоль:
freeradius -X
В соседней консоли тестовый запрос:
echo "User-Name=\"test|0855.31fa.d608|ps20:1002-1284\",User-Password=\"\",Acct-Session-Id=\"1\",NAS-IP-Address=\"172.16.66.249\"" | radclient -x localhost:1812 auth hardpass5
В ответ должны получить следующее:
Callback-Number = "14192" Framed-IP-Address = 100.66.56.104 ERX-Virtual-Router-Name = "brs" ERX-Service-Activate:1 = "svc-global-ipoe(32000000,32000000)"
В админ интерфейсе в данных абонента напротив его ip должен появиться зеленый ключик.
Разное
В /etc/mysql/mariadb.conf.d/50-server.cnf:
max_connections = 250
Было 150. Однако, необходимость под вопросом
як працює регістрація ip
1) перевіряється чи існує ip в пулі ip (таблиця ip_pool). Якщо ні, значить ip був виданий некоректно (хтось зломав логіку білінгу, доналаштувавши на свій погляд) В цьому випадку клієнту виводиться месадж: 'Регистрация невозможна из-за неправильной настройки вашего подключения (неизвестный ip)'
2) якщо тип ip static - це означає, що клієнту був виданий ip не з пулу дінамічних, а зі статичних. Виводиться месадж 'Вероятно вы уже прошли регистрацию (static ip type)'
3) якщо тип НЕ починається з префіксу pool (а ми робили цей префікс чиспо під андернет), то виводиться месадж 'Регистрация невозможна, обратитесь к администрации (incorrect ip type)'
4) у ip в пулі є параметр release, який означає, коли буде ця дінамічна адреса вважатися вільною. При отриманні ip, release встановлюється на деЯкий час в майбутньому. Якщо release переступив поточний час, то клієнт отримує месадж 'Прошло много времени с момента подключения, необходимо перезагрузить компьютер'
5) В полі guest запису в пулі ip зберігаються параметри, при яких клієнт отримав ip. В випадку андернета це UserName в радіус-пакеті. Нагадаю формат: lesnoy|e89a.8f2d.b9f3|ps50:3571-3019 Якщо структура не відповідає, то месадж 'Регистрация невозможна, обратитесь к администрации (incorrect connection data)'
6) Шукається свіч по параметрам підключення: - свіч повинен бути у групі 2 - в допаних поле _bras='lesnoy' - _svlan, _cvlan
Ще в налаштуваннях коректно повино бути вказаним $cfg::device_mac_field - поле, в якому зберігається мак свіча
Свіч не знайдений - месадж 'Регистрация невозможна, обратитесь к администрации (switch not found)'
7) якщо в таблиці mac_uid існує запис з device_mac=мак свіча AND device_port=cvlan, то у цій зв'язки встановлюється id абонета, інакше така зв'язка створюється в таблицю pod_queue вставляється запис що треба відрубити юзера з такою сесією
месадж 'Ваш компьютер зарегистрирован'