Skip to content

Instantly share code, notes, and snippets.

View angelworm's full-sized avatar

NAKAJIMA Susumu angelworm

27 followers · 16 following
View GitHub Profile
@angelworm
angelworm / 0over5000stars.gql
Last active November 19, 2019 17:08
Gradleを使いつつgradle wrapperには頼らない有名プロジェクトが存在するという噂
{
search(query: "stars:>5000 language:Java", type: REPOSITORY, first: 100) {
repositoryCount,
pageInfo {
hasNextPage,
endCursor
},
nodes {
... on Repository {
nameWithOwner,
@angelworm
angelworm / build.sh
Created October 17, 2019 05:15
Review Boardに投げられたレビューをJenkinsでビルドする。
#!/bin/bash -xu
## Required Environment Variables
#
# REVIEWBOARD_TOKEN: Access tokens for Review Board user.
# REVIEW_DIFF_URL: Posted review request URL. (ex. https://example.org/reviews/api/review-requests/99999/diffs/1/)
#
# upgrade workspace(for unexpectedly subversion binary upgrade)
svn upgrade
@angelworm
angelworm / tatasuki.sh
Created September 22, 2018 13:40
Twitterで検索してくる奴
#!/bin/bash -u
### search.sh
# searches specified words on Twitter.
#
# useage: ./search.sh word
# requirements: jq, curl, perl
# example: ./search.sh hoge | cut -f 1 | sort -u > blocklist.csv
QUERY=$(echo ${1:?"search.sh query"} | jq -R '@uri')
@angelworm
angelworm / favs.sh
Last active September 5, 2017 00:41
mastodonでのFAVを数える奴的な
#!/bin/bash -ue
# すごーいを取ってくるやつ。
# $ACCESS_TOKENはweb clientのstreamingのパラメーターにあるものを使うと楽。
# useage:
# $ ./favs.sh $ACCESS_TOKEN
ACCESS_TOKEN=${1:?./favs.sh ACCESS_TOKEN [max_id]}
MASTODON='https://mstdn.kemono-friends.info'
@angelworm
angelworm / dupscan.sh
Last active February 18, 2017 02:49
カレントディレクトリの重複ファイルを消すやつ
OIFS=$IFS
IFS=$'\n'
HASH=$(mktemp)
mkdir -p dup
for i in $(find . -maxdepth 1 -type f -not -empty -print0 | xargs -0 ls -rt); do
M=$(md5 -q $i);
if [ ! -z $(grep $M $HASH) ]; then
echo "DUP" $M $i;
mv $i dup
@angelworm
angelworm / hoge.js
Created February 1, 2016 23:43
callback hellを避けるけど同期処理のようにもしない奴
// utility ----------------------------------------------------------
function isGenerator(o) {
return (typeof o === "object") && (typeof o.next === "function");
}
function isPromise(o) {
return (typeof o === "object") && (typeof o.then === "function");
}
function isTag(o) {
return (typeof o === "object") && (o.tag === "tag");
}
@angelworm
angelworm / input.sql
Created August 11, 2015 21:51
ideoneでSQLを使う+再帰
create table inputtmp (v integer);
create table input (i integer primary key autoincrement, v integer);
.separator X " "
.import /dev/stdin inputtmp
.headers on
.mode column
.separator "|" "\n"
delete from inputtmp limit 1;
insert into input select v from inputtmp;
@angelworm
angelworm / make10.rkt
Created January 17, 2015 05:54
4つの数字から10を作る問題のやつ
#lang racket
(require racket/control)
(define (amb args)
(shift k
(for ([v args])
(k v))))
(define (perm li)
(if (null? (cdr li))
@angelworm
angelworm / A.hs
Last active August 29, 2015 14:05
男装の麗人
import Data.Char
import Data.List
import Data.Function
import Data.Monoid
comp::String->String->Ordering
comp (as@(a:ax)) (bs@(b:bx))
| isNumber a && isNumber b =
ncomp as bs <> (comp `on` dropWhile isNumber) as bs
| otherwise = compare a b <> comp ax bx
@angelworm
angelworm / avator30.svg
Created August 4, 2014 01:33
アイコンを30ポリゴンで 参考:http://alteredqualia.com/visualization/evolve/
Sorry, something went wrong. Reload?
Sorry, we cannot display this file.
Sorry, this file is invalid so it cannot be displayed.