Statistics
| Branch: | Tag: | Revision:

root / src / hluxid.hs @ 62a7853e

History | View | Annotate | Download (1.2 kB)

1 670e954a Thomas Thrainer
{-| Ganeti query daemon
2 670e954a Thomas Thrainer
3 670e954a Thomas Thrainer
-}
4 670e954a Thomas Thrainer
5 670e954a Thomas Thrainer
{-
6 670e954a Thomas Thrainer
7 670e954a Thomas Thrainer
Copyright (C) 2009, 2011, 2012, 2013 Google Inc.
8 670e954a Thomas Thrainer
9 670e954a Thomas Thrainer
This program is free software; you can redistribute it and/or modify
10 670e954a Thomas Thrainer
it under the terms of the GNU General Public License as published by
11 670e954a Thomas Thrainer
the Free Software Foundation; either version 2 of the License, or
12 670e954a Thomas Thrainer
(at your option) any later version.
13 670e954a Thomas Thrainer
14 670e954a Thomas Thrainer
This program is distributed in the hope that it will be useful, but
15 670e954a Thomas Thrainer
WITHOUT ANY WARRANTY; without even the implied warranty of
16 670e954a Thomas Thrainer
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
17 670e954a Thomas Thrainer
General Public License for more details.
18 670e954a Thomas Thrainer
19 670e954a Thomas Thrainer
You should have received a copy of the GNU General Public License
20 670e954a Thomas Thrainer
along with this program; if not, write to the Free Software
21 670e954a Thomas Thrainer
Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
22 670e954a Thomas Thrainer
02110-1301, USA.
23 670e954a Thomas Thrainer
24 670e954a Thomas Thrainer
-}
25 670e954a Thomas Thrainer
26 670e954a Thomas Thrainer
module Main (main) where
27 670e954a Thomas Thrainer
28 670e954a Thomas Thrainer
import qualified Ganeti.Query.Server
29 670e954a Thomas Thrainer
import Ganeti.Daemon
30 670e954a Thomas Thrainer
import Ganeti.Runtime
31 670e954a Thomas Thrainer
32 670e954a Thomas Thrainer
-- | Options list and functions.
33 670e954a Thomas Thrainer
options :: [OptType]
34 670e954a Thomas Thrainer
options =
35 670e954a Thomas Thrainer
  [ oNoDaemonize
36 670e954a Thomas Thrainer
  , oNoUserChecks
37 670e954a Thomas Thrainer
  , oDebug
38 670e954a Thomas Thrainer
  , oSyslogUsage
39 670e954a Thomas Thrainer
  ]
40 670e954a Thomas Thrainer
41 670e954a Thomas Thrainer
-- | Main function.
42 670e954a Thomas Thrainer
main :: IO ()
43 670e954a Thomas Thrainer
main =
44 3695a4e0 Thomas Thrainer
  genericMain GanetiLuxid options
45 670e954a Thomas Thrainer
    Ganeti.Query.Server.checkMain
46 670e954a Thomas Thrainer
    Ganeti.Query.Server.prepMain
47 670e954a Thomas Thrainer
    Ganeti.Query.Server.main