diff --git a/app/bippy-provider.hoon b/app/bippy-provider.hoon new file mode 100644 index 000000000..3c2f8f14b --- /dev/null +++ b/app/bippy-provider.hoon @@ -0,0 +1,58 @@ +:: bippy-provider.hoon +:: Provider for accessing BTC full node +:: +/+ dbug, default-agent +|% ++$ versioned-state + $% state-0 + == +:: ++$ state-0 [%0 counter=@] +:: ++$ card card:agent:gall +:: +-- +%- agent:dbug +=| state-0 +=* state - +^- agent:gall +|_ =bowl:gall ++* this . + def ~(. (default-agent this %|) bowl) + hc ~(. +> bowl) +:: +++ on-init + ^- (quip card _this) + ~& > '%bippy-provider initialized successfully' + `this +++ on-save + ^- vase + !>(state) +++ on-load + |= old-state=vase + ^- (quip card _this) + ~& > '%bippy-provider recompiled successfully' + `this(state !<(versioned-state old-state)) +++ on-poke + |= [=mark =vase] + ^- (quip card _this) + ?+ mark (on-poke:def mark vase) + %noun + ?+ q.vase (on-poke:def mark vase) + %send-tx + ~& >>> %send-tx + :_ this + ~ + :: :~ [%pass /[url.action] %arvo %i %request (get-url url.action) *outbound-config:iris] + == + == + == +:: +++ on-watch on-watch:def +++ on-leave on-leave:def +++ on-peek on-peek:def +++ on-agent on-agent:def +++ on-arvo on-arvo:def +++ on-fail on-fail:def +-- +:: helper core diff --git a/install.sh b/install.sh new file mode 100755 index 000000000..fce7b2a29 --- /dev/null +++ b/install.sh @@ -0,0 +1,30 @@ +#!/bin/bash +usage() { printf "Usage: $0 [-w] URBIT_PIER_DIRECTORY \n(-w: flag to watch and live copy code)\n" 1>&2; exit 1; } + +if [ $# -eq 0 ]; then + usage + exit 2 +fi +PIER=$1 + +while getopts "w" opt; do + case ${opt} in + w) WATCH_MODE="true" + PIER=$2 + ;; + *) usage + ;; + esac +done + +if [ -z "$WATCH_MODE" ]; then + echo "Installed %coiny-store" + rsync -r --exclude '.*' --exclude '*.sh' --exclude '*.md' * $PIER/ +else + echo "Watching for changes to copy to ${PIER}..." + while [ 0 ] + do + sleep 0.8 + rsync -r --exclude '.*' --exclude '*.sh' --exclude '*.md' * $PIER/ + done +fi