Ecosyste.ms: Awesome

An open API service indexing awesome lists of open source software.

https://github.com/demystifyfp/FsConfig

FsConfig is a F# library for reading configuration data from environment variables and AppSettings with type safety.
https://github.com/demystifyfp/FsConfig

12-factor appsettings configuration configuration-management environment-variables fsharp functional-programming generic-programming

Last synced: 4 months ago
JSON representation

FsConfig is a F# library for reading configuration data from environment variables and AppSettings with type safety.

Lists

README 

        
# FsConfig



FsConfig is a F# library for reading configuration data from environment variables and AppSettings with type safety



[![Nuget](https://img.shields.io/nuget/dt/FsConfig.svg)](https://www.nuget.org/packages/FsConfig)

[![Build master](https://github.com/demystifyfp/FsConfig/actions/workflows/build.yml/badge.svg)](https://github.com/demystifyfp/FsConfig/actions/workflows/build.yml)



## Why FsConfig?



To understand FsConfig, let's have a look at an use case from the [FsTweet](https://github.com/demystifyfp/FsTweet) application.



The FsTweet application follows [The Twelve-Factor App](https://12factor.net/config) guideline for managing the configuration data. During the application bootstrap, it retrieves its ten configuration parameters from their respective environment variables.



```fsharp

open System



let main argv =



  let fsTweetConnString = 

   Environment.GetEnvironmentVariable  "FSTWEET_DB_CONN_STRING"



  let serverToken =

    Environment.GetEnvironmentVariable "FSTWEET_POSTMARK_SERVER_TOKEN"



  let senderEmailAddress =

    Environment.GetEnvironmentVariable "FSTWEET_SENDER_EMAIL_ADDRESS"



  let env = 

    Environment.GetEnvironmentVariable "FSTWEET_ENVIRONMENT"



  let streamConfig : GetStream.Config = {

      ApiKey = 

        Environment.GetEnvironmentVariable "FSTWEET_STREAM_KEY"

      ApiSecret = 

        Environment.GetEnvironmentVariable "FSTWEET_STREAM_SECRET"

      AppId = 

        Environment.GetEnvironmentVariable "FSTWEET_STREAM_APP_ID"

  }



  let serverKey = 

    Environment.GetEnvironmentVariable "FSTWEET_SERVER_KEY"



  let port = 

    Environment.GetEnvironmentVariable "PORT" |> uint16



  // ...

```



Though the code snippet does the job, there are some shortcomings.



1. The code is verbose.

2. There is no error handling to deal with the absence of values or wrong values.

3. Explicit type casting



With the help of FsConfig, we can overcome these limitations by specifying the configuration data as a F# Record type.



```fsharp

type StreamConfig = {

  Key : string

  Secret : string

  AppId : string

}



[]

type Config = {



  DbConnString : string

  PostmarkServerToken : string

  SenderEmailAddress : string

  ServerKey : string

  Environment : string



  []

  Port : uint16

  Stream : StreamConfig

}

```



And then read all the associated environment variables in a single function call with type safety and error handling!



```fsharp

let main argv =



  let config = 

    match EnvConfig.Get() with

    | Ok config -> config

    | Error error -> 

      match error with

      | NotFound envVarName -> 

        failwithf "Environment variable %s not found" envVarName

      | BadValue (envVarName, value) ->

        failwithf "Environment variable %s has invalid value %s" envVarName value

      | NotSupported msg -> 

        failwith msg

```



## Supported Data Types



FsConfig supports the following data types and leverages their respective `TryParse` function to do the type conversion.



* `Int16`, `Int32`, `Int64`, `UInt16`, `UInt32`, `UInt64`

* `Byte`, `SByte`

* `Single`, `Double`, `Decimal`

* `Char`, `String`

* `Bool`

* `TimeSpan`, `DateTimeOffset`, `DateTime`

* `Guid`

* `Enum`

* `list` of all the above types

* `option` of all the above types



### Option Type



FsConfig allows us to specify optional configuration parameters using the `option` type. In the previous example, if the configuration parameter `Port` is optional, we can define it like 



```diff

type Config = {

   ...

-  Port : uint16

+  Port : uint16 option

}

```



### Discriminated Union Type



FsConfig supports Discriminated Union Types that has cases alone. 



```diff

type Color =

| Red

| Green

| Blue 



type Config = {

  ConsoleColor : Color

}

```



> With this configuration declaration, FsConfig read the environment variable `CONSOLE_COLOR` and populates the `ConsoleColor` field of type `Color`.



> List of Discriminated Union Types also supported!



### List Type



FsConfig also supports `list` type, and it expects comma separated individual values. 



For example, to get mulitple ports, we can define the config as 



```fsharp

type Config = {

  Port : uint16 list

}

```



and then pass the value `8084,8085,8080` using the environment variable `PORT`.



The default separator for the list can be changed if needed using the `ListSeparator` attribute.



```fsharp

  []

  type CustomListSeparatorSampleConfig = {

    ProcessNames : string list

    []

    ProcessIds : uint16 list

    []

    PipedFlow : int list    

  }

  ```



> With this configuration declaration, FSConfig would be able to read the following entries from App.settings.

```xml

  

  

  

```



A definition similar to the one shown below will allow parsing of standalone lists.

```fsharp

  type IntListUsingSemiColonsConfig = {

    []

    IntListUp : int list

  }

```



> E.g. an environment containing

```ini

INT_LIST_UP=42;43;44 

```



### Record Type



As shown in the initial example, FsConfig allows us to group similar configuration into a record type.



```fsharp

type AwsConfig = {

  AccessKeyId : string

  DefaultRegion : string

  SecretAccessKey : string

}



type Config = {

  Aws : AwsConfig

}

```



> With this configuration declaration, FsConfig read the environment variables `AWS_ACCESS_KEY_ID`, `AWS_SECRET_ACCESS_KEY`, and `AWS_DEFAULT_REGION` and populates the `Aws` field of type `AwsConfig`.



### Default Value



If you'd like to use a default value in the absence of a field value, you can make use of the `DefaultValue` attribute.



```fsharp

type Config = {

  []

  HttpServerPort : int16

  []

  DbConnectionString: string

}

```



## Environment Variable Name Convention & Customization



By default, FsConfig follows Underscores with uppercase convention, as in `UPPER_CASE`, for deriving the environment variable name. 



```fsharp

type Config = {

  ServerKey : string

}

```



> Using this configuration declaration, FsConfig read the environment variable `SERVER_KEY` and populates the `ServerKey` field



To specify a custom prefix in the environment variables, we can make use of the `Convention` attribute.



```fsharp

[]

type Config = {

  ServerKey : string

}

```



> For this configuration declaration, FsConfig read the environment variable `FSTWEET_SERVER_KEY` and populates the `ServerKey` field.



We can also override the separator character `_` using the `Convention` attribute's optional field `Separator`



```fsharp

[]

type Config = {

  ServerKey : string

}

```



> In this case, FsConfig derives the environment variable name as `FSTWEET-SERVER-KEY`.



If an environment variable name is not following a convention, we can override the environment variable name at the field level using the `CustomName` attribute.



```fsharp

type Config = {

  []

  ServerKey : string

}

```



> Here, FsConfig uses the environment variable name `MY_SERVER_KEY` to get the ServerKey.



We can also merely customise (or control) the environment variable name generation by passing an higher-order function while calling the `Get` function



```fsharp

open FsConfig



// Prefix -> string -> string

let lowerCaseConfigNameCanonicalizer (Prefix prefix) (name : string) = 

  let lowerCaseName = name.ToLowerInvariant()

  if String.IsNullOrEmpty prefix then 

    name.ToLowerInvariant()

  else

    sprintf "%s-%s" (prefix.ToLowerInvariant()) lowerCaseName



[]

type Config = {

  ServerKey : string

}



let main argv =

  let config = 

    match EnvConfig.Get lowerCaseConfigNameCanonicalizer with

    | Ok config -> config

    | Error error -> failwithf "Error : %A" error

``` 



> FsConfig computes the environment variable name as `fstweet-server-key` in this scenario.



## Getting Individual Environment Variables



FsConfig also supports reading value directly by explicitly specifying the environment variable name



```fsharp

EnvConfig.Get "MY_APP_INITIAL_BALANCE" // Result

```



## App Config



FsConfig supports App Config for both DotNet Core and Non DotNet Core Applications. 



* [DotNet Core Applications](#dotnet-core-configuration-supported-from-v200-or-above) (Supported from V2.0.0 or above)



* [Non DotNet Core Applications](#appsettings-only-supported-in-v006-or-below) (Only Supported in V0.0.6 or below)



### DotNet Core Configuration (Supported from V2.0.0 or above)



FsConfig abstracts the configuration provider by depending on [IConfigurationRoot](https://docs.microsoft.com/en-us/dotnet/api/microsoft.extensions.configuration.iconfigurationroot).



```fsharp

let configurationRoot : IConfigurationRoot = // ...

let appConfig = new AppConfig(configurationRoot)

```



After creating an instance `appConfig` (of type `AppConfig` from FsConfig), you can use it to read the configuration values as below



```fsharp

// Reading Primitive

let result = 

  appConfig.Get "processId" // Result



// A Sample Record

type SampleConfig = {

  ProcessId : int

  ProcessName : string

}



// Reading a Record type

let result = 

  appConfig.Get () // Result



// A Sample Nested Record

type AwsConfig = {

  AccessKeyId : string

  DefaultRegion : string

  SecretAccessKey : string

}



type Config = {

  MagicNumber : int

  Aws : AwsConfig

}



// Reading a Nested Record type

let result = 

  appConfig.Get () // Result

```



Refer below for creating `configurationRoot` based on the file type and using FsConfig to read the values.  



#### JSON



```json

{

  "processId" : "123",

  "processName" : "FsConfig",

  "magicNumber" : 42,

  "aws" : {

    "accessKeyId" : "Id-123",

    "defaultRegion" : "us-east-1",

    "secretAccessKey" : "secret123"

  },

  "colors" : "Red,Green"

}

```



This JSON file can be read using 



```fsharp

// Requires NuGet package

// Microsoft.Extensions.Configuration.Json

let configurationRoot =  

  ConfigurationBuilder().SetBasePath(Directory.GetCurrentDirectory())

    .AddJsonFile("settings.json").Build()



let appConfig = new AppConfig(configurationRoot)

let result = 

  appConfig.Get () // Result

```



#### XML



```xml



  123

  FsConfig

  42

  

    Id-123

    us-east-1

    secret123

  

  Red,Green



```



This XML file can be read using 



```fsharp

// Requires NuGet package

// Microsoft.Extensions.Configuration.Xml

let configurationRoot =  

  ConfigurationBuilder().SetBasePath(Directory.GetCurrentDirectory())

    .AddXmlFile("settings.xml").Build()



let appConfig = new AppConfig(configurationRoot)

let result = 

  appConfig.Get () // Result

```



#### INI



```ini

ProcessId=123

ProcessName=FsConfig

MagicNumber=42

Colors=Red,Green



[Aws]

AccessKeyId=Id-123

DefaultRegion=us-east-1

SecretAccessKey=secret123

```



This INI file can be read using 



```fsharp

// Requires NuGet package

// Microsoft.Extensions.Configuration.Ini

let configurationRoot =  

  ConfigurationBuilder().SetBasePath(Directory.GetCurrentDirectory())

    .AddIniFile("settings.ini").Build()



let appConfig = new AppConfig(configurationRoot)

let result = 

  appConfig.Get () // Result

```



### appSettings (Only Supported in V0.0.6 or below)



We can read the `appSettings` values using the `AppConfig` type instead of `EnvConfig` type. 



FsConfig uses the exact name of the field to derive the `appSettings` key name and doesn't use any separator by default.



```fsharp

type AwsConfig = {

  AccessKeyId : string

  DefaultRegion : string

  SecretAccessKey : string

}



type Config = {

  Port : uint16

  Aws : AwsConfig

}



let main argv =

  let config = 

    match AppConfig.Get() with

    | Ok config -> config

    | Error error -> failwithf "Error : %A" error

```



> The above code snippet looks for `appSettings` values with the name `Port`, `AwsAccessKeyId`, `AwsDefaultRegion`, `AwsSecretAccessKey` and populates the respective fields.



All the customisation that we have seen for `EnvConfig` is applicable for `AppConfig` as well.



## How FsConfig Works



If you are curious to know how FsConfig works and its internals then you might be interested in my blog post, [Generic Programming Made Easy](https://www.demystifyfp.com/fsharp/blog/generic-programming-made-easy/) that deep dives into the initial implementation of FsConfig.



## Feedback



> We all need people who will give us feedback. That's how we improve - Bill Gates.



Your suggestions/feedback are welcome!



## Acknowledgements



The idea of FsConfig is inspired by [Kelsey Hightower](https://twitter.com/kelseyhightower)'s golang library [envconfig](https://github.com/kelseyhightower/envconfig). 



FsConfig uses [Eirik Tsarpalis](https://twitter.com/eiriktsarpalis)'s [TypeShape](https://github.com/eiriktsarpalis/TypeShape) library for generic programming. 



## Maintainer(s)



- [@tamizhvendan](https://github.com/tamizhvendan)