From 211c7b052d5611170a031ba57ed97eb9dc2d6583 Mon Sep 17 00:00:00 2001
From: Yasuhiro Asaka <yasaka@ywesee.com>
Date: Mon, 19 Mar 2012 13:47:41 +0100
Subject: [PATCH 2/2] Updated access_test as test from access_log

---
 test/access_log_generator.rb |   62 ++++++++++++++++++++++++++++++++++++++++++
 test/access_test.rb          |   32 +++++++++++----------
 2 files changed, 79 insertions(+), 15 deletions(-)
 create mode 100755 test/access_log_generator.rb

diff --git a/test/access_log_generator.rb b/test/access_log_generator.rb
new file mode 100755
index 0000000..661893c
--- /dev/null
+++ b/test/access_log_generator.rb
@@ -0,0 +1,62 @@
+#!/usr/bin/env ruby
+# -*- coding: utf-8 -*-
+
+$: << File.expand_path('/var/www/shoe/src', File.dirname(__FILE__))
+
+require 'rubygems'
+require 'drb'
+require 'util/shoeconfig'
+
+class RequestStub
+end
+class AccessLogGenerator
+  def initialize
+		@admin_threads = ThreadGroup.new
+    req = RequestStub.new
+    @request = DRb.start_service('druby://localhost:0', req)
+    @server  = DRbObject.new(nil, SHOE::SERVER_URI)
+  end
+  def generate()
+    result = ''
+	  result.extend(DRb::DRbUndumped)
+    size = 200
+    if (size < 100)
+      puts "at least, create 100 articles before test."
+      exit
+    end
+    puts "generating access_log"
+    r = Random.new(Time.now.to_i)
+    pos = r.rand(size - 99)
+    length = 100
+    input = <<SRC
+    agents = [
+      "bot",
+      "crawler",
+      "spider",
+      "Mozilla/5.0 (Windows NT 6.1; WOW64; rv:10.0.2) Gecko/20100101 Firefox/10.0.2",
+      "Mozilla/5.0 (iPhone; CPU iPhone OS 5_1 like Mac OS X) AppleWebKit/534.46 (KHTML, like Gecko) Version/5.1 Mobile/9B176 Safari/7534.48.3"
+    ]
+    File.open('test/log/access_log', 'w') do |f|
+      #{length}.times do |n|
+        article = articles.values[#{pos} + n]
+        lang = 'de'
+        if n.odd?
+          lang = 'en'
+        end
+        flavors = ['plain', 'grid']
+        flavor  = flavors[rand(0..1)]
+        path = "/" + lang + "/"+ flavor + "/home"
+        f.puts "\\"GET " + path + " HTTP/1.1\\"  200 0 \\"http://#{SHOE::SERVER_NAME}" + path + "\\" " + "\\"\#\{agents[rand(0..agents.count)]\}\\""
+        path = "/" + lang + "/" + flavor + "/slip/slug/%s" % article.slug
+        f.puts "\\"GET " + path + " HTTP/1.1\\"  200 0 \\"http://#{SHOE::SERVER_NAME}" + path + "\\" " + "\\"\#\{agents[rand(0..agents.count)]\}\\""
+      end
+    end
+SRC
+    $current = @server._admin(input, result)
+    $current.join
+    $stdout.puts result
+  end
+end
+
+generator = AccessLogGenerator.new
+generator.generate
diff --git a/test/access_test.rb b/test/access_test.rb
index 3de5b76..989dcd8 100755
--- a/test/access_test.rb
+++ b/test/access_test.rb
@@ -5,22 +5,24 @@ $: << File.expand_path('/var/www/shoe/src', File.dirname(__FILE__))
 require 'mechanize'
 require 'util/shoeconfig'
 
+
+input = ARGV[0] || File.dirname(__FILE__) + '/log/access_log'
+agent_urls = []
+File.readlines(input).each do |line|
+  agent = line.split(/"/)
+  agent.pop
+  agent = agent.pop
+  if line =~ /GET (.+) HTTP/ and agent
+    agent_urls << ["http://" + SHOE::SERVER_NAME + $1, agent]
+  end
+end
+
 agent = Mechanize.new
-agent.user_agent = "\
-Mozilla/5.0 (Macintosh; U; Intel Mac OS X 10_4_11; de-de) \
-AppleWebKit/525.18 (KHTML, like Gecko) \
-Version/3.1.2 Safari/525.22"
-urls = [
-  "/",
-  "/de/plain/",
-  "/en/plain/",
-  "/de/grid/",
-  "/en/grid/",
-]
-urls.shuffle!
-urls.length.times do |i|
-  url = 'http://' + SHOE::SERVER_NAME + urls[i]
+x = rand(agent_urls.length - 20)
+10.times do |i|
+  url = agent_urls[x+i][0]
+  agent.user_agent = agent_urls[x+i][1]
   print "url = #{url}, agent = #{agent.user_agent}\n"
-  agent.get(url)
+  page = agent.get(url)
   sleep 1
 end
-- 
1.7.3.4