Developing lightweight computation at the DSG edge

qmp_wireless.sh 18.2 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
23
24
25
26
27
28
29
##############################
# Prepare wireless interface
#############################
# Prepare de WiFi interfaces
# 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
30
31
32
33
34
35
36
}

###################################
# Check channel for wifi interface
###################################
# First parameter: device
# Second parameter: channel
37
# Third parameter: mode (adhoc, ap, adhoc_ap, aplan, client, clientwan, none)
38
39
40
# It returns the same channel if it is right, and the new one fixet if not

qmp_check_channel() {
p4u's avatar
p4u committed
41
42
43
44
45
46
		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"
47
48
49
		[ ! -z "$channel" ] && chaninfo="$($QMPINFO channels $1 | grep "^$channel ")"

		# Checking if some thing related with channel is wrong
p4u's avatar
p4u committed
50
		local wrong=0
51
		[ -z "$channel" ] || [ -z "$chaninfo" ] && wrong=1
p4u's avatar
p4u committed
52
		[ "$mode" == "adhoc" -o "$mode" == "adhoc_ap" ] && [ -z "$(echo $chaninfo | grep adhoc)" ] && wrong=1
53
54
		[ "$ht40" == "+" ] && [ -z "$(echo $chaninfo | grep +)" ] && wrong=1
		[ "$ht40" == "-" ] && [ -z "$(echo $chaninfo | grep -)" ] && wrong=1
p4u's avatar
p4u committed
55
		[ "$m11b" == "b" ] && [ $channel -gt 14 ] && wrong=1
56
57
58
59
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
110
111
112
113
114
115

		# 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
}

########################
# Configure wifi device
########################
# Configure a wifi device according qmp config file
# Parameters are: 1-> qmp config id, 2-> device name

qmp_configure_wifi_device() {
	echo ""
	echo "Configuring device $2"

p4u's avatar
p4u committed
116
117
	local id=$1
	local device="$(qmp_uci_get @wireless[$id].device)"
118

119
120
121
122
123
124
125
126
127
128
129
130
131


	# 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)

p4u's avatar
p4u committed
132
	local mode="$(qmp_uci_get @wireless[$id].mode)"
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180

	# Remove $device and also unneeded white spaces
	local allmeshdevs="$(qmp_uci_get interfaces.mesh_devices)"
	local meshdevs="$(echo $allmeshdevs | sed -e s/$device//g  -e 's/^[ \t]*//' -e 's/ \+/ /g' -e 's/[ \t]*$//')"
	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"
			;;
		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"
			return
			;;
	esac
181
182

	# spliting channel in channel number and ht40 mode
p4u's avatar
p4u committed
183
184
185
186
187
188
189
190
	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=""

191
	[ "$ht40" == "+" -o "$ht40" == "-" ] && {
p4u's avatar
p4u committed
192
193
194
		# Device is selected to use 40MHz channel
		htmode="HT40$ht40"

195
		[ $channel -lt 15 ] && {
196
197
198
199
200
201
202
		# If it is 2.4
			mode11="ng"
		} || {
		# If it is 5
			mode11="na"
		}

203
	} || {
p4u's avatar
p4u committed
204
205
		m11b="$(echo $channel_raw | tr -d [0-9]+-)"
		m11n="$($QMPINFO modes $device | grep -c n)"
206
		[ "$m11b" == "b" ] && {
Pau Escrich's avatar
Pau Escrich committed
207
			# Mode 11b is forced
p4u's avatar
p4u committed
208
209
			htmode=""
			mode11="b"
210
		} || [ $m11n -eq 0 ] && {
Pau Escrich's avatar
Pau Escrich committed
211
212
213
214
			# Device is not 11n compatible
			htmode=""
			mode11="auto"
		} || {
p4u's avatar
p4u committed
215
			# Device is 11n compatible
216
			[ $channel -lt 15 ] && {
217
218
219
220
221
222
223
224
			# If it is 2.4
				htmode="HT20"
				mode11="ng"
			} || {
			# If it is 5
				htmode="HT20"
				mode11="na"
			}
p4u's avatar
p4u committed
225
226
227
228
229
230
231
232
233
234
235
		}
	}

	local mac="$(qmp_uci_get @wireless[$id].mac)"
	local name="$(qmp_uci_get @wireless[$id].name)"
	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)"
236
	local key="$(qmp_uci_get @wireless[$id].key)"
237
	[ $(echo "$key" | wc -c) -lt 8 ] && encrypt="none" || encrypt="psk2"
p4u's avatar
p4u committed
238
239
240
241

	local dev_id="$(echo $device | tr -d [A-z])"
	dev_id=${dev_id:-$(date +%S)}
	local radio="radio$dev_id"
242
243

	echo "------------------------"
p4u's avatar
p4u committed
244
	echo "Device   $device"
245
246
247
248
249
250
251
	echo "Mac      $mac"
	echo "Mode     $mode"
	echo "Driver   $driver"
	echo "Channel  $channel"
	echo "Country  $country"
	echo "Network  $network"
	echo "Name     $name"
p4u's avatar
p4u committed
252
253
	echo "HTmode   $htmode"
	echo "11mode   $mode11"
254
	echo "Mrate    $mrate"
255
256
	echo "------------------------"

p4u's avatar
p4u committed
257
258
259
260
261
	local vap=0
	[ $mode == "adhoc_ap" ] && {
		mode="adhoc"
		vap=1
	}
262

p4u's avatar
p4u committed
263
	device_template="$TEMPLATE_BASE/device.$driver-$mode11"
264
	iface_template="$TEMPLATE_BASE/iface.$mode"
p4u's avatar
p4u committed
265
	vap_template="$TEMPLATE_BASE/iface.ap"
266

p4u's avatar
p4u committed
267
	[ ! -f "$device_template" ] || [ ! -f "$iface_template" ]  && qmp_error "Template $template not found"
268

269
	cat $device_template | grep -v ^# | grep -v "^list " | sed \
p4u's avatar
p4u committed
270
	 -e s/"#QMP_RADIO"/"$radio"/ \
271
272
273
274
	 -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
275
	 -e s/"#QMP_MRATE"/"$mrate"/ \
276
	 -e s/"#QMP_HTMODE"/"$htmode"/ \
p4u's avatar
p4u committed
277
	 -e s/"#QMP_TXPOWER"/"$txpower"/ > $TMP/qmp_wifi_device
278

p4u's avatar
p4u committed
279
280
	qmp_prepare_wireless_iface $device

281
282
283
    echo "Mode is $mode"
    echo "Network is $network"

284
	cat $iface_template | grep -v ^# | sed \
p4u's avatar
p4u committed
285
286
287
	 -e s/"#QMP_RADIO"/"$radio"/ \
	 -e s/"#QMP_DEVICE"/"$device"/ \
	 -e s/"#QMP_IFNAME"/"$device"/ \
288
	 -e s/"#QMP_SSID"/"$(echo "${name:0:32}" | sed -e 's|/|\\/|g')"/ \
p4u's avatar
p4u committed
289
290
291
292
293
294
295
296
297
298
	 -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


	# If virtual AP interface has to be configured
	[ "$vap" == "1" ] && {
		qmp_prepare_wireless_iface ${device}ap
299
		cat $vap_template | grep -v ^# | sed \
p4u's avatar
p4u committed
300
301
302
	 	 -e s/"#QMP_RADIO"/"$radio"/ \
		 -e s/"#QMP_DEVICE"/"${device}ap"/ \
		 -e s/"#QMP_IFNAME"/"${device}ap"/ \
303
	 	 -e s/"#QMP_SSID"/"$(echo "${name:0:29}-AP" | sed -e 's|/|\\/|g')"/ \
p4u's avatar
p4u committed
304
305
306
307
308
309
310
		 -e s/"#QMP_NETWORK"/"lan"/ \
		 -e s/"#QMP_ENC"/"$encrypt"/ \
		 -e s/"#QMP_KEY"/"$key"/ \
		 -e s/"#QMP_MODE"/"ap"/ >> $TMP/qmp_wifi_iface
	}

	qmp_uci_import $TMP/qmp_wifi_iface
311
	qmp_uci_import $TMP/qmp_wifi_device
p4u's avatar
p4u committed
312

313
	# List arguments (needed for HT capab)
314
	cat $device_template | grep -v ^# | grep "^list " | sed s/"^list "//g | sed \
315
316
317
	 -e s/"#QMP_RADIO"/"$radio"/ | while read l; do
		qmp_uci_add_list_raw $l
	done
p4u's avatar
p4u committed
318

319
	uci reorder wireless.$radio=0
p4u's avatar
p4u committed
320
321
	#uci reorder wireless.@wifi-iface[$index]=16
	uci commit wireless
322
323
324
325
326
327
328
329
330
331
332
333
334
}

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

qmp_configure_wifi() {

	echo "Backuping wireless config file to: $OWRT_WIRELESS_CONFIG.qmp_backup"
	cp $OWRT_WIRELESS_CONFIG $OWRT_WIRELESS_CONFIG.qmp_backup 2>/dev/null
	echo "" > $OWRT_WIRELESS_CONFIG

p4u's avatar
p4u committed
335
	local j=0
336

p4u's avatar
p4u committed
337
338
339
	while qmp_uci_test qmp.@wireless[$j]; do
		qmp_configure_wifi_device $j
		j=$(( $j + 1 ))
340
341
342
	done

	echo ""
p4u's avatar
p4u committed
343
	echo "Done: all WiFi devices configured"
344
345
346
347
348
349
350
351
}

####################
# 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
352
#  - third parameter: is configured mode, only needed by channel
353
354

qmp_wifi_get_default() {
p4u's avatar
p4u committed
355
356
	local what="$1"
	local device="$2"
357
358

	# MODE
359
360
	# default mode depends on several things:
	#  if only 1 device = adhoc_ap
361
362
363
364
365
	#  if only 1 bg device = ap
	#  else depending on index

	if [ "$what" == "mode" ]; then

p4u's avatar
p4u committed
366
367
		local devices=0
		local bg_devices=0
368
369
370
371
372
		for wd in $(qmp_get_wifi_devices); do
			devices=$(( $devices + 1 ))
			bg_devices=$(( $bg_devices + $($QMPINFO modes $wd | egrep "b|g" -c) ))
		done

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

p4u's avatar
p4u committed
375
		#If only one device, using AP+ADHOC
376
		if [ $devices -eq 1 ]; then
377
			[ $bg_devices -eq 0 ] && echo "adhoc" || echo "adhoc_ap"
378
379
		else

p4u's avatar
p4u committed
380
		#If only one B/G device (2.4GHz) available, using it as AP+ADHOC
381
382
		bg_this_device=$($QMPINFO modes $device | egrep "b|g" -c)
		if [ $bg_this_device -eq 1 -a $bg_devices -eq 1 ]; then
p4u's avatar
p4u committed
383
			echo "adhoc_ap"
384
385
		else

386
		#If only one B/G device of two devices, using the non B/G one as adhoc
387
388
389
		if [ $bg_devices -eq 1 -a $devices -eq 2 ]; then
			echo "adhoc"
		else
390

391
392
393
394
		#If more than one device BG, using first for ADHOC+AP and the others for ADHOC
		if [ $devices -gt 1 ]; then
			[ $index == 0 ] && echo "adhoc_ap" || echo "adhoc"
		else
395

396
		#This should never happend
p4u's avatar
p4u committed
397
			echo "adhoc_ap"
398
		fi;fi;fi;fi
399
400
401
402
403
404
405
406

	# CHANNEL
	# Default channel depends on the card and on configured mode
	#  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
407
		local mode="$3"
408
409

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

413
414
		# QMPINFO returns a list of avaiable channels in this format: 130 ht40+ adhoc
		# this is the command line used to get available channels from a device
p4u's avatar
p4u committed
415
416
		local channels_cmd="$QMPINFO channels $device"
		local num_channels=$($channels_cmd | wc -l)
417

p4u's avatar
p4u committed
418
		# number of channels for AP is 11 or the number of channels available if less
p4u's avatar
p4u committed
419
		local num_channels_ap=$num_channels
p4u's avatar
p4u committed
420
		[ $num_channels_ap -gt 11 ] && num_channels_ap=11
421

p4u's avatar
p4u committed
422
423
424
		# use 40 Mhz of channel size (802.11n)
		local ht40="" # ht40+/ht40-

425
		# channel AdHoc is the last available (qmp_tac = inverse order) plus index*2+1 (1 3 5 ...)
p4u's avatar
p4u committed
426
427
428
429
		[ "$mode" == "adhoc" ] || [ -z "$mode" ] && {

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

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

p4u's avatar
p4u committed
433
			ADHOC_INDEX=$(($ADHOC_INDEX+1))
p4u's avatar
p4u committed
434
			# c is the channel number, checking if it is 802.11bg
p4u's avatar
p4u committed
435
436
437
438
			# 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"
439
440
				if [ $c -lt 5 ]; then c=1
				else if [ $c -lt 9 ]; then c=6
p4u's avatar
p4u committed
441
442
443
444
				else c=11
				fi; fi
			ADHOC_BG_USED="$c"
			channel_info="$c $(echo $channel_info | cut -d' ' -f2-)"
p4u's avatar
p4u committed
445
446
447
448

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

p4u's avatar
p4u committed
451
		}
452

453
		# channel AP = ( node_id + index*3 ) % ( num_channels_ap) + 1
p4u's avatar
p4u committed
454
		# channel is 1, 6 or 11 for coexistence and performance
p4u's avatar
p4u committed
455
		[ "$mode" = "ap" -o "$mode" = "adhoc_ap" ] && {
456
457
458
459
460
461
462
463
464
465
466
467
468
469

			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
470

471
472
473
474
475
				#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
476
477
			channel_info="$($channels_cmd | awk NR==$c)"
		}
478

479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
		# if there is some problem, channel 6 is used
		if [ -z "$channel_info" ]; then
			qmp_log "Warning, not usable channels found in device $device "
			[ "$1" == "channel" ] && echo "6"
			return
		fi

		channel="$(echo $channel_info | cut -d' ' -f1)"
		[ "$ht40" == "ht40+" ] && channel="${channel}+"
		[ "$ht40" == "ht40-" ] && channel="${channel}-"

		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
500
501
502
503
504
505
506
507
508
509
510
qmp_reset_wifi() {
	#Generating default wifi configuration
	country="$(uci get qmp.wireless.country 2>/dev/null)"
	country="${country:-00}"

	mv /etc/config/wireless /tmp/wireless.old
	wifi detect | sed s/"disabled 1"/"country $country"/g > /etc/config/wireless

	wifi
}

511
512
513
514
515
516
517
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
518
	[ -z "$(qmp_uci_get wireless.mrate)" ] && qmp_uci_set wireless.mrate $(qmp_wifi_get_default mrate)
519
520
521
522

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

p4u's avatar
p4u committed
523
	macs="$(qmp_get_wifi_mac_devices | sort -u)"
524
525
526
527
528
529
530
531
532
533
534
535

	#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
536
				device="$(qmp_get_dev_from_wifi_mac $m)"
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
				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
569
		device=$(qmp_get_dev_from_wifi_mac $m)
570
571
572
573
574
575
576
577
578
579
		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
580
581
582
		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)"
583
584
585
586
587
		qmp_uci_set @wireless[$j].mac $m
		qmp_uci_set @wireless[$j].device $device
		id_configured="$id_configured $j"
	done
}