User:Osoom: Difference between revisions

From ICO wiki
Jump to navigationJump to search
 
(10 intermediate revisions by the same user not shown)
Line 1: Line 1:
Siinkohal tuleb mainida, et siin skripti juures on kasutatud pisikest koodijuppi Ivar Krustoki skriptist, mis kontrollib, kas pakk on paigaldatud, või ei.<br> [https://wiki.itcollege.ee/index.php/User:Ikrustok Link skripti juurde]<br>
Siinkohal tuleb mainida, et siin skripti juures on kasutatud pisikest koodijuppi Ivar Krustoki skriptist, mis kontrollib, kas pakk on paigaldatud, või ei.<br> [https://wiki.itcollege.ee/index.php/User:Ikrustok Link skripti juurde]<br>
<b>Questi skript nr. 35</b>
<b>Questi skript nr. 35</b>
<source lang="bash">
  #!bin/bash  
  #!bin/bash  
  #Autor Oliver Soom  
  #Autor Oliver Soom  
Line 40: Line 41:
  echo 'Oli tore näha, nägemist'
  echo 'Oli tore näha, nägemist'
  exit 1
  exit 1
</source>


===Bashi arvestus===
Valmistada skript, mis kopeerib failid/kaustad üle ssh kusagilt kuhugi, ning peale md5sum cheki kustutab ära kopeeritud asjad kusagilt.
<source lang="bash">
#!/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


===Bashi arvestus===
#Kui õigused on olemas, siis uuritakse, kas on olemas openssh pakett
Valmistada skript, mis kopeerib failid/kaustad üle ssh kusagilt kuhugi, ning peale md5sum cheki kustutab ära kopeeritud asjad
SSH=`/usr/bin/apt-cache policy openssh-client | grep Installed | awk '{print $2}'`
ToDo


#Loob ssh ühenduse, etteandes talle parameetrid
echo 'Kontrollime, kas vajalikud pakid on olemas.'
#ühendus loodud, kopeerib antud kataloogi sisu üle ssh localisse
#kui md5checksum töötab, annab ksututab kasuta, mida kopeeriti, ühenduse kasutast
#panna skritp tööle, mingi intervalli tagant


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
</source>


===Powershelli kodutöö===  
===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.
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.
<source lang="powershell">
#################################################################################################
#Nimi:Muusika failide otsija                                                                    #
#Autor:Oliver Soom                                                                              #
#Eesmärk:Otsida vastavast asukohast üles helifailid, mis laiendiga .WAV, .flac ,.mp3, .wmv,ning #
#mille suurus on 1 Megabait, või suurem. Saadud nimekiri pannakse tekstifaili, ning saadetakse  #                                                                           
#meiliga, sinna kuhu on määratud.                                                              #
#                                                                                              #
#                                                                                              #
#################################################################################################
#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 kasutaja poolt valitud kaustast. 
$P = Get-ChildItem -Include *.WAV,*.flac,*.mp3,*.wmv -Recurse $a
#Nimekirja päise muutmine.
##Nimekirja väljastamisel muudetakse ära tulp nimega Length ära
##Suurus(MB)'ks. 
$format = @{Expression={[int]($_.Length)/1000000}; Label="Suurus(MB)";}
##Nimekirja väljastamisel, muudetakse ära tulp Name ära Helifaili nimi'ks
$name = @{Expression={$_.Name}; Label="Helifaili nimi"}
##Siin sorteeritakse välja failid(Nime järgi suuruse järgi(1MB või suurem)) ning, eelpool muudetud tulba nimedega
$Files= $P | Sort-Object Name | where {$_.Length -ge 1MB} | Format-Table $name, $format
#Väljastab listi muusikafailidest
echo $Files
#Teeb saadud nimekirjast tekstifaili. Muutes veel kahe tabeli ridade suurust.
$ToFile= $Files | Out-File $a/$DATE.txt -Width 45
#Saadame meili koos koostatud listifailiga.
$MessageParameters = @{
#Kellelt fail on tulnud
From = "from@mail.com"
#Kellele fail saadetakse
To = "to@mail.com"
#Pealkiri
Subject = "Muusika list"
#Meili sisu
Body = "Tere, saadan muusika failide loendi seisuga $DATE. parimat"
#Meiliserveri aadress
SmtpServer = "mail.aadress.com"
#Manus, milleks siinpuhul on failide nimekiri
Attachments = "$a/$DATE.txt"
#Saadame meili teele
Send-MailMessage @MessageParameters
#Meil on saadetud
echo "E-mail on saadetud"
</source>


===Pythoni töö===
===Pythoni töö===


Pythoni baasil main.cpp programm, mis koosneb opencv pealepanekust koos opencv-ga ja c++ to python
Pythoni baasil main.cpp programm OpenCV pildi töötluseks.

Latest revision as of 19:26, 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.

#################################################################################################
#Nimi:Muusika failide otsija                                                                    #
#Autor:Oliver Soom                                                                              #
#Eesmärk:Otsida vastavast asukohast üles helifailid, mis laiendiga .WAV, .flac ,.mp3, .wmv,ning #
#mille suurus on 1 Megabait, või suurem. Saadud nimekiri pannakse tekstifaili, ning saadetakse  #                                                                            
#meiliga, sinna kuhu on määratud.                                                               #
#                                                                                               #
#                                                                                               #
#################################################################################################
#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 kasutaja poolt valitud kaustast.  
$P = Get-ChildItem -Include *.WAV,*.flac,*.mp3,*.wmv -Recurse $a
#Nimekirja päise muutmine.
##Nimekirja väljastamisel muudetakse ära tulp nimega Length ära
##Suurus(MB)'ks.   
$format = @{Expression={[int]($_.Length)/1000000}; Label="Suurus(MB)";} 
##Nimekirja väljastamisel, muudetakse ära tulp Name ära Helifaili nimi'ks
$name = @{Expression={$_.Name}; Label="Helifaili nimi"}
##Siin sorteeritakse välja failid(Nime järgi suuruse järgi(1MB või suurem)) ning, eelpool muudetud tulba nimedega 
$Files= $P | Sort-Object Name | where {$_.Length -ge 1MB} | Format-Table $name, $format 

#Väljastab listi muusikafailidest
echo $Files

#Teeb saadud nimekirjast tekstifaili. Muutes veel kahe tabeli ridade suurust. 
$ToFile= $Files | Out-File $a/$DATE.txt -Width 45 

#Saadame meili koos koostatud listifailiga.
$MessageParameters = @{
#Kellelt fail on tulnud
From = "from@mail.com" 
#Kellele fail saadetakse
To = "to@mail.com" 
#Pealkiri
Subject = "Muusika list" 
#Meili sisu
Body = "Tere, saadan muusika failide loendi seisuga $DATE. parimat" 
#Meiliserveri aadress
SmtpServer = "mail.aadress.com" 
#Manus, milleks siinpuhul on failide nimekiri
Attachments = "$a/$DATE.txt" 
}  
#Saadame meili teele
Send-MailMessage @MessageParameters 
#Meil on saadetud
echo "E-mail on saadetud"

Pythoni töö

Pythoni baasil main.cpp programm OpenCV pildi töötluseks.