Przydatne proste skrypty dla linuxa

Nadesłał 07-09-2003 Robert Jaroszuk <zim@iq,pl>

export IFS="
"
for file in *; do mv ${file} `echo ${file} | tr "A-Z" "a-z"`; done
export IFS="
"
for file in *; do mv ${file} `echo ${file} | tr "a-z" "A-Z"`; done
#!/usr/bin/perl -w

die "ARGV?" unless ($#ARGV+1);

for $i (@ARGV)
{
   $j="\L$i";
   unless ($i eq $j) {
       system "mv", "$i", "$j";
   }
}
for stary in *.HTM ; do
  nowy="$(echo $stary | tr '[:upper:]' '[:lower:]')"
  mv "$stary" "$nowy"
done
for stary in *.HTM ; do
  nowy="$(echo $stary | tr '[:lower:]' '[:upper:]')"
  mv "$stary" "$nowy"
done
 rename 'y/A-Z/a-z/' *
 rename 'y/a-z/A-Z/' *
find ./ -type f -exec rename 's/ /_/g' {} \;
for i in *\ * ; do mv "$i" "${i//\ /_}" ; done
find . -name "* *" | while read; do
  mv "$REPLY" "${REPLY// /_}"
done
for i in `find katalog_z_plikami_htm -name '*.htm'`; do mv "$i" "${i}l"; done
for a in *.htm; do mv $a `basename $a .htm`.html; done
mmv \*.htm #1.html
rename 's/\.htm$/.html/' *.htm
perl -pi -e 's/wzorzec/zamiennik/g' *.html
find -name '*.html' |xargs perl -pi -e 's/wzorzec/zamiennik/g'
find . -name '*.html' |xargs perl -pi -e 's{\Q<script src=..\..\E}{ }g'
for f in "`find . -name '*.html'`"; do 
	sed -e 's/wzorzec/zamiennik/g' "$f" > /tmp/tymczas; 
	mv /tmp/tymczas "$f";
done
find -name '*.html' | while read; do
  perl -i -pe 's/wzorzec/zamiennik/g' "$REPLY"
done
sed 's/wzorzec/zamiennik/g' < plik.do.zmiany > plik.po.zmianie
cat plik.do.zmiany |sed 's/wzorzec/zamiennik/g' > plik.po.zmianie
cat plik.do.zmiany | sed "s/wzorzec1/zamiennik1/g;s/wzorzec2/zamiennik2/g;s/wzorzec3/zamiennik3/g" > plik.po.zmianie
cat plik.do.zmiany | sed -e s/wzorzec1/zamiennik1/g -e s/wzorzec2/zamiennik2/g -e s/wzorzec3/zamiennik3/g > plik.po.zmianie
for f in $(grep -r tekst * | grep -v "~" | cut -f 1 -d ":" | uniq); do 
vim -c "%s/tekst/drugitekst/g" -c "wq" $f;done
cat plik | sed -e 's/^0*//' > plik2
find / -type f -name plik | grep plik > plik.txt
locate plik
whereis nazwa_polecenia
which nazwa_programu
type nazwa
~$ type ls
ls is aliased to `/usr/bin/ls $LS_OPTIONS'
~$ type ls
ls is aliased to `ls --color=auto'
~$ type ls
ls is /usr/xpg4/bin/ls
~$ type l
l is an alias for 'ls -l'
grep -r -H wyrazenie *
find . -name "*.html" -exec grep -H wyraz {} \;
find /www -type f -exec grep -H -i string {} \;
wzorzec="/home/croopnick/wzorzec.txt"
katalog="/home/zosia/pliki/"
for znaleziony in `find $katalog -type f`; do
 if cmp "$znaleziony" "$wzorzec"; then
  echo "$znaleziony pasuje do wzorca"
 fi
done
#!/bin/sh

if [ $# -lt 2 ] ; then 
 echo "parametry: katalog wzorzec"
 exit 1
fi
wzorzec="$2"
katalog="$1" 
for znaleziony in `find $katalog -type f`; do
        if cmp "$znaleziony" "$wzorzec" >/dev/null; then
                echo "$znaleziony pasuje do wzorca"
        fi
done
#!/bin/sh

dir=/
temp=`mktemp`
ilekat=0
ileplik=0
ile=0
xplik=0
rplik=0
wplik=0
xkat=0
rkat=0
wkat=0

if test "$1" = "-help"
then
echo prawa [-f][-d][katalog]
echo skrypt oblicza ilosc plikow i katalogow rekurencyjnie z podkatalogami od podanego katalogu
echo i wyswietla ilosc plikow i katalogow z danymi prawami r,w,x dla zalogowanego uzytkownika
echo -f wyswietlaj statystyke dla plikow
echo -d wyswietlaj statystyke dla katalogow
elif test $# -eq 0
then
echo brak parametrow
elif test $# -gt 3
then
echo za duzo parametrow
elif test "$1" != "-d" && test "$1" != "-f"
then
echo nieznany parametr $1
elif test $# -eq 2 && test ! -d $2 && test "$2" != "-f" && test "$2" != "-d"
then
echo bledny parametr
elif test "$2" != "-d" && test "$2" != "-f" && test "$2" != "" && test ! -d $2 
then
echo nieznany parametr $2
elif test $# -eq 3 && test -d $2 && test -d $3
then
echo bledne parametry
elif test $# -eq 3 && test !  -d $3
then 
echo $3 nie jest katalogiem

else
if test -d $3
then
dir=$3
fi
if test -d $2
then
dir=$2
fi

find $dir -name '*' -print > $temp 

while read a 
do

ile=`expr $ile + 1`
if test  -d $a 
then

ilekat=`expr $ilekat + 1`
if test -x $a
then
xkat=`expr $xkat + 1`
fi
if test -r $a
then
rkat=`expr $rkat + 1`
fi
if test -w $a
then
wkat=`expr $wkat + 1`
fi

else
ileplik=`expr $ileplik + 1`

if test -x $a
then
xplik=`expr $xplik + 1`
fi
if test -r $a
then
rplik=`expr $rplik + 1`
fi
if test -w $a
then
wplik=`expr $wplik + 1`
fi

fi

done < $temp

if test "$1" = "-f" || test "$2" = "-f"
then
echo przeanalizowanych plikow: $ileplik
echo ilosc plikow wykonywalnych: $xplik
echo ilosc plikow do odczytu: $rplik
echo ilosc plikow do pisania: $wplik
fi
if test "$1" = "-d" || test "$2" = "-d"
then
echo przeanalizowanych katalogow: $ilekat
echo ilosc katalogow z prawem wykonywania: $xkat
echo ilosc katalogow z prawem do odczytu: $rkat
echo ilosc katalogow z prawem do zapisu: $wkat
fi
fi 
apropos słowo_kluczowe
man -k słowo_kluczowe
find . -name plik -exec rm {} \; -print
find . -type f -name plik -print | xargs rm
find . -type f -name plik -print | sed 's/^/"/' | sed 's/$/"/' | xargs rm
wc -l plik
find . -type f -maxdepth 10 | wc -l
ls -l| grep ^d| wc -l
ls -lAR| grep ^d| wc -l
ls -laR | grep ^d | awk '{print $9}' | egrep -v '^\.{1,2}$' | wc -l
find . -type d | wc -l
find . -type d | egrep -v '^\.{1,2}$' | wc -l
#v+
for FILE in /etc/*version /etc/*release /etc/*issue; do
  test -e "$FILE" || continue
  echo "$FILE" | sed -e 's/.$version\|release$$//' -e 's,^/etc/,,'
  cat "$FILE"
done
#v-
tar zxvf plik.tar.gz [lub plik.tgz]
tar zcvf plik.tar.gz plik1 plik2 plik3 ... plikN
tar lxvf plik.tar.bz2 [lub plik.tbz2]
tar lcvf plik.tar.bz2 plik1 plik2 plik3 ... plikN
wget -m -nv -k -K -E -nH -p -np --cut-dirs=1 -t 1000 -D wbc.lublin.pl -o $HOME/logiwget/logchemfanpl -P $HOME/web/chemia http://znik.wbc.lublin.pl/ChemFan/
# MIN HOUR DAY MONTH DAYOFWEEK COMMAND

05 21 * * * $HOME/skr/mirror 2> logmirror
wget -m -nv -k -K -E -nH --cut-dirs=1 -np -t 1000 -D wbc.lublin.pl -o $HOME/logiwget/logchemfan.pl -p http://znik.wbc.lublin.pl/ChemFan/ && \
cd $HOME/web/chemfan.pl/arch && \
wget -m -nv -k -K -E -nH -np --cut-dirs=2 -t 1000 -D lists.man.lodz.pl -o $HOME/logiwget/logchemfanarchive.pl -p http://lists.man.lodz.pl/pipermail/chemfan/ && \
cp $HOME/web/domirrora/chemfan/Archiwum/index.html $HOME/web/chemfan.pl/Archiwum/
cd chemfanftp && \
wget -m -nv -k -K -E -nH -np --cut-dirs=4 -t 1000 -D ftp.man.lodz.pl --follow-ftp -o $HOME/logiwget/logchemfanarchiveftp -p ftp://ftp.man.lodz.pl/pub/doc/LISTY-DYSKUSYJNE/CHEMFAN/ && \
cd .. && \
perl -pi -e 's{\Qftp://ftp.man.lodz.pl/pub/doc/LISTY-DYSKUSYJNE/CHEMFAN\E}{./chemfanftp/}g' index.html
Index: src/http.c
===================================================================
RCS file: /pack/anoncvs/wget/src/http.c,v
retrieving revision 1.173
diff -u -r1.173 http.c

--- src/http.c  2005/04/28 13:56:31     1.173
+++ src/http.c  2005/05/02 14:58:53
@@ -2318,6 +2318,11 @@
                             local_filename);
                  free_hstat (&hstat);
                  xfree_null (dummy);
+                 /* The file is the same; assume that the links have
+                    already been converted.  Otherwise we run the
+                    risk of converting links twice, which is
+                    wrong.  */
+                 *dt |= DT_DISABLE_CONVERSION;
                  return RETROK;
                }
              else if (tml >= tmr)
Index: src/retr.c
===================================================================
RCS file: /pack/anoncvs/wget/src/retr.c,v
retrieving revision 1.95
diff -u -r1.95 retr.c
--- src/retr.c  2005/04/16 20:12:43     1.95
+++ src/retr.c  2005/05/02 14:58:55
@@ -761,7 +761,7 @@
          register_download (u->url, local_file);
          if (redirection_count && 0 != strcmp (origurl, u->url))
            register_redirection (origurl, u->url);
-         if (*dt & TEXTHTML)
+         if ((*dt & TEXTHTML) && !(*dt & DT_DISABLE_CONVERSION))
            register_html (u->url, local_file);
        }
     }
Index: src/wget.h
===================================================================
RCS file: /pack/anoncvs/wget/src/wget.h,v
retrieving revision 1.57
diff -u -r1.57 wget.h
--- src/wget.h  2005/04/27 21:08:40     1.57
+++ src/wget.h  2005/05/02 14:58:55
@@ -233,7 +233,8 @@
   HEAD_ONLY            = 0x0004,       /* only send the HEAD request */
   SEND_NOCACHE         = 0x0008,       /* send Pragma: no-cache directive */
   ACCEPTRANGES         = 0x0010,       /* Accept-ranges header was found */
-  ADDED_HTML_EXTENSION = 0x0020         /* added ".html" extension due to -E */
+  ADDED_HTML_EXTENSION = 0x0020,       /* added ".html" extension due to -E */
+  DT_DISABLE_CONVERSION = 0x0040       /* disable link conversion */
 };
 
 /* Universal error type -- used almost everywhere.  Error reporting of
while true; do
wget http://www.mbank.com.pl/aktualnosci_vote.pl?vote=1 -o /dev/null
sleep 5  # zeby nie bylo... :-)
done
grep 'mailto:' plik |sed -e 's/^.*mailto://' |sed -e 's/">.*$//' > plik.txt
wget -q -O - http://skrypty.feedle.com/ | grep '<b>Ilość rozwiązań:' \
|sed -e 's/^.*<b>Ilość rozwiązań://' |sed -e 's/<\/b>.*$//' | \
awk '{sum+=$1}; END{print sum}'
 wget -q -O - http://skrypty.feedle.com/ | \
 awk '/<b>Ilość rozwiązań:/{sum += $3}; END{print sum}'
wget -q -O - http://skrypty.feedle.com/ | perl -e '$n = 0; while(<>){$n+=$1 if /Ilość rozwiązań:\s+(\d+)/;}print "$n\n";'
ff ()   {
          until finger @host_name1.jakis_adres.com | grep fragles
          do
          sleep 300
          done && \
          echo @@@@@@@@@@@@@@@@@@@@@@@@@@@
          echo Fragles jest na host_name1!
          echo @@@@@@@@@@@@@@@@@@@@@@@@@@@
        }
  
fp ()   {
          until finger @host_name2.jakis_adres.pl | grep duzers
          do
          sleep 300
          done && \
          echo @@@@@@@@@@@@@@@@@@@@@@@@@@@
          echo Duzers jest na host_name2!
          echo @@@@@@@@@@@@@@@@@@@@@@@@@@@
        }
             
while true
do
if [ "$a" = "" ]
then
finger @host_name1.jakis_adres.com | grep fragles && a=1 &&
echo @@@@@@@@@@@@@@@@@@@@@@@@@@@
echo Fragles jest na host_name1!
echo @@@@@@@@@@@@@@@@@@@@@@@@@@@
fi
sleep 3
if [ "$b" = "" ]
then
finger @host_name2.jakis_adres.pl | grep duzers && b=1 &&
echo %%%%%%%%%%%%%%%%%%%%%%%%%%
echo Duzers jest na host_name2!
echo %%%%%%%%%%%%%%%%%%%%%%%%%%
fi
sleep 3
if [ "$c" = "" ]
then
finger @host_name3.jakis_adres.net | grep gorg && c=1 &&
echo ########################
echo Gorg jest na host_name3!
echo ########################
fi
# tu można wstawiać kolejne człony, analogiczne do powyższych
sleep 18
done &
#!/bin/bash
declare -i KONIEC=0     # deklaruj zmienna
declare -i FRAGLES=0    # deklaruj zmienna
declare -i DUZERS=0     # deklaruj zmienna 
until let $KONIEC       # czekaj az zmienna=0
do                      # czekajac wykonuj petle

   finger @host_name1.jakis_adres.com > andy.bash.tmp
   # szukaj pierwszej osoby lub na pierwszym hoscie
   if { grep fragles andy.bash.tmp >> /dev/null } then  
   {
        echo                                      # jak go wykryles to
        echo @@@@@@@@@@@@@@@@@@@@@@               # daj znac
        echo Fragles jest w sieci !
        echo @@@@@@@@@@@@@@@@@@@@@@
        FRAGLES=1;                                # i sygnalizuj koniec
   }
   fi

   if { grep duzers andy.bash.tmp >> /dev/null } then  
   {
        echo                                      # jak go wykryles to
        echo @@@@@@@@@@@@@@@@@@@@@                # daj znac
        echo Duzers jest w sieci !
        echo @@@@@@@@@@@@@@@@@@@@@
        DUZERS=1;                                 # i sygnalizuj koniec
   }
   fi

   KONIEC=DUZERS+FRAGLES;   # jesli chcesz aby skrypt zakonczyl po znalezieniu
                            # pierwszej osoby to uzyj znaku +

#  KONIEC=DUZERS*FRAGLES;   # jesli chcesz aby skrypt zakonczyl po znalezieniu
                            # wszystkich osob to uzyj znaku *

# tych czlonow if ... fi mozna dolaczyc ile chcesz

sleep 1000            # czekaj jakis czas
done                  # zamkniecie petli while
rm andy.bash.tmp
#!/bin/bash
declare -i KONIEC=0	# deklaruj zmienna
declare -i FRAGLES=0	# deklaruj zmienna
declare -i DUZERS=0	# deklaruj zmienna
declare -i TMP=0	# zmienna tymczasowa
until let $KONIEC	# czekaj az zmienna=0
do			# czekajac wykonuj petle

   finger @host_name1.jakis_adres.com 2> /dev/null > ".andy.tmp"  # utworz nowy plik
   finger @host_name2.jakis_adres.net 2> /dev/null >> ".andy.tmp" # w ten sposob sprawdzasz
                                                                  # kilka maszyn
   # szukaj pierwszej osoby lub na pierwszym hoscie
   if { grep fragles ".andy.tmp" >> /dev/null } then
   {
        FRAGLES=1;		# sygnalizuj koniec
   }
   fi

   if { grep duzers ".andy.tmp" >> /dev/null } then
   {
        DUZERS=1;		# sygnalizuj koniec
   }
   fi

   KONIEC=DUZERS+FRAGLES;
		# jesli chcesz aby skrypt zakonczyl po znalezieniu
		# pierwszej osoby to uzyj znaku +

#  KONIEC=DUZERS*FRAGLES;
		# jesli chcesz aby skrypt zakonczyl po znalezieniu
		# wszystkich osob to uzyj znaku *

TMP=FRAGLES+DUZERS;

if { let $TMP } then		# jesli ktokolwiek zostal wykryty
{
   echo				# wydrukuj poczatek bannera
   echo @@@@@@@@@@@@@@@@@@@@@@

   if { let $FRAGLES } then
   {
      echo Fragles jest w sieci !
   } fi

   if { let $DUZERS } then {
      echo Duzers jest w sieci !
   } fi

   echo @@@@@@@@@@@@@@@@@@@@@@	# zakoncz banner
}
fi
	# tych czlonow if ... fi mozna dolaczyc ile chcesz


if { ! let $KONIEC } then	# jesli jeszcze nie skonczyles...
{
   sleep 300			# to zaczekaj jakis czas przed powtorzeniem petli
}
fi

done			# zamkniecie petli while
rm ".andy.tmp"   	# niekonieczne, ale oszczedza miejsce na koncie
caption always "%1`@%H %c | %-Lw%{= BW}%50>%n* %t%{-}%+Lw%<"
cat plik | tr -cs '[a-zA-Z0-9]' '[\n*]' > plik.txt
#v+

#include <stdio.h>
#include <termios.h>
#include <unistd.h>
#define CHARS_COUNT     100
int main()
{
       int counter = 0;
       char buf[CHARS_COUNT + 1];
       struct termios term_new;
       struct termios term_old;
       tcgetattr(STDIN_FILENO, &term_old);
       term_new = term_old;
       term_new.c_lflag &= ~ICANON;
       tcsetattr(STDIN_FILENO, TCSAFLUSH, &term_new);
       memset(buf, 0 , sizeof(buf));
       printf("Chars: %d ... %s", counter, buf);
       while (counter < CHARS_COUNT) {
               buf[counter] = getchar();
               counter++;
               printf("\033[1GChars: %d ... %s", counter, buf);
       }
       printf("\a\n");
       tcsetattr(STDIN_FILENO, TCSANOW, &term_old);
       return 0;
}

#v-
#v+
#!/bin/bash
a=0
koment=""
while true; do
 read -s -n 1 b
 a=$(($a+1))
 case "$b" in
   ".")
   break
   ;;
   "")
   koment=$(echo "$koment ")
   ;;
   *)
   koment=$(echo "$koment$b")
   ;;
 esac
 if [ $a -eq 100 ]; then
   break
 fi
 clear
 echo "zostało znaków: $((100-a)), kropka kończy komentarz"
 echo "$koment"
done
clear
echo "wprowadziłes: $koment"
#v-

(192.168.1.1)$ nc -l -p 2048 | tar -zxvf -
(192.168.1.2)$ tar -zcvf - katalog | nc 192.168.1.1 2048
tar czf - katalog | ssh 192.168.1.1 tar xzf -
rsync -ax -e ssh katalog_lokalny user@maszyna:katalog_zdalny
( cd / && tar cf - bin etc boot inne katalogi ) | ( cd /mnt/drugidysk && tar xpvf - )
cp -a katalog_źródłowy katalog_docelowy
#!/bin/sh
cd $HOME/tvp

date=`date +'%Y-%m-%d'`

wget -O page.html http://ww2.tvp.pl/tvppl/119.dzialy
cat page.html | grep -E 'href=".*\.asf"[^<]{1,}</a>' | \
        sed -e 's/.*href="\([^"]*\)[^>]*>\([^ ]*\).*/http:\/\/ww2.tvp.pl\/tvppl\/\1 -O \2/' | \
        while read comm; do
                wget $comm-$date.asf
        done
rm page.html
#cd $HOME/tvp

date=`date +'%Y-%m-%d'`
program=$1

if ! echo "$program" | grep -i -E '^(panorama|teleexpress|wiadomości)$' &>/dev/null
then
        echo "Uzycie: $0 PROGRAM"
        echo "PROGRAM to panorama, teleexpress lub wiadomości"
        exit 1
fi

wget -O page.html http://tvp.pl/
url=`cat page.html | grep -E -i "href=\"video.*$program" | head -1 | \
        sed -e 's/.*href="\(.*\.asf\)".*/\1/'`
wget -O "$program-$date.asf" "http://tvp.pl/$url"
rm page.html

#v+
#!/usr/bin/perl

open INPUT, "wget -O - http://ww2.tvp.pl/tvppl/119.dzialy |";

while (<INPUT>) {
    if (/href="(.+\.asf)"([^<]{1,})<\/a>/) {
	$url = "http://ww2.tvp.pl/tvppl/$1";
	$tytul = $2;
	$tytul =~ s/^.+">//;
	$tytul =~ s/,//;
	$tytul =~ s/&nbsp;/ /;
	$tytul =~ s/ /-/g;
	system("wget $url -O $tytul.asf");
    }
}
#v-
#! /usr/bin/perl
$base = "http://ww2.tvp.pl/tvppl/" ;
open INHTML, ("wget -q -O - $base" . "119.dzialy |") ;
%months = (I	=> "stycznia",
	   II	=> "lutego",
	   III	=> "marca",
	   IV	=> "kwietnia",
	   V	=> "maja",
	   VI	=> "czerwca",
	   VII	=> "lipca",
	   VIII	=> "sierpnia",
	   IX	=> "września",
	   X	=> "października",
	   XI	=> "listopada",
	   XII	=> "grudnia"
) ;


while(<INHTML>) {
	if($_ =~ /class="wartoText.*\.asf"/) {
		$_ =~ /href="([^"]*).*(Pano[^\s]*|Wiad[^\s]*|Tele[^\s]*)\s+(\d\d\.\d\d)?[^\d]*(\d+)[^XVI]*([XVI]+)/ ;
		my ($input, $name, $time, $day, $mth, $plik) = ("","","","","") ;
		$input = $1 if defined $1 ;
		$name = $2 if defined $2 ;
		$time = $3 if defined $3 ;
		$day = $4 if defined $4 ;
		$month = $5 if defined $5 ;
		my $output = "$name" . "_$day$months{$month}" . ($time ne ""?"_$time":"") . ".asf\n" ;
		#$output =~ s/Wiadomo.ci/Wiadomosci/ ;		# odkomentować, by usunąć 'ś' z nazwy pliku
		#$output =~ s/pa.dziernika/pazdziernika/ ;	# analogicznie października => pazdziernika
		#$output = lc $output ;				# odkomentować, by nazwa pliku wyjściowego składała się z małych liter
		system("wget $base$input -O $output") ;
	}
}
perl -e 'print unpack("N",pack("C4",split(/\./,"111.222.333.444")));'
perl -e 'print join(".",unpack("C4",pack("N",1234567890)))."\n";'
/usr/bin/yes | /$PATH_TO_SCRIPT/scrypt.sh
(echo y; echo coś innego) | skrypt
SHELL=/bin/sh
# MAILDIR=$HOME/Maildir
# LOGFILE=$HOME/procmail.log
VERBOSE=yes

# Ustawiamy ograniczenie filtrowania do postów mniejszych niż 250 kB. 
# Większe mogłyby SA łatwo przeciążyć. 

:0fw: spamassassin.lock
* < 256000
| spamassassin -a

# Ustawiamy, żeby plik z pocztą, który uzyskał powyżej 7 spamowych gwiazdek
# był kasowany.
:0:
* ^X-Spam-Level: \*\*\*\*\*\*\*
/dev/null

#Pliki z pocztą mające 3 i 4 gwiazdki umieszczamy w oddzielnym pliku
:0:
* ^X-Spam-Level: \*\*\*(\*?)$
spam-3-4-gwiazdkowy

#Pliki z pocztą mające 5, 6 i 7 gwiazdek umieszczamy w jeszcze innym pliku
:0:
* ^X-Spam-Status: Yes
spam-5-6-7-gwiazdkowy
#!/bin/bash

# Zmienne
LOG=plik_z_logiem.log

# Funkcje
function dni {
ALL=`grep -i -z '' $LOG | awk -F " " '{print $1 " " $2}' | sort -u`
echo "Dostepne sa zapisy z dni:"
echo -e "$ALL\n"
echo "Wybierz date np. `echo -e "$ALL" | head -n 2`"

read data
}

function pusta_data {
if [  "$data" = '' ]
 then
 echo "Zestawienie obejmuje wszystkie dostepne w logu dni"
fi
}

function menu {
echo "Wybierz:  1-wiadomosci przetworzone"
echo "          2-rozpoznane jako SPAM"
echo "          3-wiadomosci czyste"
echo "          4-wiadomosci pominiete"
echo "          5-zestawienie "
echo "          6-wprowadzenie nowej daty"
echo "          7-KONIEC"
}

# Skrypt
dni
menu

while read
do
case $REPLY in
1)
pusta_data
echo "Przetworzone: `grep -z -i "$data" $LOG | grep -z -i 'processing' |wc
-l`"
;;
2)
pusta_data
echo "Rozpoznany SPAM: `grep -z -i "$data" $LOG | grep -z -i 'identified'
|wc -l`"
;;
3)
pusta_data
echo "Czyste: `grep -z -i "$data" $LOG | grep -z -i 'clean' |wc -l`"
;;
4)
pusta_data
echo "Pominiete: `grep -z -i "$data" $LOG | grep -z -i 'skipped' |wc -l`"
;;
5)
pusta_data
echo "--------------------"
echo "Zestawienie dla: $data"
echo "Przetworzone: `grep -z -i "$data" $LOG | grep -z -i 'processing' |wc
-l`"
echo "Rozpoznany SPAM: `grep -z -i "$data" $LOG | grep -z -i 'identified'
|wc -l`"
echo "Czyste: `grep -z -i "$data" $LOG | grep -z -i 'clean' |wc -l`"
echo "Pominiete `grep -z -i "$data" $LOG | grep -z -i 'skipped' |wc -l`"
echo "--------------------"
;;
6)
dni
;;
7)
echo "Bye"
exit
;;
*)
menu
esac
done
:0B:
* 8TPbiV38OV4IdC6LBolF4DvDdBSLeESJfeSJRdxQ6AOPAABZi8fr5YleC
swen
# albo lepiej /dev/null ;)
#!/bin/sh

# konwersja folderów poczty z formatu KMail na Sylpheed Claws,
# przy załóżeniu, że znajdują się one w katalogu ~/Mail. Można to
# zmienić odpowiednio modyfikując zmienna source_dir
#
# użycie: convert.sh nazwa_folderu [licznik]
#
# licznik okresla od jakiego numeru bedziemy zaczynac numerowanie plików
# zmienna dest_dir okresla katalog docelowy programu Sylpheed UWAGA! W
# nazwach folderów nie może być spacji

source_dir="$HOME/Mail"
dest_dir="$HOME/Mail_S"
folder=$1
licznik=$2
let " licznik=( licznik>1 )? licznik:1 "

echo "Tworze katalog docelowy $dest_dir"
mkdir $dest_dir
echo "Tworze katalog docelowy $dest_dir/$folder"
mkdir $dest_dir/$folder

for plik in $source_dir/$folder/cur/*
do
 echo "konwertuje $plik na $dest_dir/$folder/$licznik"
 cp $plik $dest_dir/$folder/$licznik
 licznik=$(($licznik+1))
done

echo "zrobione"
ps u -u user|awk {' if ($2~/^[0-9]+$/) print $2 '}|xargs kill -9
for i in `ps aux | awk '($1 == "USER") {print $2}'`; do echo $i; done 
for i in `ps aux | awk '($1 == "aaabbb") {print $2}'`; do kill -9 $i; done
#include <stdio.h>
#include <math.h>

int main()
{
printf("%.10000Lg\n", 4*atanl(1.0));
}
cowsay Fajnie, ze zajrzales na moja strone! |write userid
Message from ja@serwer on pts/4 at 02:37 ...
 ______________________________________
< Fajnie, ze zajrzales na moja strone! >
 --------------------------------------
        \   ^__^
         \  (oo)\_______
            (__)\       )\/\
                ||----w |
                ||     ||
EOF

#!/bin/sh

while [ "$1" ]; do

DIR="$1"
OWNER="$2"
FMODE="$3"
DMODE="$4"

find "$DIR" | (
while read line; do
    echo chmoding $line
    if [ -f "$line" ]; then M=$FMODE; fi
    if [ -d "$line" ]; then M=$DMODE; fi
    chown "$OWNER" "$line"
    chmod "$M" "$line"
    done )

shift 4

done 
#!/bin/sh

PROG=`basename $0`

if [ $# -lt 1 ]; then
    echo This tool updates all CVS repositories in 
    echo given directories \(recursively\)
    echo Usage:
    echo $PROG dir1 [dir2] [dir3] ... [dirn]
    exit 0
    fi
    
while [ "$1" ]; do
    
    # Skip non-directories
    if [ ! -d "$1" ]; then shift;continue; fi
    
    # Not a CVS directory but can contain CVS repositories
    if [ ! -d "$1/CVS" ]; then
	cd "$1"
	$0 *
	if [ "$?" != "0" ]; then 
	    echo $PROG: Sub-process failed at directory $1
	    exit 1
	    fi
	cd ..
	shift;continue
	fi
    
    cd "$1"
    REPOSITORY=`cat CVS/Root`/"$1"
    echo $PROG: Updating $REPOSITORY ...
    cvs update
    cd ..

    shift
    done

exit 0
#!/bin/sh

# DESCR: Refactoring tool, handles CVS
# AUTHOR: Darek Cieslak, cieslakd at gazeta.pl
# URL: http://cieslakd.webpark.pl/
# USE: repl abd def | sh
#
# In ./.replfilter you can include sed commands to
# delete unwanted filenames. Example:
#
# /images\//d
#
# will ignore all files from images directory

TMP_FILE=$$
REPLFILTER=.replfilter

test -z "$1" -o -z "$2" && {
    echo give from, to strings
    exit 1;
}

sFrom="$1"
sTo="$2"

if ! test -f $REPLFILTER
then
    touch $REPLFILTER
fi

test -d CVS && isCVS=1

FILES=`find . -type f | sed -f $REPLFILTER`

fgrep --count "$sFrom" --recursive $FILES |
awk -v "sFrom=$sFrom" -v "sTo=$sTo" -v "sTmpFile=$TMP_FILE" '
BEGIN {
    FS=":"
}
!/CVS/{
    sFile = $1
    sCount = $2
    if(sCount == 0)
        next

    print "mv " s File " " sTmpFile
    print "sed \"s|" sFrom "|" sTo "|g\" <" s Tmp File " >" sFile
    print "rm " sTmpFile
}
'

find . -name "*$sFrom*" |
sed -f $REPLFILTER |
awk -v "sFrom=$sFrom" -v "sTo=$sTo" -v "isCVS=$isCVS" '

{
    sFile = $0
    sNewFile = $0
    gsub(sFrom, sTo, sNewFile);

    print "test -e " s New File " || mv " s File " " sNewFile
    if(isCVS) {
        print "cvs remove " sFile
        print "cvs add " sNewFile
    }
}

'
#!/bin/sh

# DESCR: Clone existing files, handles CVS
# AUTHOR: Darek Cieslak, cieslakd at gazeta.pl
# URL: http://cieslakd.webpark.pl/
# USE: repl abd def | sh
#
# In ./.replfilter you can include sed commands to
# delete unwanted filenames. Example:
#
# /images\//d
#
# will ignore all files from images directory

TMP_FILE=$$
REPLFILTER=.replfilter

test -z "$1" -o -z "$2" && {
    echo give from, to strings
    exit 1;
}

if ! test -f $REPLFILTER
then
    touch $REPLFILTER
fi

sFrom="$1"
sTo="$2"

FILES=*$sFrom*

find . -name "*$sFrom*" |
sed -f $REPLFILTER |
awk -v "sFrom=$sFrom" -v "sTo=$sTo" -v "isCVS=$isCVS" '

{
    sFile = $0
    sNewFile = $0
    gsub(sFrom, sTo, sNewFile);

    print "test -f " s New File " || "\
        "sed \"s/" sFrom "/" sTo "/g\" " s File " > " sNewFile
}

'

if [ $# -ge '1' ]
then


if [ $1 = "-e" ]

then
	echo `date`

elif [ $1 = "-p" ]

then

	set `date`

case $1 in
	Mon)b="Poniedzialek";;
	Tue)b="Wtorek";;
	Wed)b="Sroda";;
	Thu)b="Czwartek";;
	Fri)b="Piatek";;
	Sat)b="Sobota";;
	Sun)b="Niedziela";;
esac

case $2 in 
	Jan)a="Styczen";;
	Feb)a="Luty";;
	Mar)a="Marzec";;
	Apr)a="Kwiecien";;
	May)a="Maj";;
	Jun)a="Czerwiec";;
	Jul)a="Lipiec";;
	Sep)a="Sierpien";;
	Aug)a="Wrzesien";;
	Oct)a="Pazdziernik";;
	Nov)a="Listopad";;
	Dec)a="Grudzien";;
esac
echo "$b $a $3 $4 $5 $6";
fi
fi
date | sed -e 's/Mon/Poniedzialek/g; s/Tue/Wtorek/g; s/Wed/Sroda/g;
s/Thu/Czwartek/g; s/Fri/Piatek/g; s/Sat/Sobota/g; s/Sun/Niedziela/g;
s/Jan/Styczen/g; s/Feb/Luty/g; s/Mar/Marzec/g; s/Apr/Kwiecien/g;
s/May/Maj/g; s/Jun/Czerwiec/g; s/Jul/Lipiec/g; s/Sep/Sierpien/g;
s/Aug/Wrzesien/g; s/Oct/Pazdziernik/g; s/Nov/Listopad/g;
s/Dec/Grudzien/g'
#!/bin/bash
# Informacja o zmianie taśm uruchamiana z CRONA

DZIEN=`date +%u`

# Kazdy piatek
if [ "$DZIEN" == "5" ]
then
echo "Zmien tasmy: ..." | mail -s "Zmiana tasm" adres@domena.pl
fi

# Ostatnie środy miesiąca - info: Paweł Gancarz
[ $(date -d '+ 1 week' +%-m) -ne $(date +%-m) ] && \
[ $(date +%A) == "sroda" ] && echo "Zmien tasmy: ..." | mail -s "Zmiana tasm" adres@domena.pl
# lub [ $(date +%w) -eq 3 ]  - aby było go łatwiej przenieść na inne maszyny
#!/bin/sh

# DESCR: FTP syncing script
# AUTHOR: Dariusz Cieślak, cieslakd at gazeta.pl
# URL: http://cieslakd.webpark.pl/
#
# USAGE:
#
#   ftpsync remote_dir stamp_file [files...] | pftp hostname
#   touch stamp_file
#
# I know this is simple, but allows high flexibility
# A this time allows only two-level hierarchy od directories

REMOTE_DIR="$1"
STAMP="$2"

test -z "$STAMP" && {
    echo $0 remote_dir stamp_file
    exit 1
}
test -f $STAMP || touch $STAMP -d '1977-01-01'

find . -follow -newer $STAMP -a -type d |\
awk -vREMOTE_DIR="$REMOTE_DIR" '
BEGIN {
    FS = "/"
    print "mkdir " REMOTE_DIR
    print "cd " REMOTE_DIR
}
$0 != "." {
    print "mkdir " $0
}

'

find . -follow -newer $STAMP -a -type f |\
awk -vREMOTE_DIR="$REMOTE_DIR" '
BEGIN {
    FS = "/"
}
!/\.swp/ {
    if(NF > 2) {
        if($2 != DIR) {
            print "cd " $2
            print "lcd " $2
            DIR = $2
        }
        file=$3
    } else {
        if(DIR) {
            print "cd .."
            print "lcd .."
            DIR = ""
        }
        file=$2
    }
    print "put " file
    if(/cgi$/) {
        print "chmod 0755 " file
    }
}

'
#!/bin/sh

# Script that notifies about incoming mail (or any other event). It
# uses xsnow (and mpg123), but can use any other XWindow toys and
# sound effects
#
# skrypt powiadamiający o jakimś zdarzeniu (np. przyjściu poczty) 
# jeśli wywołany bez argumentów to włącza program xsnow
# z argumentem "stop" usuwa xsnow
#
# zamiast xsnow można użyć innych "przeszkadzajek"
# URL: http://cieslakd.webpark.pl/

PROGRAM=xsnow 
PATH=$PATH:/usr/X11R6/bin

if test "$1" = stop
then
    killall $PROGRAM > /dev/null 2> /dev/null
    exit 0
fi

if ! ps x | grep $PROGRAM | awk 'END{exit NR < 2}'
then
    MP3=/usr/local/sounds/zaniemoglo.mp3
    mpg123 $MP3 2>/dev/null >/dev/null &
    export DISPLAY=:0.0
    $PROGRAM &
fi

cat > /dev/null

exit 0
#!/bin/sh
# URL: http://cieslakd.webpark.pl/

DATE=`date -d tomorrow +%Y.%m.%d`
FILE=~/input/pogoda.png

export DISPLAY=:0.0

URL=http://w.wp.pl/p/pogoda/i/general/country/POL/forecast


wget\
  -q $URL/$DATE.png\
  -O $FILE\
  || exit 1


xli -title "Pogoda na jutro ($DATE)"\
    -quiet -center $FILE
#!/bin/sh
# URL: http://cieslakd.webpark.pl/

export DISPLAY=:0.0

ping -c 1 userfriendly.pl > /dev/null || exit 1

cd /tmp
test -d uf && rm -rf uf
mkdir uf
cd uf

wget -q -A gif -nd -r -l1 http://userfriendly.pl/index.php?data=random

/usr/X11R6/bin/xli -quiet [0-9]*.gif
#!/usr/bin/awk -f

# DESCR: returns on stdout random argument
# AUTHOR: Darek Cieslak (cieslakd at wp.pl)
# URL: http://cieslakd.webpark.pl/

BEGIN{
    srand()
    nr = ARGC
    size = ARGC
    r = int(rand() * (size - 1)) + 1
    print ARGV[r]
    exit(0)
}
#!/bin/sh
# URL: http://cieslakd.webpark.pl/

awk '

/if\(/ || /while\(/ || /for\(/ {
    print FILENAME ":" FNR ": add space"
}
/^\t*{/ {
    print FILENAME ":" FNR ": move { to upper line"
}
/\){/ {
    print FILENAME ":" FNR ": add space between ) and {"
}
/^\t*if.*[^{]$/ {
    print FILENAME ":" FNR ": add { ... }"
}
/^\t*while.*[^{]$/ {
    print FILENAME ":" FNR ": add { ... }"
}
/^\t*for.*[^{]$/ {
    print FILENAME ":" FNR ": add { ... }"
}
/printStackTrace\(\)/ {
    print FILENAME ":" FNR ": redirect logs to log4j"
}


' *.java


#!/bin/sh
#funkcja sprawdzajaca czy czas nie zostal przekroczony
function  sprawdz () {
        # jesli pozostala tylko jedna (tak naprawde dwie :) ) minuta
       if [ `expr $wyl - $czas ` -eq 2 ];then
		#wysylanie uzytkownikowi komunikatu o wylogowaniu go za 1 minute, komunikat umiesczony w pliku o nazwie "komunikat" 
        	mesg y;
		#wyswietleenie komunikatu znajdujacego sie  w pliku komunikat(trzeba go sobie utworzyc samemu)
		write $i < komunikat ;
        	#zeby uzytownik nie mogl do nas odpisac
		mesg n;
	fi ;
	# jesli czas uzytkownika minal zostaje on wylogowany z systemu
        if [ `expr $wyl - $czas ` -le 0  ];then 
            #    echo "Wylogowuje uzytkownikow"
               skill -STOP $i;
               skill -9 $i;
		#blokujemy uzytkownika do konca dnia
		passwd -l $i;
		#po polnocy jego konto zotaje znow odblokowane
		echo "passwd -u $i" >> odblok
		at -f odblok 12:00am 
		at -f aktual 12:00am
        	
	fi ;
			}
#plik czyszczacy co noc liste zablokowanych uzytkownikow
touch aktual
# polecenia usuwajace plik odblokuj
echo "#!/bin/sh" > aktual;

echo "rm odblok" >> aktual;
while [ 1 ]
do
#plik zawierajacy uzytkownikow do oblokowwania
touch odblok 
#funkcja sprawdzajaca czy czas nie zostal przekroczony
wyl=$1; # czas po ktorym wszyscy zwykli uzytkownicy wylogowani
uzy=`users`
for i in $uzy 
do  
uid=`id $i | awk '{print $1}' | cut -f 1 -d "("`;
	#sprawdzam czy superuzytkownik, jesli tak dalej pomijam go
	if [ "$uid"  != "uid=0" ] ; then
	#obecna godzina, minuta i strefa
	h=`date "+ %I"`
	m=`date "+ %M"`
	obczas=`expr $h \* 60 + $m`
	obstr=`date "+%p"`
	if [ "$obstr" = "PM" ]; then 
	#dodajemy 12 h dla godzin popoludniowych 
	obczas=`expr $obczas + 720`
	fi ;
        # jesli jest godizna 12 odejmujemy 12 h
	if [ $h -eq 12 ]; then 
	obczas=`expr $obczas - 720`
	fi ;
	#godzina i minuta logowania dla konkretnego uzytkownika
	hl=`w | grep $i | awk '{print $4}' | cut -f1 -d":"`
	ml=`w | grep $i | awk '{print $4}' | cut -f2 -d":" | cut -c 1,2`
	logstr=`w | grep $i | awk '{print $4}' | cut -f2 -d":" | cut -c 3,4`
	for ((j=1;j <= "`echo $ml | wc -w`";j++)); 
		do 
		# pobieram kolejne wartosci czasow zaologwania danego uzytkownika na roznych terminalach 
		khl=`echo $hl | cut -f$j -d" "`
		kml=`echo $ml | cut -f$j -d" "` 
		kstr=`echo $logstr | cut -f$j -d" "`
		oblog=`expr  $khl \* 60 + $kml`
		#jesli nastapila zmina dnia 
		if [ "$kstr" = "pm" ]; then 
		if [ "$obstr" = "AM" ];then 
		#dodaje minuty z dnia poprzedniego
		czas=`expr 720 - $oblog + $obczas` ;
		#sprawdzamy czy czas uztkownika nie dobiegl konca
		sprawdz ;
		fi ;
		fi ; 
		if [ "$kstr" = "pm" ]; then
        	#dodajemy 12 h dla godzin popoludniowych 
        	oblog=`expr $oblog +  720`
        	fi ;
        	# jesli jest godzina 12 odejmujemy 12 h
        	if [ $khl -eq 12 ]; then
        	oblog=`expr $oblog - 720`
        	fi ;
		czas=`expr $obczas - $oblog`
		sprawdz ;
		done ; 
	fi ;    
done
#sprawdzanie co 55 sekund
sleep 55 ;
done  
#!/bin/sh
TELEPHONE=0202122
ACCOUNT=ppp
PASSWORD=ppp
export TELEPHONE ACCOUNT PASSWORD
# zmienne są eksportowane, aby mógł
# z nich korzystać ppp-on-dialer
DIALER_SCRIPT=/etc/ppp/ppp-on-dialer
# pełna ścieżka do tego skryptu
exec /usr/sbin/pppd crtscts /dev/modem 115200 \
lock modem defaultroute \
connect $DIALER_SCRIPT
# opcje przekazywane pppd podczas jego startowania
#!/bin/sh

if [ "$1" = "" ]; then
        DEVICE=ppp0
else
        DEVICE=$1
fi

if [ -r /var/run/$DEVICE.pid ]; then
        kill -INT `cat /var/run/$DEVICE.pid`

        if [ ! "$?" = "0" ]; then
                rm -f /var/run/$DEVICE.pid
                echo "ERROR: Removed stale pid file"
                exit 1
        fi


        echo "PPP link to $DEVICE terminated."
        exit 0
fi

echo "ERROR: PPP link is not active on $DEVICE"
exit 1
#!/bin/sh
exec chat -v \
        TIMEOUT 3 \
        ABORT   '\nBUSY\r'\
        ABORT   '\nNO ANSWER\r'\
        ABORT   '\nRINGING\r\n\r\nRINGING\r'\
        '' \rAT \
        'OK-+++\c-OK'         ATZ \
        TIMEOUT 30 \
        OK ATDT$TELEPHONE \
        CONNECT '' \
        ogin:--ogin: $ACCOUNT \
        assword: $PASSWORD
#!/bin/bash

#
# Copyright (c) 2005 Lukasz Dembinski
# mailto: <dembol@nasa.com.pl>
# ver. 1.0
#
# Na podstawie:
# http://luxik.cdi.cz/~devik/qos/htb/manual/userg.htm
#

# predkosc download naszego lacza
DOWNLINK_SPEED_ISP="512kbit"

# predkosc upload naszego lacza
UPLINK_SPEED_ISP="256kbit"

# predkosc upload naszego lacza dla portow nieinteraktywnych
UPLINK_SPEED_ISP_LOW="100kbit"


# predkosc download naszego lacza przypisana userom
DOWNLINK_SPEED_ALL="512kbit"

# predkosc upload z naszego lacza przypisana userom
UPLINK_SPEED_ALL="256kbit"

# ip,predkosc ip,predkosc"
UPLINK_IP="192.168.0.10,128kbit 192.168.0.11,128kbit 192.168.0.0/24,64kbit" 	

# predkosc upload sieci LAN
UPLINK_SPEED_LAN="100mbit"

# "ip,predkosc,ceil,priorytet ip,predkosc,ceil,priorytet"
# Lepiej nie ustawiac sumy predkosci na wartosc wyzsza niz DOWNLINK_SPEED_ALL
# Dokumentacja tak komentuje taka sytuacje: 
#
# Q: What if sum of child rates is greater than parent rate ?
# A: Then interesting things can happen

DOWNLINK_IP="192.168.0.10,128kbit,512kbit,1 192.168.0.11,256kbit,512kbit,1 192.168.0.0/24,64kbit,128kbit,2" 

# predkosc download sieci LAN
DOWNLINK_SPEED_LAN="100mbit"

# porty interaktywne
INTERACT_PORTS="20 21 22 25 110" 

# hosty interaktywne
INTERACT_HOSTS="" 

# predkosc download dla portow - "port,predkosc port,predkosc"
PORT_SPEED="80,384kbit" 

# adres naszej sieci lokalnej
LAN_IP=192.168.0.0/24

# interfejs na "swiat"
IF_WORLD="eth0"  

# interfejs lokalny
IF_LAN="eth1"    


# ----- czyscimy wszystko -----

tc qdisc del dev $IF_WORLD root 2> /dev/null
tc qdisc del dev $IF_LAN   root 2> /dev/null
tc qdisc del dev $IF_WORLD ingress 2> /dev/null
tc qdisc del dev $IF_LAN   ingress 2> /dev/null


# ------ output IF_WORLD ----------

DEV=$IF_WORLD

echo
echo "Output dev" $DEV

tc qdisc add dev $DEV root handle 1: htb default 20

tc class add dev $DEV parent 1: classid 1:1 htb rate ${UPLINK_SPEED_ISP} \
   burst 10k

tc class add dev $DEV parent 1:1 classid 1:10 htb rate ${UPLINK_SPEED_ISP} \
  burst 10k prio 1

tc class add dev $DEV parent 1:1 classid 1:20 htb rate ${UPLINK_SPEED_ISP_LOW} \
   burst 10k prio 2

tc qdisc add dev $DEV parent 1:10 handle 10: sfq perturb 10
tc qdisc add dev $DEV parent 1:20 handle 20: sfq perturb 10

for port in $INTERACT_PORTS
do
    echo 'Setting port' $port 'as interactive';

    tc filter add dev $DEV parent 1: protocol ip prio 1 u32 \
    match ip sport ${port} 0xffff flowid 1:10

    tc filter add dev $DEV parent 1: protocol ip prio 1 u32 \
    match ip dport ${port} 0xffff flowid 1:10
done

echo 'Setting TOS 0x10 as interactive';

tc filter add dev $DEV parent 1:0 protocol ip prio 3 u32 \
      match ip tos 0x10 0xff  flowid 1:10

echo 'Setting ICMP as interactive';

# -- icmp protocol --
tc filter add dev $DEV parent 1:0 protocol ip prio 3 u32 \
        match ip protocol 1 0xff flowid 1:10
    
tc filter add dev $DEV parent 1: protocol ip prio 10 u32 \
   match ip protocol 6 0xff \
   match u8 0x05 0x0f at 0 \
   match u16 0x0000 0xffc0 at 2 \
   match u8 0x10 0xff at 33 \
   flowid 1:10

echo 'Setting other ports as mass ports';

k=1
for host in $INTERACT_HOSTS
do
    echo 'Setting host' $host 'as interactive';
    
    tc filter add dev $DEV parent 1: protocol ip prio 10 u32 \
    match ip dst $host flowid 1:10
done


# ------ input IF_WORLD ----------

echo
echo "Input dev" $DEV

tc qdisc add dev $DEV handle ffff: ingress

k=1
for port in $PORT_SPEED
do
    p=1;
    parametry=`echo $port | sed "y/,/ /"`
    for param in $parametry
    do
	params[$p]=$param;
	((p++))
    done

    echo 'Setting port' ${params[1]} 'downlink speed to' ${params[2]}

    tc filter add dev $DEV parent ffff: protocol ip prio 1 u32 match ip \
    sport ${params[1]} 0xffff police rate ${params[2]} burst 10k drop flowid :${k}

    ((k++))
done

echo 'Setting other ports downlink speed to' ${DOWNLINK_SPEED_ISP}

tc filter add dev $DEV parent ffff: protocol ip prio 2 u32 match ip \
src 0.0.0.0 police rate ${DOWNLINK_SPEED_ISP} burst 6k drop flowid :${k}


# ------ output IF_LAN ----------

DEV=$IF_LAN

echo
echo "Output dev" $DEV

tc qdisc add dev $DEV root handle 2: htb default 2

echo 'Setting LAN' $LAN_IP 'downlink speed to' ${DOWNLINK_SPEED_LAN}

tc class add dev $DEV parent 2: classid 2:2 htb rate ${DOWNLINK_SPEED_ALL} \
   burst 10k prio 1

tc class add dev $DEV parent 2: classid 2:1 htb rate ${DOWNLINK_SPEED_LAN} \
   burst 20k prio 2

tc qdisc add dev $DEV parent 2:1 handle 3: sfq perturb 10

tc filter add dev $DEV parent 2: protocol ip prio 1 u32 match \
    ip src ${LAN_IP} flowid 2:1

tc filter add dev $DEV parent 2: protocol ip prio 1 u32 \
    match ip protocol 1 0xff flowid 2:1


k=2
for ip in $DOWNLINK_IP 
do
    p=1;
    parametry=`echo $ip | sed "y/,/ /"`
    for param in $parametry
    do
	params[$p]=$param;
	((p++))
    done

    echo 'Setting' ${params[1]} 'downlink speed to' ${params[2]}/${params[3]} 'with prio' ${params[4]};

    tc class add dev $DEV parent 2:2 classid 2:${k}0 htb rate ${params[2]} \
	 burst 6k prio ${params[4]} ceil ${params[3]}

    tc qdisc add dev $DEV parent 2:${k}0 handle ${k}0: sfq perturb 10

    tc filter add dev $DEV parent 2: protocol ip prio 2 u32 match \
    ip dst ${params[1]} flowid 2:${k}0

    ((k++))
done


# ------ input IF_LAN ----------

echo
echo "Input dev" $DEV

tc qdisc add dev $DEV handle ffff: ingress

echo 'Setting LAN' $LAN_IP 'uplink speed to' ${UPLINK_SPEED_LAN}

tc filter add dev $DEV parent ffff: protocol ip prio 1 u32 match ip \
dst ${LAN_IP} police rate ${UPLINK_SPEED_LAN} burst 20k drop flowid :1

tc filter add dev $DEV parent ffff: protocol ip prio 1 u32 \
match ip protocol 1 0xff police rate ${UPLINK_SPEED_LAN} burst 20k drop flowid :1

k=2
for ip in $UPLINK_IP 
do
    p=1;
    parametry=`echo $ip | sed "y/,/ /"`
    for param in $parametry
    do
	params[$p]=$param;
	((p++))
    done

    echo 'Setting' ${params[1]} 'uplink speed to' ${params[2]}

    tc filter add dev $DEV parent ffff: protocol ip prio 2 u32 match ip \
      src ${params[1]} police rate ${params[2]} burst 10k drop flowid :${k}

    ((k++))
done
 
Output dev eth0
Setting port 20 as interactive
Setting port 21 as interactive
Setting port 22 as interactive
Setting port 25 as interactive
Setting port 110 as interactive
Setting TOS 0x10 as interactive
Setting ICMP as interactive
Setting other ports as mass ports

Input dev eth0
Setting port 80 downlink speed to 384kbit
Setting other ports downlink speed to 512kbit

Output dev eth1
Setting LAN 192.168.0.0/24 downlink speed to 100mbit
Setting 192.168.0.10 downlink speed to 128kbit/512kbit with prio 1
Setting 192.168.0.11 downlink speed to 256kbit/512kbit with prio 1
Setting 192.168.0.0/24 downlink speed to 64kbit/128kbit with prio 2

Input dev eth1
Setting LAN 192.168.0.0/24 uplink speed to 100mbit
Setting 192.168.0.10 uplink speed to 128kbit
Setting 192.168.0.11 uplink speed to 128kbit
Setting 192.168.0.0/24 uplink speed to 64kbit
# skrypt glowny , josh 22/08/02 12:14
echo "1" > run

Z=`iptables -L FORWARD -v -x -n |awk '{print $2}' |tail -n1`

while [ `cat run` = 1 ] ; do

Z1=$Z

sleep 1

Z2=`iptables -L FORWARD -v -x -n |awk '{print $2}' |tail -n1`

Z=$Z2

Z3=$((Z2-$Z1))

echo $Z3

if [ $Z3 -gt 500 ] ; then

if [ `cat state` = 0 ] ; then

./mlstop

echo "mlstop"

echo "1" > state

fi

else

if [ `cat state` = 1 ] ; then

./mlstart

echo "mlstart"

echo "0" > state

fi

fi

done

# skrypty: mlstart i mlstop , josh 22/08/02 12:15
./MLSTART:
iptables -t filter -D INPUT -p tcp --destination-port 4662 -j REJECT
iptables -t filter -D INPUT -p tcp --source-port 4662 -j REJECT
iptables -t filter -D OUTPUT -p tcp --destination-port 4662 -j REJECT
iptables -t filter -D OUTPUT -p tcp --source-port 4662 -j REJECT

iptables -t filter -D INPUT -p tcp --destination-port 4661 -j REJECT
iptables -t filter -D INPUT -p tcp --source-port 4661 -j REJECT
iptables -t filter -D OUTPUT -p tcp --destination-port 4661 -j REJECT
iptables -t filter -D OUTPUT -p tcp --source-port 4661 -j REJECT


./MLSTOP
iptables -t filter -A INPUT -p tcp --destination-port 4662 -j REJECT
iptables -t filter -A INPUT -p tcp --source-port 4662 -j REJECT
iptables -t filter -A OUTPUT -p tcp --destination-port 4662 -j REJECT
iptables -t filter -A OUTPUT -p tcp --source-port 4662 -j REJECT

iptables -t filter -A INPUT -p tcp --destination-port 4661 -j REJECT
iptables -t filter -A INPUT -p tcp --source-port 4661 -j REJECT
iptables -t filter -A OUTPUT -p tcp --destination-port 4661 -j REJECT
iptables -t filter -A OUTPUT -p tcp --source-port 4661 -j REJECT

Przydatne proste skrypty dla linuxa

Zamiana nazw plików z wielkich liter na małe

Zamiana spacji w nazwach plików na podkreślenia

Zmiana nazwy rozszerzenia z htm na html w wielu plikach

Zamiana ciągu znaków w zawartości wielu plików rekurencyjnie

Usunięcie nieznaczących zer z ciągu liczb w pliku

Poszukiwanie określonego pliku rekurencyjnie

Poszukiwanie ciągu znaków w wielu plikach i katalogach rekurencyjnie

Porównanie i wyszukiwanie rekurencyjnie plików identycznych z danym plikiem wzorcem

Wyszukiwanie i liczenie liczby plików i katalogów z prawami r, w, x dla zalogowanego użytkownika

Przeszukiwanie manuali względem określonego słowa kluczowego

Usuwanie określonego pliku rekurencyjnie

Liczenie ilości wierszy w pliku

Liczenie ilości plików w wielu katalogach rekurencyjnie

Liczenie ilości katalogów w danym katalogu lub rekurencyjnie

Sprawdzanie z jaką dystrybucją linuksa pracujemy

Pakowanie i rozpakowywanie tarem, gzipem oraz bzipem2

Mirrorowanie stron WWW

Automatyczne nabijanie głosów w ankietach

Pobranie ciągu znaków (np. adresów e-mail) z plików html i umieszczenie ich w jednym pliku tekstowym

Automatyczne obliczanie ilości rozwiązań na stronie Skrypty

Radar do wykrywania zalogowanych znajomych

Usprawnienie interfejsu menadżera okien screen

Umieszczenie każdego słowa z pliku w osobnej linii w innym pliku

Ograniczenie wpisywania komentarza do 100 znaków oraz wyświetlanie informacji o tym, ile jeszcze znaków można wpisać.

Przenoszenie katalogów lub grup plików pomiędzy dwoma komputerami w sieci

Kopiowanie jednej partycji/dysku na drugą partycję/dysk z zachowaniem uprawnień, linków itp.

Automatyczne pobieranie plików wideo na przykładzie dzienników TVP

Przeliczanie numeracji adresów IP na postać 32 bitowa i vice versa

Automatyczne udzielanie odpowiedzi "yes" na pytanie jakie zadaje skrypt

Reguła procmaila do odfiltrowywania spamu z użyciem SpamAssassin

Statystyka działania SpamAssasin

Reguła procmaila do usuwania robaków i wirusów internetowych na przykładzie robaka swen

Konwersja folderów poczty z formatu KMail na Sylpheed Claws

Usuwanie wszystkich procesów danego użytkownika

Konwersja DOSowego pliku tekstowego na linuxowy i vice versa

Liczba Pi

Wysyłanie komunikatów poprzez mówiącą krowę

Zmiana właściciela i uprawnień wszystkich plików i katalogów w podanym miejscu

Automatyczny update repozytoriów CVS w podanych katalogach

Skrypt do refaktoryzacji CVS

Konwersja daty z języka angielskiego na polski

Skrypt do przypominania np. o zmianie taśm do backupu

Synchronizacja katalogów FTP w jedną stronę

Skrypt powiadamiający o zdarzeniu (np. o nadchodzącej poczcie) poprzez włączenie "śniegu" na ekran

Skrypt pokazujący pogodę na dzień jutrzejszy

Skrypt pokazujący na ekranie losowy komiks z http://userfriendly.pl

Skrypt przekazujący na stdout wylosowany argument

Skrypt sprawdzający styl programu w Javie

Automatyczne kontrolowanie czasu zalogowania i blokowanie logowania użytkowników

Łączenie się z internetem spod konsoli tekstowej

Podział łącza na kilku użytkowników z możliwością przypisania im różnych przepustowości

Zasada działania

Konfiguracja

Przykładowy wydruk ze skryptu:

Kierowanie ruchem w sieci pod linuksem

Konfigurowanie podstawowych ustawień firewalla na przykładzie iptables