{-# 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 2764500 zebraHost zebraPort dbFilePath