TAKESAKO @ Yet another Cybozu Labs: Pure Perl で Acme::x86::CPUID を作りました
Perlでアセンブリプログラミングしているとき、実行マシンのCPUを判別してプログラムの処理を分岐したいときがでてくると思います。 そういうときに困ってしまわないように Acme::x86::CPUID を作ってみました。 package Acme::x86::CPUID; use DynaLoader; sub ProcessorBrandString { my $cpu = "\0" x 48; my $x86 = "" . "S\xbf" . pack("P", $cpu) . "\xb8\x02\x00\x00\x80" . ("P\x0f\xa2\x89\x07\x89_\x04\x89O\x08\x89W\x0c\x8d\x7f\x10X\x8d\@\x01" x 3) . "[\xc3" ; DynaLoader::dl_install_xsub("X",unpack"L",
Perl で Win32::API プログラミング入門 - 竹迫の近況報告
ActivePerl (Windows版) には Win32::API - Perl Win32 API Import Facility - metacpan.org が付属しているので、今日からすぐに Win32::API を利用したプログラミングが出来ます。 簡単なメッセージボックスを表示するPerlプログラムは以下になります。 #!/usr/bin/perl use Win32::API; my $MessageBox = Win32::API->new("user32", "MessageBoxA", "NPPN", "N"); $MessageBox->Call(0, "Hello, World!\n", "Message", 0); このプログラム実行すると、「Hello, World!」と書かれたWindowsメッセージボックスが表示されます。 これを Win32::API
FreeBSD/i386 な環境で perl のコードを実行する方法 - 竹迫の近況報告
今日からはじめての FreeBSD プログラミング、ということで、 まず最初に execve() を使って Hello, world! するプログラムを書きました。 8048080: 68 2d 65 00 00 push $0x652d 8048085: 89 e6 mov %esp,%esi 8048087: 68 6c 00 00 00 push $0x6c 804808c: 68 2f 70 65 72 push $0x7265702f 8048091: 68 2f 62 69 6e push $0x6e69622f 8048096: 68 2f 75 73 72 push $0x7273752f 804809b: 89 e7 mov %esp,%edi 804809d: 68 5c 6e 22 00 push $0x226e5c 80480a2: 68 72 6c 64 21 p
perl から任意の C ライブラリを呼び出す方法 - kazuhoのメモ置き場
syscall って組込関数でシステムコールはできますけど、libc やその他ライブラリの関数を呼びたい、ってこともありますよね。i386 かつ dlopen な環境なら、こんな風に書けます。 use DynaLoader; use ops; sub ccall { my $r = '1111'; my $s = "\x68" . pack("L", $_[5]) . "\x68" . pack("L", $_[4]) . "\x68" . pack("L", $_[3]) . "\x68" . pack("L", $_[2]) . "\x68" . pack("L", $_[1]) . "\xb8" . pack("L", ("Dyna"."Loader")->can("dl_find_symbol")->(("Dyna"."Loader")->can("dl_load_file")->
Lock-Free Algorithm, CriticalSection, IHostCrst - NyaRuRuが地球にいたころ
スレッド化で「普通は」気をつけるべきこと 「高木浩光＠自宅の日記」より． ギャー、ここも杜撰だった。（モニタリング用のコードとはいえ。） int connectionTriedCount = 0; int handshakeSucceededCount = 0; int extractionSucceededCount = 0; connectionTriedCount++; handshakeSucceededCount++; extractionSucceededCount++; java.util.concurrent.atomic.AtomicInteger を使ってみよう。 import java.util.concurrent.atomic.AtomicInteger; ... AtomicInteger connectionTriedCount = new AtomicInt
DLLの闇 (2) - NyaRuRuが地球にいたころ
id:NyaRuRu:20060715 の続き． 分かったこと． Dependency Walker は素晴らしい． さあみなさん，目の前のバービー人形にでも DLL Hell を説明してみてください． 「system32 ディレクトリの mfc42.dll などが，古いバージョンや新しいバージョンのもので置き換えられてしまうことで，今まで動いていたアプリケーションが実行時エラーを起こすようになる現象」というのではどうも生ぬるい気がします． Windows の DLL の仕組み，特に PE ヘッダに記述するいわゆる「暗黙のリンク」は，ベースファイル名しか記述しないため，名前空間の競合やロード順序によっては簡単に破綻してしまうことがあります．例えば "Security.dll" という名前の DLL が引き起こした混乱について，The Old New Thing で紹介されています． Don
機械語ではマシンの挙動は理解できない(補足) - 未来のいつか/hyoshiokの日記
機械語ではマシンの挙動は理解できない (id:hyoshiok:20070916#p1) の解説がアバウトすぎるという事で、種々の疑問がでてきたかと思うので、蛇足の説明など。 1+ "2: movl 0(%4), %%eax\n" // from -> eax 2+ "21: movl 4(%4), %%edx\n" // from+4 -> edx 3+ " movnti %%eax, 0(%3)\n" // eax -> to 4+ " movnti %%edx, 4(%3)\n" // edx -> to+4 5+ "3: movl 8(%4), %%eax\n" // from+8 -> eax 6+ "31: movl 12(%4),%%edx\n" // from+12 -> edx 7+ " movnti %%eax, 8(%3)\n" // eax -> to+8 8+ "
普通のやつらの下を行け: BFDでデバッグ情報の取得 - bkブログ
普通のやつらの下を行け: BFDでデバッグ情報の取得 gcc に -g オプションを与えるとデバッグ情報をバイナリに埋め込むことができます。この情報は通常 gdb などのデバッガによって利用されますが、普通のプログラムでも利用できれば何かおもしろいことができるかもしれません。 普通のやつらの下を行けの第4回として、今回は BFD (libbfd) を用いてデバッグ情報を取得する方法を取り上げたいと思います。 BFD とは BFD (Binary File Descriptor library) は各種バイナリフォーマットに対して低レベルな操作を行うためのライブラリです。 GNU binutils に含まれています。Debian GNU/Linux なら次のコマンドでインストールできます。 % sudo apt-get install binutils-dev ここでは BFD の bfd_
1
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
更新履歴兼雑記Dwarf2FS