Смена мак адреса в личном кабинете

[stix]

Может кто реализовывал у себя?
А то я в perl не оч хорошо дружу.

на .Net написал Windows приложение, а на Perl совсем тяжело

[0xbad0c0d3]

http://forum.nodeny.com.ua/index.php?topic=1053.0

[stix]

не, просто вывод формочки.
дальше регулярное выражение проверяющее на правильность и всё.

[0xbad0c0d3]

Ничифига не понял )) Какая формочка ))

[stix]

Ничифига не понял )) Какая формочка ))

[Андрій]

не, просто вывод формочки.
дальше регулярное выражение проверяющее на правильность и всё.

користуюся модулем 0xbad0c0d3 - дуже зручно

[stix]

мне не нужен arp кэш )
проверка соответствий, это все уже есть.

нужна тупая формочка с sql update запросов dop_value куда юзер будет тыкать свой мак, а он будет уже записываться в бд.
если нет, то я сделаю ссылочу из кабинета на php регистратор

интересно, а если у двух хомяков совпадет мак, как быть?

[0xbad0c0d3]

В 50,33 у поля есть флаг уникальности, если версия раньше - то перед вбиванием проверять
Просто знаешь, что хреново в том, что юзеры пишут мак - они тебе напишут...
А там не только арп кеш, там и snmp
Ну дело твое. Могу сделать легкий модулек для статы для смены мака, пиши в ПМ

[stix]

ну я вот набросал то, что выше скриншотец, но в перле не особо отстреливаю как грамотно реализовать, потому и просил помощи.
грац, напишу утром

[0xbad0c0d3]

ну поропбуй сам, вот тебе регексп, если в нем дело

Код:

^(?i)(([0-9a-f]{1,2}[:-]*){5}[0-9a-f]{1,2})$

подойдут маки с разделителем или без

Код:

^(?i)(([0-9a-f]{1,2}[:-]){5}[0-9a-f]{1,2})$

подойдут маки с разделителем ":" или "-"

[stix]

не, дело в переменных, которые форма принимает.

сделал я в plugin_reestr.cfg
126             Smac                    CM_main

прописал его в админке, все как надо

Код:

#!/usr/bin/perl
# ------------------- NoDeny ------------------
# Copyright (с) Volik Stanislav, 2008, 2009
# Read license http://nodeny.com.ua/license.txt
# ---------------------------------------------
$VER=50.32;

sub CM_main
{
 $form=&div('cntr',
   &form('!'=>1,

    (      &bold_br('Введите mac адрес:').&input_t('XXXXXXX',$XXXXXXXX,' autocomplete="off"')
            ).$br2.&submit_a('Сменить')
   )
 );
    {
    $OUT.=&MessX($form,1);
    return;
    }
}
1;

А вот тут хз

[0xbad0c0d3]

перед $form= сделай:

Код:

$XXXXXXXX && do{
    #тутачки код изменения МАКа: проверка на формат, SQL
    &Exit; # Выход, перед ним можно показать сообщение об успешном изменении МАКа
};
 $form=&div('cntr',
   &form('!'=>1,

[stix]

да вот с переменными прикол.
откуда мне выцепить $mac и $login ?
чтобы сделать такой sql запрос

Код:

update dopdata set field_value=$mac WHERE parent_id=(SELECT id FROM users WHERE name=$login) AND field_alias='_mac';