{-# LANGUAGE OverloadedStrings #-}

module ZenScan where

import Data.Configurator
import Zenith.Scanner (scanZebra)

main :: IO ()
main = do
  config <- load ["zenith.cfg"]
  --dbFilePath <- require config "dbFilePath"
  dataStorePath <- require config "dataStorePath"
  zebraPort <- require config "zebraPort"
  zebraHost <- require config "zebraHost"
  scanZebra 2781518 zebraHost zebraPort dataStorePath