2005-06-30 Thu
* xss
今日思った疑問。
普段、CGIでの入力値検査は、
などとして想定範囲内かどうかを検定しているが、これは複数行に該当す
るような値だと、別の行にマッチしてしまわないか。
普段、CGIでの入力値検査は、
if $lang = /^...$/などとして想定範囲内かどうかを検定しているが、これは複数行に該当す
るような値だと、別の行にマッチしてしまわないか。
01 02 03 04 05 06 07 08 09 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30
if $lang = /^...$/
users users users2913 users users users users17 users users users users users users users18 users15 users2206 users users users users36 users users users users users users users users users19 users4965 users users14 users users11 users users19 users users191 users12 users users users users users9 users8 users119 users22 users6 users821 users8 users users users users26 users127 users352 users204 users users715 users33 users24 users32 users11 users2165 users15 users users users933 users users users1187 users users users193 users4985 users13303 users users users users users users users usersWAND(X1, w1, ..., Xk, wk, θ) if Σi(Xi * wi) >= 0==> trueAND(X1, .., Xk) === WAND(X1, 1, ..., Xk, 1, k)OR(X1, .., Xk) === WAND(X1, 1, ..., Xk, 1, 1) users users491 users27 users users75 users users128 users users users users users27 users users users users1046 users12 users users1 users users users70 users190 users127 users users users users users users10 users--- /etc/syslog.conf.20050610 2005-06-10 16:32:14.049304200 +0900+++ /etc/syslog.conf 2005-06-10 16:42:47.708973288 +0900@@ -4,7 +4,7 @@ # Log anything (except mail) of level info or higher. # Don't log private authentication messages!-*.info;mail.none;authpriv.none /var/log/messages+*.info;mail.none;authpriv.none;cron.none /var/log/messages # The authpriv file has restricted access. authpriv.* /var/log/secure@@ -22,3 +22,6 @@ # Save boot messages also to boot.log local7.* /var/log/boot.log++# Save cron+cron.* /var/log/cron3115 users15 users users users378 users users users users users31 users users54 users99 users#!/usr/local/bin/ruby#require 'mailread'require 'date'class Mail def initialize(file) @header = Hash.new([]) open(file) do |f| lines = f.readlines while (not lines.empty?) do line = lines.shift break if line =~ /^$/ line << lines.shift while lines[0] =~ /^\s/ if line =~ /\A(\S+):\s*(.*)\Z/m @header[$1.downcase] << $2 end end end end def [](key) @header[key.downcase] endendif $0 == __FILE__ counter = {} ARGV.each do |dir| Dir.new(dir).entries.grep(/^\d+$/).sort{|a,b| a.to_i <=> b.to_i}.each do |f| path = dir + "/" + f #STDERR.puts path m = Mail.new(path) next if m["Received"].empty? or m["Received"].nil? or m["Received"][0].empty? date = nil while date.nil? begin date = DateTime.parse(m["Received"].shift) rescue break if m["Received"].empty? or m["Received"].nil? end end next if date.nil? counter[date.strftime("%Y-%m-%d")] ||= 0 counter[date.strftime("%Y-%m-%d")] += 1# puts "#{f}\t#{date}" end end puts counter.keys.sort.each do |d| puts "#{d}\t#{counter[d]}" endend