LINUX.ORG.RU

Сообщения tooncheg

 

perl и mysql

Форум — Admin

#!/usr/bin/perl
use strict;
use warnings;
use DBI;
use Digest::SHA qw(sha256_hex);

open (DATA, «/path/list_mig.txt») or die $!;

my $dbh = DBI->connect(«DBI:mysql:database=server;
host=localhost»,
«user», «password»,
{'RaiseError' => 1});

my $sth = $dbh->prepare(«INSERT INTO virtual_users (domain_id,
email, password, commentary)
VALUES ( (SELECT id FROM virtual_domains WHERE
name='example.org'),?,?,?)»);

while(<DATA>) {
chomp;
my ($email,$commentary,$password) = split /,/;

$password = crypt($password,'$5$');

$sth->execute($email, $password, $commentary);
}

$dbh->disconnect();

Как пропустить пропустить записи которые уже существуют уже, чтобы избежать прерывание работы скрипта

 ,

tooncheg
()

Анализ локальной работы локальной сети

Форум — Admin

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

seq 210981:212441, ack 9970, win 63484, length 1460 NBT Session Packet: Unknown packet type какая может быть причина причина таких пакетов

 ,

tooncheg
()

DNS клинч с коллегами. Нужен совет.

Форум — General

Ситуация следущая: Коллеги с противоположной стороны не могут слать нам письма, т.к. DNS сервер по разному отвечает(или просто не отвечает) в зависимости от ип адреса сервера который его спрашивает - по их мнению. C моей стороны почта до них доходит без проблем. У меня DNS провайдера, все записи заведены корректно. Мой домен 3-го уровня, в зоне zgrad.ru, т.е. что они имеют в виду, то что dns ответственного за эту зону не выдает им информацию где им искать мой домен. Посоветуйте куда рулить. Заранее спасибо.

 , ,

tooncheg
()

qemu-kvm и сеть

Форум — Admin

Возникла некоторая заминка. Прошу совета. Есть задача настроить сервер виртуальных машин KVМ. На нем несколько серверов dns,mail,web. Планируется что будет крутится внутри лок. сети без доступа во внешний мир. Вот возникшие вопросы.
1.Правильно ли установить для каждого вирт. сервера отдельно физический сетевой адаптер.
2.Какие характеристики запланировать для сервера под такие задачи. В тестовом режиме крутится web-srv c (wordpress/lighttpd) без нагрузки (i5-4670 CPU @ 3.40GHz / ram 8 gb) с выделенным виртуальными характеристиками 1 процессор и 2 гб памяти, но понять как все обернется в реальной обстановке сложно.

 ,

tooncheg
()

Как переместить /var с раздела на логический том lvm

Форум — Admin

/var примонтирован так /dev/sda5 /var ext4 defaults 0 2
Создан логический том LV /dev/vg00/lv01 (при монтировании в /mnt df -h показывает/dev/mapper/vg00-lv01 все работает все хорошо)
Вопрос: как перенести на этот том /var и в fstab его примонтировать.

 ,

tooncheg
()

lvm2 Debian не как не пойму где утилиты vgscan pvcreate ....

Форум — Linux-install

lvm2 устанавливается, команды для работы не тянутся На другой машине все встало без проблем. Хелп

 ,

tooncheg
()

Подскажите iptables,proxy и lannet

Форум — Admin

Не могу врубиться как настроить iptables для такой ситуации:

lannet eth0: 192.168.1.0/24

IP внешний eth1: 83.83.83.83

прокси на стороне провайдера 83.83.83.127:3128

Настроить доступ из lannet во внешнюю сеть

 ,

tooncheg
()

собрать команду rrdtool в скрипте используя for и if

Форум — General
CreateGraph () {
if [ -n "$(ps aux | grep rrdtool | grep -v grep)" ] ; then
	return
 fi

rrdtool graph \
/var/www/monitoring/sw/sw$1/errors"$1"_In.png \
--imgformat PNG \
--width 500 \
--height 200 \
for (( count = 1; count<26; count++ ))
do
In=$(snmpget -v2c -c public 192.168.15.$1 1.3.6.1.2.1.2.2.1.14.$count | awk {'print $4'})
	if (( $In != 0 ))
	then
DEF:In1=/var/www/monitoring/sw/sw$1/errors"$1"_1.rrd:errIn:AVERAGE LINE2:In1#${color[1]}:"In err 1\t" \
GPRINT:In1:MAX:"Max %5.0lf %s" \
GPRINT:In1:LAST:"Current %5.0lf %s\\n" \
	fi
done
DEF:In25=/var/www/monitoring/sw/sw$1/errors"$1"_25.rrd:errIn:AVERAGE LINE2:In25#${color[25]}:"In err 25\t" \
GPRINT:In25:MAX:"Max %5.0lf %s" \
GPRINT:In25:LAST:"Current %5.0lf %s\\n"
}

кусок скрипта для отрисовки кривых графика, что то затупил. Как сделать чтобы не ругался \ - дело в этой штуке?

 , , ,

tooncheg
()

RRDTOOL graph разобраться

Форум — General

RRDTOOL создана база (мониторинг температуры на устройствах)
rrdtool create temp.rrd --step 300 \
DS:temp200:GAUGE:600:U:U \
DS:temp202:GAUGE:600:U:U \
DS:temp203:GAUGE:600:U:U \
DS:temp204:GAUGE:600:U:U \
DS:temp205:GAUGE:600:U:U \
RRA:AVERAGE:0.5:1:288 \ - день
RRA:AVERAGE:0.5:3:672 \ - неделя
RRA:AVERAGE:0.5:12:744 \ - месяц
RRA:AVERAGE:0.5:72:1480 \ - год
RRA:MIN:0.5:1:288 \
RRA:MIN:0.5:3:672 \
RRA:MIN:0.5:12:744 \
RRA:MIN:0.5:72:1480 \
RRA:MAX:0.5:1:288 \
RRA:MAX:0.5:3:672 \
RRA:MAX:0.5:12:744 \
RRA:MAX:0.5:72:1480 \
RRA:LAST:0.5:1:2 - 5 мин
Как вытащить из базы нужный период для построения соответствующего графика

 , ,

tooncheg
()

mrtg rrdtool как создать больше чем 2 кривых на графике

Форум — Admin

стандартными средствами mrtg был создан график с двумя кривыми, регистрирующие определенные состояния. Показалось мало, была добавлена возможность работы mrtg с rrdtool, rrdtool произвел переход log файлов mrtg в свой формат баз данных. Возник вопрос можно ли теперь добавить кривые дополнительно на этот график и как это сделать.

 , ,

tooncheg
()

snmp контроль состояния сетевых устройств

Форум — General

Есть такие ветки в oid дереве 1.3.6.1.2.1.5 - icmp 1.3.6.1.2.1.6 - tcp 1.3.6.1.2.1.7 - udp например в tcp присутствует 1.3.6.1.2.1.6.7 - tcpAttemptFails. Реально ли по состоянию этого счетчика судить о состоянии сетевого устройства. Можно ли диагностировать устройство выходящее из строя предвосхищая его внезапный крах.

 

tooncheg
()

Wins samba регистрация пользователей

Форум — Admin

Немного озадачен. Ситуация такая, на wins сервере samba часть машин в сети регистрируется как с именем машины и одновременно использует имя учетной записи этой машины для регистрации. Приблизительно так:

«NAMEMACHINE#03» 1469898270 192.168.4.237 64R «USERNAME#03» 1469898269 192.168.4.237 64R

 ,

tooncheg
()

Скрипт на perl и system()

Форум — Development
#!/usr/bin/perl

open (DATA, "/path/mac-ip.txt") or die $!;

$file = "/path/mac-ip-tmp.txt";

my @listIM; # List IP and MAC

while (<DATA>) {
        chomp;
        next if /^\s*#/; # ignore comments
        my @f = split /\s/, $_;
        my %hash;
        @hash{'IP','MAC'} = @f;
        push @listIM, \%hash;

}

foreach my $seq (@listIM) {
   if (system("grep -w $seq->{IP} $file")){print " OK ";}     
}


Необходимо проверить соответствия в двух файлах. Не могу придумать как заставить проверить условие if (system("grep -w $seq->{IP} $file"))

 , ,

tooncheg
()

mrtg ругается на скрипт

Форум — General
#!/bin/bash
A=$(cat /sys/class/thermal/thermal_zone0/temp | cut -c 1-2)
echo $A

Ругательство такое:

ERROR: Target[temp2][_OUT_] '/usr/local/sbin/temperature.sh' (warn): Use of /c modifier is meaningless without /g at (eval 3550) line 1.

 

tooncheg
()

Нужна помощь по snmp в винде

Форум — Admin

Нужна подсказка, можно ли отслеживать посредством snmp работу с usb накопителями пользователей на windows машинах. Конкретно ловить событие на использование usb флешки.

 , ,

tooncheg
()

измучил Bash не понимаю

Форум — Development
#!/bin/bash

SUCCESS=0
FILENAME=/etc/hosts

grep -q $5 /etc/hosts

if [[ $5 == '0.0.0.0' ]];then
elif [[ $? -eq $SUCCESS ]];then
else
 echo"$5 $2">>/etc/hosts
fi



$5 - это IP машины в сети, $2 - нетбиос-нейм машины 
Не срабатывает условие elif в итоге повторяются IP записи в /etc/hosts. Не понимаю что не так

 ,

tooncheg
()

bash не понимаю почему не скравнивает

Форум — Development

Не понимаю что не правильно делаю. Дело вот в чем, некая внешняя программа передает шеснадцатиричное число $3 (00 или 20 или 30). В общем не срабатывает true условие.

#!/bin/bash

CHECK_TYPE=$((16#$3))

if [[$CHECK_TYPE -eq 0]];then
 echo OK!
else
 echo Not OK!
fi

 ,

tooncheg
()

Samba wins как контролировать

Форум — Admin

Можно ли каким то образом вести логи регистрации на wins.

 ,

tooncheg
()

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