Linux. Обсуждение. Решение проблем.

svin0, 0xFFC0

не ?

Calculate port range and mask

The tc filter defines the port range with port and mask which you have to calculate.

Find the 2^# ending of the port range, deduce the range and convert to HEX.

This is your mask. Example for 10000 -> 11024, the range is 1024.

# ending is 2^14 = 16384

2^13 (8192) < 10000 < 2^14 (16384)

# mask is 0x3C00

echo "obase=16;(2^14)-1024" | bc

В вашем случае:

64 порта

ending is 2^16=65536

mask is (2^16)-64=65472 -> convert to hex -> FFC0

32 порта

mask is (2^16)-32=65504 > convert to hex -> FFE0

как то так

svin0, у меня маска получилась такая: 7FFB

С FFC0 не происходит ограничения скорости Гугл говорит, что не так всё просто с этими портами и расчет не всегда возможен.

Есть еще варианты?

Очередной вопрос. Есть три сети, объединенные через роутер. На роутере стоит самба. Как сделать, чтобы три сети видели друг друга в "сетевом окружении"? WINS отпадает, т.к. в случае падения роутера юзеры даже в пределах одной из сетей не увидят друг друга. Нашел скрипт, работающий в одной из Минских сетей, только пока не представляю, как применить его с учетом требований выше.

Еще одно интересное решение: Построение сетевого окружения "чужих" сетей. Пока не вникал.

В двух сетях по 254 адреса, в третей - 1.

В качестве DNS сервера поднят кэширующий dnsmasq + множество записей в hosts. Самый простой вариант. Содержимое hosts:

код выделить все

192.168.0.1 yury.dnet
...

Вывод nslookup такой:

код выделить все

# nslookup 192.168.0.1
Server: 127.0.0.1
Address: 127.0.0.1#53

1.0.168.192.in-addr.arpa name = yury.dnet.

Немного отредактировал скрипт под свои нужды. Проверьте

код выделить все

#!/usr/bin/perl
use IO::Socket;
$NetADDR1 = "192.168.0."; # Задаем подсеть
$NetADDR2 = "192.168.253."; # Задаем подсеть
$NetADDR3 = "10.99.93."; # Задаем подсеть
$port = 139; # Порт - 139
$proto = "tcp"; # протокол TCP
$Timeout = 0.01; # таймаут сессии (в сетях с потерями можно увеличить до 0.02-0.1с)

### подпрограмма вывода строки в формате файла browse.dat ###
sub add_to_list {
$HostNAME = substr(`nslookup $HostADDR | grep name `,9); # резолвим имя компа из IP-адреса
$HostNAME =~ s/.dnet.\n//; # отбрасываем доменную часть
print '"';
print $HostADDR; # вставляем ИП-адрес
print '"';
print " 40011007 "; # вставляем код
print ' "';
print $HostNAME; # вставляем описание - имя из DNS
print '"';
print ' "DNET" '; # вставляем рабочую группу
print "\n";
}

### формируем первые 2 статические строки, которые описывают рабочие группы и их броузеры ###
print '"DNET" c0001000 "10.99.93.254" "DNET" ';
print "\n";

$i = 1;
while ( $i &lt; 255 ) { # сканировать все ИП-адреса до 254
$HostADDR = $NetADDR1.$i; # текущий ИП-адрес
### создаем сокет (TCP-коннект на 139 порт) ###
my $sock = IO::Socket::INET-&gt;new(PeerAddr=&gt; $HostADDR,
PeerPort =&gt; $port,
Proto =&gt; $proto,
Timeout =&gt; $Timeout ) &amp;&amp; add_to_list; # в случае успеха выполнить подпрограмму
close($sock); # закрыть сокет
$i++; # и т.д. коннект на все ИП от 1 до 254
}

$i = 1;
while ( $i &lt; 255 ) { # сканировать все ИП-адреса до 254
$HostADDR = $NetADDR2.$i; # текущий ИП-адрес
### создаем сокет (TCP-коннект на 139 порт) ###
my $sock = IO::Socket::INET-&gt;new(PeerAddr=&gt; $HostADDR,
PeerPort =&gt; $port,
Proto =&gt; $proto,
Timeout =&gt; $Timeout ) &amp;&amp; add_to_list; # в случае успеха выполнить подпрограмму
close($sock); # закрыть сокет
$i++; # и т.д. коннект на все ИП от 1 до 254
}

$i = 1;
while ( $i < 255 ) { # сканировать все ИП-адреса до 254
$HostADDR = $NetADDR3.$i; # текущий ИП-адрес
### создаем сокет (TCP-коннект на 139 порт) ###
my $sock = IO::Socket::INET->new(PeerAddr=> $HostADDR,
PeerPort => $port,
Proto => $proto,
Timeout => $Timeout ) && add_to_list; # в случае успеха выполнить подпрограмму
close($sock); # закрыть сокет
$i++; # и т.д. коннект на все ИП от 1 до 254
}

Вот результат:

код выделить все

# ./1.pl
"DNET" c0001000 "10.99.93.254" "DNET"
"192.168.0.1" 40011007 "92.in-addr.arpa name = yury" "DNET"
"192.168.0.111" 40011007 ".192.in-addr.arpa name = strg-srv" "DNET"
"192.168.253.254" 40011007 "68.192.in-addr.arpa name = yury1" "DNET"

Работает, но не совсем substr в данном случае не подходит, т.к. у строк разная длина и одинаковая обрезка не поможет. А если заменить

код выделить все

$HostNAME = substr(`nslookup $HostADDR | grep name `,9);

на

код выделить все

$HostNAME = `nslookup $HostADDR | grep name | awk -F " " '{ print $4 }'`;

то ничего не выводит, хотя командой отдельно удается получить требуемый результат. awk, видимо, не дружит с perl'ом из-за кавычек.

Есть мысли по этому поводу?

Позже переведу адреса интерфейсов в .254 и ограничу перебор до 254, чтобы роутер не светился в списке имен.

В browse.dat пробелы в строках имеют значение? И как рассчитываются значения вида c0001000?

Временно решил проблему с поиском имен так:

-$HostNAME = substr(`nslookup $HostADDR | grep name `,9);

+$HostNAME = `./1.sh $HostADDR`;

И содержимое 1.sh:

код выделить все

#!/bin/bash
/usr/bin/nslookup $1 | /bin/grep name | /usr/bin/awk -F " " '{ print $4 }'

Работает

У меня одного launchpad.net ели-ели работает? Провайдер - БТК.

ну у меня обновления метров 28 час качало.

У кого затыки у них, или анлимы дают о себе знать.

Поставил фтп-сервер proftpd на ноуте.

Если ноут подключен по витой паре, то ко мне доступ есть.

Если через wi-fi, то нету.

Аналогично с самбой. Ось убунту 9.10.

А в их конфиге указан нужный интерфейс и хосты?

raubtier, объедините в мост