duangsuse

-- | Simple parser combinator
-- |
-- | copied from: https://ice1000.org/2017/07/26/HaskellParsers/
-- |
-- | Exposes
-- | Parser, satisfy, charItem, runParser, parse, chainl1, chainr1
module SimpleParserc
  (Parser, runParser, parse, charItem, satisfy, chainl1, chainr1,
  may, mayDefault, charP, elemP, stringP, tokenP, kwP, ws, ws0, binOp) where

duangsuse

duangsuse

Radare 2 动态调试 - 数据修改简易入门示范

以下部分内容直接从 Telegram 频道 duangsuse::Echo 拷贝，许可 CC-BY

PART 0x00 认识 Radare 2 逆向工程/取证框架

Radare 2 是著名的开源跨平台逆向分析框架，能够读取多种文件格式、支持很多动态分析调试器、有很多种前端（诸如基于 Qt 的 Cutter）可以使用，也可以远程调试，支持插件并且 CLI 非常方便，能够进行许多厉害的静态分析。

Radare 2 堪比商业软件 IDA，R2 工程组里是有前端的，只不过他们比较喜欢推广 CLI Shell 而已，有些人可能认为 R2 没有前端只能用 CLI，实际上 R2 的 HTML 前端是非常友好的，也非常适合进行远程调试 这里 R2 在开源系逆向工程工具里的地位就好像类似于 KODI 在 Home Theater 软件里的地位了，自由软件一家独大

duangsuse

/* XPM */
static char *log1[] = {
/* columns rows colors chars-per-pixel */
"488 709 256 2 ",
"   c #000000",
".  c #01040B",
"X  c #07080A",
"o  c #020612",
"O  c #030A14",
"+  c #030C1C",

duangsuse

duangsues.is_a? SaltedFish, [01.10.18 09:41] （ https://t.me/dsuse/7222

（其实昨天就回来了 放假整七天 因为昨天母上大人身体不好所以就没上线 据说今天去住院了 但愿人长久吧，虽然终究是「相逢有时，后会无期」的

duangsuse

Sexp 程序设计语言 实现参考手册

Sexp 词法参考

Sexp 语言支持以下词条类型：

• 字符串（支持 Heredoc 和 String interpolation）
• 符号（symbol）
• 字符（char）
• 括号（方括号和圆括号）

duangsuse

# BiwaScheme VM Implementation

class BiwaVM
    DEBUG = true

    def dputs(m)
        puts(m) if DEBUG
    end

    def initialize

duangsuse

class Token
  LPAREN = '('; RPAREN = ')'; EOS = '\00'

  NUM = '1'; STR = '"'; SYM = ':'; EXP = '_'

  NUMSTR = "1234567890."

  def initialize(type, text)
    @type = type; @text = text
  end

duangsuse

Intermediate Language for Scheme

为 Scheme 实现准备的 IL（中间语言） 和执行模式 原文档

BiwaScheme 是一个基于虚拟机的字节码解释型语言，Scheme 代码通过 BiwaScheme.Compiler 翻译为中间语言，并随后在 BiwaScheme.Interpreter 中解释执行

实现的大部分字节码设计基于 R. Kent Dybvig 1987 年发布的论文 《三种 Scheme 实现模型》

显然地，这里描述的 不是 BiwaScheme VM，但与之类似

duangsuse

import java.awt.Color
import java.awt.image.BufferedImage
import java.net.URL
import javax.imageio.ImageIO

object Image2Ascii {
    private fun colorAverage(image: BufferedImage, x: Int, y: Int): Color {
        val sampleDiff = step - 1

        val lt = Color(image.getRGB(x, y + sampleDiff))