jablonka.czprosek.czf

sedlo

 Subversion Repositories:
[/] [trunk/] [sedlo] - Blame information for rev 14

 

Line No. Rev Author Line
17simandl#!/bin/bash
2# author : Petr Simandl www.simandl.cz
314simandl# release date : 20/10/2006
47simandl# name : sedlo
5# description : dynamic side routing tables tool
6# license : GPL
7 
814simandlsl_version="0.0.4pre5"
97simandl 
10PATH=$PATH:/bin:/sbin:/usr/bin:/usr/sbin:/usr/local/bin:/usr/local/sbin
11 
12sl_nmcnf="sedlo.conf"
13sl_sedlocnf="/etc/$sl_nmcnf"
14sl_sedlocache="/var/cache/sedlo"
15 
16sl_rttab="/etc/iproute2/rt_tables"
17sl_rtnmin=110
18sl_rtnmax=200
19sl_ipnodef="10.0.0.0/8"
20 
21slm_unknown="Nezname parametry : "
22 
23sl_ipcmd=`which ip`
24sl_trcmd=`which tr`
25sl_wgetcmd=`which wget`
26sl_hnmcmd=`which hostname`
27sl_awkcmd=`which awk`
28sl_catcmd=`which cat`
29sl_grepcmd=`which grep`
3010simandlsl_diffcmd=`which diff`
317simandl 
32if [ -e $sl_sedlocnf ]
33 then
34 sl_nop=1
35 else
36 echo "$sl_sedlocnf not found"
37 exit 1
38fi
39 
40if [ -e $sl_rttab ]
41 then
42 sl_nop=1
43 else
44 echo "$sl_rttab not found"
45 exit 1
46fi
47 
489simandlsl_murlcfg=`cat $sl_sedlocnf | grep "^mcnf" | uniq | awk '{print $2" "$3" "$4}'`
497simandl 
50######################################################################
518simandls_maru()
527simandl{
53if [ $scm_info -gt 0 ]; then echo "Managing rules" ; fi
54 
55sl_rules=`($sl_ipcmd ru ls | $sl_grepcmd -v "from all lookup" | $sl_awkcmd '{print $3"*ru"}' ; \
56$sl_catcmd $sl_sedlocache/$sl_nmcnf | $sl_grepcmd "^ip" | $sl_awkcmd '{print $2"*ip"}') | sort | uniq`
57 
58sl_merged=`echo $sl_rules $sl_ips | sort | uniq`
59 
60echo $sl_merged
61 
628simandl} # s_maru
637simandl######################################################################
64s_flru()
65{
66if [ $scm_info -gt 0 ]; then echo "Flushing all rules" ; fi
67 
68sl_rules=`$sl_ipcmd ru ls | $sl_grepcmd -v "from all lookup" | $sl_grepcmd " 10." | $sl_trcmd '[:blank:]' '*'`
69 
70for sl_rule in $sl_rules
71do
72# sl_ipn=`echo $sl_rule | $sl_awkcmd -F '*' '{print $2}'`
73 sl_ipgws=`echo $sl_rule | $sl_awkcmd -F '*' '{print $2,$3,$4,$5,$6,$7}'`
74 $sl_ipcmd ru del $sl_ipgws
75done
76 
778simandl#this should make faster applying of new routing tables
78$sl_ipcmd ro flush cache
79 
807simandl} # s_flru
818simandl 
827simandl######################################################################
8310simandl# here we get each ip and we create a rule to send this ip to a
84# certain table
85# this routine can be skipped when the number of ips and ip directions
86# are still the same = old and new configs are the same
877simandls_fillrules()
88{
898simandl 
90#flush old rules before filling new ones
91#not so nice solution - it is planned to change just what's necessary
92#by s_maru
937simandls_flru
94 
9510simandlif [ $scm_info -gt 0 ]; then echo "Creating rules for ips" ; fi
967simandl 
97sl_ips=`$sl_catcmd $sl_sedlocache/$sl_nmcnf | $sl_grepcmd "^ip" | $sl_awkcmd '{print $2"*"$4"*"$5"*"$6}'`
98 
99for sl_ip in $sl_ips
100do
101 sl_ipn=`echo $sl_ip | $sl_awkcmd -F '*' '{print $1}'`
102 sl_ipgws=`echo $sl_ip | $sl_awkcmd -F '*' '{print $2,$3,$4}'`
103 sl_ok="no"
104 for sl_ipgw in $sl_ipgws
105 do
106 sl_tbl=`$sl_ipcmd ro ls ta $sl_ipgw`
107 if [ "$sl_tbl x" != " x" ] && [ "$sl_ok" = "no" ]
108 then
109 if [ $scm_info -gt 1 ]; then echo "Creating new rules to send $sl_ipn to table $sl_ipgw" ; fi
110 $sl_ipcmd ru add from $sl_ipn lookup $sl_ipgw
111 sl_ok="yes"
112 else
113 if [ "$sl_ok" = "no" ]
114 then
115 if [ $scm_info -gt 1 ]; then echo "For $sl_ipn table $sl_ipgw not used because it is empty" ; fi
116 else
117 if [ $scm_info -gt 1 ]; then echo "For $sl_ipn table $sl_ipgw not used because it has lower priority" ; fi
118 fi
119 fi
120 done
121done
122 
123$sl_ipcmd ru add from $sl_ipnodef to $sl_ipnodef lookup main
124 
1258simandl#this should make faster applying of new routing tables
126$sl_ipcmd ro flush cache
127 
1287simandl} # s_fillrules
1298simandl 
1307simandl######################################################################
13110simandl# here we look into the main routing table for path to our iGWs
132# and we fill these tables with two halves default nets that
133# point to appropriate direction
134# this routine can be skipped when the routing table is the same
1357simandls_filltables()
136{
13710simandlif [ $scm_info -gt 0 ]; then echo "Checking main routing table" ; fi
138 
1397simandlif [ $scm_info -gt 0 ]; then echo "Filling tables" ; fi
140 
1419simandlsl_igws=`$sl_catcmd $sl_sedlocache/$sl_nmcnf | $sl_grepcmd -E "^igw|^myigw" | $sl_awkcmd '{print $3"*"$2"*"$1}'`
1427simandl 
143for sl_igw in $sl_igws
144 do
145 sl_igwn=`echo $sl_igw | $sl_awkcmd -F '*' '{print $1}'`
146 sl_igwip=`echo $sl_igw | $sl_awkcmd -F '*' '{print $2}'`
1479simandl sl_igwtype=`echo $sl_igw | $sl_awkcmd -F '*' '{print $3}'`
14814simandl#oprava falesneho routovani na lokalni iface - pokud jsme lokalni igw tak se nema najit ip
149#protoze cesta dal neni - jsme totiz uz na lokalnim iface
150 sl_igwgt=`$sl_ipcmd ro ls | $sl_grepcmd -v "proto kernel" | $sl_grepcmd "^$sl_igwip " | $sl_awkcmd '{print $3}'`
1517simandl 
1529simandl # equal cost multipath detection - just first IP is taken as way to igw
1537simandl if [ "$sl_igwgt x" = "zebra x" ]
154 then
155 sl_igwgt=`$sl_ipcmd ro ls | $sl_grepcmd -A 1 "^$sl_igwip " | $sl_grepcmd "nexthop" | $sl_awkcmd '{print $3}'`
156 fi
157 
1589simandl #if myigw then fill table for local gateway with single ip from config
159 if [ "$sl_igwtype x" = "myigw x" ]
160 then
161 sl_igwgt=$sl_igwip
162 fi
16311simandl #testing if the igw has not a route in global routing table
1647simandl if [ "$sl_igwgt x" = " x" ]
165 then
16611simandl if [ $scm_info -gt 1 ]; then echo "Route not found for igw $sl_igwn" ; fi
167 sl_myigw=`cat $sl_sedlocnf | $sl_grepcmd "^myigw" | $sl_grepcmd $sl_igwn | $sl_awkcmd '{print $3}'`
168 #testing if the igw without route is in local config
169 #if not we go to flush its table and set flag to redo rules
170 if [ "$sl_myigw x" = " x" ]
171 then
172 #getting num of routes of igw
17313simandl sl_igwnr=`$sl_ipcmd ro ls ta all | $sl_grepcmd -c "table ${sl_igwn} "`
17411simandl if [ "$sl_igwnr x" = "0 x" ]
175 then
17612simandl if [ $scm_info -gt 1 ]; then echo "Table $sl_igwn is already empty - no action taken" ; fi
17711simandl else
17812simandl if [ $scm_info -gt 1 ]; then echo "Table $sl_igwn will be flushed and rules rearranged" ; fi
17911simandl $sl_ipcmd ro fl ta $sl_igwn
180 #because this igw dissapeared we set a flag for rules recreation
181 sl_diffigw=1
182 fi
183 else
18413simandl if [ $scm_info -gt 1 ]; then echo "Igw $sl_igwn found in local config - leaving table as is" ; fi
18511simandl fi
1867simandl else
187 sl_tbl=`$sl_ipcmd ro ls ta $sl_igwn`
18812simandl #if the table is empty we fill it and we set flag for rules recreation
189 if [ "$sl_tbl x" = " x" ]
1907simandl then
19112simandl sl_diffigw=1
192 $sl_ipcmd ro add 0.0.0.0/1 via $sl_igwgt ta $sl_igwn
193 $sl_ipcmd ro add 128.0.0.0/1 via $sl_igwgt ta $sl_igwn
194 if [ "$sl_igwtype x" = "myigw x" ]
195 then
196 if [ $scm_info -gt 1 ]; then echo "Table $sl_igwn filled with default myigw $sl_igwgt" ; fi
197 else
198 if [ $scm_info -gt 1 ]; then echo "Table $sl_igwn filled with default gw $sl_igwgt" ; fi
199 fi
200 #the table is not empty so we check if routes are the same
2019simandl else
20212simandl #picking default gateway from the table
203 sl_igwogt=`$sl_ipcmd ro ls ta $sl_igwn | $sl_awkcmd '{print $3}' | uniq`
204 #checking if the old default is same as the new one
205 if [ "$sl_igwogt x" = "$sl_igwgt x" ]
206 then
207 if [ $scm_info -gt 1 ]; then echo "Table $sl_igwn will not be changed and default is $sl_igwgt" ; fi
208 else
209 #the new default is different so we will flush the table, fill new default
21014simandl if [ $scm_info -gt 1 ]; then echo "Table $sl_igwn will be $sl_igwogt rewritten to default $sl_igwgt" ; fi
21112simandl #flushing old default route in the table
212 $sl_ipcmd ro fl ta $sl_igwn
213 #filling new default
214 $sl_ipcmd ro add 0.0.0.0/1 via $sl_igwgt ta $sl_igwn
215 $sl_ipcmd ro add 128.0.0.0/1 via $sl_igwgt ta $sl_igwn
216 fi
2179simandl fi
2187simandl fi
219 done
220 
221} # s_filltables
2228simandl 
2237simandl######################################################################
22410simandl# filling rttab with tables from config
225# only new tables are created with a new uniq number that is not important because
226# usually we handle tables just by their names
227# this routine acts only when a new iGW appears - only adding a table is supported
228# no deleting is implemented because it seems to be not necessary to delete an old table
229# because there is space enough and after reboot table will not be created
2307simandls_mktables()
231{
23210simandlif [ $scm_info -gt 0 ]; then echo "Checking tables" ; fi
233 
2349simandlsl_igws=`$sl_catcmd $sl_sedlocache/$sl_nmcnf | $sl_grepcmd -E "^igw|^myigw" | $sl_awkcmd '{print $3}'`
2357simandlfor sl_igw in $sl_igws
236 do
237 sl_igwrttb=`$sl_catcmd $sl_rttab | $sl_awkcmd '{print $2}' | $sl_grepcmd $sl_igw `
238 if [ "$sl_igwrttb x" = " x" ]
239 then
240 if [ $scm_info -gt 1 ]; then echo "Creating table for $sl_igw" ; fi
241 sl_cnt="$sl_rtnmax"
242 sl_ok="no"
243 until [ "$sl_cnt" -eq "$sl_rtnmin" ] || [ "$sl_ok" = "yes" ]
244 do
245 #space is used to recognized two and three digit numbers
246 sl_igwrttb=`cat $sl_rttab | awk '{print $1" "}' | grep "$sl_cnt " `
247 if [ "$sl_igwrttb x" = " x" ]
248 then
249 sl_ok="yes"
250 echo "$sl_cnt $sl_igw" >> $sl_rttab
251 fi
252 sl_cnt=$(($sl_cnt - 1 ))
25311simandl done
254 # a new table was created so we should set a flag for rules creation
255 sl_difftbl=1
2567simandl else
257 if [ $scm_info -gt 1 ]; then echo "Table found for $sl_igw no action taken" ; fi
258 fi
2599simandl done
2607simandl} # s_mktables
2618simandl 
2627simandl######################################################################
263s_getcfg()
264{
265if [ $scm_info -gt 0 ]; then echo "Getting config" ; fi
266if [ $scm_info -gt 1 ]; then echo "Using main config $sl_murlcfg" ; fi
267if [ $scm_info -gt 1 ]; then echo "Using local config $sl_sedlocnf" ; fi
268 
26910simandlrm -f "$sl_sedlocache/$sl_nmcnf.main.tmp"
2707simandl 
27110simandl$sl_wgetcmd -q -t 3 $sl_murlcfg -O "$sl_sedlocache/$sl_nmcnf.main.tmp"
272 
2737simandlif [ -s $sl_sedlocache/$sl_nmcnf.main.tmp ]
274 then
275 date > $sl_sedlocache/last_getcnf.txt
276 cp $sl_sedlocache/$sl_nmcnf.main.tmp $sl_sedlocache/$sl_nmcnf.main
27710simandl if [ $scm_info -gt 1 ]; then echo "Main config downloaded and accepted" ; fi
2787simandl else
2798simandl if [ $scm_info -gt 1 ]; then echo "Main config not downloaded - cached config will be used" ; fi
280 echo -n "Main config not downloaded " > $sl_sedlocache/last_getcnf.txt
2817simandl date >> $sl_sedlocache/last_getcnf.txt
282fi
283 
28410simandl# before generating a new cached config we store the old one for
285# comparison with the new one
286rm -f "$sl_sedlocache/$sl_nmcnf.old"
287if [ -s $sl_sedlocache/$sl_nmcnf ]
288 then
289 cp $sl_sedlocache/$sl_nmcnf $sl_sedlocache/$sl_nmcnf.old
290 else
291 touch $sl_sedlocache/$sl_nmcnf.old
292fi
293 
2947simandl# preparing cached config from local and main
295# the local config should be processed as the second to have
296# higher priority for rules from local config
297echo "# generated file" > $sl_sedlocache/$sl_nmcnf
298for sl_file in `ls $sl_sedlocache/$sl_nmcnf.main ; ls $sl_sedlocnf`
299do
300cat $sl_file | grep "^mcnf" | $sl_trcmd ';' '#' | awk '{print $1"\t"$2}' >> $sl_sedlocache/$sl_nmcnf
301cat $sl_file | grep "^igw" | $sl_trcmd ';' '#' | awk '{print $1"\t"$2"\t"$3}' >> $sl_sedlocache/$sl_nmcnf
302cat $sl_file | grep "^ip" | $sl_trcmd ';' '#' | awk '{print $1"\t"$2"\t"$3"\t"$4"\t"$5"\t"$6}' >> $sl_sedlocache/$sl_nmcnf
303done
3048simandl 
305#local gateways taken from local config
306cat $sl_sedlocnf | grep "^myigw" | $sl_trcmd ';' '#' | awk '{print $1"\t"$2"\t"$3}' >> $sl_sedlocache/$sl_nmcnf
307 
3087simandl#cat $sl_sedlocache/$sl_nmcnf | sort | uniq > $sl_sedlocache/$sl_nmcnf.uniq
309#mv $sl_sedlocache/$sl_nmcnf.uniq $sl_sedlocache/$sl_nmcnf
310 
31110simandlsl_diffcfg=`diff $sl_sedlocache/$sl_nmcnf $sl_sedlocache/$sl_nmcnf.old | grep -c .`
312if [ $sl_diffcfg -gt 0 ]
313 then
314 if [ $scm_info -gt 0 ]; then echo "New config is different than the old one" ; fi
315 else
316 if [ $scm_info -gt 0 ]; then echo "New config is the same as the old one" ; fi
317fi
318 
31911simandl# showing number of rules in config and system
32010simandlsl_numru=`ip ru ls | grep -c lookup`
321sl_numip=`grep -c ^ip $sl_sedlocache/$sl_nmcnf`
322sl_numru=$(($sl_numru - 3 ))
323if [ $sl_numip -gt $sl_numru ]
324 then
325 if [ $scm_info -gt 0 ]; then echo "We have less rules ($sl_numru) than new config has ips ($sl_numip)" ; fi
32611simandl# sl_diffcfg="1"
32710simandl else
328 if [ $scm_info -gt 0 ]; then echo "We have $sl_numru rules and $sl_numip ips" ; fi
329fi
330 
3317simandl}
3328simandl 
3337simandl######################################################################
334s_version()
335{
336 echo sedlo $sl_version
337} # s_version
3388simandl 
3397simandl######################################################################
340s_report()
341{
3429simandl echo Content-type: text/html
343 echo
344 echo "Sedlo na routeru `hostname`"
345 echo "<pre>"
3467simandl echo "##### SEDLO #####"
347 echo "date : `date`"
348 echo "version : $sl_version"
349 echo "local_config : $sl_sedlocnf"
3509simandl echo "main_config : <a href=\"$sl_murlcfg\">$sl_murlcfg</a>"
3517simandl echo "last update : `cat $sl_sedlocache/last_getcnf.txt`"
352 echo "##### TABLES #####"
353 cat $sl_rttab
3549simandl echo ; echo "##### DEFAULT ROUTES IN TABLES #####"
355 $sl_ipcmd ro ls ta all | $sl_grepcmd table | $sl_grepcmd -v local | $sl_trcmd " " "\t"
356 echo ; echo "##### RULES FOR IPS #####"
357 $sl_ipcmd ru ls | $sl_trcmd " " "\t"
358 echo "</pre>"
3597simandl} # s_report
3608simandl 
3619simandl 
362 
3637simandl######################################################################
364s_help()
365{
366 echo Pouziti: sedlo [param]
367 echo param:
368 echo -V vypise verzi
369 echo -help vypise napovedu
370 echo -v malo upovidany
371 echo -vv hodne upovidany
372 echo -nogetcfg zajisti ze se nedude znovu nacitat konfigurace a pouzije se predchozi z cache
373 echo -report vypise prehled pravidel a tabulek
374 echo -flru odstrani vsechny pravidla
37511simandl echo -force bezpodminecne znovu obnovi vsechny pravidla
3767simandl} # s_help
3778simandl 
3787simandl######################################################################
379######################################################################
380 
381sl_unknown=""
382scm_nogetcfg=0
383scm_flru=0
384scm_info=0
38511simandlscm_force=0
386sl_diffigw=0
387sl_difftbl=0
3887simandl 
389# parsing input parameters
390while [ "a$1" != "a" ]
391do
392 case $1 in
393 -V)
394 s_version
395 exit 0
396 ;;
397 -h)
398 s_help
399 exit 0
400 ;;
401 -report)
402 s_report
403 exit 0
404 ;;
405 -flru)
406 scm_flru=1
407 shift
408 ;;
40911simandl -force)
410 scm_force=1
411 shift
412 ;;
4137simandl -help)
414 s_help
415 exit 0
416 ;;
417 -nogetcfg)
418 scm_nogetcfg=1
419 shift
420 ;;
421 -v)
422 scm_info=1
423 shift
424 ;;
425 -vv)
426 scm_info=2
427 shift
428 ;;
429 *)
430 sl_unknown="$sl_unknown$1 "
431 shift
432 esac
433done
434 
435# printing the list of bad parameters (if there are some)
436if [ "a$sl_unknown" != "a" ]
437then
438 echo "$slm_unknown $sl_unknown"
439 s_help
440 exit 0
441fi
442 
443if [ $scm_flru -eq 1 ]
444then
445 s_flru
446 exit 0
447fi
448 
449if [ $scm_nogetcfg -eq 0 ]
450then
451 s_getcfg
452fi
453 
454s_mktables
455s_filltables
45611simandl#echo $sl_difftbl
457#echo $sl_diffcfg
458#echo $sl_diffigw
459#echo $scm_force
46013simandl#exit 0
46111simandl#flushing and filling rules is done only when
462#new table is created
463#config is changed
464#some igw dissapears or appears
465#-force command line parameter was used
466if [ $sl_difftbl -gt 0 ] || [ $sl_diffcfg -gt 0 ] || [ $sl_diffigw -gt 0 ] || [ $scm_force -gt 0 ]
46710simandlthen
468 s_fillrules
469fi
470 
4717simandlexit 0

Powered by WebSVN 2.2.1