Developing lightweight computation at the DSG edge

qmp_wireless.sh 22.8 KB
Newer Older
1
2
3
4
5
6
#!/bin/sh
##############################
# Global variables definition
##############################
QMP_PATH="/etc/qmp"
OWRT_WIRELESS_CONFIG="/etc/config/wireless"
p4u's avatar
p4u committed
7
8
TEMPLATE_BASE="$QMP_PATH/templates/wifi"
WIFI_DEFAULT_CONFIG="$QMP_PATH/templates/wifi/wireless.default.config"
9
10
11
12
13
14
15
16
17
TMP="/tmp"
QMPINFO="/etc/qmp/qmpinfo"

#######################
# Importing files
######################
SOURCE_WIRELESS=1
. $QMP_PATH/qmp_common.sh
[ -z "$SOURCE_NET" ] && . $QMP_PATH/qmp_network.sh
18
[ -z "$SOURCE_FUNCTIONS" ] && . $QMP_PATH/qmp_functions.sh
19

p4u's avatar
p4u committed
20
21
22
##############################
# Prepare wireless interface
#############################
23
# Delete the wifi-iface interface in /etc/config/wireless and create an empty one
p4u's avatar
p4u committed
24
25
26
27
28
# First parameter: device
qmp_prepare_wireless_iface() {
	local device=$1
	qmp_uci_test wireless.$device && qmp_uci_del_raw wireless.$device
	qmp_uci_set_raw wireless.$device=wifi-iface
29
30
}

31
32
33
34
35
36
37
38
39
40
41
################################
# function qmp_check_channel() #
################################
#
# Check if a specific channel and mode combination is valid for a wifi device.
# It returns the same channel if valid, or a valid channel otherwise.
#
# Parameters:
#  1: wireless device (e.g.: wlan0)
#  2: channel number
#  3: operation mode (e.g.: adhoc, 80211s_aplan, none)
42
43

qmp_check_channel() {
p4u's avatar
p4u committed
44
45
46
47
48
49
		local dev="$1"
		local right_channel="$2"
		local channel="$(echo $2 | tr -d b+-)"
		local ht40="$(echo $2 | tr -d b[0-9])"
		local m11b="$(echo $2 | tr -d [0-9]+-)"
		local mode="$3"
50
51
52
		[ ! -z "$channel" ] && chaninfo="$($QMPINFO channels $1 | grep "^$channel ")"

		# Checking if some thing related with channel is wrong
p4u's avatar
p4u committed
53
		local wrong=0
54
		[ -z "$channel" ] || [ -z "$chaninfo" ] && wrong=1
55
56
		[ "$mode" == "80211s" -o "$mode" == "80211s_aplan" ] && [ -z "$(echo $chaninfo | grep 80211s)" ] && wrong=1
		[ "$mode" == "adhoc" -o "$mode" == "adhoc_ap" ] && [ -z "$(echo $chaninfo | grep adhoc)" ] && wrong=1
57
58
		[ "$ht40" == "+" ] && [ -z "$(echo $chaninfo | grep +)" ] && wrong=1
		[ "$ht40" == "-" ] && [ -z "$(echo $chaninfo | grep -)" ] && wrong=1
p4u's avatar
p4u committed
59
		[ "$m11b" == "b" ] && [ $channel -gt 14 ] && wrong=1
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109

		# If something wrong, asking for default parameter
		[ $wrong -ne 0 ] && right_channel="$(qmp_wifi_get_default channel $dev $mode)"

		echo "$right_channel"
}

#############################
# Configure driver from wifi
#############################
# This function reload modules from madwifi and mac80211
# Also depending on which driver is configured in config file, modifies the files from /etc/modules.d

qmp_configure_wifi_driver() {
	mac80211_modules="mac80211 ath ath5k ath9k_hw ath9k_common ath9k"
	madwifi_modules="ath_hal ath_ahb ath_pci"

	#Removing all modules
	echo "Removing wifi modules..."
	for m in $(qmp_reverse_order $mac80211_modules); do
		rmmod -f $m 2>/dev/null
	done
	for m in $(qmp_reverse_order $madwifi_modules); do
		rmmod -f $m 2>/dev/null
	done

	rmmod -a

	#Loading driver modules
	echo "Loading wifi modules..."
	driver="$(qmp_uci_get wireless.driver)"
	case $driver in
	"madwifi")
		mv /etc/modules.d/50-madwifi /etc/modules.d/22-madwifi 2>/dev/null
		for m in $madwifi_modules; do
			insmod $m
		done
		;;
	"mac80211")
		mv /etc/modules.d/22-madwifi /etc/modules.d/50-madwifi 2>/dev/null
		for m in $mac80211_modules; do
			insmod $m
		done
		;;
	*)
		qmp_error "Driver $driver not found"
		;;
	esac
}

110
111
112
113
114
115
116
117
########################################
# function qmp_configure_wifi_device() #
########################################
#
# Configure a wifi device according to qMp's config file
#
# Parameters:
#  1: wireless device number in qMp's config file
118
119
120

qmp_configure_wifi_device() {

p4u's avatar
p4u committed
121
122
	local id=$1
	local device="$(qmp_uci_get @wireless[$id].device)"
123
	local channel="$(qmp_uci_get @wireless[$id].channel)"
124

125
126
	echo ""
	echo "Configuring device #${1} (${device})"
127
128
129
130
131
132
133
134
135
136
137

	# Remove the wireless device in $device from the previous lan/wan/mesh groups
	# and put it in the appropriate ones according to the selected mode
	#
	# The possible modes are:
	# adhoc_ap ==> Ad hoc (mesh) + access point (LAN)
	# adhoc =====> Ad hoc (mesh)
	# ap ========> Access point (mesh)
	# aplan =====> Access point (LAN)
	# client ====> Client (mesh)
	# clientwan => Client (WAN)
138
139
	# 80211s ====> 802.11s (mesh)
	# 80211s_aplan ====> 802.11s (mesh) + access poin (LAN)
140
	# 80211s_adhoc ====> 802.11s (mesh) + adhoc (mesh)
141

p4u's avatar
p4u committed
142
	local mode="$(qmp_uci_get @wireless[$id].mode)"
143
  local dev_disabled="0"
144
145
146

	# Remove $device and also unneeded white spaces
	local allmeshdevs="$(qmp_uci_get interfaces.mesh_devices)"
147
	local meshdevs="$(echo $allmeshdevs | sed -e s/$device[a-z]*[A-Z]*//g  -e 's/^[ \t]*//' -e 's/ \+/ /g' -e 's/[ \t]*$//')"
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
	local allwandevs="$(qmp_uci_get interfaces.wan_devices)"
	local wandevs="$(echo $allwandevs | sed -e s/$device//g  -e 's/^[ \t]*//' -e 's/ \+/ /g' -e 's/[ \t]*$//')"
	local alllandevs="$(qmp_uci_get interfaces.lan_devices)"
	local landevs="$(echo $alllandevs | sed -e s/$device//g  -e 's/^[ \t]*//' -e 's/ \+/ /g' -e 's/[ \t]*$//')"

	case $mode in
		adhoc_ap)
			qmp_uci_set interfaces.mesh_devices "$meshdevs $device"
			qmp_uci_set interfaces.lan_devices  "$landevs $device"
			qmp_uci_set interfaces.wan_devices  "$wandevs"
			;;
		adhoc)
			qmp_uci_set interfaces.mesh_devices "$meshdevs $device"
			qmp_uci_set interfaces.lan_devices "$landevs"
			qmp_uci_set interfaces.wan_devices "$wandevs"
			;;
164
165
166
167
168
169
170
171
172
173
		80211s)
			qmp_uci_set interfaces.mesh_devices "$meshdevs $device"
			qmp_uci_set interfaces.lan_devices "$landevs"
			qmp_uci_set interfaces.wan_devices "$wandevs"
			;;
		80211s_aplan)
			qmp_uci_set interfaces.mesh_devices "$meshdevs $device"
			qmp_uci_set interfaces.lan_devices  "$landevs $device"
			qmp_uci_set interfaces.wan_devices  "$wandevs"
			;;
174
175
176
177
178
		80211s_adhoc)
			qmp_uci_set interfaces.mesh_devices "$meshdevs $device ${device}a"
			qmp_uci_set interfaces.lan_devices  "$landevs"
			qmp_uci_set interfaces.wan_devices  "$wandevs"
			;;
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
		ap)
			qmp_uci_set interfaces.mesh_devices "$meshdevs $device"
			qmp_uci_set interfaces.lan_devices "$landevs"
			qmp_uci_set interfaces.wan_devices "$wandevs"
			;;
		aplan)
			qmp_uci_set interfaces.lan_devices "$landevs $device"
			qmp_uci_set interfaces.mesh_devices "$meshdevs"
			qmp_uci_set interfaces.wan_devices "$wandevs"
			;;
		client)
			qmp_uci_set interfaces.mesh_devices "$meshdevs $device"
			qmp_uci_set interfaces.lan_devices "$landevs"
			qmp_uci_set interfaces.wan_devices "$wandevs"
			;;
		clientwan)
			qmp_uci_set interfaces.mesh_devices "$meshdevs"
			qmp_uci_set interfaces.lan_devices "$landevs"
			qmp_uci_set interfaces.wan_devices "$wandevs $device"
			;;
		none)
			qmp_uci_set interfaces.mesh_devices "$meshdevs"
			qmp_uci_set interfaces.lan_devices "$landevs"
			qmp_uci_set interfaces.wan_devices "$wandevs"
			echo "Interface $device is not managed by the qMp system"
204
      dev_disabled="1"
205
206
			;;
	esac
207
208

	# spliting channel in channel number and ht40 mode
p4u's avatar
p4u committed
209
210
211
212
213
214
215
216
	local channel_raw="$(qmp_uci_get @wireless[$id].channel)"
	local channel="$(echo $channel_raw | tr -d b+-)"

	# htmode and mode selection
	local ht40="$(echo $channel_raw | tr -d [0-9][A-z])"
	local mode11=""
	local htmode=""

217
	[ "$ht40" == "+" -o "$ht40" == "-" ] && {
p4u's avatar
p4u committed
218
219
220
		# Device is selected to use 40MHz channel
		htmode="HT40$ht40"

221
		[ $channel -lt 15 ] && {
222
223
224
225
226
227
228
		# If it is 2.4
			mode11="ng"
		} || {
		# If it is 5
			mode11="na"
		}

229
	} || {
p4u's avatar
p4u committed
230
231
		m11b="$(echo $channel_raw | tr -d [0-9]+-)"
		m11n="$($QMPINFO modes $device | grep -c n)"
232
		[ "$m11b" == "b" ] && {
Pau Escrich's avatar
Pau Escrich committed
233
			# Mode 11b is forced
p4u's avatar
p4u committed
234
235
			htmode=""
			mode11="b"
236
		} || [ $m11n -eq 0 ] && {
Pau Escrich's avatar
Pau Escrich committed
237
238
239
240
			# Device is not 11n compatible
			htmode=""
			mode11="auto"
		} || {
p4u's avatar
p4u committed
241
			# Device is 11n compatible
242
			[ $channel -lt 15 ] && {
243
244
245
246
247
248
249
250
			# If it is 2.4
				htmode="HT20"
				mode11="ng"
			} || {
			# If it is 5
				htmode="HT20"
				mode11="na"
			}
p4u's avatar
p4u committed
251
252
253
254
255
		}
	}

	local mac="$(qmp_uci_get @wireless[$id].mac)"
	local name="$(qmp_uci_get @wireless[$id].name)"
256
257
	local essidap="$(qmp_uci_get @wireless[$id].essidap)"
	local mesh80211s="$(qmp_uci_get @wireless[$id].mesh80211s)"
258
	local meshkey="$(qmp_uci_get @wireless[$id].meshkey)"
p4u's avatar
p4u committed
259
260
261
262
263
264
	local driver="$(qmp_uci_get wireless.driver)"
	local country="$(qmp_uci_get wireless.country)"
	local mrate="$(qmp_uci_get wireless.mrate)"
	local bssid="$(qmp_uci_get wireless.bssid)"
	local txpower="$(qmp_uci_get @wireless[$id].txpower)"
	local network="$(qmp_get_virtual_iface $device)"
265
	local key="$(qmp_uci_get @wireless[$id].key)"
266
	[ $(echo "$key" | wc -c) -lt 8 ] && encrypt="none" || encrypt="psk2"
267
	( [ $(echo "$meshkey" | wc -c) -lt 8 ] || [ $(echo "$meshkey" | wc -c) -gt 63 ] ) && meshcrypt="none" || meshcrypt="sae"
268

p4u's avatar
p4u committed
269
270
271
	local dev_id="$(echo $device | tr -d [A-z])"
	dev_id=${dev_id:-$(date +%S)}
	local radio="radio$dev_id"
272
273

	echo "------------------------"
274
275
276
277
278
279
280
281
282
283
	echo "Device        $device"
	echo "Mac           $mac"
	echo "Mode          $mode"
	echo "Driver        $driver"
	echo "Channel       $channel"
	echo "Country       $country"
	echo "Network       $network"
	echo "AdHoc ESSID   $name"
	echo "AP ESSID      $essidap"
	echo "Mesh network" $mesh80211s
284
	echo "Mesh key"     $meshkey
285
286
287
	echo "HTmode        $htmode"
	echo "11mode        $mode11"
	echo "Mrate         $mrate"
288
  echo "Disabled      $dev_disabled"
289
290
	echo "------------------------"

291
292
293
	[ -z $essidap ] && essidap=$(echo ${name:0:29})"-AP"
	[ -z $mesh80211s ] && mesh80211s="qMp"

p4u's avatar
p4u committed
294
	local vap=0
295
	local ahl=0
296

p4u's avatar
p4u committed
297
298
299
300
	[ $mode == "adhoc_ap" ] && {
		mode="adhoc"
		vap=1
	}
301

302
303
304
305
	[ $mode == "80211s_aplan" ] && {
		mode="80211s"
		vap=1
	}
306

307
308
309
310
311
	[ $mode == "80211s_adhoc" ] && {
		mode="80211s"
		ahl=1
	}

p4u's avatar
p4u committed
312
	device_template="$TEMPLATE_BASE/device.$driver-$mode11"
313
	[ ! -f "$device_template" ] && qmp_error "Device template $device_template not found"
314

315
	cat $device_template | grep -v ^# | grep -v "^list " | sed \
p4u's avatar
p4u committed
316
	 -e s/"#QMP_RADIO"/"$radio"/ \
317
318
319
320
	 -e s/"#QMP_TYPE"/"$driver"/ \
	 -e s/"#QMP_MAC"/"$mac"/ \
	 -e s/"#QMP_CHANNEL"/"$channel"/ \
	 -e s/"#QMP_COUNTRY"/"$country"/ \
Pau Escrich's avatar
Pau Escrich committed
321
	 -e s/"#QMP_MRATE"/"$mrate"/ \
322
	 -e s/"#QMP_HTMODE"/"$htmode"/ \
p4u's avatar
p4u committed
323
	 -e s/"#QMP_TXPOWER"/"$txpower"/ > $TMP/qmp_wifi_device
324
  echo "wireless.$radio.disabled="$dev_disabled >> $TMP/qmp_wifi_device
325

326
327
328
329
330
  [ $mode != "none" ] && {
    echo $device
  iface_template="$TEMPLATE_BASE/iface.$mode"
  [ ! -f "$iface_template" ] && qmp_error "Interface template $iface_template not found"
  echo $device
p4u's avatar
p4u committed
331
332
	qmp_prepare_wireless_iface $device

333
334
335
336
	echo "Mode is $mode"
	[ "$vap" == 1 ] && echo "plus AP mode"
	[ "$ahl" == 1 ] && echo "plus legacy mode"
	echo "Network is $network"
337

338
	cat $iface_template | grep -v ^# | sed \
p4u's avatar
p4u committed
339
340
341
	 -e s/"#QMP_RADIO"/"$radio"/ \
	 -e s/"#QMP_DEVICE"/"$device"/ \
	 -e s/"#QMP_IFNAME"/"$device"/ \
342
	 -e s/"#QMP_SSID"/"$(echo "${name:0:32}" | sed -e 's|/|\\/|g')"/ \
343
344
	 -e s/"#QMP_APSSID"/"$(echo "${essidap:0:32}" | sed -e 's|/|\\/|g')"/ \
	 -e s/"#QMP_MSSID"/"$(echo "${mesh80211s:0:32}" | sed -e 's|/|\\/|g')"/ \
345
346
	 -e s/"#QMP_MKEY"/"$(echo "${meshkey:0:63}" | sed -e 's|/|\\/|g')"/ \
	 -e s/"#QMP_MCRYPT"/"$meshcrypt"/ \
p4u's avatar
p4u committed
347
348
349
350
351
	 -e s/"#QMP_BSSID"/"$bssid"/ \
	 -e s/"#QMP_NETWORK"/"$network"/ \
	 -e s/"#QMP_ENC"/"$encrypt"/ \
	 -e s/"#QMP_KEY"/"$key"/ \
	 -e s/"#QMP_MODE"/"$mode"/ > $TMP/qmp_wifi_iface
352
	}
p4u's avatar
p4u committed
353
354

	# If virtual AP interface has to be configured
355
356
  vap_template="$TEMPLATE_BASE/iface.ap"
  [ ! -f "$vap_template" ] && qmp_error "Virtual AP template $vap_template not found"
p4u's avatar
p4u committed
357
358
	[ "$vap" == "1" ] && {
		qmp_prepare_wireless_iface ${device}ap
359
		cat $vap_template | grep -v ^# | sed \
p4u's avatar
p4u committed
360
361
362
	 	 -e s/"#QMP_RADIO"/"$radio"/ \
		 -e s/"#QMP_DEVICE"/"${device}ap"/ \
		 -e s/"#QMP_IFNAME"/"${device}ap"/ \
363
	 	 -e s/"#QMP_APSSID"/"$(echo "${essidap:0:32}" | sed -e 's|/|\\/|g')"/ \
p4u's avatar
p4u committed
364
365
366
367
368
		 -e s/"#QMP_NETWORK"/"lan"/ \
		 -e s/"#QMP_ENC"/"$encrypt"/ \
		 -e s/"#QMP_KEY"/"$key"/ \
		 -e s/"#QMP_MODE"/"ap"/ >> $TMP/qmp_wifi_iface
	}
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384

	# If legacy Ad hoc interface has to be configured
  ahl_template="$TEMPLATE_BASE/iface.adhoclegacy"
  [ ! -f "$ahl_template" ] && qmp_error "Legacy Ad hoc mesh template $ahl_template not found"
	[ "$ahl" == "1" ] && {
		qmp_prepare_wireless_iface ${device}a
		cat $ahl_template | grep -v ^# | sed \
		 -e s/"#QMP_RADIO"/"$radio"/ \
		 -e s/"#QMP_DEVICE"/"${device}a"/ \
		 -e s/"#QMP_IFNAME"/"${device}a"/ \
		 -e s/"#QMP_SSID"/"$(echo "${name:0:32}" | sed -e 's|/|\\/|g')"/ \
		 -e s/"#QMP_BSSID"/"$bssid"/ \
		 -e s/"#QMP_NETWORK"/"${network}a"/ \
		 -e s/"#QMP_MODE"/"adhoc"/ >> $TMP/qmp_wifi_iface
	}

p4u's avatar
p4u committed
385
	qmp_uci_import $TMP/qmp_wifi_iface
386
387
	qmp_uci_import $TMP/qmp_wifi_device
	# List arguments (needed for HT capab)
388
	cat $device_template | grep -v ^# | grep "^list " | sed s/"^list "//g | sed \
389
390
391
392
	 -e s/"#QMP_RADIO"/"$radio"/ | while read l; do
		qmp_uci_add_list_raw $l
	done
	uci reorder wireless.$radio=0
p4u's avatar
p4u committed
393
394
	#uci reorder wireless.@wifi-iface[$index]=16
	uci commit wireless
395
396
397
398
399
400
401
402
403
}

#############################
# Configure all wifi devices
#############################
#This function search for all wifi devices and leave them configured according qmp config file

qmp_configure_wifi() {

404
	echo "Backing up current wireless config file to: $OWRT_WIRELESS_CONFIG.qmp_backup"
405
406
407
	cp $OWRT_WIRELESS_CONFIG $OWRT_WIRELESS_CONFIG.qmp_backup 2>/dev/null
	echo "" > $OWRT_WIRELESS_CONFIG

p4u's avatar
p4u committed
408
	local j=0
409

p4u's avatar
p4u committed
410
411
412
	while qmp_uci_test qmp.@wireless[$j]; do
		qmp_configure_wifi_device $j
		j=$(( $j + 1 ))
413
414
415
	done

	echo ""
p4u's avatar
p4u committed
416
	echo "Done: all WiFi devices configured"
417
418
419
420
421
422
423
424
}

####################
# Get default values
####################
# This function returns the default values
#  - first parameter: is always what are you asking for (mode, channel, name,...)
#  - second parameter: is device name, only needed by mode and channel
425
#  - third parameter: is configured mode, only needed by channel
426
427

qmp_wifi_get_default() {
p4u's avatar
p4u committed
428
429
	local what="$1"
	local device="$2"
430
	qmp_log "Getting default ${what} for device ${device}"
431

432
433
434
435
436
437
438
439
440
	# WIRELESS MODE
	#
	# The default wireless mode depends on the following criteria:
	#  - Only 1 device:
	#		 · If 5 GHz-capable: 802.11s (mesh) on the 5 GHz band
	#		 · Otherwise: 802.11s (mesh) + AP (LAN) on the 2.4 GHz band
	#  - Two or more devices:
	#    · Depending on the device's capabilities and on the other devices'

441
442
443
444
	#  if only 1 bg device = ap
	#  else depending on index

	if [ "$what" == "mode" ]; then
445
446
		# Count the total number of devices, single-band 802.11a/an/ac devices,
		# single-band 802.11b/bg/bgn and dual-band 802.11ab/abg/abgn/ac devices.
p4u's avatar
p4u committed
447
		local devices=0
448
		local a_devices=0
p4u's avatar
p4u committed
449
		local bg_devices=0
450
		local abg_devices=0
451
452
		for wd in $(qmp_get_wifi_devices); do
			devices=$(( $devices + 1 ))
453
454
455
			a_devices=$(( $a_devices + $($QMPINFO modes $wd | egrep "a" | egrep -v "b|g" -c) ))
			bg_devices=$(( $bg_devices + $($QMPINFO modes $wd | egrep -v "a" | egrep "b|g" -c) ))
			abg_devices=$(( $abg_devices + $($QMPINFO modes $wd | egrep "a" | egrep "b|g" -c) ))
456
457
		done

p4u's avatar
p4u committed
458
		local index=$(echo $device | tr -d [A-z])
459

460
461

		# Only one device: if 5 GHz-capable, then 80211s; otherwise 80211s_aplan
462
		if [ $devices -eq 1 ]; then
463
			[ $bg_devices -eq 0 ] && echo "80211s" || echo "80211s_aplan"
464
465
		else

466
467
468
469
470
			# If current device is 5 GHz-capable only, then 80211s
			a_this_device=$($QMPINFO modes $device | egrep "a" | egrep -v "b|g" -c)
			if [ $a_this_device -eq 1 ]; then
				echo "80211s"
			else
471

472
473
474
475
476
				# If current device is 2.4 GHz-capable only => 80211s_aplan
				bg_this_device=$($QMPINFO modes $device | egrep -v "a" | egrep "b|g" -c)
				if [ $bg_this_device -eq 1 ]; then
					echo "80211s_aplan"
				else
477

478
					# If current device is dual-band capable only => depends on the other devices
479

480
481
482
483
					# If there are no other only 5 GHz-capable devices => 80211s
					if [ $a_devices -eq 0 ] && [ $abg_devices -eq 1 ]; then
						echo "80211s"
					else
484

485
486
487
488
						# If there are no other only 2.4 GHz-capable devices => 80211s_aplan
						if [ $bg_devices -eq 0 ] && [ $abg_devices -eq 1 ]; then
							echo "80211s_aplan"
						else
489

490
491
492
493
							# If all the devices are dual-band capable => first device 80211s, the rest 80211s_aplan
							if [ $abg_devices -eq $devices ]; then
								[ $index == 0 ] && echo "80211s" || echo "80211s_aplan"
							else
494

495
496
								# This should never happen
								echo "80211s_aplan"
497
		fi;fi;fi;fi;fi;fi
498

499
500
501
502
	# WIRELESS CHANNEL
	#
	# The default wireless channel depends on the card and on the configured mode:
	#
503
504
505
506
507
	#  Highest channel -> adhoc or not-configured
	#  Lower channel -> ap

	elif [ "$what" == "channel" ]; then
		[ -z "$device" ] && qmp_error "Device not found?"
p4u's avatar
p4u committed
508
		local mode="$3"
509
510

		# we are using index var to put devices in different channels
p4u's avatar
p4u committed
511
		local index=$(echo $device | tr -d [A-z])
512
		index=${index:-0}
513

514
		# QMPINFO returns a list of avaiable channels in this format: 120 ht40+ adhoc 80211s
515
		# this is the command line used to get available channels from a device
p4u's avatar
p4u committed
516
517
		local channels_cmd="$QMPINFO channels $device"
		local num_channels=$($channels_cmd | wc -l)
518

p4u's avatar
p4u committed
519
		# number of channels for AP is 11 or the number of channels available if less
p4u's avatar
p4u committed
520
		local num_channels_ap=$num_channels
p4u's avatar
p4u committed
521
		[ $num_channels_ap -gt 11 ] && num_channels_ap=11
522

p4u's avatar
p4u committed
523
524
525
		# use 40 Mhz of channel size (802.11n)
		local ht40="" # ht40+/ht40-

526
		# channel AdHoc is the last available (qmp_tac = inverse order) plus index*2+1 (1 3 5 ...)
527
		[ "$mode" == "adhoc" ] || [ "$mode" == "80211s" ] || [ -z "$mode" ] && {
528
			qmp_log "Getting default ${what} for device ${device} in mode ${mode}"
p4u's avatar
p4u committed
529
530
531

			#this is global
			ADHOC_INDEX=${ADHOC_INDEX:-0}
532

p4u's avatar
p4u committed
533
			channel_info="$(qmp_tac $channels_cmd | grep adhoc | awk NR==${ADHOC_INDEX}+${ADHOC_INDEX}*2+1)"
534

p4u's avatar
p4u committed
535
			ADHOC_INDEX=$(($ADHOC_INDEX+1))
p4u's avatar
p4u committed
536
			# c is the channel number, checking if it is 802.11bg
p4u's avatar
p4u committed
537
538
539
540
			# in such case it will be 1, 6 and 11 for performance and coexistence with other networks
			c="$(echo $channel_info | cut -d' ' -f1)"
			[ $c -lt 14 ] && {
				qmp_log "Using adhoc device in 802.11bg mode"
541
542
				if [ $c -lt 5 ]; then c=1
				else if [ $c -lt 9 ]; then c=6
p4u's avatar
p4u committed
543
544
545
546
				else c=11
				fi; fi
			ADHOC_BG_USED="$c"
			channel_info="$c $(echo $channel_info | cut -d' ' -f2-)"
p4u's avatar
p4u committed
547
548
549
550

			} || {
				# let's see if we can use ht40 mode
				ht40="$(echo $channel_info | cut -d' ' -f2)"
p4u's avatar
p4u committed
551
			}
552

p4u's avatar
p4u committed
553
		}
554

555
		# channel AP = ( node_id + index*3 ) % ( num_channels_ap) + 1
p4u's avatar
p4u committed
556
		# channel is 1, 6 or 11 for coexistence and performance
557
		[ "$mode" = "ap" -o "$mode" = "adhoc_ap" -o "$mode" = "80211s_aplan" ] && {
558
			qmp_log "Getting default ${what} for device ${device} in mode ${mode}"
559
560
561
562
563
564
565
566
567
568
569
570
571
572

			AP_INDEX=${AP_INDEX:-0}

			# if there is only one wifi device, configure a static channel (it will be used as adhoc_ap)
			if [ $($QMPINFO devices wifi | wc -l) -eq 1 ]; then
				c=1
			else
				c=$(((($(qmp_get_dec_node_id)+$AP_INDEX*3) % $num_channels_ap) +1))
				AP_INDEX=$(($AP_INDEX+1))

				if [ $c -lt 5 ]; then c=1
				else if [ $c -lt 9 ]; then c=6
				else c=11
				fi; fi
573

574
575
576
577
578
				#if the resulting channel is used by adhoc, selecting another one
				[ -n "$ADHOC_BG_USED" ] && [ $ADHOC_BG_USED -eq $c ] && \
				( [ $c -lt 7 ] && c=$(($c+5)) || c=$(($c-5)) )
			fi

p4u's avatar
p4u committed
579
580
			channel_info="$($channels_cmd | awk NR==$c)"
		}
581

582
583
		# if there is some problem, channel 6 is used
		if [ -z "$channel_info" ]; then
584
			qmp_log "Warning, no usable channels found in device $device "
585
586
587
588
589
			[ "$1" == "channel" ] && echo "6"
			return
		fi

		channel="$(echo $channel_info | cut -d' ' -f1)"
590
591
592
593
594
		# Temporary fix for #336
		#[ "$ht40" == "ht40+" ] && channel="${channel}+"
		#[ "$ht40" == "ht40-" ] && channel="${channel}-"
		[ "$ht40" == "ht40+" ] && channel="${channel}"
		[ "$ht40" == "ht40-" ] && channel="${channel}"
595
596
597
598
599
600
601
602
603
604
605

		echo "$channel"

	# REST OF DEFAULT VAULES
	# The rest of default values are taken from the template
	else
		[ ! -f "$WIFI_DEFAULT_CONFIG" ] && qmp_error "Template not found $WIFI_DEFAULT_CONFIG"
		cat $WIFI_DEFAULT_CONFIG | grep $what | cut -d' ' -f2
	fi
}

p4u's avatar
p4u committed
606
607
608
qmp_reset_wifi() {
	#Generating default wifi configuration
	country="$(uci get qmp.wireless.country 2>/dev/null)"
609
	country="${country:-US}"
610

p4u's avatar
p4u committed
611
	mv /etc/config/wireless /tmp/wireless.old
612
613
	wifi config
	sed -i s/"disabled '1'"/"country $country"/g /etc/config/wireless
Roger Pueyo Centelles's avatar
Roger Pueyo Centelles committed
614
	wifi
615
	sleep 5
p4u's avatar
p4u committed
616
617
}

618
619
620
621
622
623
624
qmp_configure_wifi_initial() {

	#First we are going to configure default parameters if they are not present
	[ -z "$(qmp_uci_get wireless)" ] && qmp_uci_set wireless qmp
	[ -z "$(qmp_uci_get wireless.driver)" ] && qmp_uci_set wireless.driver $(qmp_wifi_get_default driver)
	[ -z "$(qmp_uci_get wireless.country)" ] && qmp_uci_set wireless.country $(qmp_wifi_get_default country)
	[ -z "$(qmp_uci_get wireless.bssid)" ] && qmp_uci_set wireless.bssid $(qmp_wifi_get_default bssid)
p4u's avatar
p4u committed
625
	[ -z "$(qmp_uci_get wireless.mrate)" ] && qmp_uci_set wireless.mrate $(qmp_wifi_get_default mrate)
626
627
628
629

	#Changing to configured countrycode
	iw reg set $(qmp_uci_get wireless.country)

630
	macs="$(qmp_get_wifi_mac_devices | uniq)"
631
632
633
634
635
636
637
638
639
640
641
642

	#Looking for configured devices
	id_configured=""
	to_configure=""
	for m in $macs; do
		found=0
		j=0
		while [ ! -z "$(qmp_uci_get @wireless[$j])" ]; do
			configured_mac="$(qmp_uci_get @wireless[$j].mac | tr [A-Z] [a-z])"
			if [ "$configured_mac" == "$m" ]; then
				#If we found configured device, we are going to check all needed parameters
				found=1
643
				device="$(qmp_get_dev_from_wifi_mac $m)"
644
645
646
647
648
649
650
651
652
653
654
655
656
657
658
659
660
661
662
663
664
665
666
667
668
669
670
671
672
673
674
675
				id_configured="$id_configured $j"
				echo "Found configured device: $m"
			        [ -z "$(qmp_uci_get @wireless[$j].mode)" ] && qmp_uci_set @wireless[$j].mode $(qmp_wifi_get_default mode $device)
        			[ -z "$(qmp_uci_get @wireless[$j].name)" ] && qmp_uci_set @wireless[$j].name $(qmp_wifi_get_default name)
				[ -z "$(qmp_uci_get @wireless[$j].txpower)" ] && qmp_uci_set @wireless[$j].txpower $(qmp_wifi_get_default txpower)

				# If channel is configured, we are going to check it
				# if not, using default one
				sleep 1 && mode="$(qmp_uci_get @wireless[$j].mode)"
				channel="$(qmp_uci_get @wireless[$j].channel)"
				if [ -z "$channel" ]; then
					 qmp_uci_set @wireless[$j].channel $(qmp_wifi_get_default channel $device $mode)

				else
					newchan="$(qmp_check_channel $device $channel $mode)"
					if [ "$newchan" != "$channel" ]; then
						qmp_log Warning: "Channel $channel for device $device in mode $mode is not right, using default one"
						qmp_uci_set @wireless[$j].channel $newchan
					fi
				fi

				qmp_uci_set @wireless[$j].device $device
				break
			fi
			j=$(( $j + 1 ))
		done

		[ $found -eq 0 ] && to_configure="$to_configure $m"
	done

	#Configuring devices not found before
	for m in $to_configure; do
676
		device=$(qmp_get_dev_from_wifi_mac $m)
677
678
679
680
681
682
683
684
685
686
		echo "Configuring device: $device | $m"
		#Looking for a free slot to put new configuration
		j=0
		while [ ! -z "$(echo $id_configured | grep $j)" ]; do j=$(( $j +1 )); done
		#Now we have a free slot, let's go to configure device
		[ -z "$(qmp_uci_get @wireless[$j])" ] && qmp_uci_add wireless
		[ -z "$(qmp_uci_get @wireless[$j].mode)" ] && qmp_uci_set @wireless[$j].mode $(qmp_wifi_get_default mode $device)
		[ -z "$(qmp_uci_get @wireless[$j].name)" ] && qmp_uci_set @wireless[$j].name $(qmp_wifi_get_default name)
		[ -z "$(qmp_uci_get @wireless[$j].txpower)" ] && qmp_uci_set @wireless[$j].txpower $(qmp_wifi_get_default txpower)
		sleep 1 && mode="$(qmp_uci_get @wireless[$j].mode)"
p4u's avatar
p4u committed
687
688
689
		channel="$(qmp_uci_get @wireless[$j].channel)"
		[ -z "$channel" ] && channel=$(qmp_wifi_get_default channel $device $mode)
		qmp_uci_set @wireless[$j].channel "$(qmp_check_channel $device $channel $mode)"
690
691
692
693
694
		qmp_uci_set @wireless[$j].mac $m
		qmp_uci_set @wireless[$j].device $device
		id_configured="$id_configured $j"
	done
}