package main

import (
	"flag"
	"log"
	"os"
	"strconv"
	"strings"
	"time"

	"github.com/hashicorp/logutils"
)

// getEnvString returns string from environment variable
func getEnvString(env, def string) (val string) { //nolint:deadcode
	val = os.Getenv(env)

	if val == "" {
		return def
	}

	return
}

// getEnvInt returns int from environment variable
func getEnvInt(env string, def int) (ret int) {
	val := os.Getenv(env)

	if val == "" {
		return def
	}

	ret, err := strconv.Atoi(val)
	if err != nil {
		log.Fatalf("[ERROR] Environment variable is not numeric: %v\n", env)
	}

	return
}

func initialize() {
	config.TimeZone, _ = time.LoadLocation("America/Chicago")
	config.TimeZoneUTC, _ = time.LoadLocation("UTC")

	// read command line options
	var (
		logLevel int
		ns1, ns2 string
	)

	// log configuration
	flag.IntVar(&logLevel,
		"log",
		getEnvInt("LOG_LEVEL", 50),
		"(LOG_LEVEL)\nlog level")
	// http client configuration
	flag.IntVar(&config.HTTPClientRequestTimeout,
		"client-req-to",
		getEnvInt("HTTP_CLIENT_REQUEST_TIMEOUT", 60),
		"(HTTP_CLIENT_REQUEST_TIMEOUT)\ntime in seconds for the internal http client to complete a request")
	flag.IntVar(&config.HTTPClientConnectTimeout,
		"client-con-to",
		getEnvInt("HTTP_CLIENT_CONNECT_TIMEOUT", 5),
		"(HTTP_CLIENT_CONNECT_TIMEOUT)\ntime in seconds for the internal http client connection timeout")
	flag.IntVar(&config.HTTPClientTLSHandshakeTimeout,
		"client-tls-to",
		getEnvInt("HTTP_CLIENT_TLS_TIMEOUT", 5),
		"(HTTP_CLIENT_TLS_TIMEOUT)\ntime in seconds for the internal http client to complete a tls handshake")
	flag.IntVar(&config.HTTPClientIdleTimeout,
		"client-idle-to",
		getEnvInt("HTTP_CLIENT_IDLE_TIMEOUT", 5),
		"(HTTP_CLIENT_IDLE_TIMEOUT)\ntime in seconds that the internal http client will keep a connection open when idle")
	// Bind Config
	flag.StringVar(&config.NamedConfig.TTL,
		"bind-ttl",
		getEnvString("TTL", "1h"),
		"(TTL)\nBind zone time to live")
	flag.StringVar(&config.NamedConfig.Domain,
		"bind-domain",
		getEnvString("DOMAIN", "example.com"),
		"(DOMAIN)\nBind zone base domain")
	flag.StringVar(&config.NamedConfig.Email,
		"bind-email",
		getEnvString("EMAIL", "domain-admin@example.com"),
		"(EMAIL)\nBind zone authority e-mail address")
	flag.StringVar(&config.NamedConfig.Timestamp,
		"bind-timestamp",
		getEnvString("TIMESTAMP", time.Now().In(config.TimeZone).Format("0601021504")),
		"(TIMESTAMP)\nBind zone serial number")
	flag.StringVar(&config.NamedConfig.Refresh,
		"bind-refresh",
		getEnvString("REFRESH", "1h"),
		"(REFRESH)\nBind zone refresh time")
	flag.StringVar(&config.NamedConfig.Retry,
		"bind-retry",
		getEnvString("RETRY", "30m"),
		"(RETRY)\nBind zone retry time")
	flag.StringVar(&config.NamedConfig.Expire,
		"bind-expire",
		getEnvString("EXPIRE", "1w"),
		"(EXPIRE)\nBind zone expire time")
	flag.StringVar(&config.NamedConfig.Minimum,
		"bind-minimum",
		getEnvString("MINIMUM", "1h"),
		"(MINIMUM)\nBind zone minimum time")
	flag.StringVar(&ns1,
		"bind-ns1",
		getEnvString("NS1", ""),
		"(NS1)\nBind zone primary name-server")
	flag.StringVar(&ns2,
		"bind-ns2",
		getEnvString("NS2", ""),
		"(NS2)\nBind zone secondary name-server")
	// output file
	flag.StringVar(&config.BindOutputFileName,
		"filename",
		getEnvString("FILENAME", "./response-policy.bind"),
		"(FILENAME)\nWrite local file to filename")
	flag.Parse()

	// set logging level
	switch {
	case logLevel <= 20:
		config.Log.SetMinLevel(logutils.LogLevel("ERROR"))
	case logLevel > 20 && logLevel <= 40:
		config.Log.SetMinLevel(logutils.LogLevel("WARNING"))
	case logLevel > 40 && logLevel <= 60:
		config.Log.SetMinLevel(logutils.LogLevel("INFO"))
	case logLevel > 60 && logLevel <= 80:
		config.Log.SetMinLevel(logutils.LogLevel("DEBUG"))
	case logLevel > 80:
		config.Log.SetMinLevel(logutils.LogLevel("TRACE"))
	}
	log.SetOutput(config.Log)

	// print current configuration
	log.Printf("[DEBUG] configuration value set: LOG_LEVEL                   = %v\n", strconv.Itoa(logLevel))
	log.Printf("[DEBUG] configuration value set: HTTP_CLIENT_REQUEST_TIMEOUT = %v\n", strconv.Itoa(config.HTTPClientRequestTimeout))
	log.Printf("[DEBUG] configuration value set: HTTP_CLIENT_CONNECT_TIMEOUT = %v\n", strconv.Itoa(config.HTTPClientConnectTimeout))
	log.Printf("[DEBUG] configuration value set: HTTP_CLIENT_TLS_TIMEOUT     = %v\n", strconv.Itoa(config.HTTPClientTLSHandshakeTimeout))
	log.Printf("[DEBUG] configuration value set: HTTP_CLIENT_IDLE_TIMEOUT    = %v\n", strconv.Itoa(config.HTTPClientIdleTimeout))
	log.Printf("[DEBUG] configuration value set: TTL                         = %v\n", config.NamedConfig.TTL)
	log.Printf("[DEBUG] configuration value set: DOMAIN                      = %v\n", config.NamedConfig.Domain)
	log.Printf("[DEBUG] configuration value set: EMAIL                       = %v\n", config.NamedConfig.Email)
	log.Printf("[DEBUG] configuration value set: TIMESTAMP                   = %v\n", config.NamedConfig.Timestamp)
	log.Printf("[DEBUG] configuration value set: REFRESH                     = %v\n", config.NamedConfig.Refresh)
	log.Printf("[DEBUG] configuration value set: RETRY                       = %v\n", config.NamedConfig.Retry)
	log.Printf("[DEBUG] configuration value set: EXPIRE                      = %v\n", config.NamedConfig.Expire)
	log.Printf("[DEBUG] configuration value set: MINIMUM                     = %v\n", config.NamedConfig.Minimum)
	log.Printf("[DEBUG] configuration value set: NS1                         = %v\n", ns1)
	log.Printf("[DEBUG] configuration value set: NS1                         = %v\n", ns2)

	// set bind-config nameservers
	if ns1 == "" {
		log.Printf("[ERROR] A primary name-server must be identified.")
		flag.PrintDefaults()
		os.Exit(1)
	} else {
		config.NamedConfig.NameServers = append(config.NamedConfig.NameServers, ns1)
	}
	if ns2 != "" {
		config.NamedConfig.NameServers = append(config.NamedConfig.NameServers, ns2)
	}
	config.NamedConfig.Email = strings.Replace(config.NamedConfig.Email, "@", ".", -1)

	log.Printf("[DEBUG] Initialization Complete\n")
}