jablonka.czprosek.czf

sedlo

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

 

Line No. Rev Author Line
17simandl#!/bin/bash
2# author : Petr Simandl www.simandl.cz
311simandl# release date : 06/08/2006
47simandl# name : sedlo
5# description : dynamic side routing tables tool
6# license : GPL
7 
812simandlsl_version="0.0.4pre3"
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}'`
1487simandl sl_igwgt=`$sl_ipcmd ro ls | $sl_grepcmd "^$sl_igwip " | $sl_awkcmd '{print $3}'`
149 
1509simandl # equal cost multipath detection - just first IP is taken as way to igw
1517simandl if [ "$sl_igwgt x" = "zebra x" ]
152 then
153 sl_igwgt=`$sl_ipcmd ro ls | $sl_grepcmd -A 1 "^$sl_igwip " | $sl_grepcmd "nexthop" | $sl_awkcmd '{print $3}'`
154 fi
155 
1569simandl #if myigw then fill table for local gateway with single ip from config
157 if [ "$sl_igwtype x" = "myigw x" ]
158 then
159 sl_igwgt=$sl_igwip
160 fi
16111simandl 
162 #testing if the igw has not a route in global routing table
1637simandl if [ "$sl_igwgt x" = " x" ]
164 then
16511simandl if [ $scm_info -gt 1 ]; then echo "Route not found for igw $sl_igwn" ; fi
166 sl_myigw=`cat $sl_sedlocnf | $sl_grepcmd "^myigw" | $sl_grepcmd $sl_igwn | $sl_awkcmd '{print $3}'`
167 #testing if the igw without route is in local config
168 #if not we go to flush its table and set flag to redo rules
169 if [ "$sl_myigw x" = " x" ]
170 then
171 #getting num of routes of igw
172 sl_igwnr=`$sl_ipcmd ro ls ta all | $sl_grepcmd -c $sl_igwn`
173 if [ "$sl_igwnr x" = "0 x" ]
174 then
17512simandl if [ $scm_info -gt 1 ]; then echo "Table $sl_igwn is already empty - no action taken" ; fi
17611simandl else
17712simandl if [ $scm_info -gt 1 ]; then echo "Table $sl_igwn will be flushed and rules rearranged" ; fi
17811simandl $sl_ipcmd ro fl ta $sl_igwn
179 #because this igw dissapeared we set a flag for rules recreation
180 sl_diffigw=1
181 fi
182 else
183 echo "Igw $sl_igwn found in local config - leaving table as is"
184 fi
1857simandl else
186 sl_tbl=`$sl_ipcmd ro ls ta $sl_igwn`
18712simandl #if the table is empty we fill it and we set flag for rules recreation
188 if [ "$sl_tbl x" = " x" ]
1897simandl then
19012simandl sl_diffigw=1
191 $sl_ipcmd ro add 0.0.0.0/1 via $sl_igwgt ta $sl_igwn
192 $sl_ipcmd ro add 128.0.0.0/1 via $sl_igwgt ta $sl_igwn
193 if [ "$sl_igwtype x" = "myigw x" ]
194 then
195 if [ $scm_info -gt 1 ]; then echo "Table $sl_igwn filled with default myigw $sl_igwgt" ; fi
196 else
197 if [ $scm_info -gt 1 ]; then echo "Table $sl_igwn filled with default gw $sl_igwgt" ; fi
198 fi
199 #the table is not empty so we check if routes are the same
2009simandl else
20112simandl #picking default gateway from the table
202 sl_igwogt=`$sl_ipcmd ro ls ta $sl_igwn | $sl_awkcmd '{print $3}' | uniq`
203 #checking if the old default is same as the new one
204 if [ "$sl_igwogt x" = "$sl_igwgt x" ]
205 then
206 if [ $scm_info -gt 1 ]; then echo "Table $sl_igwn will not be changed and default is $sl_igwgt" ; fi
207 else
208 #the new default is different so we will flush the table, fill new default
209 if [ $scm_info -gt 1 ]; then echo "Table $sl_igwn will be rewritten to default $sl_igwgt" ; fi
210 #flushing old default route in the table
211 $sl_ipcmd ro fl ta $sl_igwn
212 #filling new default
213 $sl_ipcmd ro add 0.0.0.0/1 via $sl_igwgt ta $sl_igwn
214 $sl_ipcmd ro add 128.0.0.0/1 via $sl_igwgt ta $sl_igwn
215 fi
2169simandl fi
2177simandl fi
218 done
219 
220} # s_filltables
2218simandl 
2227simandl######################################################################
22310simandl# filling rttab with tables from config
224# only new tables are created with a new uniq number that is not important because
225# usually we handle tables just by their names
226# this routine acts only when a new iGW appears - only adding a table is supported
227# no deleting is implemented because it seems to be not necessary to delete an old table
228# because there is space enough and after reboot table will not be created
2297simandls_mktables()
230{
23110simandlif [ $scm_info -gt 0 ]; then echo "Checking tables" ; fi
232 
2339simandlsl_igws=`$sl_catcmd $sl_sedlocache/$sl_nmcnf | $sl_grepcmd -E "^igw|^myigw" | $sl_awkcmd '{print $3}'`
2347simandlfor sl_igw in $sl_igws
235 do
236 sl_igwrttb=`$sl_catcmd $sl_rttab | $sl_awkcmd '{print $2}' | $sl_grepcmd $sl_igw `
237 if [ "$sl_igwrttb x" = " x" ]
238 then
239 if [ $scm_info -gt 1 ]; then echo "Creating table for $sl_igw" ; fi
240 sl_cnt="$sl_rtnmax"
241 sl_ok="no"
242 until [ "$sl_cnt" -eq "$sl_rtnmin" ] || [ "$sl_ok" = "yes" ]
243 do
244 #space is used to recognized two and three digit numbers
245 sl_igwrttb=`cat $sl_rttab | awk '{print $1" "}' | grep "$sl_cnt " `
246 if [ "$sl_igwrttb x" = " x" ]
247 then
248 sl_ok="yes"
249 echo "$sl_cnt $sl_igw" >> $sl_rttab
250 fi
251 sl_cnt=$(($sl_cnt - 1 ))
25211simandl done
253 # a new table was created so we should set a flag for rules creation
254 sl_difftbl=1
2557simandl else
256 if [ $scm_info -gt 1 ]; then echo "Table found for $sl_igw no action taken" ; fi
257 fi
2589simandl done
2597simandl} # s_mktables
2608simandl 
2617simandl######################################################################
262s_getcfg()
263{
264if [ $scm_info -gt 0 ]; then echo "Getting config" ; fi
265if [ $scm_info -gt 1 ]; then echo "Using main config $sl_murlcfg" ; fi
266if [ $scm_info -gt 1 ]; then echo "Using local config $sl_sedlocnf" ; fi
267 
26810simandlrm -f "$sl_sedlocache/$sl_nmcnf.main.tmp"
2697simandl 
27010simandl$sl_wgetcmd -q -t 3 $sl_murlcfg -O "$sl_sedlocache/$sl_nmcnf.main.tmp"
271 
2727simandlif [ -s $sl_sedlocache/$sl_nmcnf.main.tmp ]
273 then
274 date > $sl_sedlocache/last_getcnf.txt
275 cp $sl_sedlocache/$sl_nmcnf.main.tmp $sl_sedlocache/$sl_nmcnf.main
27610simandl if [ $scm_info -gt 1 ]; then echo "Main config downloaded and accepted" ; fi
2777simandl else
2788simandl if [ $scm_info -gt 1 ]; then echo "Main config not downloaded - cached config will be used" ; fi
279 echo -n "Main config not downloaded " > $sl_sedlocache/last_getcnf.txt
2807simandl date >> $sl_sedlocache/last_getcnf.txt
281fi
282 
28310simandl# before generating a new cached config we store the old one for
284# comparison with the new one
285rm -f "$sl_sedlocache/$sl_nmcnf.old"
286if [ -s $sl_sedlocache/$sl_nmcnf ]
287 then
288 cp $sl_sedlocache/$sl_nmcnf $sl_sedlocache/$sl_nmcnf.old
289 else
290 touch $sl_sedlocache/$sl_nmcnf.old
291fi
292 
2937simandl# preparing cached config from local and main
294# the local config should be processed as the second to have
295# higher priority for rules from local config
296echo "# generated file" > $sl_sedlocache/$sl_nmcnf
297for sl_file in `ls $sl_sedlocache/$sl_nmcnf.main ; ls $sl_sedlocnf`
298do
299cat $sl_file | grep "^mcnf" | $sl_trcmd ';' '#' | awk '{print $1"\t"$2}' >> $sl_sedlocache/$sl_nmcnf
300cat $sl_file | grep "^igw" | $sl_trcmd ';' '#' | awk '{print $1"\t"$2"\t"$3}' >> $sl_sedlocache/$sl_nmcnf
301cat $sl_file | grep "^ip" | $sl_trcmd ';' '#' | awk '{print $1"\t"$2"\t"$3"\t"$4"\t"$5"\t"$6}' >> $sl_sedlocache/$sl_nmcnf
302done
3038simandl 
304#local gateways taken from local config
305cat $sl_sedlocnf | grep "^myigw" | $sl_trcmd ';' '#' | awk '{print $1"\t"$2"\t"$3}' >> $sl_sedlocache/$sl_nmcnf
306 
3077simandl#cat $sl_sedlocache/$sl_nmcnf | sort | uniq > $sl_sedlocache/$sl_nmcnf.uniq
308#mv $sl_sedlocache/$sl_nmcnf.uniq $sl_sedlocache/$sl_nmcnf
309 
31010simandlsl_diffcfg=`diff $sl_sedlocache/$sl_nmcnf $sl_sedlocache/$sl_nmcnf.old | grep -c .`
311if [ $sl_diffcfg -gt 0 ]
312 then
313 if [ $scm_info -gt 0 ]; then echo "New config is different than the old one" ; fi
314 else
315 if [ $scm_info -gt 0 ]; then echo "New config is the same as the old one" ; fi
316fi
317 
31811simandl# showing number of rules in config and system
31910simandlsl_numru=`ip ru ls | grep -c lookup`
320sl_numip=`grep -c ^ip $sl_sedlocache/$sl_nmcnf`
321sl_numru=$(($sl_numru - 3 ))
322if [ $sl_numip -gt $sl_numru ]
323 then
324 if [ $scm_info -gt 0 ]; then echo "We have less rules ($sl_numru) than new config has ips ($sl_numip)" ; fi
32511simandl# sl_diffcfg="1"
32610simandl else
327 if [ $scm_info -gt 0 ]; then echo "We have $sl_numru rules and $sl_numip ips" ; fi
328fi
329 
33012simandl#zero rules means this is the firs time we run sedlo and it needs to force rules creation
331#checking if there are some rule and if not then we force rules recreation
332if [ $sl_numru -eq 0 ]
333 then
334 if [ $scm_info -gt 0 ]; then echo "We have zero rules ($sl_numru) - rules recreation will be forced" ; fi
335 scm_force=1
336fi
337 
3387simandl}
3398simandl 
3407simandl######################################################################
341s_version()
342{
343 echo sedlo $sl_version
344} # s_version
3458simandl 
3467simandl######################################################################
347s_report()
348{
3499simandl echo Content-type: text/html
350 echo
351 echo "Sedlo na routeru `hostname`"
352 echo "<pre>"
3537simandl echo "##### SEDLO #####"
354 echo "date : `date`"
355 echo "version : $sl_version"
356 echo "local_config : $sl_sedlocnf"
3579simandl echo "main_config : <a href=\"$sl_murlcfg\">$sl_murlcfg</a>"
3587simandl echo "last update : `cat $sl_sedlocache/last_getcnf.txt`"
359 echo "##### TABLES #####"
360 cat $sl_rttab
3619simandl echo ; echo "##### DEFAULT ROUTES IN TABLES #####"
362 $sl_ipcmd ro ls ta all | $sl_grepcmd table | $sl_grepcmd -v local | $sl_trcmd " " "\t"
363 echo ; echo "##### RULES FOR IPS #####"
364 $sl_ipcmd ru ls | $sl_trcmd " " "\t"
365 echo "</pre>"
3667simandl} # s_report
3678simandl 
3689simandl 
369 
3707simandl######################################################################
371s_help()
372{
373 echo Pouziti: sedlo [param]
374 echo param:
375 echo -V vypise verzi
376 echo -help vypise napovedu
377 echo -v malo upovidany
378 echo -vv hodne upovidany
379 echo -nogetcfg zajisti ze se nedude znovu nacitat konfigurace a pouzije se predchozi z cache
380 echo -report vypise prehled pravidel a tabulek
381 echo -flru odstrani vsechny pravidla
38211simandl echo -force bezpodminecne znovu obnovi vsechny pravidla
3837simandl} # s_help
3848simandl 
3857simandl######################################################################
386######################################################################
387 
388sl_unknown=""
389scm_nogetcfg=0
390scm_flru=0
391scm_info=0
39211simandlscm_force=0
393sl_diffigw=0
394sl_difftbl=0
3957simandl 
396# parsing input parameters
397while [ "a$1" != "a" ]
398do
399 case $1 in
400 -V)
401 s_version
402 exit 0
403 ;;
404 -h)
405 s_help
406 exit 0
407 ;;
408 -report)
409 s_report
410 exit 0
411 ;;
412 -flru)
413 scm_flru=1
414 shift
415 ;;
41611simandl -force)
417 scm_force=1
418 shift
419 ;;
4207simandl -help)
421 s_help
422 exit 0
423 ;;
424 -nogetcfg)
425 scm_nogetcfg=1
426 shift
427 ;;
428 -v)
429 scm_info=1
430 shift
431 ;;
432 -vv)
433 scm_info=2
434 shift
435 ;;
436 *)
437 sl_unknown="$sl_unknown$1 "
438 shift
439 esac
440done
441 
442# printing the list of bad parameters (if there are some)
443if [ "a$sl_unknown" != "a" ]
444then
445 echo "$slm_unknown $sl_unknown"
446 s_help
447 exit 0
448fi
449 
450if [ $scm_flru -eq 1 ]
451then
452 s_flru
453 exit 0
454fi
455 
456if [ $scm_nogetcfg -eq 0 ]
457then
458 s_getcfg
459fi
460 
461s_mktables
462s_filltables
46311simandl#echo $sl_difftbl
464#echo $sl_diffcfg
465#echo $sl_diffigw
466#echo $scm_force
4677simandl 
46811simandl#flushing and filling rules is done only when
469#new table is created
470#config is changed
471#some igw dissapears or appears
472#-force command line parameter was used
473if [ $sl_difftbl -gt 0 ] || [ $sl_diffcfg -gt 0 ] || [ $sl_diffigw -gt 0 ] || [ $scm_force -gt 0 ]
47410simandlthen
475 s_fillrules
476fi
477 
4787simandlexit 0

Powered by WebSVN 2.2.1