LINUX.ORG.RU

Сообщения tmp

 

При задании машрутов с помощью ip route и ip rule, tracecoute не показывает трейс.

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

#!/bin/sh
IP=/sbin/ip
. /etc/rc.d/data
init_kg_route ()
{
    for i in $kg_ip
    do
        $IP rule del to $i table kg
        $IP rule add to $i table kg
    done
    $IP route del default dev $mega_iface table kg metric 5
    $IP route add default dev $mega_iface table kg metric 5
}

case "$1" in
'init')
    $IP route del default
    init_kg_route
    $IP route add default dev $mega_iface metric 1
;;
'vpn')
    $IP route add default dev $vpn_iface metric 2
;;
'direct')
    $IP route del default dev $vpn_iface metric 2
;;
*)
  echo "usage $0 vpn|direct|init"
esac
$IP route flush cache

Елси весь трафик идет по одному каналу то tracecoute показывает все
как надо. Елси же поднимаю второй и запускаю скрипт с аргументом
vpn, то перестают показываться маршруты и на родную зону и вне ее:(.

И еще один вопрос:
посмотреть таблицу маршрутизации - ip route ls
посмотреть правила - ip rule ls
а как можно посмотреть идет трафик через таблицу талбицу или она пока
еще не задействована, например командой
$IP route del default dev $mega_iface table kg metric 5

tmp
()

Подклоючение библиотек в Perl.

Есть некая либа lib.so и надо подключить ее и вызывать функции из скрипта на перле, подскажите как это можно сделать. Как сделать то же самое на С знаю, а вот с перлом что-то не нашел как, спасибо.

tmp
()

Работа с SOAP в перле, непонятная ошибка.

Вместо данных клент получает вот такую красоту: not well-formed (invalid token) at line 1, column 1450, byte 1450 at /usr/local/lib/perl5/site_perl/5.8.7/mach/XML/Parser.pm line 187 <?xml version="1.0" encoding="UTF-8"?> И серверная часть и клиентская на перле, использую модуль SOAP::Lite. Иногда данные передаются в нормальном, вменяемом виде а и иногда вываливается вот такой дамп xml, подскажите в чем дело?

tmp
()

Попрос по рабте с SOAP

Изучаю работу с SOAP.
Вот код клиента
..........
print SOAP::Lite
-> uri('http://server:81/soap')
-> proxy('http://server:81/soap')
-> hi()
-> result;
...........

На сервере апач слушает 81 порт, используется мод_перл,

sub handler {
my $r = shift;
...........

Вот что пишет в логе сервера после запуска клиента:
[Fri Dec 15 15:54:10 2006] [error] [client 192.168.1.13] [libapreq] unknown content-type: `text/xml; charset=utf-8'
Error: Error while parse request. status: 500, error-notes:[libapreq] unknown content-type: `text/xml; charset=utf-8'

Подстажите что надо делать, это надо апач настраивать что бы он принимал заголовки или это решается средствами перла?.

tmp
()

Подскажите, где можно почитать и посмотреть, желательно с примерами работу с SOAP::Lite?

Подскажите, где можно почитать и посмотреть, желательно с примерами работу с SOAP::Lite?

tmp
()

Подключение по pptp

Настраиваю подключение к серверу, аутенификация по PAP
#cat /etc/ppp/peers/st
name st
+pap
-chap
noauth
defaultroute

вызываю

pptp x.x.x.x call st

tail -20 /var/log/messages
Dec 4 15:22:53 HOME pppd[7392]: pppd 2.4.4 started by root, uid 0
Dec 4 15:22:53 HOME pppd[7392]: Using interface ppp1
Dec 4 15:22:53 HOME pppd[7392]: Connect: ppp1 <--> /dev/pts/15
Dec 4 15:22:55 HOME pppd[7392]: LCP terminated by peer (peer refused to authenticate)
Dec 4 15:22:55 HOME pptp[7391]: anon log[pptp_read_some:pptp_ctrl.c:543]: read returned zero, peer has closed
Dec 4 15:22:55 HOME pptp[7391]: anon log[callmgr_main:pptp_callmgr.c:255]: Closing connection (shutdown)
Dec 4 15:22:55 HOME pptp[7391]: anon log[ctrlp_rep:pptp_ctrl.c:251]: Sent control packet type is 12 'Call-Clear-Request'
Dec 4 15:22:55 HOME pptp[7391]: anon log[pptp_read_some:pptp_ctrl.c:543]: read returned zero, peer has closed
Dec 4 15:22:55 HOME pptp[7391]: anon log[call_callback:pptp_callmgr.c:78]: Closing connection (call state)

Тот же конфиг использую для подключения к другому серверу с chap и различия в этих конфигах соответственно
-pap
+chap

Подскажите в чем ошибка?

tmp
()

Проблема с ssh - пробрасываю (DNAT) порт на машину за шлюзом, и ссх работает с тормозами.

Проблема с ssh - пробрасываю (DNAT) порт на машину за шлюзом, и ссх работает с тормозами. Если сначала зайти по ссх на шлюз, а потом логинюсь на машину во внутренней сети то все работает отлично. В чем может быть проблема?

tmp
()

Как задать для поключения имя интерфейса

Подключаюсь c помощью ttpt к нескольким серверам, как настроить что бы на конктретное подключение у меня был задан подределенный интрефейс ppp*?

tmp
()

Проблема с отправкой почты при использовании спутниковой тарелки.

Схема такая, интерфейс наземного прова - saima_iface=eth1, проброшен тунель с интерфейсом vpn_iface=ppp0, и обратно инет идет со спутника через dvb_iface=dvb0_0. Вроде все работает, но есть проблема - пользователь заходит на mail.ru, получает почту, пишет ответ, а письмо не отпрвляется и браузер отваливается по таймауту, письмо оказывается неотправленным, в чем причина не могу понять, такая же байда с другими почтовиками с веб интерфейсом. С самого шлюза письма отправляются нормально, а вот у пользователей нет, происходит все как описанно выше.

tmp
()

Хорошая документация c примерами по LWP::UserAgent

Где можно найти хорошую документацию c примерами по LWP::UserAgent. На кпане там описание и мне не совчем понятно как нпаример сохрнать куки. Лигнюсь на форум, получаю сообщение что удачно залогинился и сейчас буду перемещен на страницу. При дальнейших попытказ работы с форумом выдается сообщение что я не залогинен.

    my $cookie = HTTP::Cookies->new ( );
    $agent = LWP::UserAgent-> new ( );
    $agent->agent("Opera");

    my $url = "http://diesel.elcat.kg/index.php";;
    $cookie = $agent-> cookie_jar( );
    my $response = $agent->post ( $url,
        [
            'act' => 'Login',
            'CODE' => '01',
            'referer' => '...',
            'UserName' => '...',
            'PassWord' => '...',
        ],
    );
    die "Can't get $url -- ", $response->status_line unless $response->is_success;

    print ( Convert::Cyrillic::cstocs ( $src, $dst, $response->content));
    my $q;
    $q = $1 if ($response->content =~ m/s=(\w*);?\ ?/g);
    print ( "\n>>>".$q."<<<\n");

    $response = $agent->get ( $url,
        [
            s => $q,
        ],
    );
    die "Can't get $url -- ", $response->status_line unless $response->is_success;


    print ( Convert::Cyrillic::cstocs ( $src, $dst, $response->content));


tmp
()

Учет трафика в iptables пренаправляемого на прокси.

Соит простенький биллинг - iptables, ulogd, mysql. Появилась необходимость настроить прозачный прокси. Настроить не проблема redirect .... Проблема в учете трафика, до установки прокси весь трафик считался в цепочке billing куда перенаправлялся с filter FORWARD. Теперь после редиректа трафик до filter FORWARD не доходит. Т.к. после nat PREROUTING трафик идет локальному приложению. Какой можно найти выход из ситуации что бы этот трафик все же попадал в цепочку billling? Ловить его инпутом перед прокси после редиректа не подходит - адреса назнчачениия уже другие. А у меня биллинг считает отдельно локальный трафик, отдельно тракфик в мир.

tmp
()

как передать в командной строке рпароль для su

т.е. выполнить от имени пользователя

su user -c ls /path

tmp
()

удаление досовского завершения строк с помощью sed

Что бы удалить досовское завершение строки делаю следующее:
sed -n 's/\r\n/\n/' file
не получается, в чем ошибка, подскажите?

tmp
()

доступ к ssh поределенно ползователю с определенного хоста

Есть ли возможность настроить sshd так что бы он пускал определенного
пользователя только с определенного хоста?
есть опции
AllowUsers stalcker
ListenAddress 10.1.1.1
т.е. на какой адресс слушать и каким ползователям можно подключаться к
серверу а как объеденить эти два параметра?

tmp
()

существует ли для ipfw аналог limit из iptables

Cуществует ли для ipfw аналог limit из iptables, для ограничения по времени, т.е. ограничить доступ к какому-нибудь ресурсу например не более 10 соединений в минуту. Вот как это я делаю в iptables:

$pfw -A this_access -p icmp -s $i --icmp-type 8 -m limit --limit 8/m -j ACCEPT

а как то же самое сделать в ipfw? limit который есть в ipwf может ограничивать только по количеству одновременных соединений.

tmp
()

Какой параметрт в my.cnf отвечает за на каком интерфейсе/адресе слушать запросы

Какой параметрт в my.cnf отвечает за на каком интерфейсе/адресе слушать запросы?

tmp
()

какая команда в sed печаае номер строки

Какая команда в sed печаае номер строки?
sed -n '34,58p' ссс.pm
т.е. что бы печататлись не только строки из диапазона, но и номера строк.

tmp
()

есть ли плагин для vim что-то типа taglist но только показывает все файлы проекта

Есть ли плагин для vim что-то типа taglist, но только для показа всех файлов проекта?

tmp
()

документация по пеловому модулю SPOPS на русском

Подскажите где можно найти документацию по пеловому модулю SPOPS на русском?

tmp
()

Ошибка работы плагина taglist для vim под FreeBSD

Ошибка работы плагина taglist для vim под FreeBSD, выдает такую ошибку:

Taglist: Failed to generate tags for /usr/home/stalcker/work/Exception.pm ctags: illegal option -- -^@usage: ctags [-BFTaduwvx] [-f tagsfile] file ...^@

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

tmp
()

RSS подписка на новые темы