[Guest]

А все потому что надо ковырять драйвер дебагером во время работы, например при команде hcfpciconfig --license a@b.c/XX-XX-XX-XX-XX-XX, где иксы это регистрационный ключ. И найти место стравнения истинного ключа с заданным в командной строке, после чего просто ввести истинный ключ. Как это сделать хз, я в отладке прог под линух не секу (а тем более драйвера). Кроме того сам ключ должен быть в правильном формате (сам ключ представляет собой первые восемь иксов, а четыре последних это md4sum от первых восьми , но это не проблема тк функции для его генерации имеются в скрипте hcfpciconfig, другое дело что такой ключ не будет совпадать с настоящим . Можно ещё совсем параноидальный брутфорс попробовать, только всей жизни не хватит

[Guest]

помогите пожалуйста новичку!!!
после запуска hsfconfig после компиляции выдается сообщение:


WARNING: kernel.modprobe parameter set to /sbin/true; automatic module loading will not work!
The cause of this problem is usually a check for /proc/ksyms (2.4) instead of /proc/kallsyms (2.6)
possibly in /etc/rc.d/rc.sysinit

при этом каждый раз после загрузки системы модем не определяется пока не запустить hsfconfig и не перекомпилировать заново.

что нужно предпринять чтобы избавиться от этой напасти?
дистрибутив ASPLinux 9 ядро 2.6.7
спасибо.

[m0rfeusl]

Кому нужен кейген для драйверов к HCF и HSF модемам, пишите morfeusl@yandex.ru.

[s]Исправлено: m0rfeusl, 2:48 4-08-2004[/s]

[Guest]

вот скрипт, соханите например как generate.pl затем выполните
# perl generate.pl [your e-mail] [ regid]
e-mail - мыло которое вы вводите выполняя hsfconfig мыло вводите покороче например zz@mm.com
regid - это код выданный конфигом после ввода мыла например  34A7-C4E5-9E19

#!/usr/bin/perl
use Digest::MD5 qw(md5_hex);

$pad = pack("H2048", "00000000963007772c610eeeba51099919c46d078ff46a7035a563e9a395649e3288db0ea4b8dc791ee9d5e088d9d2 972b4cb609bd7cb17e072db8e7911dbf906410b71df220b06a4871b9f3de41be847dd4da1aebe4dd6d51b5d4f4c785d38356 986c13c0a86b647af962fdecc9658a4f5c0114d96c0663633d0ffaf50d088dc8206e3b5e10694ce44160d5727167a2d1e403 3c47d4044bfd850dd26bb50aa5faa8b5356c98b242d6c9bbdb40f9bcace36cd832755cdf45cf0dd6dc593dd1abac30d9263a 00de518051d7c81661d0bfb5f4b42123c4b3569995bacf0fa5bdb89eb802280888055fb2d90cc624e90bb1877c6f2f114c68 58ab1d61c13d2d66b69041dc760671db01bc20d2982a10d5ef8985b1711fb5b606a5e4bf9f33d4b8e8a2c9077834f9000f8e a8099618980ee1bb0d6a7f2d3d6d08976c6491015c63e6f4516b6b62616c1cd83065854e0062f2ed95066c7ba5011bc1f408 8257c40ff5c6d9b06550e9b712eab8be8b7c88b9fcdf1ddd62492dda15f37cd38c654cd4fb5861b24dce51b53a7400bca3e2 30bbd441a5df4ad795d83d6dc4d1a4fbf4d6d36ae96943fcd96e34468867add0b860da732d0444e51d03335f4c0aaac97c0d dd3c710550aa41022710100bbe86200cc925b56857b3856f2009d466b99fe461ce0ef9de5e98c9d9292298d0b0b4a8d7c717 3db359810db42e3b5cbdb7ad6cbac02083b8edb6b3bf9a0ce2b6039ad2b1743947d5eaaf77d29d1526db048316dc73120b63 e3843b64943e6a6d0da85a6a7a0bcf0ee49dff099327ae000ab19e077d44930ff0d2a3088768f2011efec206695d5762f7cb 67658071366c19e7066b6e761bd4fee02bd3895a7ada10cc4add676fdfb9f9f9efbe8e43beb717d58eb060e8a3d6d67e93d1 a1c4c2d83852f2df4ff167bbd16757bca6dd06b53f4b36b248da2b0dd84c1b0aaff64a0336607a0441c3ef60df55df67a8ef 8e6e3179be69468cb361cb1a8366bca0d26f2536e2685295770ccc03470bbbb91602222f260555be3bbac5280bbdb2925ab4 2b046ab35ca7ffd7c231cfd0b58b9ed92c1daede5bb0c2649b26f263ec9ca36a750a936d02a906099c3f360eeb8567077213 570005824abf95147ab8e2ae2bb17b381bb60c9b8ed2920dbed5e5b7efdc7c21dfdb0bd4d2d38642e2d4f1f8b3dd686e83da 1fcd16be815b26b9f6e177b06f7747b718e65a0888706a0fffca3b06665c0b0111ff9e658f69ae62f8d3ff6b6145cf6c1678 e20aa0eed20dd75483044ec2b30339612667a7f71660d04d476949db776e3e4a6ad1aedc5ad6d9660bdf40f03bd83753aebc a9c59ebbde7fcfb247e9ffb5301cf2bdbd8ac2baca3093b353a6a3b4240536d0ba9306d7cd2957de54bf67d9232e7a66b3b8 4a61c4021b685d942b6f2a37be0bb4a18e0cc31bdf055a8def022d";

@pad = unpack("L256",$pad);

@owner = unpack("C*",$ARGV[0]);
@regid = reverse unpack("C*", pack("H*", substr($ARGV[1],5,4).substr($ARGV[1],10,4)));

@tab = (@regid, @owner);
$g = $pad[71];

foreach $c(@tab)
{
$i = ($c^$g) & 0xff;
$g = ($g>>8) ^ $pad[$i];
}

$key = $g << 16;
$g = ($g>>8) ^ ($pad[$g & 0xff]);
$g = ($g>>8) ^ ($pad[$g & 0xff]);
$key = $key | ( (($g>>16)^$g) & 0xffff);

$keystr = uc(unpack("H*", pack("N",$key)));
$digest = md5_hex("$keystr
";

$keystr = $keystr.uc(substr($digest,0,4));
$keystr =~ s/^(..)(..)(..)(..)(..)(..)$/1-2-3-4-5-6/;
printf "key: %s
", $keystr;

результатом работы скрипта является сгенерированый код лицензии который вводите после ввода мыла
Enjoy

[Guest]

Последний способ не работает с HCF-модемом. Всё время выдаёт "1-2-3-4-5-6". Способ m0rfeusl работает на ура!

[Guest]

Скрипт только для HSF модемов

[Guest]

Жаль... Хотелось бы, чтобы такой скрипт работал с HCF...

[dIgItAL]

Установил драйвер для своего HCF модема...
в kppp набирает номер (как и должно вся система лагает когда набирает)
и почемуто всё время говорит что бизи, хотя я точно знаю все ок, кстати 1 раз он подключился, я решил попробывать послушать в трубку может и вправду занято, в трубке услышал странные звуки от модема (я в винде уже так делал и такого небыло) похоже на гудки 2 штуки и вобщем после того как я положил трубку он у меня подключился как то,
Но тут появилась 2 проблема http ftp итп итд негрузится, может это изз-за необычного способа подключения
причем говорит что bisy секунд за 20-25 интервалы специально поставил на 1 минуту, так что не изза них

вобщем помогите, объясните:
1.почему он все время говорит что занято
2.как сделать чтоб http ftp итп итд работало

[s]Исправлено: dIgItAL, 3:38 17-08-2004[/s]

[ruslandh]

dIgItAL
Занято, наверное, не в том смысле - скорей всего какая - то программа уже использует устройство /dev/ppp0
Надо анализировать, что происходит в системе.
dmesg | less, ifconfig и route.

[dIgItAL]

дак нет я же написал что он номер набирает, (система лагает, как и в винде т.к. у меня софт-модет)
после команды

ATDTXXXXXX

BUSY

и перезванивать начинает

[s]Исправлено: dIgItAL, 10:24 17-08-2004[/s]