bison (formerly gleam_bson)

bson encoder and decoder for gleam

Quick start

gleam test  # Run the tests
gleam shell # Run an Erlang shell

Installation

gleam add bison

Roadmap

• support encoding and decoding basic bson types (null, string, int32, int64, double, boolean, objectId, array, document).
• support encoding and decoding min, max, timestamp, datetime, javascript and regex bson types.
• support encoding and decoding the generic, md5, uuid and user-defined binary subtypes.
• support generating new object-ids
• support encoding and decoding decimal128 bson type.
• support encoding and decoding encrypted binary subtype.

Usage

Encoding

import gleam/list
import gleam/result
import bison/md5
import bison/bson
import bison.{encode}
import bison/object_id

fn calf_to_bson(calf: Calf) -> Result(BitString, Nil) {
  use id <- result.then(object_id.from_string(calf.id))
  use checksum <- result.then(md5.from_string(calf.checksum))

  Ok(encode([
    #("id", bson.ObjectId(id)),
    #("name", bson.Str(calf.name)),
    #("lives", bson.Int32(calf.lives)),
    #("nicknames", bson.Array(list.map(calf.nicknames, bson.Str))),
    #("checksum", bson.Binary(bson.MD5(checksum))),
    #("name_pattern", bson.Regex(#("[a-z][a-z0-9]+", ""))),
  ]))
}

Decoding

import gleam/list
import gleam/result
import bison/md5
import bison/bson
import bison.{decode}
import bison/object_id

fn calf_from_bson(data: BitString) -> Result(Calf, Nil) {
  use doc <- result.then(decode(data))

  let [
    #("id", bson.ObjectId(id)),
    #("name", bson.Str(name)),
    #("lives", bson.Int32(lives)),
    #("nicknames", bson.Array(nicknames)),
    #("checksum", bson.Binary(bson.MD5(checksum))),
    #("name_pattern", bson.Regex(#(pattern, options))),
  ] = doc

  Ok(Calf(
    id: object_id.to_string(id),
    name: name,
    lives: lives,
    nicknames: list.map(
      nicknames,
      fn(n) {
        let assert bson.Str(n) = n
        n
      },
    ),
    checksum: md5.to_string(checksum),
  ))
}