Add an importer binary.

lib/Config.hs

@@ -2,6 +2,8 @@
 module Config
   ( parserOpts
   , AppConfig(..)
+  , importerParserOpts
+  , ImporterConfig(..)
   ) where
 
 import Options.Applicative
@@ -43,3 +45,29 @@ parserOpts =  info (appConfig <**> helper)
       ( fullDesc
      <> progDesc "Serve Quotes API"
      <> header "quotes api" )
+
+data ImporterConfig = ImporterConfig
+  { ioAppDbFile :: FilePath
+  , ioReadwiseFile :: FilePath
+  } deriving (Show, Eq)
+
+importerConfig :: Parser ImporterConfig
+importerConfig = ImporterConfig
+  <$> strOption
+     ( long "dbpath"
+     <> help "sqlite db file path"
+     <> showDefault
+     <> value "quotes.db"
+     <> metavar "TARGET")
+    <*> strOption
+     ( long "readwise"
+     <> help "readwise export file path"
+     <> showDefault
+     <> value "readwise.csv"
+     <> metavar "RWCSV")
+
+importerParserOpts :: ParserInfo ImporterConfig
+importerParserOpts = info (importerConfig <**> helper)
+  ( fullDesc
+  <> progDesc "Import data into db"
+  <> header "importer API")