Changeset 4990 in genesis
- Timestamp:
- Nov 2, 2005, 11:45:23 PM (19 years ago)
- Location:
- tools
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
tools/config-node.sh
r4989 r4990 12 12 # file list, check node name to be valid, '-n' mode. 13 13 # make moving of final files a bit safer. (dirkx) 14 # 1.04 Add auto read-only detection. 14 # 1.04 Add auto read-only detection. (dirkx) 15 # 1.05 Cope with WHOST containing a port number. (dirkx). 15 16 # 16 17 # If there is a global system configuration file, suck it in. … … 23 24 HTTP_PROXY_DEFAULT=${HTTP_PROXY:-http://proxy.wleiden.net:3128} 24 25 HTTP_USER_AGENT=${HTTP_USER_AGENT:-curl.faked.fetch/0.0} 25 VERSION=1.0 426 VERSION=1.05 26 27 QUIET=${QUIET:-} 27 28 PRETEND=no … … 96 97 97 98 99 HOST=`echo ${WHOST} | sed -e 's/:.*//'` 98 100 99 101 # connection test function … … 130 132 echo "nameserver ${resolver}" > /etc/resolv.conf 131 133 134 132 135 for nic in `ifconfig -l` 133 136 do … … 136 139 ;; 137 140 *) 138 if ping -qnoc ${ WHOST}; then139 echo Connection on interface ${nic} ok141 if ping -qnoc ${HOST}; then 142 echo Connection on interface ${nic} to ${HOST} ok. 140 143 else 141 144 killall dhclient … … 241 244 242 245 do_diff() { 243 diff -uwbB $1 $1.new 246 if test -e $1; then 247 diff -uwbB $1 $1.new 248 else 249 echo Warning: $1 does not yet exist - no DIFF 250 fi 244 251 } 245 252 … … 300 307 301 308 if [ -z ${HTTP_PROXY} ]; then 302 ( 303 log Checking DNS for ${WHOST} 304 host ${WHOST} > /dev/null || exit 1 305 log Checking if ${WHOST} can be reached 306 ping -qnoc 1 ${WHOST} > /dev/null || exit 1 307 log Connection OK 308 exit 0 309 ) || connset 309 ( 310 log Checking DNS for ${HOST} 311 host ${HOST} > /dev/null || exit 1 312 log Checking if ${HOST} can be reached 313 ping -qnoc 1 ${HOST} > /dev/null || exit 1 314 log Connection OK 315 exit 0 316 ) || connset 317 else 318 log Connection not checked because there is an http proxy configured: ${HTTP_PROXY}. 310 319 fi 311 320 -
tools/g_list.pl
r4317 r4990 9 9 do($conf_file) || die("Cann't open $conf_file"); 10 10 11 12 13 11 my $HTML=1; 14 12 … … 19 17 #programma gestopt kan worden 20 18 sub printline { 21 print "$_[0] 19 print "$_[0]\n"; 22 20 }; 23 21
Note:
See TracChangeset
for help on using the changeset viewer.