summaryrefslogtreecommitdiff
path: root/contrib/modules/m_calc.sh
blob: fa1d98dbe1aa4f2983a0ac3317ff479c908b2056 (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
#!/bin/bash
# -*- coding: utf-8 -*-
###########################################################################
#                                                                         #
#  envbot - an IRC bot in bash                                            #
#  Copyright (C) 2007-2008  EmErgE <halt.system@gmail.com>                #
#  Copyright (C) 2007-2008  Arvid Norlander                               #
#                                                                         #
#  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 3 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, see <http://www.gnu.org/licenses/>.  #
#                                                                         #
###########################################################################
#---------------------------------------------------------------------
## Calculate with bc
## @Dependencies This module depends on bc
## @Dependencies (http://www.gnu.org/software/bc/bc.html)
#---------------------------------------------------------------------

module_calc_INIT() {
	modinit_API='2'
	modinit_HOOKS=''
	if ! hash bc > /dev/null 2>&1; then
		log_error "Couldn't find \"bc\" command line tool. The calc module depend on that tool."
		return 1
	fi
	commands_register "$1" 'calc' || return 1
	helpentry_module_calc_description="Simple calculator module."
	helpentry_calc_calc_syntax='<expression>'
	helpentry_calc_calc_description='Try to calculate <expression> using bc.'
}

module_calc_UNLOAD() {
	return 0
}

module_calc_REHASH() {
	return 0
}

module_calc_handler_calc() {
	local sender="$1"
	local channel="$2"
	local sendernick=
	parse_hostmask_nick "$sender" 'sendernick'
	# If it isn't in a channel send message back to person who send it,
	# otherwise send in channel
	if ! [[ $2 =~ ^# ]]; then
		channel="$sendernick"
	fi
	local parameters="$3"

	# Sanity check on parameters
	parameters="$(tr -d '\n\r\t' <<< "$parameters")"
	if grep -Eq "scale=|read|while|if|for|break|continue|print|return|define|[e|j] *\(" <<< "$parameters"; then
		send_msg "$channel" "${sendernick}: Can't calculate that, it contains a potential unsafe/very slow function."
	elif [[ $parameters =~ \^[0-9]{4,} ]]; then
		send_msg "$channel" "${sendernick}: Some too large numbers."
	else
		# Force some security guards
		local myresult="$(ulimit -t 4; echo "$parameters" | bc -l 2>&1 | head -n 1)"
		send_msg "$channel" "${sendernick}: $myresult"
	fi

}