def parse_query s
query = {}
subs = HookManager.run("custom-search", :subs => s) || s
subs = subs.gsub(/\b(to|from):(\S+)\b/) do
field, value = $1, $2
email_field, name_field = %w(email name).map { |x| "#{field}_#{x}" }
if(p = ContactManager.contact_for(value))
"#{email_field}:#{p.email}"
elsif value == "me"
'(' + AccountManager.user_emails.map { |e| "#{email_field}:#{e}" }.join(' OR ') + ')'
else
"(#{email_field}:#{value} OR #{name_field}:#{value})"
end
end
query[:load_spam] = true if subs =~ /\blabel:spam\b/
query[:load_deleted] = true if subs =~ /\blabel:deleted\b/
subs = subs.gsub(/\b(is|has):(\S+)\b/) do
field, label = $1, $2
case label
when "read"
"-label:unread"
when "spam"
query[:load_spam] = true
"label:spam"
when "deleted"
query[:load_deleted] = true
"label:deleted"
else
"label:#{$2}"
end
end
subs = subs.gsub(/\b(filename|filetype):(\((.+?)\)\B|(\S+)\b)/) do
field, name = $1, ($3 || $4)
case field
when "filename"
debug "filename: translated #{field}:#{name} to attachment:\"#{name.downcase}\""
"attachment:\"#{name.downcase}\""
when "filetype"
debug "filetype: translated #{field}:#{name} to attachment_extension:#{name.downcase}"
"attachment_extension:#{name.downcase}"
end
end
if $have_chronic
lastdate = 2<<32 - 1
firstdate = 0
subs = subs.gsub(/\b(before|on|in|during|after):(\((.+?)\)\B|(\S+)\b)/) do
field, datestr = $1, ($3 || $4)
realdate = Chronic.parse datestr, :guess => false, :context => :past
if realdate
case field
when "after"
debug "chronic: translated #{field}:#{datestr} to #{realdate.end}"
"date:#{realdate.end.to_i}..#{lastdate}"
when "before"
debug "chronic: translated #{field}:#{datestr} to #{realdate.begin}"
"date:#{firstdate}..#{realdate.end.to_i}"
else
debug "chronic: translated #{field}:#{datestr} to #{realdate}"
"date:#{realdate.begin.to_i}..#{realdate.end.to_i}"
end
else
raise ParseError, "can't understand date #{datestr.inspect}"
end
end
end
subs = subs.gsub(/\blimit:(\S+)\b/) do
lim = $1
if lim =~ /^\d+$/
query[:limit] = lim.to_i
''
else
raise ParseError, "non-numeric limit #{lim.inspect}"
end
end
debug "translated query: #{subs.inspect}"
qp = Xapian::QueryParser.new
qp.database = @xapian
qp.stemmer = Xapian::Stem.new(STEM_LANGUAGE)
qp.stemming_strategy = Xapian::QueryParser::STEM_SOME
qp.default_op = Xapian::Query::OP_AND
qp.add_valuerangeprocessor(Xapian::NumberValueRangeProcessor.new(DATE_VALUENO, 'date:', true))
NORMAL_PREFIX.each { |k,v| qp.add_prefix k, v }
BOOLEAN_PREFIX.each { |k,v| qp.add_boolean_prefix k, v }
xapian_query = qp.parse_query(subs, Xapian::QueryParser::FLAG_PHRASE|Xapian::QueryParser::FLAG_BOOLEAN|Xapian::QueryParser::FLAG_LOVEHATE|Xapian::QueryParser::FLAG_WILDCARD, PREFIX['body'])
debug "parsed xapian query: #{xapian_query.description}"
raise ParseError if xapian_query.nil? or xapian_query.empty?
query[:qobj] = xapian_query
query[:text] = s
query
end