User:Osoom: Difference between revisions
From ICO wiki
Jump to navigationJump to search
Line 106: | Line 106: | ||
<source lang="powershell"> | <source lang="powershell"> | ||
################################################################################################ | |||
# | |||
# | |||
# | |||
# | |||
# | |||
# | |||
################################################################################################# | |||
#Sisestame vajaliku informatsiooni | #Sisestame vajaliku informatsiooni | ||
#Siin osas küsitakse asukohta, kust vastavaid faile hakatakse otsima. | |||
$a = Read-Host "Vali kaust" | $a = Read-Host "Vali kaust" | ||
#Väljastatakse kasutajale, kontrolli mõttes, asukoht, kust hakatakse faile otsima | |||
Write-Host "Sinu valitud kaustaks on $a" | Write-Host "Sinu valitud kaustaks on $a" | ||
#Kuupäev väljastuse formaadi muutmine. | |||
$DATE=Get-Date -format d | $DATE=Get-Date -format d | ||
#Pealkiri leitud failidele | |||
Write-Host 'Siin on sinu kaustade sisu' | Write-Host 'Siin on sinu kaustade sisu' | ||
#Otsime üles vastavad failid. | #Otsime üles vastavad failid. | ||
$P = Get-ChildItem -Include *.WAV,*.flac,*.mp3,*.wmv -Recurse $a | $P = Get-ChildItem -Include *.WAV,*.flac,*.mp3,*.wmv -Recurse $a | ||
# | |||
$format = @{Expression={[int]($_.Length)/1000000}; Label="Suurus(MB)";} | $format = @{Expression={[int]($_.Length)/1000000}; Label="Suurus(MB)";} | ||
#Listi väljastamisel, muudetakse pealkiri "NAME" ära | |||
$name = @{Expression={$_.Name}; Label="Helifaili nimi"} | $name = @{Expression={$_.Name}; Label="Helifaili nimi"} | ||
#Siin | |||
$Files= $P | Sort-Object Name | where {$_.Length -ge 1MB} | Format-Table $name, $format | $Files= $P | Sort-Object Name | where {$_.Length -ge 1MB} | Format-Table $name, $format | ||
#Väljastab listi failidest | #Väljastab listi failidest | ||
echo $Files | echo $Files | ||
Revision as of 17:06, 27 November 2011
Siinkohal tuleb mainida, et siin skripti juures on kasutatud pisikest koodijuppi Ivar Krustoki skriptist, mis kontrollib, kas pakk on paigaldatud, või ei.
Link skripti juurde
Questi skript nr. 35
#!bin/bash
#Autor Oliver Soom
#Versioon 0.1
# Skript, mis paneb ubuntu serveri kasutajale e-posti saatma, kui tuleb uusi uuendusi.
# Pausi funktsioon
function pause(){
read -p "$*"
}
#Kontrollib kas kasutajal on juurkasutaja õigused
if [ $UID -ne 0 ]; then
echo "Käivita antud skripti $(basename $0) juurkasutaja õigustes"
exit 1
fi
#Kontrollib kas apticron on paigaldatud
TARK=`/usr/bin/apt-cache policy apticron | grep Installed | awk '{print $2}'`
if [ "$TARK" == "(none)" ]; then
echo "Apticron pole paigaldatud"
echo "Soovid seda paigaldada: Jah(y) Ei(n) "
read RESPONSE
if [ $RESPONSE == 'y' ]; then
sudo apt-get install apticron
echo 'Apticron on paigaldatud '
pause 'Jätkamiseks vajuta ENTERIT....'
elif [ $RESPONSE == 'n' ]; then
echo 'Kui pole vaja, siis pole vaja'
echo 'Väljun'
exit 0
#Viskab välja, kui ei taha programmi paigaldada
fi
fi
#Paketi kontrolli lõpp
#Sisesta informatsiooni email
echo 'Siseta emaili aadress, kuhu tahad saada infot uuenduste kohta'
read MAIL
#Muudab ära conf failis emaili aadressi
sed -i -e 's/EMAIL=.*/EMAIL="'$MAIL'"/' /etc/apticron/apticron.conf
echo 'Email on muudetud'
echo 'Oli tore näha, nägemist'
exit 1
Bashi arvestus
Valmistada skript, mis kopeerib failid/kaustad üle ssh kusagilt kuhugi, ning peale md5sum cheki kustutab ära kopeeritud asjad kusagilt.
#!/bin/bash
#Autor: Oliver Soom
#Versioon 0.1 aka project Spiderman
#Versioom * aka project Dr. Octavious
#Ole valmis parooli kirjutama
#Skripti idee on ssh abil genereerida md5sum, siis scp abil kopeerida failid üle, ning kui kõik on korras, tuleb ssh abil üle kopeeritud failidega kas
#st ära kustutada.
#Mail: osoom äti märk itcollege.ee
#Kontrollib, kas on olemas rooti õigused;
if [ $UID -ne 0 ]; then
echo 'Sa ei ole seda skripti käivitanud root õigustes'
exit 1
fi
#Kui õigused on olemas, siis uuritakse, kas on olemas openssh pakett
SSH=`/usr/bin/apt-cache policy openssh-client | grep Installed | awk '{print $2}'`
echo 'Kontrollime, kas vajalikud pakid on olemas.'
if [ $SSH == '(none)' ]; then
apt-get install openssh-client -y
else
echo 'Antud pakk on olemas'
fi
#Kasutaja sisestab koha remote arvutis, kust ta tahab failid kopeerida.
echo 'Sisesta directory/kaust, mille sisu tahad alla tõmmata'
read DIR
#Kasutaja sisestab remote hosti parameetrid
echo 'Sisesta hosti nimi'
read HOSTN
echo 'Siseta hosti aadress(xxx.xxx.xxx.xxx)'
read AADR
#SSh abil arvutisse sissesaanuna, genereeritakse md5sum kontroll fail nimega koer1.md5. Nime võib ise ära muuta.
ssh $HOSTN@$AADR 'cd '$DIR'; md5sum * > koer1.md5; ls -l; exit'
echo 'Sisesta kaust, kuhu tahad failid laadida /minu/lemmik/kaust'
read HDIR
#Failide üle kopeerimine, nii, et nende õigused säilivad
scp -p --preserve $HOSTN@$AADR:$DIR/* $HDIR
cd $HDIR
#Kontrollime, kas failid on samad ja korras.
echo 'Kontrollime, kas failid on korras '
md5sum -c koer1.md5 > check.txt
RES=`grep -c FAILED check.txt`
if [ $RES -eq "0" ]; then
echo 'Failid olid korras'
rm koer1.md5
ssh $HOSTN@$AADR 'rm -r '$DIR''
else
echo 'Mingi error'
ssh $HOSTN@$AADR 'cd '$DIR'; rm koer1.md5'
exit 1
fi
Powershelli kodutöö
Skript, mis otsib etteantud asukohast ülesse nelja tüüpi helifailid (flac, mp3, WAV, wmv), mis on suuremad kui 1 MB, ning teeb nendest listi. Edasi tehakse list tekstifaili, mis saab nimeks "Kuupäev.txt". Ning siis saadetakse fail emailiga sinna, kuhu ta vaja on saata.
################################################################################################
#
#
#
#
#
#
#################################################################################################
#Sisestame vajaliku informatsiooni
#Siin osas küsitakse asukohta, kust vastavaid faile hakatakse otsima.
$a = Read-Host "Vali kaust"
#Väljastatakse kasutajale, kontrolli mõttes, asukoht, kust hakatakse faile otsima
Write-Host "Sinu valitud kaustaks on $a"
#Kuupäev väljastuse formaadi muutmine.
$DATE=Get-Date -format d
#Pealkiri leitud failidele
Write-Host 'Siin on sinu kaustade sisu'
#Otsime üles vastavad failid.
$P = Get-ChildItem -Include *.WAV,*.flac,*.mp3,*.wmv -Recurse $a
#
$format = @{Expression={[int]($_.Length)/1000000}; Label="Suurus(MB)";}
#Listi väljastamisel, muudetakse pealkiri "NAME" ära
$name = @{Expression={$_.Name}; Label="Helifaili nimi"}
#Siin
$Files= $P | Sort-Object Name | where {$_.Length -ge 1MB} | Format-Table $name, $format
#Väljastab listi failidest
echo $Files
#Saadab listi faili
$ToFile= $Files | Out-File $a/$DATE.txt -Width 45
#Saadame meili koos koostatud listifailiga.
$MessageParameters = @{
From = "from@mail.com"
To = "to@mail.com"
Subject = "Muusika list"
Body = "Tere, saadan muusika failide loendi seisuga $DATE. parimat"
SmtpServer = "mail.aadress.com"
Attachments = "$a/$DATE.txt"
}
Send-MAilMessage @MessageParameters
echo "E-mail on saadetud"
Pythoni töö
Pythoni baasil main.cpp programm OpenCV pildi töötluseks.