X-Git-Url: http://git.onelab.eu/?p=planetlab-umts-tools.git;a=blobdiff_plain;f=backend%2Fumts_functions;fp=backend%2Fumts_functions;h=0000000000000000000000000000000000000000;hp=2ed7a0b1b2569c9abe3179c03f6c97441d8c68d6;hb=29a8ad81f201bb3c538057dd174c31c9ae551e78;hpb=46cf404603955fa122ad50cfe9a72b82491f9b4d

diff --git a/backend/umts_functions b/backend/umts_functions
deleted file mode 100644
index 2ed7a0b..0000000
--- a/backend/umts_functions
+++ /dev/null
@@ -1,432 +0,0 @@
-#!/bin/bash
-
-
-STROK="remote IP address"
-GCOM=""
-LOGF="/tmp/umtslogs"
-PPPD_PIDFILE="/var/run/umts_pppd.pid"
-DESTS_FILE="/tmp/umts_dest_file"
-FILE_TEMP_NID="/tmp/umts_temp_nid"
-FILE_UMTS_INT="/tmp/umts_dev"
-LOCK_DIR="/var/run/umts_lock"
-FILE_LOCK_SLIVER="/var/run/umts_locking_sliver"
-PPP_INT="ppp0"
-PPPD="pppd"
-
-
-function set_umts_dev(){
-	local umts_dev=$1
-	echo $umts_dev > $FILE_UMTS_INT
-}
-
-function get_umts_dev(){
-	if [ -e $FILE_UMTS_INT ]; then
-		cat $FILE_UMTS_INT
-	fi
-}
-
-function unset_umts_dev(){
-	rm -f $FILE_UMTS_INT
-}
-
-
-function init_umts(){
-	local found=1
-
-	if [ -f /usr/bin/gcom ]; then 
-		GCOM=/usr/bin/gcom
-    	elif [ -f /usr/bin/comgt ]; then
-		GCOM=/usr/bin/comgt
-    	else
-		echo "I couldn't find gcom"
-    		return 1;
-    	fi
-
-	unset_umts_dev
-	
-	if [ -e $LOCK_DIR ]; then
-		rmdir $LOCK_DIR
-	fi
-
-	for i in /dev/umts_modem /dev/umts_modem1; do	
-		echo "Testing if the umts interface is present on the device $i..."
-		if [ -e $i ]; then
-			if $GCOM -d $i; then
-				found=0
-				set_umts_dev $i 
-				break
-			fi
-		fi	
-	done 
-	
-	if ! [  $found == 0 ]; then
-		echo "I couldn't find the umts device. Make a symlink from it to /dev/umts_modem."
-		return 1
-	fi
-
-	if ! grep "umts_table" /etc/iproute2/rt_tables > /dev/null 2>&1; then
-		echo "20 umts_table" >> /etc/iproute2/rt_tables
-	fi
-
-	return 0
-
-}
-
-
-function get_temp_nid(){
-	cat $FILE_TEMP_NID
-}
-
-
-#called when the connection is started
-function conn_on(){
-	local sliver=$1
-
-	#DESTS_FILE contains added destinations
-	rm -f $DESTS_FILE 
-
-	set_temp_nid $sliver_nid
-
-	set_routes $sliver
-
-	cat $LOGF | grep "local"
-	return 0
-
-}
-
-#called when the connection is terminated
-function conn_off(){
-	local sliver=$1
-	local ppp_addr=$2
-
-	unset_routes $sliver $ppp_addr
-
-	for i in `cat $DESTS_FILE`; do
-		del_destination $i $sliver > /dev/null 2>&1
-	done
-
-	rm $DESTS_FILE >/dev/null 2>&1
-}
-
-function start_umts(){
-    local sliver=$1
-    local sliver_nid=`get_nid $sliver`
-
-    if ! lock $sliver; then
-	return 1
-    fi	
-
-    if status_umts; then
-	 echo "Already connected"
-	 return 0; 
-    fi
-
-    if [[ `get_umts_dev` == "" ]]; then 
-	if [[ init_umts != 0 ]]; then	
-		return 1
-	fi
-    fi
-
-    if ! [ -e `get_umts_dev` ];  then
-	echo "Umts interface is not present"
-	return 1
-    fi
-
-    rm -f $LOGF
-
-    exec /usr/sbin/pppd nodetach `get_umts_dev` 460800 \
-        	0.0.0.0:0.0.0.0 \
-        	connect "/usr/sbin/chat -v                     \
-        	TIMEOUT         6                              \
-        	ABORT           '\nBUSY\r'                     \
-        	ABORT           '\nNO ANSWER\r'                \
-        	ABORT           '\nRINGING\r\n\r\nRINGING\r'   \
-        	''              ATZ     OK 'ATQ0 V1 E1 S0=0 &C1 &D2 +FCLASS=0' OK  \
-        	ATD*99***1#    CONNECT ''" > $LOGF &
-
-    echo $! > $PPPD_PIDFILE
-
-    sleep 5s;  #waiting for the interface to establish the link
-    if grep "$STROK" $LOGF >/dev/null 2>&1; then
-	conn_on $sliver $sliver_nid
-    else
-	#second try
-	sleep 5s;
-	if grep "$STROK" $LOGF >/dev/null 2>&1; then
-	    conn_on $sliver $sliver_nid
-	else
-	    stop_umts $sliver
-	    return 1
-	fi
-    fi
-}
-
-
-
-
-function stop_umts(){
-    local sliver=$1
-    local sliver_nid=`get_nid $sliver`
-    local ppp_addr
-
-    if ! [ -e $PPPD_PIDFILE ]; then 
-	echo "Disconnected"
-	return 0;
-    fi
-
-    ppp_addr=`get_ppp_address`
-
-    if ! check_who_locked $sliver; then
-	return 1
-    fi
-
-    PID=`cat $PPPD_PIDFILE`;
-
-    if [ -d /proc/$PID ] &&  grep $PPPD /proc/$PID/cmdline >/dev/null 2>&1; then 	
-	kill $PID;	touch $DESTS_FILE
-
-	sleep 2s;
-    fi
-
-    if status_umts; then
-	return 1;
-    else
-	conn_off $sliver $ppp_addr
-	cat $LOGF | grep "time"
-	rm $PPPD_PIDFILE
-	unlock $sliver;
-	return 0
-    fi
-}
-
-
-function status_umts(){
-    local sliver=$1
-	
-    if ! [ -e $PPPD_PIDFILE ]; then return 1; fi
-
-    PID=`cat $PPPD_PIDFILE`
-
-    if [ -d /proc/$PID ] &&  grep $PPPD /proc/$PID/cmdline >/dev/null 2>&1; then
-        return 0;
-    else 
-	return 1;
-    fi
-}
-
-#add the ppp interface to the slice - not used at the moment
-function add_interface(){
-    local nid=`get_nid $1`
-    $NADDRESS --add --nid $nid --ip $PPP_INT >>$LOGFILE 2>&1;
-}
-
-#remove the ppp interface from the slice - not used at the moment
-function del_interface(){
-    local nid=`get_nid $1`
-    #$NADDRESS --remove --nid $NID --ip $PPP_INT >>$LOGFILE 2>&1;
-}
-
-#get slice network id
-function get_nid(){
-    id -u ${1}
-}
-
-function set_routes(){
-	local sliver=$1
-	local sliver_nid=`get_nid $sliver`
-	local temp_nid=`get_temp_nid`
-	local ppp_addr=`get_ppp_address`
-
-	#remarking of packets, to trigger rerouting, and SNAT
-	iptables -t mangle -A OUTPUT -j MARK --copy-xid 0x00
-	iptables -t mangle -A OUTPUT -m mark --mark $sliver_nid -j MARK --set-mark $temp_nid
-	iptables -t nat -A POSTROUTING -o $PPP_INT -j SNAT --to-source $ppp_addr
-	
-	#restores the original mark
-	iptables -t mangle -I POSTROUTING 1 -m mark --mark $temp_nid -j MARK --set-mark $sliver_nid
-
-	#forbids other slices to use the UMTS interface
-	iptables -t mangle -I POSTROUTING 2 -o $PPP_INT -m mark ! --mark $sliver_nid -j DROP
-	
-	#enables the explicit bind to the ppp interface
-	ip route flush table umts_table >/dev/null 2>&1 
-	ip rule add from $ppp_addr fwmark $temp_nid table umts_table >/dev/null 2>&1
-	ip route add default dev $PPP_INT src $ppp_addr table umts_table >/dev/null 2>&1
-	ip route flush cache  >/dev/null 2>&1
-}
-
-function unset_routes(){
-	local sliver=$1
-	local ppp_addr=$2
-	local sliver_nid=`get_nid $sliver`
-	local temp_nid=`get_temp_nid`
-	
-
-	#remarking and SNAT removed 
-	iptables -t mangle -D OUTPUT -j MARK --copy-xid 0x00
-	iptables -t mangle -D OUTPUT -m mark --mark $sliver_nid -j MARK --set-mark $temp_nid
-	iptables -t nat -D POSTROUTING -o $PPP_INT -j SNAT --to-source $ppp_addr
-	iptables -t mangle -D POSTROUTING -m mark --mark $temp_nid -j MARK --set-mark $sliver_nid
-
-	iptables -t mangle -D POSTROUTING -o $PPP_INT -m mark ! --mark $sliver_nid -j DROP
-
-	#disable the explicit bind to the ppp interface
-	ip rule del from $ppp_addr fwmark $temp_nid table umts_table  >/dev/null 2>&1
-	#ip route del default dev $PPP_INT  src $ppp_addr table umts_table >/dev/null 2>&1
-	ip route flush cache  >/dev/null 2>&1
-
-}
-
-function add_destination(){
-	local dest="$1"
-	local sliver=$2
-	local sliver_nid=`get_nid $sliver`
-	local temp_nid=`get_temp_nid`
-
-	if [[ ! $dest ]]; then return 1; fi
-
-	if ! status_umts; then
-		return 1;
-	fi
-
-	if ! check_who_locked $sliver; then
-		return 1;
-	fi
-
-	if ip rule add to "$dest" fwmark $temp_nid table umts_table >/dev/null 2>&1; then
-		echo "$dest" >> $DESTS_FILE
-		return 0
-	else 
-		return 1	
-	fi
-	ip route flush cache  >/dev/null 2>&1
-}
-
-function del_destination(){
-	local dest="$1"
-	local sliver=$2
-	local sliver_nid=`get_nid $sliver`
-	local temp_nid=`get_temp_nid`
-
-	if [[ ! $dest ]]; then return 1; fi
-
-	if ! check_who_locked $sliver; then
-		return 1;
-	fi
-
-	if ip rule del to "$dest" fwmark $temp_nid table umts_table >/dev/null 2>&1; then
-		return 0;
-	else 
-		return 1;
-	fi
-	ip route flush cache  >/dev/null 2>&1
-}
-
-
-function get_ppp_address(){
-	ifconfig $PPP_INT | grep inet\ addr | cut -d ":" -f 2 | cut -d " " -f 1
-}
-
-function set_temp_nid(){
-	local sliver_nid=$1
-	local temp_nid=$((0x20000+$sliver_nid))
-
-	#k=0	
-	#while grep :$temp_nid: /etc/passwd; do
-	#	temp_nid=$((temp_nid+1))
-	#	k=$((k+1))
-	#	if [[ $k == 1000 ]]; then
-	#		logger "Fatal error: I couldn't find a temp_nid"
-	#		stop_umts
-	#		exit 1
-	#	fi
-	#done
-	echo $temp_nid > $FILE_TEMP_NID
-
-
-}
-
-function check_who_locked(){
-	local sliver=$1
-	local sliver_nid=`get_nid $sliver`
-	local ret=0
-
-	if [ -e $LOCK_DIR ]; then
- 		if [[ `cat $FILE_LOCK_SLIVER` != $sliver_nid ]]; then
-			echo "Interface in use by another slice.";
-			ret=1
-		fi
-	else
-		ret=1
-	fi
-
-	return $ret
-
-}
-
-function lock(){
-	local sliver=$1
-	local sliver_nid=`get_nid $sliver`
-	local ret=0
-
-	if [ -e $LOCK_DIR ]; then
- 		if ! check_who_locked $sliver; then
-			ret=1
-		fi
-	else 
-		if mkdir $LOCK_DIR >/dev/null 2>&1; then
-			echo "$sliver_nid" > $FILE_LOCK_SLIVER
-		else
-			ret=1
-		fi
-	fi
-
-	return $ret
-}
-
-function unlock(){
-	local sliver=$1
-	local sliver_nid=`get_nid $sliver`
-	local ret=0
-
-	if ! [ -e $LOCK_DIR ]; then
-		ret=1
-	else 
-		if ! check_who_locked $sliver; then
-			ret=1
-		else
-			if ! rmdir $LOCK_DIR; then
-				ret=1
-			fi
-		fi	
-	fi
-
-	return $ret
-}
-
-
-
-
-# checks ip addresses  
-function valid_dotted_quad(){
-    oldIFS=$IFS
-    IFS=.
-    set -f
-    set -- $1
-    if [ $# -eq 4 ]
-    then
-      for seg
-      do
-        case $seg in
-            ""|*[!0-9]*) return 1; break ;; ## Segment empty or non-numeric char
-            *) [ $seg -gt 255 ] && return 2 ;;
-        esac
-      done
-    else
-      return 3 ## Not 4 segments
-    fi
-    IFS=$oldIFS
-    set +f
-    return 0;
-}
-