butler 1.8.2 → 1.8.3

data/data/butler/plugins/core/user.rb

@@ -1,166 +0,0 @@
-#--
-# Copyright 2007 by Stefan Rusterholz.
-# All rights reserved.
-# See LICENSE.txt for permissions.
-#++
-
-
-
-trigger "user"
-
-def on_trigger
-	case arguments(1)
-		when "create"
-			name, pass, active = @message.arguments[2,3]
-			active = active && !%(false off).include?(active.downcase)
-			return answer(usage) unless name and pass
-			if @butler.access.user.exists?(name) then
-				answer(:exists, :name => name)
-			else
-				@butler.access.user.create(name, pass, nil, false, :active => active)
-				answer(:created, :name => name)
-			end
-
-		when "delete"
-			return answer(usage) unless name = @message.arguments[2]
-			if @butler.access.user.exists?(name) then
-				@butler.access.user.delete(name)
-				answer(:deleted)
-			else
-				answer(:doesnt_exist, :name => name)
-			end
-
-		when "activate"
-			return answer(usage) unless name = @message.arguments[2]
-			if @butler.access.user.exists?(name) then
-				@butler.access.user[name].activate
-				answer(:activated)
-			else
-				answer(:doesnt_exist, :name => name)
-			end
-
-		when "deactivate"
-			return answer(usage) unless name = @message.arguments[2]
-			if @butler.access.user.exists?(name) then
-				@butler.access.user[name].deactivate
-				answer(:deactivated)
-			else
-				answer(:doesnt_exist, :name => name)
-			end
-		
-		when "list"
-			answer(:users, :names => @butler.access.user.keys.columnize(5))
-
-		when "privileges"
-			return answer(usage) unless name = @message.arguments[2]
-			return answer(:doesnt_exist, :name => name) unless user = @butler.access.user[name]
-			answer(:privileges, :name => name, :privileges => user.privileges.list.keys.columnize(5))
-
-		when "roles"
-			return answer(usage) unless name = @message.arguments[2]
-			return answer(:doesnt_exist, :name => name) unless user = @butler.access.user[name]
-			answer(:roles, :name => name, :roles => user.roles.map { |r| r.id }.columnize(5))
-
-		when "add"
-			return answer(usage) unless name = @message.arguments[3] and @message.arguments[4]
-			return answer(:doesnt_exist, :name => name) unless user = @butler.access.user[name]
-			case arguments(2)
-				when "privilege"
-					user.privileges.add(@message.arguments[4])
-					answer(:added_privilege, :name => name, :privilege => @message.arguments[4])
-					
-				when "role"
-					role_name = @message.arguments[4]
-					answer(:role_doesnt_exist, :role => role_name) unless role = @butler.access.role[role_name]
-					user.roles.add(role)
-					answer(:added_role, :name => name, :role => role_name)
-				
-				else
-					answer(usage)
-
-			end
-
-		when "remove"
-			return answer(usage) unless name = @message.arguments[3] and @message.arguments[4]
-			return answer(:doesnt_exist, :name => name) unless user = @butler.access.user[name]
-			case arguments(2)
-				when "privilege"
-					user.privileges.remove(@message.arguments[4])
-					answer(:removed_privilege, :name => name, :privilege => @message.arguments[4])
-					
-				when "role"
-					role_name = @message.arguments[4]
-					answer(:role_doesnt_exist, :role => role_name) unless role = @butler.access.role[role_name]
-					user.roles.remove(role)
-					answer(:removed_role, :name => name, :role => role_name)
-				
-				else
-					answer(usage)
-
-			end
-		
-		else
-			answer(usage)
-
-	end
-end
-
-__END__
---- 
-:revision:
-  :plugin: 1
-:summary:
-  en: "Manage your users."
-:about:
-  :mail: "apeiros@gmx.net"
-  :version: "1.0.0"
-  :author: "Stefan Rusterholz"
-:strings:
-  :exists:
-    en: |
-      User <%= name %> exists already.
-  :doesnt_exist:
-    en: |
-      User <%= name %> does not exist.
-  :users:
-    en: |
-      Users:
-      <%= names %>
-  :privileges:
-    en: |
-      Privileges of <%= name %>:
-      <%= privileges %>
-  :roles:
-    en: |
-      Roles of <%= name %>:
-      <%= roles %>
-  :created:
-    en: |
-      Created user <%= name %>.
-  :deleted:
-    en: |
-      Deleted user <%= name %>.
-  :activated:
-    en: |
-      Activated user <%= name %>.
-  :deactivated:
-    en: |
-      Deactivated user <%= name %>.
-  :added_privilege:
-    en: |
-      Added privilege <%= privilege %> to <%= name %>.
-  :removed_privilege:
-    en: |
-      Removed privilege <%= privilege %> from <%= name %>.
-  :added_role:
-    en: |
-      Added role <%= role %> to <%= name %>.
-  :removed_role:
-    en: |
-      Removed role <%= role %> from <%= name %>.
-:usage:
-  en: "![b]user![o] ('create' name password ['active' | 'inactive'] | ('delete' | 'activate' | 'deactivate') username | ('add' | 'remove') privilege)"
-:help:
-  en:
-    "": |
-      Manage your users.

data/data/butler/plugins/dev/onhandlers.rb

@@ -1,93 +0,0 @@
-#--
-# Copyright 2007 by Stefan Rusterholz.
-# All rights reserved.
-# See LICENSE.txt for permissions.
-#++
-
-
-
-extend OnHandlers
-
-configuration(
-	"active" => false
-)
-
-trigger "onhandlers"
-
-def on_trigger
-	if @message.arguments[1] && @message.arguments[1].downcase == "on" then
-		plugin.config["active"] = true
-	else
-		plugin.config["active"] = false
-	end
-end
-
-def on_join(listener, user, channel)
-	debug("on_join triggered, #{user} joined #{channel}") if plugin.config["active"]
-end
-def on_privmsg(listener, user, text)
-	debug("on_privmsg triggered, #{user} wrote #{text}") if plugin.config["active"]
-end
-def on_notice(listener, user, text)
-	debug("on_notice triggered, #{user} wrote #{text}") if plugin.config["active"]
-end
-def on_nick(listener, user, old_nick)
-	debug("on_nick triggered, #{user} changed his nick from #{old_nick}") if plugin.config["active"]
-end
-def on_topic(listener, user, channel, topic)
-	debug("on_topic triggered, #{user} changed topic of #{channel} to #{topic}") if plugin.config["active"]
-end
-def on_part(listener, user, channel)
-	debug("on_part triggered, #{user} parted #{channel}") if plugin.config["active"]
-end
-def on_quit(listener, user, reason)
-	debug("on_quit triggered, #{user} has quit with #{reason}") if plugin.config["active"]
-end
-def on_kick(listener)
-	debug("on_kick triggered with #{@message}") if plugin.config["active"]
-end
-def on_kill(listener)
-	debug("on_kill triggered with #{@message}") if plugin.config["active"]
-end
-def on_kline(listener)
-	debug("on_kline triggered with #{@message}") if plugin.config["active"]
-end
-def on_invocation(listener)
-	debug("on_invocation triggered with #{@message}") if plugin.config["active"]
-end
-def on_ban(listener, *masks)
-	debug("on_ban triggered with #{@message}") if plugin.config["active"]
-end
-def on_unban(listener, *masks)
-	debug("on_unban triggered with #{@message}") if plugin.config["active"]
-end
-def on_op(listener, *users)
-	debug("on_op triggered with #{@message}") if plugin.config["active"]
-end
-def on_deop(listener, *users)
-	debug("on_deop triggered with #{@message}") if plugin.config["active"]
-end
-def on_voice(listener, *users)
-	debug("on_voice triggered with #{@message}") if plugin.config["active"]
-end
-def on_devoice(listener, *users)
-	debug("on_devoice triggered with #{@message}") if plugin.config["active"]
-end
-
-__END__
---- 
-:revision:
-  :plugin: 1
-:summary:
-  en: Testing all possible on_handlers
-:about:
-  :mail: "apeiros@gmx.net"
-  :version: "1.0.0"
-  :author: "Stefan Rusterholz"
-:strings:
-:usage:
-  en: "This plugin does not offer a specific interface."
-:help:
-  en:
-    "": |
-      This plugin is meant for diagnostic purposes only.

data/data/butler/plugins/service/log.rb

@@ -1,183 +0,0 @@
-#--
-# Copyright 2007 by Stefan Rusterholz.
-# All rights reserved.
-# See LICENSE.txt for permissions.
-#++
-
-
-
-require 'sequel/sqlite'
-
-class <<self
-	attr_reader :log_db
-	attr_reader :log_table
-end
-
-@log_db = Sequel.sqlite @butler.path.log+'/log.sqlite'
-
-configuration(
-	"channels" => []
-)
-@log_db.create_table(:log) {
-primary_key :oid, :integer
-int  :time
-str  :channel, :size => 255
-str  :nick,    :size => 48
-int  :type
-text :text
-} unless @log_db.table_exists?(:log)
-@log_table = @log_db[:log]
-
-MessageTypes = [:PRIVMSG, :NOTICE, :JOIN, :PART, :QUIT, :KICK, :KILL]
-
-trigger "log"
-
-def on_trigger
-	case @message.arguments[1]
-		when "list"
-			answer(:list, :channels => plugin.config["channels"])
-		when "on"
-			plugin.config["channels"] |= message.arguments[2..-1]
-			answer(:activated, :channels => message.arguments[2..-1])
-		when "off"
-			plugin.config["channels"] -= message.arguments[2..-1]
-			answer(:deactivated, :channels => message.arguments[2..-1])
-		when "search"
-			text, channel, from = @message.text.match(/search (.*)(?: in channel (#\w+))?(?: from (\w+))?$/).captures
-			text = "%#{text}%" if text
-			filtered = plugin.log_table #.filter { :type == 0 || :type == 1 }
-			filtered = filtered.filter { :nick == from } if from
-			filtered = filtered.filter { :nick == channel } if channel
-			filtered = filtered.filter { :text =~ text } if text
-			count = filtered.count
-			if count.zero? then
-				answer(:no_match)
-			else
-				upper = [5,count].min
-				answer("Found (1-#{upper} of #{count}):")
-				filtered.order(:time.DESC).first(5).each_with_index { |row, index|
-					answer(
-						"#{index+1}: " \
-						"[#{Time.at(row[:time]).strftime('%Y-%m-%d %H:%M')}, " \
-						"#{row[:from]} in #{row[:channel]}] " \
-						"#{row[:text]}"
-					)
-				}
-			end
-		when "dump"
-			n = @message.arguments[2].to_i
-			n = 5 if n.zero?
-			data = plugin.log_table.order(:time.DESC).first(n)
-			answer("Dump(#{data.length}):")
-			data.each_with_index { |row, index|
-				answer(
-					"#{index+1}: " \
-					"[#{Time.at(row[:time]).strftime('%Y-%m-%d %H:%M')}, " \
-					"#{row[:from]} in #{row[:channel]}] " \
-					"#{row[:text]}"
-				)
-			}
-		else
-			answer(usage)
-	end
-end
-
-subscribe(:PRIVMSG, -10, nil, MessageTypes.index(:PRIVMSG)) { |listener, message, type|
-	next unless @config["channels"].include?(message.channel.to_str)
-	@log_table << {
-		:time    => Time.now.to_i,
-		:channel => message.channel.to_str,
-		:nick    => message.from.nick,
-		:type    => type,
-		:text    => message.text
-	}
-}
-subscribe(:NOTICE, -10, nil, MessageTypes.index(:NOTICE)) { |listener, message, type|
-	next unless @config["channels"].include?(message.channel.to_str)
-	@log_table << {
-		:time    => Time.now.to_i,
-		:channel => message.channel.to_str,
-		:nick    => message.from.nick,
-		:type    => type,
-		:text    => message.text
-	}
-}
-subscribe(:JOIN, -10, nil, MessageTypes.index(:JOIN)) { |listener, message, type|
-	next unless @config["channels"].include?(message.channel.to_str)
-	@log_table << {
-		:time    => Time.now.to_i,
-		:channel => message.channel.to_str,
-		:nick    => message.from.nick,
-		:type    => type,
-		:text    => nil
-	}
-}
-subscribe(:PART, -10, nil, MessageTypes.index(:PART)) { |listener, message, type|
-	next unless @config["channels"].include?(message.channel.to_str)
-	@log_table << {
-		:time    => Time.now.to_i,
-		:channel => message.channel.to_str,
-		:nick    => message.from.nick,
-		:type    => type,
-		:text    => message.text
-	}
-}
-subscribe(:QUIT, -10, nil, MessageTypes.index(:QUIT)) { |listener, message, type|
-	next unless @config["channels"].include?(message.channel.to_str)
-	@log_table << {
-		:time    => Time.now.to_i,
-		:channel => message.channel.to_str,
-		:nick    => message.from.nick,
-		:type    => type,
-		:text    => message.text
-	}
-}
-subscribe(:KICK, -10, nil, MessageTypes.index(:KICK)) { |listener, message, type|
-	next unless @config["channels"].include?(message.channel.to_str)
-	@log_table << {
-		:time    => Time.now.to_i,
-		:channel => message.channel.to_str,
-		:nick    => message.from.nick,
-		:type    => type,
-		:text    => message.text
-	}
-}
-subscribe(:KILL, -10, nil, MessageTypes.index(:KILL)) { |listener, message, type|
-	next unless @config["channels"].include?(message.channel.to_str)
-	@log_table << {
-		:time    => Time.now.to_i,
-		:channel => message.channel.to_str,
-		:nick    => message.from.nick,
-		:type    => type,
-		:text    => message.text
-	}
-}
-
-__END__
---- 
-:revision:
-  :plugin: 1
-  :configuration: 1
-:summary:
-  en: Log channel messages
-:about:
-  :mail: "apeiros@gmx.net"
-  :version: "1.0.0"
-  :author: "Stefan Rusterholz"
-:usage:
-  en: "![b]log![o] 'list'"
-:help:
-  en:
-    "": Log channel messages.
-:strings:
-  :no_match:
-    en: "No match found."
-  :list:
-    en: |
-      Logging is active for: <%= channels.join(', ') %>.
-  :activated:
-    en: |
-      Logging activated in: <%= channels.join(', ') %>.
-  :deactivated:
-    en: |
-      Logging deactivated in: <%= channels.join(', ') %>.