Skip to content

Instantly share code, notes, and snippets.

View keiya's full-sized avatar

keiya keiya

View GitHub Profile
@keiya
keiya / base62.php
Last active December 12, 2015 05:18
Decimal to/from BASE 62. 10進数⇔62進数コンバータ for PHP decodeが遅そう
<?php
/* base62.php
* by Keiya Chinen. Licensed under Creative Commons BY 3.0
* ( http://creativecommons.org/licenses/by/3.0/deed.en )
*/
// test script
//test();
@keiya
keiya / dig.pl
Created December 18, 2012 11:50
dig web interface for minimalist
#!/usr/bin/perl
use strict;
use warnings;
use Data::Dumper;
$| = 1;
if ($ENV{'QUERY_STRING'} ne '') {
print "Content-type:text/plain\n\n";
@keiya
keiya / udpwsbridge.py
Created December 7, 2012 21:56
python udp to websocket bridge for KinectServer
#!/usr/bin/python
import threading, socket, queue , pprint, msgpack
q = queue.Queue(64)
pp = pprint.PrettyPrinter(indent=4)
class Receiver(threading.Thread):
def __init__(self):
self.result = None
@keiya
keiya / example.c
Created December 3, 2012 22:53
split()っぽいC実装
#include <stdio.h>
#include "kstring.h"
int main () {
char text[] = "aaaasdf*#qwer*#oioio*#";
char delim[] = "*#";
t_split *result = ksplit(text,delim);
int i;
for (i=0; i < result->count; ++i) {
printf("%d:%s\n",i,result->splited_ary[i]);
@keiya
keiya / flexform.php
Last active October 13, 2015 09:18
なんでも受け取れるフォーム。(SQLite3、自動的にテーブル作成、自動的にカラム拡張、303リダイレクト、データ表示、CSVダウンロード機能つき)
<?php // -*- coding: utf-8 -*- >
// [インストール]
// dat というディレクトリを作って、パーミッションを777にします。
// <form action='flexform.php' method='post'>
// で投げると、勝手にデータベースを作り、フォームにあったカラムを作成します。
//
// [データ表示]
// form.php? にアクセスすると、テーブル一覧が表示されます。
// リンクをクリックすると、そのテーブルの内容が表示されます。
@keiya
keiya / stripe.html
Created October 18, 2012 22:39
なんとなく、クリスタル
<!DOCTYPE html>
<head>
<meta charset='utf-8' />
<link rel='stylesheet' type='text/css' href="//cdn.keiyac.org/common/reset.css"/>
<style type='text/css'>
html,body {
background:#000;
width:100%;
height:100%;
overflow:hidden;
@keiya
keiya / httprefork.pl
Created September 23, 2012 08:38
HydrogenServidor typeG/P
# [email protected]
use strict;
use warnings;
#use Fcntl;
use Socket;
use FileHandle;
use IPC::Open2;
use File::Basename qw/dirname/;
@keiya
keiya / httpcgid.pl
Created September 21, 2012 03:35
HydrogenServidor typeG
# [email protected]
# thanks to
# main socket program http://d.hatena.ne.jp/perlcodesample/20100512/1276960096
# fork program http://x68000.q-e-d.net/~68user/net/
use strict;
use warnings;
use Fcntl;
@keiya
keiya / httpd.pl
Created September 20, 2012 15:42
HydrogenServidor
# [email protected]
# thanks to
# main socket program http://d.hatena.ne.jp/perlcodesample/20100512/1276960096
# fork program http://x68000.q-e-d.net/~68user/net/
use strict;
use warnings;
use Fcntl;
@keiya
keiya / index.php
Created September 7, 2012 08:47
ブラウザ閲覧中のタブ一覧をPHPに送って、HTMLで一覧が見れるやつ
// サーバ側
// touch dat.php && chmod 666 dat.php
<?php
if ($_SERVER['REQUEST_METHOD'] == 'POST') {
$fp = fopen('dat.csv','w');
if ($fp === FALSE) {
die();
}