Skip to content

Instantly share code, notes, and snippets.

@sigrlami
sigrlami / a.md
Last active August 13, 2020 22:45
PegNet TestNet Guide

Running PegNet v2 on a Factom Testnet

  1. Download preview binaries with suffix _testnet
  2. Activation height set to 142000
  3. Run pegnet as usual using configs provided below 3.1 the only differences, network type and path to db 3.2 data stored into separate file, so your mainnet will be safe
  4. Acquire test assets from https://faucet.pegnet.info
@sigrlami
sigrlami / client
Last active August 9, 2020 11:11
PegNet NetCoordinator Memory Leak
DEBU[2390] sent tag evt=tag
WARN[2390] unrecognized message cmd=0 evt="??" func="MiningClient.Listen()"
WARN[2390] unrecognized message evt="??" fields.msg="{0 <nil> }" func="MiningClient.Listen()"

List of 2nd-layer applications that use Factom blockchain

# Name URL State ANO Application Comment
1 PegNet https://pegnet.org Prod Community DeFi, pegged assets
2 OffBlocks https://off-blocks.com/ Prod Federate This Digital signatures
3 Triall https://triall.io Prod Sphereon Clinical trials https://insights.triall.io/triall-partners-with-dizer-capital/ https://insights.triall.io/why-triall-chooses-to-build-on-the-factom-protocol/
4 US DOD WIP Factom, Inc SPA, analysis services https://www.spa.com/
5 US DOE WIP TFA energy grid monitoring https://www.blockchain-council.org/blockchain/u-s-department-of-energy-grants-200000-to-factom/
6 Tenderoom https://tenderoom.com WIP Kompendium Procurement services tracking
@sigrlami
sigrlami / tooling.md
Last active February 10, 2020 11:34
Factom tooling (SDKs, libraries)
@sigrlami
sigrlami / lenses.csv
Last active February 11, 2019 13:19
List of Manufactured Lenses with optical data
We can make this file beautiful and searchable if this error is corrected: It looks like row 10 should actually have 17 columns, instead of 4 in line 9.
id,Format,Manufacturer,Model,Release Year,MSRP,Weight,Length,Max Diameter,Max Aperture,EFL,Zoom,Stabilized,Cinema,Variety,Designed In,Made In
1,Full-Frame,Canon,EF 14mm f/2.8L II USM,2007,2099,645,93.98,78.74,2.8,14,0,0,0,Ultra Wide Angle,Japan,Japan
2,Full-Frame,Canon,CN-E 14mm T3.1 L F,2013,5220,1200,93.98,118.364,3.1,14,0,0,1,Ultra Wide Angle,Japan,Japan
3,Full-Frame,Canon,TS-E 17mm f/4L Tilt-Shift,2009,2149,820,106.68,88.9,4,17,0,0,0,Tilt Shift,Japan,Japan
4,Full-Frame,Canon,EF 20mm f/2.8 USM,1992,539,405,70.612,77.47,2.8,20,0,0,0,Ultra Wide Angle,Japan,Japan
5,Full-Frame,Canon,EF 24mm f/2.8 IS USM,2012,599,281,55.626,68.326,2.8,24,0,1,0,Wide Angle,Japan,Japan
6,Full-Frame,Canon,EF 24mm f/1.4L II USM,2008,1549,650,86.868,83.566,1.4,24,0,0,0,Wide Angle,Japan,Japan
7,Full-Frame,Canon,TS-E 24mm f/3.5L II Tilt-Shift,2009,1899,780,106.934,88.392,3.5,24,0,0,0,Tilt Shift,Japan,Japan
8,Micro 4/3,Olympus,M.Zuiko Digital 17mm f/1.8,2013,349,120,35.5,57.5,1.8,17,0,0,0,Normal,Japan,
9,Micro 4/3,Olympus,M.Zuiko Digita

Keybase proof

I hereby claim:

  • I am sigrlami on github.
  • I am sigrlami (https://keybase.io/sigrlami) on keybase.
  • I have a public key ASDv1gwKwMTbHYpBdYFj2TXDdxUEKqQkKk1LP43cdiJ5vwo

To claim this, I am signing this object:

-- Make use of freer-effects, https://hackage.haskell.org/package/freer-effects
--
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DataKinds #-}
{-# LANGUAGE TypeOperators #-}
import Control.Monad.Freer as FF
import Control.Monad.Freer.Exception as FF
import Control.Monad.Freer.Reader as FF
(defroutes app-routes
;; Customers
(context "/customer" []
(GET "/list" [] (-> get-customers
(restrict {:handler {:and [authenticated-user
(user-can "manage-customers")]}
:on-error unauthorized-handler})))
(POST "/customer" [] create-customer)
(context "/:id" [id]
(restrict
(defroutes app-routes
;; Customers
(context "/customer" []
(GET "/list" [] (-> get-customers
(restrict {:handler {:and [authenticated-user
(user-can "manage-customers")]}
:on-error unauthorized-handler})))
(POST "/customer" [] create-customer)
(context "/:id" [id]
(restrict
@sigrlami
sigrlami / SharedTodos.hs
Last active April 14, 2016 20:49
Example of HAXL multiple user request over multiple datasources (todos)
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE StandaloneDeriving #-}
{-# LANGUAGE DeriveDataTypeable #-}
{-# LANGUAGE GADTs #-}
{-# LANGUAGE MultiParamTypeClasses #-}
{-# LANGUAGE TypeFamilies #-}
import Control.Monad
import Data.Hashable
import Data.Typeable