(ns luduverse.db
  (:require [korma.core :refer :all]
            [korma.db :refer [defdb mysql]]))

(defdb db (mysql {:db "luduverse"
                  :user "luduverse"
                  :password "dev"}))

(declare entities competitions users sources)

(defentity entries
  (database db)
  (belongs-to competitions {:fk :competition_id})
  (belongs-to users {:fk :user_id})
  (has-many sources))

(defentity competitions
  (database db)
  (has-many entries))

(defentity users
  (database db)
  (has-many entities))

(defentity sources
  (database db)
  (belongs-to entities))