summaryrefslogtreecommitdiffstats
path: root/applications/luci-app-bmx7/root/www/cgi-bin/bmx7-info
blob: c65aae048f0d7d7dda54d9c8a98496a78970f726 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
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
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
#!/bin/sh
#    Copyright © 2011 Pau Escrich
#    Contributors Jo-Philipp Wich <xm@subsignal.org>
#		 Roger Pueyo Centelles <roger.pueyo@guifi.net>
#
#    This program is free software; you can redistribute it and/or modify
#    it under the terms of the GNU General Public License as published by
#    the Free Software Foundation; either version 2 of the License, or
#    (at your option) any later version.
#
#    This program is distributed in the hope that it will be useful,
#    but WITHOUT ANY WARRANTY; without even the implied warranty of
#    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
#    GNU General Public License for more details.
#
#    You should have received a copy of the GNU General Public License along
#    with this program; if not, write to the Free Software Foundation, Inc.,
#    51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
#
#    The full GNU General Public License is included in this distribution in
#    the file called "COPYING".
#
#    This script gives information about bmx7
#    Can be executed from a Linux shell: ./bmx7-info -s links
#    Or from web interface (with cgi enabled): http://host/cgi-bin/bmx7-info?links
#    If you ask for a directory you will get the directory contents in JSON format

BMX7_DIR="$(uci get bmx7.general.runtimeDir 2>/dev/null)" || BMX7_DIR="/var/run/bmx7/json"

case "${1:-}" in
	-s)
		QUERY="$2"
		;;
	*)
		QUERY="${QUERY_STRING%%&*}"
		QUERY="${QUERY%%=*}"
		printf 'Content-type: application/json\n\n'
		;;
esac

check_path() {
	target="$1"

	# Resolve real absolute path safely
	resolved="$(cd "$(dirname -- "$target")" 2>/dev/null && pwd -P)/$(basename -- "$target")"

	[ -e "$resolved" ] || return
}
print_mem() {
	pid="$(pidof bmx7 2>/dev/null)" || return
	[ -r "/proc/$pid/status" ] || return

	vm=$(awk '/VmSize:/ {print $2" "$3}' "/proc/$pid/status")

	printf '{ "memory": { "bmx7": "%s" }}' "$vm"
}

print_query() {
	# If the query is a directory
	[ -d "$BMX7_DIR/$1" ] &&
	{
	# If /all has not been specified
		if [ -z "$QALL" ]; then
		first=1
		printf '{ "%s": [ ' "$1"
		for f in "$BMX7_DIR"/$1; do
			[ -e "$f" ] || continue
			printf '{ "name": "%s" }' "$(tr -d '\n' < "$f")"
			[ $first -eq 0 ] && printf ','
			first=0
		done
		printf " ] }"

	# If /all has been specified, print all the files together
		else
		first=1
		printf "[ "
		for entry in "$BMX7_DIR"/$1; do
			[ -f "$entry" ] &&
			{
				[ $first -eq 0 ] && printf ','
				printf "%s" "$(tr -d '\n' < "$entry")"
				first=0
			}
		done
		printf " ]"
		fi
	}

	# If the query is a file, just print the file
	[ -f "$BMX7_DIR/$1" ] && [ -s "$BMX7_DIR/$1" ] && cat "$BMX7_DIR/$1" && return 0 || return 1
}

if [ "${QUERY##*/}" = "all" ]; then
	QUERY="${QUERY%/all}"
	QALL=1
fi

case "$QUERY" in
	neighbours)
		QALL=1
		printf '{ "neighbours": [ '
		printf '{ "originators": '
		print_query originators
		printf '}, '
		printf '{ "descriptions": '
		print_query descriptions
		printf "} ] }"
		exit 0
		;;
	tunnels)
		bmx7 -c --jshow tunnels /r=0
		exit 0
		;;
	originators)
		bmx7 -c --jshow originators /r=0
		exit 0
		;;
	info)
		printf '{ "info": [ '
		print_query status && printf "," || printf '{ "status": "" },'
		print_query interfaces && printf "," || printf '{ "interfaces": "" },'
		print_query links && printf "," || printf '{ "links": "" },'
		print_mem
		printf "] }"
		;;
	*)
		check_path "$BMX7_DIR/$QUERY"
		print_query "$QUERY"
		;;
esac

exit 0