kirillsalykin

(ns graph)

(def graph
  {:A {:children #{:E :B}
       :population 200
       :id :A}
   :B {:children #{:A :C :E}
       :population 300
       :id :B}
   :C {:children #{:B :D}

kirillsalykin

/*
 * Copyright 2017 Beldaz (https://github.com/beldaz)
 * Licensed to the Apache Software Foundation (ASF) under one or more
 * contributor license agreements.  See the NOTICE file distributed with
 * this work for additional information regarding copyright ownership.
 * The ASF licenses this file to You under the Apache License, Version 2.0
 * (the "License"); you may not use this file except in compliance with
 * the License.  You may obtain a copy of the License at
 *
 *      http://www.apache.org/licenses/LICENSE-2.0

kirillsalykin

# Nerd Fonts for your IDE
# https://www.nerdfonts.com/font-downloads

brew tap homebrew/cask-fonts && brew install --cask font-3270-nerd-font
brew tap homebrew/cask-fonts && brew install --cask font-fira-mono-nerd-font
brew tap homebrew/cask-fonts && brew install --cask font-inconsolata-go-nerd-font
brew tap homebrew/cask-fonts && brew install --cask font-inconsolata-lgc-nerd-font
brew tap homebrew/cask-fonts && brew install --cask font-inconsolata-nerd-font
brew tap homebrew/cask-fonts && brew install --cask font-monofur-nerd-font
brew tap homebrew/cask-fonts && brew install --cask font-overpass-nerd-font

kirillsalykin

enablePlugins(
  GraalVMNativeImagePlugin,
  DockerPlugin
)

GraalVMNativeImage / containerBuildImage := Some("ghcr.io/graalvm/native-image")

GraalVMNativeImage / graalVMNativeImageOptions += "--static"

GraalVMNativeImage / packageBin := (GraalVMNativeImage / packageBin).map { f =>

kirillsalykin

/Users/kirill/playground/zio-quickstart-graphql-webservice/src/main/scala/dev/zio/quickstart/ExampleApi.scala:45:6
Cannot find a Schema for type dev.zio.quickstart.ExampleData.CharactersArgs => 
  zio².URIO[dev.zio.quickstart.ExampleService.ExampleService, 
    List[dev.zio.quickstart.ExampleData.Character]
  ]

where:    zio  is a package in package dev
          zio² is a package
.

kirillsalykin

Getting GCP access token from a service account key

Use your service account's key JSON file to get an access token to call Google APIs.

Good for seeing how things work, including the creation of JWT token.

To create a JWT token, you can replace create-jwt-token.sh script with tools like step.

If you just want to get an access token for a service account,

kirillsalykin

SELECT procpid, age(clock_timestamp(), query_start), usename, current_query 
FROM pg_stat_activity 
-- WHERE current_query != '<IDLE>' AND current_query NOT ILIKE '%pg_stat_activity%' 
ORDER BY query_start desc;

--

SELECT pg_terminate_backend(__pid__);

kirillsalykin

#!/usr/bin/env bb
(ns script
  "Make a 'Code Quality' report from clj-kondo for use in GitLab CI.

  JSON issue format:
  https://docs.gitlab.com/ee/user/project/merge_requests/code_quality.html#implementing-a-custom-tool

  Usage:
  Add the following job in .gitlab-ci.yml:

kirillsalykin

Synopsis

So logback uses a configuration framework called Joran. Upon JVM startup it loads the logback.xml file and shoves the XML into the Joran configurator. (See: https://logback.qos.ch/manual/onJoran.html )

This gist does nothing else but:

1. Take the hiccup, which uses the exact same nodes/attributes as the XML file
2. Generate XML from it
3. Shove the entire thing into Joran.

kirillsalykin

(defn xf-sort
  "A sorting transducer. Mostly a syntactic improvement to allow composition of
  sorting with the standard transducers, but also provides a slight performance
  increase over transducing, sorting, and then continuing to transduce."
  ([]
   (xf-sort compare))
  ([cmp]
   (fn [rf]
     (let [temp-list (java.util.ArrayList.)]
       (fn