ICO wiki - User contributions [en]

PowerShelli näidisteemad kodutöödeks 2010, sügis, kaugõpe

2011-01-31T05:10:57Z

Smuuga: /* Kirjasaatja */

=Kodune arvestustöö=
'''NB! Teha tuleb kõik ülesanded ja saata hiljemalt 30.01.2010 õppejõule: heiki.tahis [ät] eesti.ee''' Lisa lühikesed selgitused, kuidas töötab, kust abi leidsid

==Kirjasaatja==
Kirjuta skript, mis küsib kasutajalt saaja nime, e-maili, teemat ning kirjasisu ning saadab vastava e-kirja.
* Saatjaaadressi ja nimena kasuta oma andmeid!
* SMTP server peab olema ka skriptis kirjas.
* Koodi kommentaaridest peab olema aru saada, mida muuta tuleb, et enda andmed asemele panna

==Suured failid==
Loo skript, mis leiab etteantud kettalt/kaustast kümme kõige suuremat faili ja küsib, kas kustutab need
* Kui vastata jah, siis loomulikult kustutab ka :)

=Kodused projektid=
Need on siis need skriptid, mis tuleks esitada [[Skriptimiskeeled aine aruanded 2010 sügis]] lehel, korralikult dokumenteerida ja kirjeldada. Vali üks ja lisa oma nimi, et teised teaksid, et teema on võetud.

==Arhivaator==
Loo skript, mis küsib kasutaja käest faililaiendi (näiteks .txt) ja asukoha (ketta või kataloogi) ning pakib kõik sellest kataloogist leitud vastava laiendiga failid .zip arhiiviks failid-aasta-kuu-kp.zip (näiteks failid-2011-01-24.zip)

[[Skript, mis arhiveerib etteantud laiendiga failid - PowerShell|Kristjan Karmo AK41]]

==Korduvad failinimed==
Loo skript, mis leiab etteantud kataloogist või kettalt samanimelised failid ja väljastab nende nimekirja.

[[Sander Tuulik AK41]]

==Arvutiinfo==
Loo skript, mis leiab arvuti seadeid ja konfiguratsiooni puudutava info (arvuti nimi, mälu hulk, protsessoritüüp jne) ning väljastab selle

[[Lembit Elmik AK21]]

==Teenusemonitor==
Loo skript, mis kontrollib, kas mingi teenus (näiteks Spooler) töötab ning kui ei tööta, siis saadab e-kirja, teatega, et teenus ei tööta.

[[Teenusemonitor|Marko Valing AK31]]

==Rakendusemonitor==
Loo skript, mis kontrollib, kas mingi rakendus (näiteks Firefox) töötab ning kui töötab, siis saadab e-kirja, teatega, et kasutaja see ja see kasutab seda rakendust.

==Printerihaldur==
Loo [[skript, mis teeb midagi printeritega| skript]], mis leiab arvutisse paigaldatud printerid ning kuvab need. Kui arvutisse on paigaldatud "HP LaserJet 5L" printer, siis määrab selle vaikepriteriks.

Siim Liivand, AK41

==Viimati muudetud failid==
Loo skript, mis leiab 20 viimatimuudetud faili ja väljastab vastava nimekirja HTML formaadis

[[Alvar Unuks AK42, sügis, kaugõpe|Alvar Unuks AK42]]
<source lang="powershell">
$DateToCompare = (Get-date).AddDays(-15)
get-childitem -recurse | where-object {$_.lastwritetime –gt $DateToCompare}| Sort LastWriteTime -descending | select -first 20 | ConvertTo-Html > protsessid.html
</source>

==Paigaldatud tooted==
Loo skript, mis salvestaks info paigaldatud toodete (rakenduste) kohta CSV formaadis faili.

[[Paigaldatud tooted | Reget Kalamees DK21]]
<source lang="powershell">
get-wmiobject -class "Win32_Product" -namespace "root\CIMV2" -computername "." | Select-Object -Property [A-Z]* | Sort-Object Caption | Export-Csv installeeritud.csv
</source>

==Evenlog'i edastaja==
Loo skript, mis leiab application log'ist viimase nädala joosul tehtud "Error" tüüpi kirjed ja edastab need administraatorile e-kirjana.

Kaspar Prei AK41

==Kasutajaimporter==
Loo CSV fail, kus on andmed järgmiselt: kasutajanimi, parool, täisnimi, grupp

Loo skript, mis looks kohalikud kasutajad ja grupid failis toodud andmete järgi

Skriptimiskeeled aine aruanded 2010 sügis/SigmarMuuga/Poweshell

2011-01-31T05:10:03Z

Smuuga: /* Skript, mis saadab e-maili */

==Sigmar Muuga Poweshelli asjad==
===Skript, mis saadab e-maili===
<source lang="powershell">
# Skripts, mis kysib interaktiivselt parameetrid ja saadab vastavalt sisestatud andmetele e-maili
# Autor: Sigmar Muuga DK31

$emailFrom = Read-Host "Kellelt saadad e-maili?"
Write-Host "E-maili saatja on $emailFrom"

$emailTo = Read-Host "Kellelel saadad e-maili"
Write-Host "E-mail saadetakse aadressile: $emailTo"

$subject = Read-Host "E-maili teema:"
Write-Host "E-maili teema on: $subject"

$body = Read-Host "Kirja sisu:"
Write-Host "Kirja sisuks on: $body"

$smtpServer = Read-Host "SMTP serveri aadress:"
Write-Host "SMTP serveriks on: $smtpServer"

Write-Host "Saadame e-maili..."
$smtp = new-object Net.Mail.SmtpClient($smtpServer)
$smtp.Send($emailFrom, $emailTo, $subject, $body)

Write-Host "E-mail saadetud!"
</source>

PowerShelli näidisteemad kodutöödeks 2010, sügis, kaugõpe

2011-01-31T05:07:56Z

Smuuga: /* Kirjasaatja */

=Kodune arvestustöö=
'''NB! Teha tuleb kõik ülesanded ja saata hiljemalt 30.01.2010 õppejõule: heiki.tahis [ät] eesti.ee''' Lisa lühikesed selgitused, kuidas töötab, kust abi leidsid

==Kirjasaatja==
Kirjuta skript, mis küsib kasutajalt saaja nime, e-maili, teemat ning kirjasisu ning saadab vastava e-kirja.
* Saatjaaadressi ja nimena kasuta oma andmeid!
* SMTP server peab olema ka skriptis kirjas.
* Koodi kommentaaridest peab olema aru saada, mida muuta tuleb, et enda andmed asemele panna

[http://wiki.itcollege.ee/index.php/Skriptimiskeeled_aine_aruanded_2010_s%C3%BCgis/SigmarMuuga/Poweshell#Sigmar_Muuga_Poweshelli_asjad Sigmar Muuga]

==Suured failid==
Loo skript, mis leiab etteantud kettalt/kaustast kümme kõige suuremat faili ja küsib, kas kustutab need
* Kui vastata jah, siis loomulikult kustutab ka :)

=Kodused projektid=
Need on siis need skriptid, mis tuleks esitada [[Skriptimiskeeled aine aruanded 2010 sügis]] lehel, korralikult dokumenteerida ja kirjeldada. Vali üks ja lisa oma nimi, et teised teaksid, et teema on võetud.

==Arhivaator==
Loo skript, mis küsib kasutaja käest faililaiendi (näiteks .txt) ja asukoha (ketta või kataloogi) ning pakib kõik sellest kataloogist leitud vastava laiendiga failid .zip arhiiviks failid-aasta-kuu-kp.zip (näiteks failid-2011-01-24.zip)

[[Skript, mis arhiveerib etteantud laiendiga failid - PowerShell|Kristjan Karmo AK41]]

==Korduvad failinimed==
Loo skript, mis leiab etteantud kataloogist või kettalt samanimelised failid ja väljastab nende nimekirja.

[[Sander Tuulik AK41]]

==Arvutiinfo==
Loo skript, mis leiab arvuti seadeid ja konfiguratsiooni puudutava info (arvuti nimi, mälu hulk, protsessoritüüp jne) ning väljastab selle

[[Lembit Elmik AK21]]

==Teenusemonitor==
Loo skript, mis kontrollib, kas mingi teenus (näiteks Spooler) töötab ning kui ei tööta, siis saadab e-kirja, teatega, et teenus ei tööta.

[[Teenusemonitor|Marko Valing AK31]]

==Rakendusemonitor==
Loo skript, mis kontrollib, kas mingi rakendus (näiteks Firefox) töötab ning kui töötab, siis saadab e-kirja, teatega, et kasutaja see ja see kasutab seda rakendust.

==Printerihaldur==
Loo [[skript, mis teeb midagi printeritega| skript]], mis leiab arvutisse paigaldatud printerid ning kuvab need. Kui arvutisse on paigaldatud "HP LaserJet 5L" printer, siis määrab selle vaikepriteriks.

Siim Liivand, AK41

==Viimati muudetud failid==
Loo skript, mis leiab 20 viimatimuudetud faili ja väljastab vastava nimekirja HTML formaadis

[[Alvar Unuks AK42, sügis, kaugõpe|Alvar Unuks AK42]]
<source lang="powershell">
$DateToCompare = (Get-date).AddDays(-15)
get-childitem -recurse | where-object {$_.lastwritetime –gt $DateToCompare}| Sort LastWriteTime -descending | select -first 20 | ConvertTo-Html > protsessid.html
</source>

==Paigaldatud tooted==
Loo skript, mis salvestaks info paigaldatud toodete (rakenduste) kohta CSV formaadis faili.

[[Paigaldatud tooted | Reget Kalamees DK21]]
<source lang="powershell">
get-wmiobject -class "Win32_Product" -namespace "root\CIMV2" -computername "." | Select-Object -Property [A-Z]* | Sort-Object Caption | Export-Csv installeeritud.csv
</source>

==Evenlog'i edastaja==
Loo skript, mis leiab application log'ist viimase nädala joosul tehtud "Error" tüüpi kirjed ja edastab need administraatorile e-kirjana.

Kaspar Prei AK41

==Kasutajaimporter==
Loo CSV fail, kus on andmed järgmiselt: kasutajanimi, parool, täisnimi, grupp

Loo skript, mis looks kohalikud kasutajad ja grupid failis toodud andmete järgi

Skriptimiskeeled aine aruanded 2010 sügis/SigmarMuuga/Poweshell

2011-01-31T05:06:55Z

Smuuga: /* Sigmar Muuga Poweshelli asjad */

==Sigmar Muuga Poweshelli asjad==
===Skript, mis saadab e-maili===
<source lang="powershell">
$emailFrom = Read-Host "Kellelt saadad e-maili?"
Write-Host "E-maili saatja on $emailFrom"

$emailTo = Read-Host "Kellelel saadad e-maili"
Write-Host "E-mail saadetakse aadressile: $emailTo"

$subject = Read-Host "E-maili teema:"
Write-Host "E-maili teema on: $subject"

$body = Read-Host "Kirja sisu:"
Write-Host "Kirja sisuks on: $body"

$smtpServer = Read-Host "SMTP serveri aadress:"
Write-Host "SMTP serveriks on: $smtpServer"

Write-Host "Saadame e-maili..."
$smtp = new-object Net.Mail.SmtpClient($smtpServer)
$smtp.Send($emailFrom, $emailTo, $subject, $body)

Write-Host "E-mail saadetud!"
</source>

Skriptimiskeeled aine aruanded 2010 sügis/SigmarMuuga/Bash

2011-01-28T10:58:15Z

Smuuga: /* Tunnitöö - failijagaja */

Skriptimiskeeled aine aruanded 2010 sügis/SigmarMuuga/Poweshell

2011-01-28T09:49:28Z

Smuuga: /* Sigmar Muuga Poweshelli asjad */

==Sigmar Muuga Poweshelli asjad==

Skriptimiskeeled aine aruanded 2010 sügis/SigmarMuuga

2011-01-28T09:49:04Z

Smuuga: /* Sigmar Muuga DK31 */

Skriptimiskeeled aine aruanded 2010 sügis/SigmarMuuga

2011-01-28T09:48:39Z

Smuuga: /* Kodutöö */

==Sigmar Muuga DK31==
* [http://wiki.itcollege.ee/index.php/Skriptimiskeeled_aine_aruanded_2010_s%C3%BCgis/SigmarMuuga/Bash Bash]
* [http://wiki.itcollege.ee/index.php/Skriptimiskeeled_aine_aruanded_2010_s%C3%BCgis/SigmarMuuga/Python Python]
* [http://wiki.itcollege.ee/index.php/Skriptimiskeeled_aine_aruanded_2010_s%C3%BCgis/SigmarMuuga/Poweshell Poweshell]

===Tunnitööd - failijagaja ===
<source lang="bash">
#!/bin/bash

# Skript, mis jagaks etteantud grupile uue kausta
#
# Autor: Sigmar Muuga DK31
#
# Kasutamine: jaga.sh KAUST GRUPP <JAGATUD KAUST>
#
# Skript teeb järgnevat
# paigaldab samba (see osa pole kohustuslik)
# loob kausta KAUST (kui vaja)
# loob grupi GRUPP (kui vaja)
# lisab grupile sobivad read smb.conf faili ja teeb failiserveri teenusele #reload'i

usage="Usage: jaga.sh <yourfolder> <yourgroup>"
smb_conf="smb.conf"
smb_conf_new=$smb_conf".new"

# kaust peab olema m22ratud
if [ -z "$1" ]; then
echo "No folder specified."
echo $usage
exit 0
fi

# grupp peab olema m22ratud
if [ -z "$2" ]; then
echo "No group specified."
echo $usage
exit 0
fi

folder=$1
group=$2

# kontrollime, kas kaust on olemas ja kui pole, siis teeme selle
if [ ! -e $folder ]
then
echo "Folder does not exists, creating it now.."
mkdir $folder
echo "Folder created"
fi

group_count=$(grep -c --word-regexp $group "/etc/group")

# kontrollime, kas grupp on olemas, kui pole, loob selle
if [ $group_count -lt 1 ]
then
echo "Group "$group" does not exist, creating it..."
groupadd $group
echo "Group created"
fi

echo "So far so good, lets smash the smb.conf...\n"

cp $smb_conf $smb_conf_new

echo "["$folder"]" >> $smb_conf_new
echo " comment = "$folder" access share" >> $smb_conf_new
echo " path="$folder >> $smb_conf_new
echo " browseable = yes" >> $smb_conf_new
echo " valid users = @"$group >> $smb_conf_new

echo "Share added to smb.conf, now testing the conf..."

testparm -s $smb_conf_new

mv $smb_conf_new $smb_conf

echo "Restarting samba"

/etc.init.d/samba restart

echo "Folder shared!"
</source>

Skriptimiskeeled aine aruanded 2010 sügis/SigmarMuuga/Poweshell

2011-01-28T09:47:41Z

Smuuga: Created page with '=Sigmar Muuga Poweshelli asjad='

=Sigmar Muuga Poweshelli asjad=

Skriptimiskeeled aine aruanded 2010 sügis

2011-01-28T09:46:57Z

Smuuga: /* Sigmar Muuga DK31 */

Skriptimiskeeled aine aruanded 2010 sügis

2011-01-28T09:46:35Z

Smuuga: /* Sigmar Muuga DK31 */

Skriptimiskeeled aine aruanded 2010 sügis/SigmarMuuga/Python

2011-01-28T09:44:57Z

Smuuga: Created page with '== Sigmar Muuga Python == ===Kodutöö=== Skript, mis vaatab /var/log/auth.log faili ja võtab sealt enim ebaõnnestunud IP aadressid, mis üritasid teha sisse logimist SSH kaud…'

== Sigmar Muuga Python ==
===Kodutöö===

Skript, mis vaatab /var/log/auth.log faili ja võtab sealt enim ebaõnnestunud IP aadressid, mis üritasid teha sisse logimist SSH kaudu(lävend võiks näiteks olla 10 ebaõnnestunud katset) ning saadab need kas e-mailile või lisab tulemüüri reeglitesse(IPTABLES näiteks). Jah, ma tean, et on ka paremaid viise hoste blokeerida, näiteks kasutada hosts-allow parameetrit ssh konfiguratsioonis.
<source lang="python">
#!/usr/bin/python
# -*- coding: latin-1 -*-

import sys
import getopt
import os
import re

# Skript, mis loeb läbi UNIX-i auth.log faili ja koostab IPTables block reeglid IP aadressidele,
# mille pealt on autentimine ebaõnnestunud vähemalt etteantud arv kordi

# käivitamise näide:
# py check_ip.py --logfile=/path/to/logfile --iptablesfile=/path/to/iptablesfile

# Autor: Sigmar Muuga, DK31

def main():
# mitme ebaõnnestumise korral me IP blokeerime
BLOCK_LEVEL=5

# kuvab kasutamise info
def usage():
print 'Programmi kasutamine:'
print 'py check_ip.py --logfile=/path/to/logfile --iptablesfile=/path/to/iptablesfile'

# loendab stringi esinemised etteantud failis
def matchCountInFile(str, filename):
log_file = open(filename, 'r')
count = 0
for line in log_file:
if re.search(str, line):
count=count+1
return count

try:
# loeme ja kontrollime getopti abil argumendid
opts, args = getopt.getopt(sys.argv[1:], "li:v", ["logfile=", "iptablesfile="])
AUTH_LOG_FILE = ''
IP_TABLES_FILE = ''
for opt, arg in opts:
if opt == '--logfile':
AUTH_LOG_FILE = arg
elif opt == '--iptablesfile':
IP_TABLES_FILE = arg

print 'AUTH_LOG_FILE=' + AUTH_LOG_FILE
print 'IP_TABLES_FILE=' + IP_TABLES_FILE

if AUTH_LOG_FILE.__len__() < 1:
raise Exception('Invalid auth log filename')
if IP_TABLES_FILE.__len__() < 1:
raise Exception('Invalid iptables filename')

if not os.path.isfile(AUTH_LOG_FILE):
raise Exception('Auth log file does not exist')

ip_pattern = re.compile('([0-9]{1,3}\.){3}[0-9]{1,3}')

# valmistame logifaili lugemiseks ette
log_file = open(AUTH_LOG_FILE, 'r')
ip_address_array = []
ip_tables_filehandle = None
# itereerime yle logiridade
for log_line in log_file:
# read, mis on veaga
if (re.search('error', log_line) != None or re.search('illegal', log_line) != None or re.search('not allowed', log_line) != None):
ip_address_match = re.search(ip_pattern, log_line)
if (ip_address_match == None):
continue
# leiame rea pealt IP aadressi
ip_address = ip_address_match.group(0)
occurences = matchCountInFile(ip_address, AUTH_LOG_FILE)
# vajadusel blacklistime
if occurences >= BLOCK_LEVEL and not ip_address in ip_address_array:
ip_address_array.append(ip_address)
print "Blacklisting " + ip_address + " with " + str(occurences) + " occurences"
if ip_tables_filehandle == None:
ip_tables_filehandle = open(IP_TABLES_FILE, 'w')
ip_tables_filehandle.write("iptables -A INPUT -s " + ip_address + " -j DROP\n")
log_file.close()

if (ip_tables_filehandle != None):
ip_tables_filehandle.close()

except getopt.GetoptError, err:
print str(err)
usage()
sys.exit(2)

# k2ivitame meetodi
if __name__ == "__main__":
main()
</source>

Skriptimiskeeled aine aruanded 2010 sügis/SigmarMuuga/Bash

2011-01-28T09:43:00Z

Smuuga: Created page with '== Sigmar Muuga Bashi asjad == ===Kodutöö=== Skript, mis vaatab /var/log/auth.log faili ja võtab sealt enim ebaõnnestunud IP aadressid, mis üritasid teha sisse logimist SSH …'

== Sigmar Muuga Bashi asjad ==
===Kodutöö===
Skript, mis vaatab /var/log/auth.log faili ja võtab sealt enim ebaõnnestunud IP aadressid, mis üritasid teha sisse logimist SSH kaudu(lävend võiks näiteks olla 10 ebaõnnestunud katset) ning saadab need kas e-mailile või lisab tulemüüri reeglitesse(IPTABLES näiteks).
Jah, ma tean, et on ka paremaid viise hoste blokeerida, näiteks kasutada hosts-allow parameetrit ssh konfiguratsioonis.
<source lang="bash">
#!/bin/bash

# Skript, mis loeb läbi UNIX-i auth.log faili ja koostab IPTables block reeglid IP aadressidele,
# mille pealt on autentimine ebaõnnestunud vähemalt etteantud arv kordi

# käivitamise näide:
# sh check_ip.sh /var/log/auth.log /etc/iptables_blocked.txt

# Autor: Sigmar Muuga, DK31

# mitme ebaõnnestumise korral me IP blokeerime
BLOCK_LEVEL=5
# auth.log faili asukoht
AUTH_LOG_FILE=$1
# tüüpilised veasituatsioonid
ERROR_PATTERNS="error | illegal | not\ allowed"
# väljundfaili nimi (või asukoht)
IP_TABLES_FILE=$2

# kontrollime etteantud argumenti
if [ -z "$1" ]; then
echo "No command-line arguments."
exit 0
fi

if [ -z "$2" ]; then
echo "No IPTABLES file specified."
exit 0
fi

# kontrollime, et faili saaks kirjutada
touch "$IP_TABLES_FILE"
if [ -e $IP_TABLES_FILE ]; then
echo "IPTABLES file: "$IP_TABLES_FILE
else
echo "Cannot write IPTABLES file!"
exit 0
fi

# itereerime yle logiridade
more $AUTH_LOG_FILE | egrep "$ERROR_PATTERNS" | while read line; do
address=$(echo $line | grep -Eo '([0-9]{1,3}\.){3}[0-9]{1,3}')
# kas on valiidne IP
if [ ${#address} -gt 0 ]; then
# loeme esinevuskorrad
occurences=$(grep -c $address $AUTH_LOG_FILE)
if [ $occurences -ge $BLOCK_LEVEL ]; then # kui on juba piisavalt feilinud IP
added_occurences=$(grep -c $address $IP_TABLES_FILE)
#kontrollime, et poleks juba lisatud
if [ $added_occurences -lt 1 ]; then
echo "Blacklisting "$address" with "$occurences" occurences"
#kirjutame IPTABLES reegli
echo "iptables -A INPUT -s "$address" -j DROP" >> $IP_TABLES_FILE
fi
fi
fi
done
</source>
===Tunnitöö - failijagaja===
<source lang="bash">
#!/bin/bash

# Skript, mis jagaks etteantud grupile uue kausta
#
# Autor: Sigmar Muuga DK31
#
# Kasutamine: jaga.sh KAUST GRUPP <JAGATUD KAUST>
#
# Skript teeb järgnevat
# paigaldab samba (see osa pole kohustuslik)
# loob kausta KAUST (kui vaja)
# loob grupi GRUPP (kui vaja)
# lisab grupile sobivad read smb.conf faili ja teeb failiserveri teenusele #reload'i

usage="Usage: jaga.sh <yourfolder> <yourgroup>"
smb_conf="smb.conf"
smb_conf_new=$smb_conf".new"

# kaust peab olema m22ratud
if [ -z "$1" ]; then
echo "No folder specified."
echo $usage
exit 0
fi

# grupp peab olema m22ratud
if [ -z "$2" ]; then
echo "No group specified."
echo $usage
exit 0
fi

folder=$1
group=$2

# kontrollime, kas kaust on olemas ja kui pole, siis teeme selle
if [ ! -e $folder ]
then
echo "Folder does not exists, creating it now.."
mkdir $folder
echo "Folder created"
fi

group_count=$(grep -c --word-regexp $group "/etc/group")

# kontrollime, kas grupp on olemas, kui pole, loob selle
if [ $group_count -lt 1 ]
then
echo "Group "$group" does not exist, creating it..."
groupadd $group
echo "Group created"
fi

echo "So far so good, lets smash the smb.conf...\n"

cp $smb_conf $smb_conf_new

echo "["$folder"]" >> $smb_conf_new
echo " comment = "$folder" access share" >> $smb_conf_new
echo " path="$folder >> $smb_conf_new
echo " browseable = yes" >> $smb_conf_new
echo " valid users = @"$group >> $smb_conf_new

echo "Share added to smb.conf, now testing the conf..."

testparm -s $smb_conf_new

mv $smb_conf_new $smb_conf

echo "Restarting samba"

/etc.init.d/samba restart

echo "Folder shared!"
</source>

Skriptimiskeeled aine aruanded 2010 sügis/SigmarMuuga

2011-01-28T09:39:37Z

Smuuga: Created page with '===Kodutöö=== Skript, mis vaatab /var/log/auth.log faili ja võtab sealt enim ebaõnnestunud IP aadressid, mis üritasid teha sisse logimist SSH kaudu(lävend võiks näiteks o…'

===Kodutöö===
Skript, mis vaatab /var/log/auth.log faili ja võtab sealt enim ebaõnnestunud IP aadressid, mis üritasid teha sisse logimist SSH kaudu(lävend võiks näiteks olla 10 ebaõnnestunud katset) ning saadab need kas e-mailile või lisab tulemüüri reeglitesse(IPTABLES näiteks).
Jah, ma tean, et on ka paremaid viise hoste blokeerida, näiteks kasutada hosts-allow parameetrit ssh konfiguratsioonis.
<source lang="bash">
#!/bin/bash

# Skript, mis loeb läbi UNIX-i auth.log faili ja koostab IPTables block reeglid IP aadressidele,
# mille pealt on autentimine ebaõnnestunud vähemalt etteantud arv kordi

# käivitamise näide:
# sh check_ip.sh /var/log/auth.log /etc/iptables_blocked.txt

# Autor: Sigmar Muuga, DK31

# mitme ebaõnnestumise korral me IP blokeerime
BLOCK_LEVEL=5
# auth.log faili asukoht
AUTH_LOG_FILE=$1
# tüüpilised veasituatsioonid
ERROR_PATTERNS="error | illegal | not\ allowed"
# väljundfaili nimi (või asukoht)
IP_TABLES_FILE=$2

# kontrollime etteantud argumenti
if [ -z "$1" ]; then
echo "No command-line arguments."
exit 0
fi

if [ -z "$2" ]; then
echo "No IPTABLES file specified."
exit 0
fi

# kontrollime, et faili saaks kirjutada
touch "$IP_TABLES_FILE"
if [ -e $IP_TABLES_FILE ]; then
echo "IPTABLES file: "$IP_TABLES_FILE
else
echo "Cannot write IPTABLES file!"
exit 0
fi

# itereerime yle logiridade
more $AUTH_LOG_FILE | egrep "$ERROR_PATTERNS" | while read line; do
address=$(echo $line | grep -Eo '([0-9]{1,3}\.){3}[0-9]{1,3}')
# kas on valiidne IP
if [ ${#address} -gt 0 ]; then
# loeme esinevuskorrad
occurences=$(grep -c $address $AUTH_LOG_FILE)
if [ $occurences -ge $BLOCK_LEVEL ]; then # kui on juba piisavalt feilinud IP
added_occurences=$(grep -c $address $IP_TABLES_FILE)
#kontrollime, et poleks juba lisatud
if [ $added_occurences -lt 1 ]; then
echo "Blacklisting "$address" with "$occurences" occurences"
#kirjutame IPTABLES reegli
echo "iptables -A INPUT -s "$address" -j DROP" >> $IP_TABLES_FILE
fi
fi
fi
done
</source>
===Tunnitööd - failijagaja ===
<source lang="bash">
#!/bin/bash

# Skript, mis jagaks etteantud grupile uue kausta
#
# Autor: Sigmar Muuga DK31
#
# Kasutamine: jaga.sh KAUST GRUPP <JAGATUD KAUST>
#
# Skript teeb järgnevat
# paigaldab samba (see osa pole kohustuslik)
# loob kausta KAUST (kui vaja)
# loob grupi GRUPP (kui vaja)
# lisab grupile sobivad read smb.conf faili ja teeb failiserveri teenusele #reload'i

usage="Usage: jaga.sh <yourfolder> <yourgroup>"
smb_conf="smb.conf"
smb_conf_new=$smb_conf".new"

# kaust peab olema m22ratud
if [ -z "$1" ]; then
echo "No folder specified."
echo $usage
exit 0
fi

# grupp peab olema m22ratud
if [ -z "$2" ]; then
echo "No group specified."
echo $usage
exit 0
fi

folder=$1
group=$2

# kontrollime, kas kaust on olemas ja kui pole, siis teeme selle
if [ ! -e $folder ]
then
echo "Folder does not exists, creating it now.."
mkdir $folder
echo "Folder created"
fi

group_count=$(grep -c --word-regexp $group "/etc/group")

# kontrollime, kas grupp on olemas, kui pole, loob selle
if [ $group_count -lt 1 ]
then
echo "Group "$group" does not exist, creating it..."
groupadd $group
echo "Group created"
fi

echo "So far so good, lets smash the smb.conf...\n"

cp $smb_conf $smb_conf_new

echo "["$folder"]" >> $smb_conf_new
echo " comment = "$folder" access share" >> $smb_conf_new
echo " path="$folder >> $smb_conf_new
echo " browseable = yes" >> $smb_conf_new
echo " valid users = @"$group >> $smb_conf_new

echo "Share added to smb.conf, now testing the conf..."

testparm -s $smb_conf_new

mv $smb_conf_new $smb_conf

echo "Restarting samba"

/etc.init.d/samba restart

echo "Folder shared!"
</source>

Skriptimiskeeled aine aruanded 2010 sügis

2011-01-23T01:24:20Z

Smuuga: /* Pythoni versioon */

[[Category: Skriptimiskeeled]]
=Siia tulevad kodus tehtud tööde lingid=

==Esitaja nimi==
*[[Skript, mis teeb maailma paremaks - BASH]]
*[[Skript, mis teeb maailma paremaks - Python]]
*[[Skript, mis teeb maailma paremaks - PowerShell]]
*[[Arvustused sellele skriptile]]
==Vabad ideed==
*[[Skript mis otsib üles turvaaukudega tarkvara]]

==Alvar Unuks AK41==
Suurima andmemahuga paketite leidmine

==Reget Kalamees DK21==
[[Skript otsib vabade Wifi AP-de hulgast kõige kiirema ühenduse ja haagib end selle külge]]

==Kaspar Prei==
[[Skript leiab dublikaat failid]]

==Lembit Elmik AK21==

Skript, mis kontrollib võrguühenduse olemasolu ning selle puudusel diagnoosib häda.
[[V6rgudiagnoosiskript]]

==Marko Valing==
*[[XML päringute sageduse kontroll - BASH]]

==Lauri Liibert AK21==
*[[Skript mis otsib üles failid mille poole ei ole ammu pöördutud]]

==Siim Liivand AK41==
Midagi mailiserveri logide põhjal?

==Sander Tuulik AK41==
Skript mis otsib kõik pildi,video,muusika,dokumendid ja jagab need kaustadesse.

==Kristjan Karmo AK41==
* [[Skript, mis teeb varukoopia WordPressi instantsist - BASH]]
* [[Skript, mis teeb varukoopia WordPressi instantsist - Python]]
* Skript, mis... - PowerShell

==Chris Sinihelm AK41==

==Nadežda Furs A31==

==Sigmar Muuga DK31==
Skript, mis vaatab /var/log/auth.log faili ja võtab sealt enim ebaõnnestunud IP aadressid, mis üritasid teha sisse logimist SSH kaudu(lävend võiks näiteks olla 10 ebaõnnestunud katset) ning saadab need kas e-mailile või lisab tulemüüri reeglitesse(IPTABLES näiteks).

Jah, ma tean, et on ka paremaid viise hoste blokeerida, näiteks kasutada hosts-allow parameetrit ssh konfiguratsioonis.

===Bash versioon===
<source lang="bash">
#!/bin/bash

# Skript, mis loeb läbi UNIX-i auth.log faili ja koostab IPTables block reeglid IP aadressidele,
# mille pealt on autentimine ebaõnnestunud vähemalt etteantud arv kordi

# käivitamise näide:
# sh check_ip.sh /var/log/auth.log /etc/iptables_blocked.txt

# Autor: Sigmar Muuga, DK31

# mitme ebaõnnestumise korral me IP blokeerime
BLOCK_LEVEL=5
# auth.log faili asukoht
AUTH_LOG_FILE=$1
# tüüpilised veasituatsioonid
ERROR_PATTERNS="error | illegal | not\ allowed"
# väljundfaili nimi (või asukoht)
IP_TABLES_FILE=$2

# kontrollime etteantud argumenti
if [ -z "$1" ]; then
echo "No command-line arguments."
exit 0
fi

if [ -z "$2" ]; then
echo "No IPTABLES file specified."
exit 0
fi

# kontrollime, et faili saaks kirjutada
touch "$IP_TABLES_FILE"
if [ -e $IP_TABLES_FILE ]; then
echo "IPTABLES file: "$IP_TABLES_FILE
else
echo "Cannot write IPTABLES file!"
exit 0
fi

# itereerime yle logiridade
more $AUTH_LOG_FILE | egrep "$ERROR_PATTERNS" | while read line; do
address=$(echo $line | grep -Eo '([0-9]{1,3}\.){3}[0-9]{1,3}')
# kas on valiidne IP
if [ ${#address} -gt 0 ]; then
# loeme esinevuskorrad
occurences=$(grep -c $address $AUTH_LOG_FILE)
if [ $occurences -ge $BLOCK_LEVEL ]; then # kui on juba piisavalt feilinud IP
added_occurences=$(grep -c $address $IP_TABLES_FILE)
#kontrollime, et poleks juba lisatud
if [ $added_occurences -lt 1 ]; then
echo "Blacklisting "$address" with "$occurences" occurences"
#kirjutame IPTABLES reegli
echo "iptables -A INPUT -s "$address" -j DROP" >> $IP_TABLES_FILE
fi
fi
fi
done
</source>
===Pythoni versioon===
<source lang="python">
#!/usr/bin/python
# -*- coding: latin-1 -*-

import sys
import getopt
import os
import re

# Skript, mis loeb läbi UNIX-i auth.log faili ja koostab IPTables block reeglid IP aadressidele,
# mille pealt on autentimine ebaõnnestunud vähemalt etteantud arv kordi

# käivitamise näide:
# py check_ip.py --logfile=/path/to/logfile --iptablesfile=/path/to/iptablesfile

# Autor: Sigmar Muuga, DK31

def main():
# mitme ebaõnnestumise korral me IP blokeerime
BLOCK_LEVEL=5

# kuvab kasutamise info
def usage():
print 'Programmi kasutamine:'
print 'py check_ip.py --logfile=/path/to/logfile --iptablesfile=/path/to/iptablesfile'

# loendab stringi esinemised etteantud failis
def matchCountInFile(str, filename):
log_file = open(filename, 'r')
count = 0
for line in log_file:
if re.search(str, line):
count=count+1
return count

try:
# loeme ja kontrollime getopti abil argumendid
opts, args = getopt.getopt(sys.argv[1:], "li:v", ["logfile=", "iptablesfile="])
AUTH_LOG_FILE = ''
IP_TABLES_FILE = ''
for opt, arg in opts:
if opt == '--logfile':
AUTH_LOG_FILE = arg
elif opt == '--iptablesfile':
IP_TABLES_FILE = arg

print 'AUTH_LOG_FILE=' + AUTH_LOG_FILE
print 'IP_TABLES_FILE=' + IP_TABLES_FILE

if AUTH_LOG_FILE.__len__() < 1:
raise Exception('Invalid auth log filename')
if IP_TABLES_FILE.__len__() < 1:
raise Exception('Invalid iptables filename')

if not os.path.isfile(AUTH_LOG_FILE):
raise Exception('Auth log file does not exist')

ip_pattern = re.compile('([0-9]{1,3}\.){3}[0-9]{1,3}')

# valmistame logifaili lugemiseks ette
log_file = open(AUTH_LOG_FILE, 'r')
ip_address_array = []
ip_tables_filehandle = None
# itereerime yle logiridade
for log_line in log_file:
# read, mis on veaga
if (re.search('error', log_line) != None or re.search('illegal', log_line) != None or re.search('not allowed', log_line) != None):
ip_address_match = re.search(ip_pattern, log_line)
if (ip_address_match == None):
continue
# leiame rea pealt IP aadressi
ip_address = ip_address_match.group(0)
occurences = matchCountInFile(ip_address, AUTH_LOG_FILE)
# vajadusel blacklistime
if occurences >= BLOCK_LEVEL and not ip_address in ip_address_array:
ip_address_array.append(ip_address)
print "Blacklisting " + ip_address + " with " + str(occurences) + " occurences"
if ip_tables_filehandle == None:
ip_tables_filehandle = open(IP_TABLES_FILE, 'w')
ip_tables_filehandle.write("iptables -A INPUT -s " + ip_address + " -j DROP\n")
log_file.close()

if (ip_tables_filehandle != None):
ip_tables_filehandle.close()

except getopt.GetoptError, err:
print str(err)
usage()
sys.exit(2)

# k2ivitame meetodi
if __name__ == "__main__":
main()
</source>

==Siim Kullerkupp AK21==

Skriptimiskeeled aine aruanded 2010 sügis

2011-01-23T01:23:15Z

Smuuga: /* Pythoni versioon */

[[Category: Skriptimiskeeled]]
=Siia tulevad kodus tehtud tööde lingid=

==Esitaja nimi==
*[[Skript, mis teeb maailma paremaks - BASH]]
*[[Skript, mis teeb maailma paremaks - Python]]
*[[Skript, mis teeb maailma paremaks - PowerShell]]
*[[Arvustused sellele skriptile]]
==Vabad ideed==
*[[Skript mis otsib üles turvaaukudega tarkvara]]

==Alvar Unuks AK41==
Suurima andmemahuga paketite leidmine

==Reget Kalamees DK21==
[[Skript otsib vabade Wifi AP-de hulgast kõige kiirema ühenduse ja haagib end selle külge]]

==Kaspar Prei==
[[Skript leiab dublikaat failid]]

==Lembit Elmik AK21==

Skript, mis kontrollib võrguühenduse olemasolu ning selle puudusel diagnoosib häda.
[[V6rgudiagnoosiskript]]

==Marko Valing==
*[[XML päringute sageduse kontroll - BASH]]

==Lauri Liibert AK21==
*[[Skript mis otsib üles failid mille poole ei ole ammu pöördutud]]

==Siim Liivand AK41==
Midagi mailiserveri logide põhjal?

==Sander Tuulik AK41==
Skript mis otsib kõik pildi,video,muusika,dokumendid ja jagab need kaustadesse.

==Kristjan Karmo AK41==
* [[Skript, mis teeb varukoopia WordPressi instantsist - BASH]]
* [[Skript, mis teeb varukoopia WordPressi instantsist - Python]]
* Skript, mis... - PowerShell

==Chris Sinihelm AK41==

==Nadežda Furs A31==

==Sigmar Muuga DK31==
Skript, mis vaatab /var/log/auth.log faili ja võtab sealt enim ebaõnnestunud IP aadressid, mis üritasid teha sisse logimist SSH kaudu(lävend võiks näiteks olla 10 ebaõnnestunud katset) ning saadab need kas e-mailile või lisab tulemüüri reeglitesse(IPTABLES näiteks).

Jah, ma tean, et on ka paremaid viise hoste blokeerida, näiteks kasutada hosts-allow parameetrit ssh konfiguratsioonis.

===Bash versioon===
<source lang="bash">
#!/bin/bash

# Skript, mis loeb läbi UNIX-i auth.log faili ja koostab IPTables block reeglid IP aadressidele,
# mille pealt on autentimine ebaõnnestunud vähemalt etteantud arv kordi

# käivitamise näide:
# sh check_ip.sh /var/log/auth.log /etc/iptables_blocked.txt

# Autor: Sigmar Muuga, DK31

# mitme ebaõnnestumise korral me IP blokeerime
BLOCK_LEVEL=5
# auth.log faili asukoht
AUTH_LOG_FILE=$1
# tüüpilised veasituatsioonid
ERROR_PATTERNS="error | illegal | not\ allowed"
# väljundfaili nimi (või asukoht)
IP_TABLES_FILE=$2

# kontrollime etteantud argumenti
if [ -z "$1" ]; then
echo "No command-line arguments."
exit 0
fi

if [ -z "$2" ]; then
echo "No IPTABLES file specified."
exit 0
fi

# kontrollime, et faili saaks kirjutada
touch "$IP_TABLES_FILE"
if [ -e $IP_TABLES_FILE ]; then
echo "IPTABLES file: "$IP_TABLES_FILE
else
echo "Cannot write IPTABLES file!"
exit 0
fi

# itereerime yle logiridade
more $AUTH_LOG_FILE | egrep "$ERROR_PATTERNS" | while read line; do
address=$(echo $line | grep -Eo '([0-9]{1,3}\.){3}[0-9]{1,3}')
# kas on valiidne IP
if [ ${#address} -gt 0 ]; then
# loeme esinevuskorrad
occurences=$(grep -c $address $AUTH_LOG_FILE)
if [ $occurences -ge $BLOCK_LEVEL ]; then # kui on juba piisavalt feilinud IP
added_occurences=$(grep -c $address $IP_TABLES_FILE)
#kontrollime, et poleks juba lisatud
if [ $added_occurences -lt 1 ]; then
echo "Blacklisting "$address" with "$occurences" occurences"
#kirjutame IPTABLES reegli
echo "iptables -A INPUT -s "$address" -j DROP" >> $IP_TABLES_FILE
fi
fi
fi
done
</source>
===Pythoni versioon===
<source lang="python">
#!/usr/bin/python
# -*- coding: latin-1 -*-

import sys
import getopt
import os
import re

# Skript, mis loeb läbi UNIX-i auth.log faili ja koostab IPTables block reeglid IP aadressidele,
# mille pealt on autentimine ebaõnnestunud vähemalt etteantud arv kordi

# käivitamise näide:
# python check_ip.py /var/log/auth.log /etc/iptables_blocked.txt

# Autor: Sigmar Muuga, DK31

def main():
# mitme ebaõnnestumise korral me IP blokeerime
BLOCK_LEVEL=5

# kuvab kasutamise info
def usage():
print 'Programmi kasutamine:'
print 'py check_ip.py --logfile=/path/to/logfile --iptablesfile=/path/to/iptablesfile'

# loendab stringi esinemised etteantud failis
def matchCountInFile(str, filename):
log_file = open(filename, 'r')
count = 0
for line in log_file:
if re.search(str, line):
count=count+1
return count

try:
# loeme ja kontrollime getopti abil argumendid
opts, args = getopt.getopt(sys.argv[1:], "li:v", ["logfile=", "iptablesfile="])
AUTH_LOG_FILE = ''
IP_TABLES_FILE = ''
for opt, arg in opts:
if opt == '--logfile':
AUTH_LOG_FILE = arg
elif opt == '--iptablesfile':
IP_TABLES_FILE = arg

print 'AUTH_LOG_FILE=' + AUTH_LOG_FILE
print 'IP_TABLES_FILE=' + IP_TABLES_FILE

if AUTH_LOG_FILE.__len__() < 1:
raise Exception('Invalid auth log filename')
if IP_TABLES_FILE.__len__() < 1:
raise Exception('Invalid iptables filename')

if not os.path.isfile(AUTH_LOG_FILE):
raise Exception('Auth log file does not exist')

ip_pattern = re.compile('([0-9]{1,3}\.){3}[0-9]{1,3}')

# valmistame logifaili lugemiseks ette
log_file = open(AUTH_LOG_FILE, 'r')
ip_address_array = []
ip_tables_filehandle = None
# itereerime yle logiridade
for log_line in log_file:
# read, mis on veaga
if (re.search('error', log_line) != None or re.search('illegal', log_line) != None or re.search('not allowed', log_line) != None):
ip_address_match = re.search(ip_pattern, log_line)
if (ip_address_match == None):
continue
# leiame rea pealt IP aadressi
ip_address = ip_address_match.group(0)
occurences = matchCountInFile(ip_address, AUTH_LOG_FILE)
# vajadusel blacklistime
if occurences >= BLOCK_LEVEL and not ip_address in ip_address_array:
ip_address_array.append(ip_address)
print "Blacklisting " + ip_address + " with " + str(occurences) + " occurences"
if ip_tables_filehandle == None:
ip_tables_filehandle = open(IP_TABLES_FILE, 'w')
ip_tables_filehandle.write("iptables -A INPUT -s " + ip_address + " -j DROP\n")
log_file.close()

if (ip_tables_filehandle != None):
ip_tables_filehandle.close()

except getopt.GetoptError, err:
print str(err)
usage()
sys.exit(2)

# k2ivitame meetodi
if __name__ == "__main__":
main()
</source>

==Siim Kullerkupp AK21==

Skriptimiskeeled aine aruanded 2010 sügis

2011-01-23T01:18:59Z

Smuuga: /* Sigmar Muuga DK31 */

[[Category: Skriptimiskeeled]]
=Siia tulevad kodus tehtud tööde lingid=

==Esitaja nimi==
*[[Skript, mis teeb maailma paremaks - BASH]]
*[[Skript, mis teeb maailma paremaks - Python]]
*[[Skript, mis teeb maailma paremaks - PowerShell]]
*[[Arvustused sellele skriptile]]
==Vabad ideed==
*[[Skript mis otsib üles turvaaukudega tarkvara]]

==Alvar Unuks AK41==
Suurima andmemahuga paketite leidmine

==Reget Kalamees DK21==
[[Skript otsib vabade Wifi AP-de hulgast kõige kiirema ühenduse ja haagib end selle külge]]

==Kaspar Prei==
[[Skript leiab dublikaat failid]]

==Lembit Elmik AK21==

Skript, mis kontrollib võrguühenduse olemasolu ning selle puudusel diagnoosib häda.
[[V6rgudiagnoosiskript]]

==Marko Valing==
*[[XML päringute sageduse kontroll - BASH]]

==Lauri Liibert AK21==
*[[Skript mis otsib üles failid mille poole ei ole ammu pöördutud]]

==Siim Liivand AK41==
Midagi mailiserveri logide põhjal?

==Sander Tuulik AK41==
Skript mis otsib kõik pildi,video,muusika,dokumendid ja jagab need kaustadesse.

==Kristjan Karmo AK41==
* [[Skript, mis teeb varukoopia WordPressi instantsist - BASH]]
* [[Skript, mis teeb varukoopia WordPressi instantsist - Python]]
* Skript, mis... - PowerShell

==Chris Sinihelm AK41==

==Nadežda Furs A31==

==Sigmar Muuga DK31==
Skript, mis vaatab /var/log/auth.log faili ja võtab sealt enim ebaõnnestunud IP aadressid, mis üritasid teha sisse logimist SSH kaudu(lävend võiks näiteks olla 10 ebaõnnestunud katset) ning saadab need kas e-mailile või lisab tulemüüri reeglitesse(IPTABLES näiteks).

Jah, ma tean, et on ka paremaid viise hoste blokeerida, näiteks kasutada hosts-allow parameetrit ssh konfiguratsioonis.

===Bash versioon===
<source lang="bash">
#!/bin/bash

# Skript, mis loeb läbi UNIX-i auth.log faili ja koostab IPTables block reeglid IP aadressidele,
# mille pealt on autentimine ebaõnnestunud vähemalt etteantud arv kordi

# käivitamise näide:
# sh check_ip.sh /var/log/auth.log /etc/iptables_blocked.txt

# Autor: Sigmar Muuga, DK31

# mitme ebaõnnestumise korral me IP blokeerime
BLOCK_LEVEL=5
# auth.log faili asukoht
AUTH_LOG_FILE=$1
# tüüpilised veasituatsioonid
ERROR_PATTERNS="error | illegal | not\ allowed"
# väljundfaili nimi (või asukoht)
IP_TABLES_FILE=$2

# kontrollime etteantud argumenti
if [ -z "$1" ]; then
echo "No command-line arguments."
exit 0
fi

if [ -z "$2" ]; then
echo "No IPTABLES file specified."
exit 0
fi

# kontrollime, et faili saaks kirjutada
touch "$IP_TABLES_FILE"
if [ -e $IP_TABLES_FILE ]; then
echo "IPTABLES file: "$IP_TABLES_FILE
else
echo "Cannot write IPTABLES file!"
exit 0
fi

# itereerime yle logiridade
more $AUTH_LOG_FILE | egrep "$ERROR_PATTERNS" | while read line; do
address=$(echo $line | grep -Eo '([0-9]{1,3}\.){3}[0-9]{1,3}')
# kas on valiidne IP
if [ ${#address} -gt 0 ]; then
# loeme esinevuskorrad
occurences=$(grep -c $address $AUTH_LOG_FILE)
if [ $occurences -ge $BLOCK_LEVEL ]; then # kui on juba piisavalt feilinud IP
added_occurences=$(grep -c $address $IP_TABLES_FILE)
#kontrollime, et poleks juba lisatud
if [ $added_occurences -lt 1 ]; then
echo "Blacklisting "$address" with "$occurences" occurences"
#kirjutame IPTABLES reegli
echo "iptables -A INPUT -s "$address" -j DROP" >> $IP_TABLES_FILE
fi
fi
fi
done
</source>
===Pythoni versioon===
<source lang="python">
#!/usr/bin/python
# -*- coding: latin-1 -*-

import sys
import getopt
import os
import re

# Skript, mis loeb läbi UNIX-i auth.log faili ja koostab IPTables block reeglid IP aadressidele,
# mille pealt on autentimine ebaõnnestunud vähemalt etteantud arv kordi

# käivitamise näide:
# python check_ip.py /var/log/auth.log /etc/iptables_blocked.txt

# Autor: Sigmar Muuga, DK31

def main():
# mitme ebaõnnestumise korral me IP blokeerime
BLOCK_LEVEL=5

def usage():
print 'Programmi kasutamine:'
print 'py check_ip.py --logfile=/path/to/logfile --iptablesfile=/path/to/iptablesfile'

def matchCountInFile(str, filename):
log_file = open(filename, 'r')
count = 0
for line in log_file:
if re.search(str, line):
count=count+1
return count

# kontrollime etteantud argumenti
try:
opts, args = getopt.getopt(sys.argv[1:], "li:v", ["logfile=", "iptablesfile="])
AUTH_LOG_FILE = ''
IP_TABLES_FILE = ''
for opt, arg in opts:
if opt == '--logfile':
AUTH_LOG_FILE = arg
elif opt == '--iptablesfile':
IP_TABLES_FILE = arg

print 'AUTH_LOG_FILE=' + AUTH_LOG_FILE
print 'IP_TABLES_FILE=' + IP_TABLES_FILE

if AUTH_LOG_FILE.__len__() < 1:
raise Exception('Invalid auth log filename')
if IP_TABLES_FILE.__len__() < 1:
raise Exception('Invalid iptables filename')
# poolik

if not os.path.isfile(AUTH_LOG_FILE):
raise Exception('Auth log file does not exist')

ip_pattern = re.compile('([0-9]{1,3}\.){3}[0-9]{1,3}')

log_file = open(AUTH_LOG_FILE, 'r')
ip_address_array = []
ip_tables_filehandle = None
for log_line in log_file:
if (re.search('error', log_line) != None or re.search('illegal', log_line) != None or re.search('not allowed', log_line) != None):
ip_address_match = re.search(ip_pattern, log_line)
if (ip_address_match == None):
continue
ip_address = ip_address_match.group(0)
occurences = matchCountInFile(ip_address, AUTH_LOG_FILE)
if occurences >= BLOCK_LEVEL and not ip_address in ip_address_array:
ip_address_array.append(ip_address)
print "Blacklisting " + ip_address + " with " + str(occurences) + " occurences"
if ip_tables_filehandle == None:
ip_tables_filehandle = open(IP_TABLES_FILE, 'w')
ip_tables_filehandle.write("iptables -A INPUT -s " + ip_address + " -j DROP\n")

log_file.close()

if (ip_tables_filehandle != None):
ip_tables_filehandle.close()

except getopt.GetoptError, err:
print str(err)
usage()
sys.exit(2)

if __name__ == "__main__":
main()
</source>

==Siim Kullerkupp AK21==

Skriptimiskeeled aine aruanded 2010 sügis

2011-01-16T23:47:04Z

Smuuga: /* Sigmar Muuga DK31 */

Skriptimiskeeled aine aruanded 2010 sügis

2011-01-16T23:41:52Z

Smuuga: /* Sigmar Muuga DK31 */

Meeskond "iTeam"

2010-12-19T08:41:48Z

Smuuga: /* 18.12.2010 - Terve tiim, "HackFest - Client MamboJambo" */

==Teema==

Projekt "'''iTanklad'''" (endine "Janu")

Soodsaimad bensiinihinnad sinu lähedal.

iTanklad on veebiteenus, mis tagastab küsijale tema lähedal asuvate tanklate viimased kütusehinnad.

Hindu on võimalik filtreerida kütuse tüübi ja / või asukoha ning kauguse järgi.

http://iteam.codeplex.com/

==Liikmed==
*Indrek Ilves
*Maarek Varres
*Rene Vahtel
*Sigmar Muuga

==Muudatused==

====18.12.2010 - Terve tiim, "HackFest - Client MamboJambo" ====

Ehitasime veebikliendi, millel on kaks funktsiooni.

1. Näitab igale kasutajale viimaseid hindu, ja laseb teostada kütusetüübi ja asukoha filtreeringut.

2. Laseb autoriseeritud kasutajal sisestada uue hinna valitud tanklale ja valitud kütusetüübile

Hindade vaatamine <br/>
[[File:screen_hinnad.jpg]]

Hindade sisestamine <br/>
[[File:screen_sisestamine.jpg]]

====27.11.2010 - Terve tiim, "HackFest continues"====

Saime tööle koordinaatide järgi lähimate hindade leidmise. Kasutasime algoritmi, mis on kirjas siin lehel: http://blog.wekeroad.com/2007/08/30/linq-and-geocoding/

Hetkel saab pärida viimaseid hindu bensiini nime, koordinaatide ja kauguse järgi.
Suurimaks mureks on praegu süsteemi optimaalsus. Oleks vaja kuidagi linq-ga see algoritm implementeerida.

[[File:Xmlsample1.jpg]]

Tänane hackfest kestis umbes neli tundi.
Linq keel on hetkel meile kõige segasem koht.

Täpsem info [http://iteam.codeplex.com/wikipage?title=XML%20n%C3%A4idis siit].

====06.11.2010 - Terve tiim====

Mõtlesime ringi teenuse sisu ja tegime andmemudeli. Teenuse sisuks on tanklakettide hinnad üle Eesti.

Andmeid saab pärida läbi andmebaasi vaate. Meie jõud ei käinud veel Linq-st paraku üle(kasutab group-by-d ja alampäringuid).

Andmemudelit näeb [http://iteam.codeplex.com/wikipage?title=Andmemudel siit].

====05.11.2010 - I vahefinish====

Presenteerisime tehtud tööd:
* [http://ii.pri.ee/files/college/vr2/janu/iteam.xml XML]
* [http://ii.pri.ee/files/college/vr2/janu/iteam.xsd XSD]
* [http://ii.pri.ee/files/college/vr2/janu/iteam.xsl XSL]
* [http://ii.pri.ee/files/college/vr2/janu/iteam.html HTML].

Tulemusi näeb [http://iteam.codeplex.com/wikipage?title=I%20vahefinish%20%28Januste%20teejuht%29 siit].

[[File:HtmlV2limus.png]]

====31.10.2010 - Sigmar====
Lisasin failid ära SVN-i. Saab paremini tiimitööd sünkida niimoodi.

====Ideed:====

Ideed: aadresside sektsioon peaks olema veidi universaalsem.
Võiks olla tag "<addresses>", mille alla siis saab teha nii palju "<address>" sektsioone kui vaja.
Kui mitme aadressi tuge ei tee, siis vähemalt peaks eristama aadressiga seotud andmed ära eraldi <address> tag-i vahele.

====Algsed Rene tehtud XML failid:====
* [http://iteam.codeplex.com/Project/Download/FileDownload.aspx?DownloadId=162178 XML]
* [http://iteam.codeplex.com/Project/Download/FileDownload.aspx?DownloadId=162179 XSL]
* [http://iteam.codeplex.com/Project/Download/FileDownload.aspx?DownloadId=162180 XSD]

File:Screen sisestamine.jpg

2010-12-19T08:39:47Z

Smuuga: Sisestamise screenshot

Sisestamise screenshot

Meeskond "iTeam"

2010-12-19T08:39:28Z

Smuuga:

==Teema==

Projekt "'''iTanklad'''" (endine "Janu")

Soodsaimad bensiinihinnad sinu lähedal.

iTanklad on veebiteenus, mis tagastab küsijale tema lähedal asuvate tanklate viimased kütusehinnad.

Hindu on võimalik filtreerida kütuse tüübi ja / või asukoha ning kauguse järgi.

http://iteam.codeplex.com/

==Liikmed==
*Indrek Ilves
*Maarek Varres
*Rene Vahtel
*Sigmar Muuga

==Muudatused==

====18.12.2010 - Terve tiim, "HackFest - Client MamboJambo" ====

Ehitasime veebikliendi, millel on kaks funktsiooni.
1. Näitab igale kasutajale viimaseid hindu, ja laseb teostada kütusetüübi ja asukoha filtreeringut.
2. Laseb autoriseeritud kasutajal sisestada uue hinna valitud tanklale ja valitud kütusetüübile
[[File:screen_hinnad.jpg]]

====27.11.2010 - Terve tiim, "HackFest continues"====

Saime tööle koordinaatide järgi lähimate hindade leidmise. Kasutasime algoritmi, mis on kirjas siin lehel: http://blog.wekeroad.com/2007/08/30/linq-and-geocoding/

Hetkel saab pärida viimaseid hindu bensiini nime, koordinaatide ja kauguse järgi.
Suurimaks mureks on praegu süsteemi optimaalsus. Oleks vaja kuidagi linq-ga see algoritm implementeerida.

[[File:Xmlsample1.jpg]]

Tänane hackfest kestis umbes neli tundi.
Linq keel on hetkel meile kõige segasem koht.

Täpsem info [http://iteam.codeplex.com/wikipage?title=XML%20n%C3%A4idis siit].

====06.11.2010 - Terve tiim====

Mõtlesime ringi teenuse sisu ja tegime andmemudeli. Teenuse sisuks on tanklakettide hinnad üle Eesti.

Andmeid saab pärida läbi andmebaasi vaate. Meie jõud ei käinud veel Linq-st paraku üle(kasutab group-by-d ja alampäringuid).

Andmemudelit näeb [http://iteam.codeplex.com/wikipage?title=Andmemudel siit].

====05.11.2010 - I vahefinish====

Presenteerisime tehtud tööd:
* [http://ii.pri.ee/files/college/vr2/janu/iteam.xml XML]
* [http://ii.pri.ee/files/college/vr2/janu/iteam.xsd XSD]
* [http://ii.pri.ee/files/college/vr2/janu/iteam.xsl XSL]
* [http://ii.pri.ee/files/college/vr2/janu/iteam.html HTML].

Tulemusi näeb [http://iteam.codeplex.com/wikipage?title=I%20vahefinish%20%28Januste%20teejuht%29 siit].

[[File:HtmlV2limus.png]]

====31.10.2010 - Sigmar====
Lisasin failid ära SVN-i. Saab paremini tiimitööd sünkida niimoodi.

====Ideed:====

Ideed: aadresside sektsioon peaks olema veidi universaalsem.
Võiks olla tag "<addresses>", mille alla siis saab teha nii palju "<address>" sektsioone kui vaja.
Kui mitme aadressi tuge ei tee, siis vähemalt peaks eristama aadressiga seotud andmed ära eraldi <address> tag-i vahele.

====Algsed Rene tehtud XML failid:====
* [http://iteam.codeplex.com/Project/Download/FileDownload.aspx?DownloadId=162178 XML]
* [http://iteam.codeplex.com/Project/Download/FileDownload.aspx?DownloadId=162179 XSL]
* [http://iteam.codeplex.com/Project/Download/FileDownload.aspx?DownloadId=162180 XSD]

File:Screen hinnad.jpg

2010-12-19T08:38:12Z

Smuuga:

VR II: projektide meeskonnad 2010 sügis, kaugõpe

2010-11-26T23:44:14Z

Smuuga: /* Meeskond "iTeam" */

=[[Meeskond "Khuul"]]=
==Teema==
Näljaste teejuht - kohviku menüü
[ajaveebi aadress:]

==Liikmed==
*Jaan Igamees
*Ivan Ivanov
*John Smith

=[[Meeskond "iTeam"]]=
==Teema==
Januste teejuht - Soodsaimad diilid (aka õlled) sinu lähedal

http://iteam.codeplex.com/

===Liikmed===
*Indrek Ilves
*Maarek Varres
*Rene Vahtel
*Sigmar Muuga

Project "Bensiin" (endine "Janu")
Meeskond "iTeam"
Eesti Infotehnoloogia Kolledž

Lähimad bensiinihinnad sinu lähedal.

====27.11.2010 - Terve tiim, "HackFest continues"====

Saime tööle koordinaatide järgi lähimate hindade leidmise. Kasutasime algoritmi, mis on kirjas siin lehel: http://blog.wekeroad.com/2007/08/30/linq-and-geocoding/

Hetkel saab pärida viimaseid hindu bensiini nime, koordinaatide ja kauguse järgi.
Suurimaks mureks on praegu süsteemi optimaalsus. Oleks vaja kuidagi linq-ga see algoritm implementeerida.

XML näidis: [[File:http://iteam.codeplex.com/wikipage?title=XML%20n%C3%A4idis]]

Tänane hackfest kestis umbes neli tundi.
Linq keel on hetkel meile kõige segasem koht.

====6.11.2010 - Terve tiim====

Mõtlesime ringi teenuse sisu ja tegime andmemudeli. Teenuse sisuks on tanklakettide hinnad üle Eesti.

Andmeid saab pärida läbi andmebaasi vaate. Meie jõud ei käinud veel Linq-st paraku üle(kasutab group-by-d ja alampäringuid).

Andmemudelit näeb [siit url="http://iteam.codeplex.com/wikipage?title=Andmemudel"]

====31.10.2010 - Sigmar====
Lisasin failid ära SVN-i. Saab paremini tiimitööd sünkida niimoodi.

====Ideed:====

Ideed: aadresside sektsioon peaks olema veidi universaalsem.
Võiks olla tag "<addresses>", mille alla siis saab teha nii palju "<address>" sektsioone kui vaja.
Kui mitme aadressi tuge ei tee, siis vähemalt peaks eristama aadressiga seotud andmed ära eraldi <address> tag-i vahele.

====Algsed Rene tehtud XML failid:====
* XML http://iteam.codeplex.com/Project/Download/FileDownload.aspx?DownloadId=162178
* XSL http://iteam.codeplex.com/Project/Download/FileDownload.aspx?DownloadId=162179
* XSD http://iteam.codeplex.com/Project/Download/FileDownload.aspx?DownloadId=162180

=[[Meeskond "Teine"]]=
==Teema==
Ilmajaam

http://vr2ilmajaam2010.codeplex.com

==Liikmed==
*Sander Pikhoff
*Ojar Kristal
*Peeter Lump

=[[Meeskond "Meie menüü"]]=
==Teema==
Kohviku menüü

http://www.meiemenyy.blogspot.com/

==Liikmed==
*Elo Üle
*Vivika Veski
*Reet Raud
*Margus Neider

=[[Meeskond "i-menu"]]=
==Teema==
menüü
[http://i-menu.blogspot.com/ i-menu blog]

==Liikmed==
*Mart Potter
*Margus Mihkelsoo
*Valter Kitsberg

VR II: projektide meeskonnad 2010 sügis, kaugõpe

2010-11-26T23:34:00Z

Smuuga: /* Meeskond "iTeam" */

=[[Meeskond "Khuul"]]=
==Teema==
Näljaste teejuht - kohviku menüü
[ajaveebi aadress:]

==Liikmed==
*Jaan Igamees
*Ivan Ivanov
*John Smith

=[[Meeskond "iTeam"]]=
==Teema==
Januste teejuht - Soodsaimad diilid (aka õlled) sinu lähedal

http://iteam.codeplex.com/

==Liikmed==
*Indrek Ilves
*Maarek Varres
*Rene Vahtel
*Sigmar Muuga

Project "Janu"
Meeskond "iTeam"
Eesti Infotehnoloogia Kolledž

Lähimad bensiinihinnad sinu lähedal.

==27.11.2010 - Terve tiim, HackFest continues==

Saime tööle koordinaatide järgi lähimate hindade leidmise. Kasutasime algoritmi, mis on kirjas siin lehel: http://blog.wekeroad.com/2007/08/30/linq-and-geocoding/

==6.11.2010 - Terve tiim==

Mõtlesime ringi teenuse sisu ja tegime andmemudeli. Teenuse sisuks on tanklakettide hinnad üle Eesti.

Andmemudelit näeb [siit url="http://iteam.codeplex.com/wikipage?title=Andmemudel"]

==31.10.2010 - Sigmar==
Lisasin failid ära SVN-i. Saab paremini tiimitööd sünkida niimoodi.

==Ideed:==

Ideed: aadresside sektsioon peaks olema veidi universaalsem.
Võiks olla tag "<addresses>", mille alla siis saab teha nii palju "<address>" sektsioone kui vaja.
Kui mitme aadressi tuge ei tee, siis vähemalt peaks eristama aadressiga seotud andmed ära eraldi <address> tag-i vahele.

==Algsed Rene tehtud XML failid:==
XML http://iteam.codeplex.com/Project/Download/FileDownload.aspx?DownloadId=162178
XSL http://iteam.codeplex.com/Project/Download/FileDownload.aspx?DownloadId=162179
XSD http://iteam.codeplex.com/Project/Download/FileDownload.aspx?DownloadId=162180

=[[Meeskond "Teine"]]=
==Teema==
Ilmajaam

http://vr2ilmajaam2010.codeplex.com

==Liikmed==
*Sander Pikhoff
*Ojar Kristal
*Peeter Lump

=[[Meeskond "Meie menüü"]]=
==Teema==
Kohviku menüü

http://www.meiemenyy.blogspot.com/

==Liikmed==
*Elo Üle
*Vivika Veski
*Reet Raud
*Margus Neider

=[[Meeskond "i-menu"]]=
==Teema==
menüü
[http://i-menu.blogspot.com/ i-menu blog]

==Liikmed==
*Mart Potter
*Margus Mihkelsoo
*Valter Kitsberg

Skriptimiskeeled aine aruanded 2010 sügis

2010-10-30T11:30:50Z

Smuuga: /* Sigmar Muuga DK31 */

Skriptimiskeeled aine aruanded 2010 sügis

2010-10-30T11:29:52Z

Smuuga: /* Sigmar Muuga DK31 */

Skriptimiskeeled aine aruanded 2010 sügis

2010-10-30T11:29:31Z

Smuuga: /* Sigmar Muuga DK31 */

Skriptimiskeeled aine aruanded 2010 sügis

2010-10-30T11:27:20Z

Smuuga: