src/include/daemon.global.class.in

# $Id$

# loads client classes from $MCLIBDIR
load_client_classes()
{
	local i

	# client specific
	for i in $(find ${MCLIBDIR}/include -type f -name \*.client.class)
	do
		source ${i} || eecho "error loading ${i}"
	done
}

# restarts the whole service via remote cmd
restart_service()
{
	local pid
	for pid in $(pidof sslsvd)
	do
		kill -SIGHUP ${pid}
	done
}

# stops the whole service via remote cmd
stop_service()
{
	local pid
	for pid in $(pidof sslsvd)
	do
		kill -15 ${pid}
		sleep 1
		kill -9 ${pid}
	done
}

# # import_resource $table $serial $resource $value
# import_resource()
# {
# 	local table="$1"
# 	local serial="$2"
# 	local resource="$3"
# 	local value="$4"
# 
# 	if [[ ${DEBUG} = 1 ]]
# 	then
# 		echo "${table}->${resource}=${value}" >> /root/lala.log
# 		echo "mysqldo \"update ${table} set ${resource}='${value}' where serial=${serial};\"" >> /root/lala.log
# 	fi
# 
# 	mysql_insert "${table}",serial="${serial}","${resource}"="${value}"
# }

# run_class $method $caller $argv1 $argv2 ... $argvN
run_class()
{
	local method="$1"
	local caller="$2"
	local class
	local cmd
	local argv

	if valid_session
	then
		class="${caller%.*}"
		cmd="${caller#*.}"
		argv="${@/${caller}/}" # remove caller
		argv="${argv/${method}/}" # remove method

#		echo "method=${method}"
# 		echo "caller=${caller}"
# 		echo "class=${class}"
# 		echo "cmd=${cmd}"
# 		echo "argv=${argv}"

		# check if class.cmd exist
		if [[ ! -z $(typeset -f "${method}"_"${class}"_"${cmd}") ]]
		then
			"${method}"_"${class}"_"${cmd}" ${argv}
		else
 			eecho "unkown method '${method}' . class '${class}' . cmd '${cmd}'"
		fi
	else
		invalid_session
	fi
}

help_topics()
{
	local i
	local topics

	topics=$(typeset -f | grep '^help_' | sed 's:help_\(.*\)\ .*():\1:' | sed 's:_:\.:' | sort)
	mecho "Global commands:"
	mecho "\timport   - import settings to database"
	mecho "\tget      - shows current value for a settings"
	mecho "\tset      - sets value for a setting"
	mecho "\tauth     - authenticate to the daemon"
	mecho "\tprovide  - shows provides of a system"
	mecho "\trequire  - verify plugin requirements"
	mecho "\treload   - reloads all client classes plugins"
	mecho "\trestart  - restarts the daemon"
	mecho "\tstop     - stops the daemon"
	mecho "\tnocolors - disable colors, useful for the webclient"
	mecho "\tcolors   - enable colors"
	mecho "\tquiet    - do not print any unecessary messages"
	mecho "\thelp     - shows help"
	mecho "\tversion  - prints version of the daemon"
	mecho "\tquit     - quits the connection to the server"
	mecho
	mecho "Help topics:"
	for i in ${topics}
	do
		# excludes
		case ${i} in
			help_topics|topics) continue ;;
		esac

		mecho "\t${i}"
	done
	mecho
	mecho "Type 'help [topic]' for more information about every topic."
}

# on newer xorg-servers root is not allowed to run progs in a user session
x11runas()
{
	if [[ -n $(pidof X) ]]
	then
		su - "${MCORE_UNPRIV_USER}" -c "DISPLAY=${MCORE_XORG_DISPLAY} $@"
	fi
}

addconfig()
{
	local opts

	if [[ -z ${CONFIG} ]]
	then
		eecho "You must define \$CONFIG varibale first!"
		return 1
	fi

	if [[ ! -d $(dirname ${CONFIG}) ]]
	then
		install -d $(dirname ${CONFIG})
	fi

	# check for opts
	case $1 in
		-n) shift; opts=" -n" ;;
		-e) shift; opts=" -e" ;;
	esac

	echo ${opts} "$@" >> ${CONFIG}
}

clearconfig()
{
	if [[ -z ${CONFIG} ]]
	then
		eecho "You must define \$CONFIG varibale first!"
		return 1
	fi

	if [[ ! -d $(dirname ${CONFIG}) ]]
	then
		install -d $(dirname ${CONFIG})
	fi
	: > ${CONFIG}
}

# no_duplicate $list $item
no_duplicate()
{
	local i
	local list="$1"
	local item="$2"

	for i in ${list}
	do
		[[ ${i} = ${item} ]] && return 1
	done

	return 0
}

require()
{
	local requires="$@"
	local i

	for i in ${requires}
	do
		# check for duplicate provides
		if no_duplicate "${PROVIDE}" "${i}"
		then
			export REQUIRE="${REQUIRE} ${i}"
		else
			decho "duplicate provide '${i}' detected!" 
		fi
	done
}

verify_requirements()
{
	local req
	local prov
	local missing
	local sorted

	for req in ${REQUIRE}
	do
		# scan PROVIDE for dupes
		# if a dupe is found, then requirement is fullfilled
		# else add to missing
		if no_duplicate "${PROVIDE}" "${req}"
		then
			missing="${missing} ${req}"
		fi
	done

	# sort them alpabetically
	sorted=$(for i in ${REQUIRE}; do echo "${i}"; done | sort)

	# show missing and set the right retval
	if [[ -z ${missing} ]]
	then
		rvecho "${sorted}"
		return 0
	else
		for req in ${sorted}
		do
			if no_duplicate "${missing}" "$req"
			then
				# print normal
				rvecho -n " ${req}"
			else
				# print missing
				eecho -n " ${req}"
			fi
		done
		return 1
	fi
}

provide()
{
	local provides="$@"
	local i

	for i in ${provides}
	do
		# check for duplicate provides
		if no_duplicate "${PROVIDE}" "${i}"
		then
			export PROVIDE="${PROVIDE} ${i}"
		else
			decho "duplicate provide '${i}' detected!" 
		fi
	done
}

print_provide()
{
	local sorted

	# sort them alpabetically
	sorted=$(for i in ${PROVIDE}; do echo "${i}"; done | sort)
	# do not escape, or CRLFS get printed to screen too
	rvecho ${sorted}
}

# message only echo | disabled in quiet mode
mecho()
{
	local COLCYAN="\033[1;36m"
	local COLDEFAULT="\033[0m"
	local opts
	local webcrlf

	# print nothing if quiet mode was requested
	[[ ${QUIET} = true ]] && return

	if [[ ${NOCOLORS} = true ]]
	then
		COLCYAN=""
		COLDEFAULT=""
	fi

	[[ ${WEBCRLF} = true ]] && webcrlf="<br>"

	# respect -n
	case $1 in
		-n) shift; opts="n" ;;
	esac

	echo -e${opts} "${COLCYAN}$@${COLDEFAULT}${webcrlf}"
}

# prints error messages | enabled even in quiet mode
eecho()
{
	local COLRED="\033[1;31m"
	local COLDEFAULT="\033[0m"
	local opts
	local webcrlf

	if [[ ${NOCOLORS} = true ]]
	then
		COLRED=""
		COLDEFAULT=""
	fi

	[[ ${WEBCRLF} = true ]] && webcrlf="<br>"

	# respect -n
	case $1 in
		-n) shift; opts="n" ;;
	esac

	echo -e${opts} "${COLRED}$@${COLDEFAULT}${webcrlf}"
}

# prints return values of get | enabled even in quiet mode
rvecho()
{
	local COLPURPLE="\033[1;35m"
	local COLDEFAULT="\033[0m"
	local opts
	local webcrlf

	if [[ ${NOCOLORS} = true ]]
	then
		COLPURPLE=""
		COLDEFAULT=""
	fi

	[[ ${WEBCRLF} = true ]] && webcrlf="<br>"

	# respect -n
	case $1 in
		-n) shift; opts="n" ;;
	esac

	echo -e${opts} "${COLPURPLE}$@${COLDEFAULT}${webcrlf}"
}

# prints debug messages if requested | enabled even in quiet mode
decho()
{
	# print nothing if debug mode was *not* requested
	[[ ${DEBUG} != 1 ]] && return

	eecho "DEBUG: ${@}"
}

path_not_empty()
{
	local path="$1"
	[[ -z ${path} ]] && eecho "path_not_empty(): no path given!" && return 1

	# return ERR if path does not exist
	[[ ! -d ${path} ]] && return 1
	# return ERR if path empty
	[[ -z $(find "${path}" -mindepth 1 -maxdepth 1) ]] && return 1

	# every thing went ok, directory not empty
	return 0
}

help_daemon_mroot()
{
	mecho "get daemon.mroot"
	mecho " Prints current MROOT variable."
	mecho
	mecho "set daemon.mroot [path]"
	mecho " set MROOT variable to given path."
}

get_daemon_mroot()
{
	rvecho "${MROOT}"
}

set_daemon_mroot()
{
	local path=$1

	if [[ -d ${path} ]]
	then
		export MROOT="${path}"
		decho "MROOT='${MROOT}' is set."
	else
		eecho "Path '${path}' does not exist. MROOT not set."
	fi
}

list_files_in_directory()
{
	local i
	local retval
	local path
	local opts
	local type

	# basic getops
	for i in $*
	do
		case $1 in
			-mindepth) shift; opts+=" -mindepth $1" ;;
			-maxdepth) shift; opts+=" -maxdepth $1" ;;
			-type) shift; type="$1" ;;
			'') continue ;;
			*) path="$1" ;;
		esac
		shift
	done

	if [[ -z ${path} ]]
	then
		eecho "No path given."
		return 1
	fi

	if [[ ! -d ${path} ]]
	then
		eecho "Directory '${path}' does not exist."
		return 1
	fi

	# default to files
	[[ -z ${type} ]] && type=f

	for i in $(find ${path} ${opts} -type ${type} | sort)
	do
		if [[ -z ${retval} ]]
		then
			retval="$(basename ${i})"
		else
			retval="${retval} $(basename ${i})"
		fi
	done

	rvecho "${retval}"
}
1	niro	1248	# $Id$
2
3	niro	1915	# loads client classes from $MCLIBDIR
4			load_client_classes()
5			{
6	niro	2030	local i
7
8	niro	1915	# client specific
9	niro	2030	for i in $(find ${MCLIBDIR}/include -type f -name \*.client.class)
10	niro	1915	do
11			source ${i} \|\| eecho "error loading ${i}"
12			done
13			}
14
15			# restarts the whole service via remote cmd
16			restart_service()
17			{
18			local pid
19			for pid in $(pidof sslsvd)
20			do
21			kill -SIGHUP ${pid}
22			done
23			}
24
25	niro	2005	# stops the whole service via remote cmd
26			stop_service()
27			{
28			local pid
29			for pid in $(pidof sslsvd)
30			do
31			kill -15 ${pid}
32			sleep 1
33			kill -9 ${pid}
34			done
35			}
36
37	niro	1252	# # import_resource $table $serial $resource $value
38			# import_resource()
39			# {
40			# local table="$1"
41			# local serial="$2"
42			# local resource="$3"
43			# local value="$4"
44			#
45			# if [[ ${DEBUG} = 1 ]]
46			# then
47			# echo "${table}->${resource}=${value}" >> /root/lala.log
48			# echo "mysqldo \"update ${table} set ${resource}='${value}' where serial=${serial};\"" >> /root/lala.log
49			# fi
50			#
51			# mysql_insert "${table}",serial="${serial}","${resource}"="${value}"
52			# }
53	niro	1248
54			# run_class $method $caller $argv1 $argv2 ... $argvN
55			run_class()
56			{
57			local method="$1"
58			local caller="$2"
59			local class
60			local cmd
61			local argv
62
63	niro	1308	if valid_session
64	niro	1248	then
65			class="${caller%.*}"
66			cmd="${caller#*.}"
67			argv="${@/${caller}/}" # remove caller
68			argv="${argv/${method}/}" # remove method
69
70			# echo "method=${method}"
71			# echo "caller=${caller}"
72			# echo "class=${class}"
73			# echo "cmd=${cmd}"
74			# echo "argv=${argv}"
75
76			# check if class.cmd exist
77			if [[ ! -z $(typeset -f "${method}"_"${class}"_"${cmd}") ]]
78			then
79			"${method}"_"${class}"_"${cmd}" ${argv}
80			else
81	niro	1639	eecho "unkown method '${method}' . class '${class}' . cmd '${cmd}'"
82	niro	1248	fi
83			else
84			invalid_session
85			fi
86			}
87
88			help_topics()
89			{
90			local i
91			local topics
92
93			topics=$(typeset -f \| grep '^help_' \| sed 's:help_\(.\)\ .():\1:' \| sed 's:_:\.:' \| sort)
94			mecho "Global commands:"
95	niro	1350	mecho "\timport - import settings to database"
96			mecho "\tget - shows current value for a settings"
97			mecho "\tset - sets value for a setting"
98			mecho "\tauth - authenticate to the daemon"
99			mecho "\tprovide - shows provides of a system"
100			mecho "\trequire - verify plugin requirements"
101	niro	1925	mecho "\treload - reloads all client classes plugins"
102			mecho "\trestart - restarts the daemon"
103	niro	2005	mecho "\tstop - stops the daemon"
104	niro	1330	mecho "\tnocolors - disable colors, useful for the webclient"
105	niro	2006	mecho "\tcolors - enable colors"
106	niro	1639	mecho "\tquiet - do not print any unecessary messages"
107	niro	1350	mecho "\thelp - shows help"
108	niro	2044	mecho "\tversion - prints version of the daemon"
109	niro	1350	mecho "\tquit - quits the connection to the server"
110	niro	1248	mecho
111			mecho "Help topics:"
112			for i in ${topics}
113			do
114			# excludes
115			case ${i} in
116			help_topics\|topics) continue ;;
117			esac
118
119			mecho "\t${i}"
120			done
121	niro	1264	mecho
122			mecho "Type 'help [topic]' for more information about every topic."
123	niro	1248	}
124
125			# on newer xorg-servers root is not allowed to run progs in a user session
126			x11runas()
127			{
128	niro	1666	if [[ -n $(pidof X) ]]
129	niro	1639	then
130			su - "${MCORE_UNPRIV_USER}" -c "DISPLAY=${MCORE_XORG_DISPLAY} $@"
131			fi
132	niro	1248	}
133
134			addconfig()
135			{
136	niro	1308	local opts
137
138	niro	1248	if [[ -z ${CONFIG} ]]
139			then
140	niro	1639	eecho "You must define \$CONFIG varibale first!"
141	niro	1248	return 1
142			fi
143
144			if [[ ! -d $(dirname ${CONFIG}) ]]
145			then
146			install -d $(dirname ${CONFIG})
147			fi
148	niro	1308
149			# check for opts
150			case $1 in
151			-n) shift; opts=" -n" ;;
152			-e) shift; opts=" -e" ;;
153			esac
154
155			echo ${opts} "$@" >> ${CONFIG}
156	niro	1248	}
157
158			clearconfig()
159			{
160			if [[ -z ${CONFIG} ]]
161			then
162	niro	1639	eecho "You must define \$CONFIG varibale first!"
163	niro	1248	return 1
164			fi
165
166	niro	1252	if [[ ! -d $(dirname ${CONFIG}) ]]
167			then
168			install -d $(dirname ${CONFIG})
169			fi
170	niro	1248	: > ${CONFIG}
171			}
172
173	niro	1264	# no_duplicate $list $item
174			no_duplicate()
175			{
176			local i
177			local list="$1"
178			local item="$2"
179
180			for i in ${list}
181			do
182			[[ ${i} = ${item} ]] && return 1
183			done
184
185			return 0
186			}
187
188	niro	1248	require()
189			{
190			local requires="$@"
191			local i
192
193			for i in ${requires}
194			do
195	niro	1264	# check for duplicate provides
196			if no_duplicate "${PROVIDE}" "${i}"
197			then
198			export REQUIRE="${REQUIRE} ${i}"
199			else
200	niro	1639	decho "duplicate provide '${i}' detected!"
201	niro	1264	fi
202	niro	1248	done
203			}
204
205	niro	1264	verify_requirements()
206	niro	1248	{
207	niro	1264	local req
208			local prov
209			local missing
210			local sorted
211	niro	1248
212	niro	1264	for req in ${REQUIRE}
213	niro	1248	do
214	niro	1264	# scan PROVIDE for dupes
215			# if a dupe is found, then requirement is fullfilled
216			# else add to missing
217			if no_duplicate "${PROVIDE}" "${req}"
218			then
219			missing="${missing} ${req}"
220			fi
221	niro	1248	done
222
223	niro	1264	# sort them alpabetically
224			sorted=$(for i in ${REQUIRE}; do echo "${i}"; done \| sort)
225
226			# show missing and set the right retval
227			if [[ -z ${missing} ]]
228			then
229	niro	1639	rvecho "${sorted}"
230	niro	1264	return 0
231			else
232			for req in ${sorted}
233			do
234			if no_duplicate "${missing}" "$req"
235			then
236			# print normal
237	niro	1639	rvecho -n " ${req}"
238	niro	1264	else
239			# print missing
240			eecho -n " ${req}"
241			fi
242			done
243			return 1
244			fi
245	niro	1248	}
246
247			provide()
248			{
249			local provides="$@"
250			local i
251
252			for i in ${provides}
253			do
254			# check for duplicate provides
255	niro	1264	if no_duplicate "${PROVIDE}" "${i}"
256	niro	1248	then
257			export PROVIDE="${PROVIDE} ${i}"
258			else
259	niro	1639	decho "duplicate provide '${i}' detected!"
260	niro	1248	fi
261			done
262			}
263
264			print_provide()
265			{
266			local sorted
267
268			# sort them alpabetically
269			sorted=$(for i in ${PROVIDE}; do echo "${i}"; done \| sort)
270			# do not escape, or CRLFS get printed to screen too
271	niro	2003	rvecho ${sorted}
272	niro	1248	}
273
274	niro	1639	# message only echo \| disabled in quiet mode
275	niro	1248	mecho()
276			{
277			local COLCYAN="\033[1;36m"
278			local COLDEFAULT="\033[0m"
279	niro	1264	local opts
280	niro	1308	local webcrlf
281	niro	1264
282	niro	1639	# print nothing if quiet mode was requested
283			[[ ${QUIET} = true ]] && return
284
285	niro	1248	if [[ ${NOCOLORS} = true ]]
286			then
287			COLCYAN=""
288			COLDEFAULT=""
289			fi
290
291	niro	1308	[[ ${WEBCRLF} = true ]] && webcrlf="<br>"
292
293	niro	1264	# respect -n
294			case $1 in
295			-n) shift; opts="n" ;;
296			esac
297
298	niro	1308	echo -e${opts} "${COLCYAN}$@${COLDEFAULT}${webcrlf}"
299	niro	1248	}
300	niro	1264
301	niro	1639	# prints error messages \| enabled even in quiet mode
302	niro	1264	eecho()
303			{
304			local COLRED="\033[1;31m"
305			local COLDEFAULT="\033[0m"
306			local opts
307	niro	1308	local webcrlf
308	niro	1264
309			if [[ ${NOCOLORS} = true ]]
310			then
311			COLRED=""
312			COLDEFAULT=""
313			fi
314
315	niro	1308	[[ ${WEBCRLF} = true ]] && webcrlf="<br>"
316
317	niro	1264	# respect -n
318			case $1 in
319			-n) shift; opts="n" ;;
320			esac
321
322	niro	1308	echo -e${opts} "${COLRED}$@${COLDEFAULT}${webcrlf}"
323	niro	1264	}
324
325	niro	1639	# prints return values of get \| enabled even in quiet mode
326			rvecho()
327			{
328			local COLPURPLE="\033[1;35m"
329			local COLDEFAULT="\033[0m"
330			local opts
331			local webcrlf
332
333			if [[ ${NOCOLORS} = true ]]
334			then
335			COLPURPLE=""
336			COLDEFAULT=""
337			fi
338
339			[[ ${WEBCRLF} = true ]] && webcrlf="<br>"
340
341			# respect -n
342			case $1 in
343			-n) shift; opts="n" ;;
344			esac
345
346			echo -e${opts} "${COLPURPLE}$@${COLDEFAULT}${webcrlf}"
347			}
348
349			# prints debug messages if requested \| enabled even in quiet mode
350			decho()
351			{
352			# print nothing if debug mode was not requested
353			[[ ${DEBUG} != 1 ]] && return
354
355			eecho "DEBUG: ${@}"
356			}
357
358	niro	1264	path_not_empty()
359			{
360			local path="$1"
361	niro	1639	[[ -z ${path} ]] && eecho "path_not_empty(): no path given!" && return 1
362	niro	1264
363			# return ERR if path does not exist
364			[[ ! -d ${path} ]] && return 1
365			# return ERR if path empty
366			[[ -z $(find "${path}" -mindepth 1 -maxdepth 1) ]] && return 1
367
368			# every thing went ok, directory not empty
369			return 0
370			}
371	niro	2007
372			help_daemon_mroot()
373			{
374			mecho "get daemon.mroot"
375			mecho " Prints current MROOT variable."
376			mecho
377			mecho "set daemon.mroot [path]"
378			mecho " set MROOT variable to given path."
379			}
380
381			get_daemon_mroot()
382			{
383			rvecho "${MROOT}"
384			}
385
386			set_daemon_mroot()
387			{
388			local path=$1
389
390			if [[ -d ${path} ]]
391			then
392			export MROOT="${path}"
393			decho "MROOT='${MROOT}' is set."
394			else
395			eecho "Path '${path}' does not exist. MROOT not set."
396			fi
397			}
398	niro	2008
399			list_files_in_directory()
400			{
401			local i
402			local retval
403			local path
404			local opts
405			local type
406
407			# basic getops
408			for i in $*
409			do
410			case $1 in
411			-mindepth) shift; opts+=" -mindepth $1" ;;
412			-maxdepth) shift; opts+=" -maxdepth $1" ;;
413			-type) shift; type="$1" ;;
414			'') continue ;;
415			*) path="$1" ;;
416			esac
417			shift
418			done
419
420			if [[ -z ${path} ]]
421			then
422			eecho "No path given."
423			return 1
424			fi
425
426			if [[ ! -d ${path} ]]
427			then
428			eecho "Directory '${path}' does not exist."
429			return 1
430			fi
431
432			# default to files
433			[[ -z ${type} ]] && type=f
434
435			for i in $(find ${path} ${opts} -type ${type} \| sort)
436			do
437			if [[ -z ${retval} ]]
438			then
439			retval="$(basename ${i})"
440			else
441			retval="${retval} $(basename ${i})"
442			fi
443			done
444
445			rvecho "${retval}"
446			}