glyde
A Discord library for Gleam
Glyde is currently pre-1.0.0 release, so please try it out but be wary of papercuts.
gleam add glyde
Here's an example bot that answers !ping and counts how many it has sent:
import envoy
import gleam/bool
import gleam/int
import gleam/io
import glyde
import glyde/intents
pub fn main() -> Nil {
use token <- glyde.require_token(envoy.get("DISCORD_TOKEN"))
glyde.new(
token:,
state: 0,
intents: intents.new([
intents.Guilds,
intents.GuildMessages,
intents.MessageContent,
]),
)
|> glyde.on_ready(fn(_bot, pongs, ready) {
io.println("logged in as " <> ready.me.user.username)
pongs
})
|> glyde.on_message(fn(bot, pongs, message) {
use <- bool.guard(message.content != "!ping", pongs)
let pongs = pongs + 1
glyde.reply(bot, message, "pong! #" <> int.to_string(pongs))
pongs
})
|> glyde.run
}
That is examples/ping_pong, whole file.
A handler is given the bot's state and returns the next one. Handlers run in the order they were added, each seeing what the one before returned, so two of them on the same event share one value.
The runtime
run holds a glyde/client bot and loops: find the timer due soonest, wait
that long on the socket, feed the core whatever came back. The socket read
timeout is the timer, so there is no send_after, no timer wheel and no
process.
glyde/transport is the platform half, four functions wide: open a socket, send
an HTTP request, read the clock, wait. glyde.with_transport swaps it, so the
same bot runs over a proxy, a recording double, or a script with no network at
all. test/glyde_test.gleam drives a whole session that way.
Below run is glyde/client. Give it six functions, open, send, close, drop,
arm a timer and cancel one, and it runs the state machine's outputs against
them. That is where sharding, compression and a fleet's shared identify queue
live.
The core does no IO
gateway.step(shard, input) is total and returns the next shard plus the
outputs to perform, so a protocol rule is a row in a table with no socket to
fake and no clock to hold still:
pub fn hello_queues_for_an_identify_slot_test() {
let shard = greeting()
let Step(shard: after, outputs:) = frame(shard, hello())
assert outputs
== [
CancelTimer(gateway.Handshake),
ArmTimer(gateway.Heartbeat, 0, Stamp(7)),
RequestIdentifySlot(Conn(5)),
Note(gateway.AwaitingIdentifySlot),
]
assert after.phase
== Queued(Beat(interval_ms: interval, unacked: 0, quiet: False))
}
One step at a time cannot catch an ordering bug, so glyde/testing runs every
ordering of a set of inputs against an invariant you write once. It is public
and drives any machine of that shape, including yours.
A REST call is a value
rest.request(config, call) hands you a gleam_http request. Send it with
whatever client you already have, then give the answer back to the call it came
from, which carries the decoder for that endpoint.
let call =
channel.create_message(
channel_id,
message.create()
|> message.content("shipped")
|> message.embed(embed.new() |> embed.title("v0.1.0"))
|> message.create_body,
)
let request = rest.request(rest.config(rest.bot(token)), call)
// send it however you like, then:
let posted = rest.response(call, status:, headers:, body:)
rest.route(call) gives that call's rate-limit identity without building a
request at all, which is what glyde/rest/limiter schedules on. The limiter is
a state machine too: it says when to send and what a 429 means, it does not
sleep and it does not retry behind your back.
84 endpoints, covering channels and messages, guilds, members, roles, threads,
application commands, interactions, webhooks and users. Bodies come from the
builders in glyde/payload, and message.create_body writes the attachments
cross-reference for any file on the payload, which a hand-written JSON object
silently does not. Ids are tagged by what they identify, so the two snowflakes
in /channels/{channel_id}/messages/{message_id} cannot be swapped.
What is not in it
No voice.UpdateVoiceState is there because it is a gateway command, but
there is no voice gateway, no UDP and no audio.
No cache. Nothing holds on to a guild, a channel or a member. Events arrive decoded and go wherever you put them.
No processes. Not in the core and not in the runtime: the loop is one
tail-recursive function. That also means no fleet. A fleet wants a supervisor, a
process per shard and one glyde/identify_queue for the whole bot; glyde ships
the state machines for that, not the wiring.