Miscellany

require 'uri'

Net::HTTP.version_1_2

GOOGLE_WAP_LINK = /<a accesskey="(\d)" href=".*?u=(.*?)">(.*?)<\/a>/im

class SearchPlugin < Plugin
  def help(plugin, topic="")
    case topic
    when "search"
    "search <string> => search google for <string>"
    when "google"
    "google <string> => search google for <string>"
    when "wp"
      "wp [<code>] <string> => search for <string> on Wikipedia. You can select a national <code> to only search the national Wikipedia"
    else
    "search <string> (or: google <string>) => search google for <string> | wp <string> => search for <string> on Wikipedia"
    end
  end

  def google(m, params)
    what = params[:words].to_s
    searchfor = URI.escape what
    # This method is also called by other methods to restrict searching to some sites
    if params[:site]
      site = "site:#{params[:site]}+"
    else
      site = ""
    end
    # It is also possible to choose a filter to remove constant parts from the titles
    # e.g.: "Wikipedia, the free encyclopedia" when doing Wikipedia searches
    filter = params[:filter] || ""

    url = "http://www.google.com/wml/search?q=#{site}#{searchfor}"


    begin
      wml = @bot.httputil.get_cached(url)
    rescue => e
      m.reply "error googling for #{what}"
      return
    end
    results = wml.scan(GOOGLE_WAP_LINK)
    if results.length == 0
      m.reply "no results found for #{what}"
      return
    end
    results = results[0...3].map { |res|
      n = res[0]
      t = Utils.decode_html_entities res[2].gsub(filter, '').strip
      u = URI.unescape res[1]
      "#{n}. #{t}: #{u}"
    }.join(" | ")

    m.reply "Results for #{what}: #{results}"
  end

  def wikipedia(m, params)
    lang = params[:lang]
    site = "#{lang.nil? ? '' : lang + '.'}wikipedia.org"
    params[:site] = site
    params[:filter] = / - Wikipedia.*$/
    return google(m, params)
  end
  def image(m, params)
    require 'mechanize'
    
    what = params[:words].to_s
    searchfor = URI.escape what

    
	
    agent = WWW::Mechanize.new
    page = agent.get("http://images.google.com/advanced_image_search")

    #form ausfüllem
    page_form = page.form("f")
    page_form.as_q = searchfor
    page_form.radiobuttons.name('safe')[0].check
	
    #abschicken
    page2 = agent.submit(page_form, page_form.buttons.first)
	
    alles=Array.new
    max=0
    
    page2.links.each do |l|
        if l.text=="" and max!=3
            alles.push /imgurl=(.+)&imgrefurl/.match(l.href)[1]
	    #puts "-----------"
	    max+=1
	end
    end
     m.reply alles.join(" | ")
  end
  
  
end

plugin = SearchPlugin.new

plugin.map "search *words", :action => 'google'
plugin.map "google *words", :action => 'google'
plugin.map "image *words", :action => 'image'
plugin.map "wp :lang *words", :action => 'wikipedia', :requirements => { :lang => /^\w\w\w?$/ }
plugin.map "wp *words", :action => 'wikipedia'