gistfile1.lisp

(query
 (fields (field yyyymmdd) (value (hash (parse_agent (field agent)) (string "category"))) (count *))
 (from (table access_log))
 (where
  (and
   (= (field service) (string "blog"))
   (or
    (= (field yyyymmdd) (string "20120331"))
    (= (field yyyymmdd) (string "20120401"))
    (= (value (hash (parse_agent (field agent)) (string "category"))) (string "smartphone")))))
 (aggregate
  (group (field yyyymmdd) (value (hash (parse_agent (field agent)) (string "category"))))
  (order (asc (field yyyymmdd)) (desc (count *)))
  (limit 30)))

;; (count *)
;; (count (field hoge))
;; (count (is_smartphone(parse_agent(agent))))
;; (count (if (= (field status) 500) 1 NULL))