Akshay Mankar akshaymankar

## gen-hie-yaml.sh
#!/usr/bin/env bash

# requirements: yq, awk, stack

set -euo pipefail

echo "cradle:"
echo "  stack:"
for pkg in `stack ide targets --stdout`; do
    dir=$(echo $pkg | awk -F: '{print $1}')

## TypedWatch.hs
{-# LANGUAGE FlexibleContexts  #-}
{-# LANGUAGE OverloadedStrings #-}
module TypedWatch where

import Control.Exception.Safe
import Data.Aeson
import Data.Function           ((&))
import Data.Text               (Text)
import Kubernetes.Client.Watch
import Kubernetes.OpenAPI

## tmux-score.sh
curl -s https://cricketapi-icc.pulselive.com/fixtures/8199/scoring | jq -r '(["SA: ", .innings[0].scorecard.runs, "/", .innings[0].scorecard.wkts, " (", .innings[0].overProgress, ") - ", "IND: ", .innings[1].scorecard.runs, "/", .innings[1].scorecard.wkts, " (", .innings[1].overProgress, ")"] | join(""))'

## privileged-daemonset.yaml
apiVersion: extensions/v1beta1
kind: DaemonSet
metadata:
  name: privileged-ds
spec:
  selector:
    matchLabels:
      app: privileged
  template:
    metadata:

## merge-repo.sh
git checkout git@github.com:akshaymankar/repo-1
cd repo-1
git remote add repo-2 git@github.com:akshaymankar/repo-2
git fetch repo-2
git merge repo-2/master --allow-unrelated-histories
git push origin master

## alias-kubectl-on-master.sh
token=$(cat /var/vcap/jobs/kube-apiserver/config/tokens.csv  | grep admin | awk -F, '{print $1}' | xargs echo)
alias kubectl="/var/vcap/packages/kubernetes/bin/kubectl -s https://master.cfcr.internal:8443 --token $token --insecure-skip-tls-verify=true"

## sneakyPrint.hs
sneakyPrint :: Show a => a -> a
sneakyPrint a = unsafePerformIO $ do
  print a
  return a


## flyjack.sh
#!/bin/bash

set -eu

print_usage() {
  echo "Usage: $(basename "$0") <job-url>"
}

invalid_job_url() {
  echo "Argument [\"$1\"] isn't a valid job url."

## lxc-centos
#!/bin/bash

#
# template script for generating CentOS container for LXC
#

#
# lxc: linux Container library

# Authors:

## httpd.rb
require 'socket'

server = TCPServer.open 9000
puts "Listening on port 9000"

loop {
  client = server.accept()
  while((x = client.gets) != "\r\n")
    puts x
  end
	#!/usr/bin/env bash

	# requirements: yq, awk, stack

	set -euo pipefail

	echo "cradle:"
	echo " stack:"
	for pkg in `stack ide targets --stdout`; do
	dir=$(echo $pkg \| awk -F: '{print $1}')
	{-# LANGUAGE FlexibleContexts #-}
	{-# LANGUAGE OverloadedStrings #-}
	module TypedWatch where

	import Control.Exception.Safe
	import Data.Aeson
	import Data.Function ((&))
	import Data.Text (Text)
	import Kubernetes.Client.Watch
	import Kubernetes.OpenAPI
	apiVersion: extensions/v1beta1
	kind: DaemonSet
	metadata:
	name: privileged-ds
	spec:
	selector:
	matchLabels:
	app: privileged
	template:
	metadata:
	git checkout git@github.com:akshaymankar/repo-1
	cd repo-1
	git remote add repo-2 git@github.com:akshaymankar/repo-2
	git fetch repo-2
	git merge repo-2/master --allow-unrelated-histories
	git push origin master
	token=$(cat /var/vcap/jobs/kube-apiserver/config/tokens.csv \| grep admin \| awk -F, '{print $1}' \| xargs echo)
	alias kubectl="/var/vcap/packages/kubernetes/bin/kubectl -s https://master.cfcr.internal:8443 --token $token --insecure-skip-tls-verify=true"
	sneakyPrint :: Show a => a -> a
	sneakyPrint a = unsafePerformIO $ do
	print a
	return a
	#!/bin/bash

	set -eu

	print_usage() {
	echo "Usage: $(basename "$0") <job-url>"
	}

	invalid_job_url() {
	echo "Argument [\"$1\"] isn't a valid job url."
	#!/bin/bash

	#
	# template script for generating CentOS container for LXC
	#

	#
	# lxc: linux Container library

	# Authors:
	require 'socket'

	server = TCPServer.open 9000
	puts "Listening on port 9000"

	loop {
	client = server.accept()
	while((x = client.gets) != "\r\n")
	puts x
	end