佐祐理ブログ

IStructuralEquatableの使い方

2011-07-13T20:23:00.000+09:00

IStructuralEquatableについて今までいまいちわからずにいました。ググって出てきたページを読んでいたら使い方が微妙で違和感を覚えたためじっくり調べてみました。そうしたらもうちょっと使いやすいものだということがわかりました。
StructuralComparisons.StructuralEqualityComparerはオブジェクトそのものではなく、その要素を比較するIEqualityComparerを提供します。これを使ってIEqualityComparer<T>の実装例を書いてみました。

public class StructuralEqualityComparer<T> : IEqualityComparer<T> where T: IStructuralEquatable { public bool Equals(T x, T y) { return StructuralComparisons.StructuralEqualityComparer.Equals(x, y); } public int GetHashCode(T obj) { return StructuralComparisons.StructuralEqualityComparer.GetHashCode(obj); }}

こう書いてしまえばどう使うのかわかりやすいでしょうか。このサンプルそのものは new StructuralEqualityComparer<int[]>() のように使えます。
なんでこんなクラスをわざわざ作るのかというと、LINQで要求される比較演算子はどれもIEqualityComparerでなくIEqualityComparer<T>だからです。

TransactionScope classの使い方

2011-02-01T20:02:00.000+09:00

.NET Frameworkでtransactionを扱うにはTransactionScope classを使いますが、嵌りやすいのでメモっておきます。

class説明にはisolation levelについて記載されていませんが、デフォルトではSerializableになっています。例えばSQL ServerのデフォルトはReadCommittedなので勘違いしてしまいそうです。では、isolation levelを指定しようとすると、constructorにもpropertyにもそれらしいものがありません。実はpublic TransactionScope( TransactionScopeOption scopeOption, TransactionOptions transactionOptions )のTransactionOption classで指定することになります。しかし今度は余計なparameterまで渡す必要があります。

TransactionScopeOption…これはRequiredがデフォルトです。
TransactionOptionsのIsolationLevel…これは指定したかったReadCommittedにします。
TransactionOptionsのTimeout…これは指定しないと初期化されず0になってしまい、timeoutなしになってしまいます。デフォルトの値にするためにはTransactionManager.DefaultTimeoutを指定します。

結局、

using( var transaction = new TransactionScope( TransactionScopeOption.Required, new TransactionOptions{ IsolationLevel = IsolationLevel.ReadCommitted, Timeout = TransactionManager.DefaultTimeout,} ) ){ ...; transaction.Complete();}

とやることになるでしょう。

IsDuplicated拡張メソッド

2010-12-29T10:57:00.002+09:00

気が向いたので何となく書いてみました。

public static class Enumerable { public bool IsDuplicated<TSource>( this IEnumerable<TSource> source ) { var keys = new HashSet<TSource>(); return !source.All( keys.Add ); } public bool IsDuplicated<TSource, TKey>( this IEnumerable<TSource> source, Func<TSource, TKey> keySelector ) { var keys = new HashSet<TKey>(); return !source.Select( keySelector ).All( keys.Add ); }}

IsDuplicated() つまり重複があるかどうかを判断する拡張メソッドです。
巷にはDistinct()を使ったりして項目数を数えている方法もありますが、数えるということはIEnumerableを最後まで確認する必要があります。

しかし、重複があるかどうか知りたいだけ、同じものが１ヶ所でもダブっていればそれが知りたい、そんなときに最後まで確認するのは無駄です。IsUnique()でなくIsDuplicated()というメソッド名にしたのもそのためです。どうせダブってるんでしょ？ダブってるなら早く教えてよ、と。

仕組みは簡単。HashSetを使います。HashSet.Add()メソッドは戻り値として重複の有無を教えてくれるのでそれを使います。
更にAll()拡張メソッドは１つでもfalseを見つけると即座に中断して返ってきます。

Dojo基礎文法最速マスター～CSS編～

2010-02-14T18:14:00.003+09:00

Dojoにはテーマがあります。

<style type="text/css"> @import "http://ajax.googleapis.com/ajax/libs/dojo/1.4/dojo/resources/dojo.css"; @import "http://ajax.googleapis.com/ajax/libs/dojo/1.4/dijit/themes/soria/soria.css"; @import "http://ajax.googleapis.com/ajax/libs/dojo/1.4/dijit/themes/nihilo/nihilo.css"; @import "http://ajax.googleapis.com/ajax/libs/dojo/1.4/dijit/themes/tundra/tundra.css";</style>

最初の１つはいわゆるリセットCSS。残りの３つがテーマ。読み込んだだけでは適用されません。テーマを適用したい範囲にclass="テーマ名"の属性を付けます。全体に適用したいなら、

<body class="soria">

こんな感じで<body>タグに設定します。

Dojoは読み込まれると<html>タグに次のクラスを設定します。

dj_ie / dj_ie6 / dj_ie7 / dj_ie8 / dj_iequirks
dj_gecko / dj_ff2 / dj_ff3
dj_khtml / dj_safari / dj_chrome
dj_opera
dj_contentBox / dj_borderBox

このため、ブラウザごとに挙動が違う場合もCSSで簡単に解決できます。たとえば、IEだけ異なる挙動をする場合、

<style type="text/css">/* ブラウザ共通 */.someClass { ...;}/* IEのみ異なる部分を上書き */.dj_ie .someClass { ...;}</style>

こうすると、CSSの優先順位により!importantしなくてもIEでのみ上書きされます。CSSだけで解決できるので、JavaScriptで書き換えとかしなくて済みます。

Dojo基礎文法最速マスター～HTML編～

2010-02-14T18:13:00.004+09:00

Dojoにはdojo.parserという機能があり、これがhtmlを編集してくれます。ページ読み込み時にdojo.parserを動作させるには

<script type="text/javascript" src="http://ajax.googleapis.com/ajax/libs/dojo/1.4/dojo/dojo.xd.js" djconfig="parseOnLoad: true"></script>

と読み込み時に設定するだけ。

dojo.parserはdojotype属性に反応します。

<input dojotype="dijit.form.TextBox" jsid="textbox1" type="text" name="textbox" value="てきすと" />

これで、このtextboxにはdojoの追加機能が付与されます。dojoにはこのinputに対応するJavaScriptオブジェクトがあるわけですがjsid="textbox1"と指定されていた場合、JavaScriptのtextbox1という変数に割り当てられます。
よくdocument.getElementById()で毎回検索しているコードを見かけますが、変数に割り当てられているので必要な時はいつでも簡単にアクセスできます。

dojo.parserは入れ子にも対応していて

<form dojotype="dijit.form.Form" jsid="form1"><input dojotype="dijit.form.TextBox" type="text" name="textbox1" value="てきすと１" /><input dojotype="dijit.form.TextBox" type="text" name="textbox2" value="てきすと２" /></form>

今度はformを拡張してJavaScript変数のform1に割り当てています。
どんな機能があるかというと、form1.attr('value')とやると{textbox1:"てきすと１",textbox2:"てきすと２"}が返ってきたり。逆にform1.attr('value', {textbox1:"ほえほえ",textbox2:"はにゃ～ん"})と値を初期化できたり。

クラスはたくさんあって、それぞれ機能が違うのでそこは調べてください☆

Dojo基礎文法最速マスター～JavaScript編～

2010-02-14T18:12:00.003+09:00

何はともあれまずは読み込み。Google AJAX Libraries APIならダウンロード＆インストール不要。

<script type="text/javascript" src="http://ajax.googleapis.com/ajax/libs/dojo/1.4/dojo/dojo.xd.js"></script>

以降はJavaScriptの説明になるので、<script type="text/javascript">～</script>内に書きます。
Dojoは細かくモジュール分けされているので、必要なモジュールは読み込む必要があります。

dojo.require("dijit.form.Button");

などなど。JavaScriptとhtml読み込み完了後に処理をするにはdojo.addOnLoad()を使います。

dojo.addOnLoad(function(){ ...; // やりたいこと});

JavaScriptについてはほとんど説明することはありません。
というのもこれに続くHTML編とCSS編の説明が必要になるからです。

Hyper-V with PowerShell

2009-12-28T00:46:00.002+09:00

Hyper-V Serverを導入しました。これは機能制限されたWindows Server 2008 Server Coreみたいなものです。Server Coreと同じくローカルではコマンドプロンプトでの管理しかありません。基本的にはfirewallを必要な分解放して、リモートから管理するわけですが、ここはあえてひねくれて、Hyper-V Server単独でどこまでできるかを試してみました。デフォルトでは有効になっていませんが、

dism /online /enable-feature /featurename:NetFx2-ServerCore /featurename:MicrosoftWindowsPowerShell

とすることでPowerShellが有効になります。さてこのPowerShell + WMIを使ってHyper-Vは管理できます。気合いで書いてみました。

# Switch作成$vsm = gwmi -namespace root\virtualization Msvm_VirtualSwitchManagementService$vs = [wmi]$vsm.CreateSwitch("ExternalNetwork", "ExternalNetwork", 4096).CreatedVirtualSwitch$esp = [wmi]$vsm.CreateSwitchPort($vs, "ExternalNetwork_ExternalPort", "ExternalNetwork_ExternalPort").CreatedSwitchPort$isp = [wmi]$vsm.CreateSwitchPort($vs, "ExternalNetwork_InternalPort", "ExternalNetwork_InternalPort").CreatedSwitchPort$eep = gwmi -namespace root\virtualization Msvm_ExternalEthernetPort #NICが複数ある場合は注意$vsm.SetupSwitch($esp, $isp, $eep, "ExternalNetwork", "ExternalNetwork")# VM作成、CPU、Memoryまで $vsm = gwmi -namespace root\virtualization Msvm_VirtualSystemManagementService$gsd = (([wmiclass]"root\virtualization:Msvm_CirtualSystemGlobalSettingData").CreateInstance()$gsd .ElementName = "web"$vm = $vsm.DefineVirtualSystem($gsd.GetText([Management.TextFormat]::WmiDtd20)).DefinedSystem$sd = $vm.getRelated("Msvm_VirtualSystemSettingData") | select -first 1$psd = $sd.getRelated("Msvm_ProcessorSettingData")$psd.VirtualQuantity = 2$msd = $sd.getRelated("Msvm_MemorySettingData")$msd.Limit = $msd.Reservation = $msd.VirtualQuantity = 1024$vsm.ModifyVirtualSystemResources($vm, (@($psd, $msd) |% {$_.GetText([Management.TextFormat]::WmiDtd20)}))# NIC追加$vsm = gwmi -namespace root\virtualization Msvm_VirtualSwitchManagementService$guid = [Guid]::NewGuid().ToString()$sp = $vsm.CreateSwitchPort($vs, $guid, $guid).CreatedSwitchPort$ac = (gwmi -namespace root\virtualization Msvm_AllocationCapabilities -filter "ResourceType=10 and ResourceSubType='Microsoft Synthetic Ethernet Port'").__Path.Replace('\', '\\') # 10=EthernetAdapter$esd = [wmi](gwmi -namespace root\virtualization Msvm_SettingsDefineCapabilities -filter "GroupComponent='$ac' and ValueRange=0").PartComponent$esd.Connection = $sp.__Path$esd.ElementName = "Synthetic Ethernet Port"$esd.VirtualSystemIdentifiers = [Guid]::NewGuid().ToString("B")$vsm = gwmi -namespace root\virtualization Msvm_VirtualSystemManagementService$vsm.AddVirtualSystemResources($vm, $esd.GetText([Management.TextFormat]::WmiDtd20))# Disk追加$im = gwmi -namespace root\virtualization Msvm_ImageManagementService$dir = (gwmi -namespace root\virtualization Msvm_VirtualSystemManagementServiceSettingData).DefaultVirtualHardDiskPath$im.CreateDynamicVirtualHardDisk( (Join-Path $dir "test.vhd"), 127GB )$ide = ($sd.getRelated("MSVM_ResourceAllocationSettingData")| where {$_.ResourceSubType -eq "Microsoft Emulated IDE Controller" -and $_.Address -eq 0})$ac = (gwmi -namespace root\virtualization Msvm_AllocationCapabilities -filter "ResourceType=22 and ResourceSubType='Microsoft Synthetic Disk Drive'").__Path.Replace('\', '\\') # 22=Disk$dsd = [wmi](gwmi -namespace root\virtualization Msvm_SettingsDefineCapabilities -filter "GroupComponent='$ac' and ValueRange=0").PartComponent$dsd.Parent = $ide.__Path$dsd.Address = 0$vsm = gwmi -namespace root\virtualization Msvm_VirtualSystemManagementService$drive = [wmi]($vsm.AddVirtualSystemResources($vm, $dsd.GetText([Management.TextFormat]::WmiDtd20)).NewResources | select -first 1)$ac = (gwmi -namespace root\virtualization Msvm_AllocationCapabilities -filter "ResourceType=21 and ResourceSubType='Microsoft Virtual Hard Disk'").__Path.Replace('\', '\\') # 21=StorageExtent$dsd = [wmi](gwmi -namespace root\virtualization Msvm_SettingsDefineCapabilities -filter "GroupComponent='$ac' and ValueRange=0").PartComponent$dsd.Connection = Join-Path $dir "test.vhd"$dsd.Parent = $drive.__Path$vsm.AddVirtualSystemResources($vm, $dsd.GetText([Management.TextFormat]::WmiDtd20))# DVD追加$ac = (gwmi -namespace root\virtualization Msvm_AllocationCapabilities -filter "ResourceType=16 and ResourceSubType='Microsoft Synthetic DVD Drive'").__Path.Replace('\', '\\') # 16=DVDDrive$dsd = [wmi](gwmi -namespace root\virtualization Msvm_SettingsDefineCapabilities -filter "GroupComponent='$ac' and ValueRange=0").PartComponent$dsd.Parent = $ide.__Path$dsd.Address = 1$drive = [wmi]($vsm.AddVirtualSystemResources($vm, $dsd.GetText([Management.TextFormat]::WmiDtd20)).NewResources | select -first 1)$ac = (gwmi -namespace root\virtualization Msvm_AllocationCapabilities -filter "ResourceType=21 and ResourceSubType='Microsoft Virtual CD/DVD Disk'").__Path.Replace('\', '\\') # 21=StorageExtent$dsd = [wmi](gwmi -namespace root\virtualization Msvm_SettingsDefineCapabilities -filter "GroupComponent='$ac' and ValueRange=0").PartComponent$dsd.Connection = (gwmi Win32_CdromDrive -filter "Drive='D:'").DeviceID # D:ドライブ$dsd.Parent = $drive.__Path$vsm.AddVirtualSystemResources($vm, $dsd.GetText([Management.TextFormat]::WmiDtd20))

これぐらいでVMが作成できるはず。ここまで書いてようやく気付きました。VMの画面が見れません。VMにOSがインストールできないわけです…。もちろんP2Vとかすればできますが…。結局、長いものに巻かれろということで、私もリモート管理することにしました。というわけで本当に動作確認できていません。

CSS Animations Module Level 3 と CSS Sprite

2009-11-27T00:27:00.003+09:00

CSS3のAnimation Moduleに失望しました。

GIF Animationは広く使われているものの、色数がおおよそ256色、半透明の未サポート、ファイルサイズが大きくなりやすい、などなど、欠点があるので、他の方法を模索していました。

今のところ、JavaScriptを使ってちまちまと書き換えする方法を採っています。

そこでCSS SpriteとCSS3のAnimationを組み合わせることで、GIF Animationの代わりにならないかという案を思いつきました。
CSS Animationはkeyframeでstyleを指定するとタイムラインに従ってstyleが変化するというもの。つまり、background-positionを指定すればアニメーションする！と思ったわけです。

１つ目の問題点はbackground-positionはxとyを同時に指定してしまう点。片方だけを指定してもう片方をinheritすることはできません。これは案外痛いです。
もう１つが致命的。background-positionがlinear変化する点。linearでなくてもベジエ曲線で定義することはできるものの、CSS Spriteで求められているのはstepというか、keyframeで指定した値に直接変化すること。おかげで、にょろにょろにょろとCSS Sprite画像がスムーズにスクロールしてしまいます。

まさにどうしてこうなった状態。

dojo.Deferred

2009-10-17T11:33:00.000+09:00

JavaScriptにはスレッドがありません。時間のかかる処理をするにはsetTimeoutを使った疑似スレッドを使うことになります。
すると今度は完了待ちのための手段が大変です。いくつかの処理が終わったら最後にこれをする、とかあるわけです。
そんなときのための対策にこんな関数を用意して使っていました。

// ちょー適当な関数名…
function doat(count, func) {
return function() {
if( --count == 0 )
func();
};
}

この関数は関数を返します。返ってきた関数はcount回呼び出すとfuncを呼びます。
これで、各疑似スレッドに返ってきた関数を呼び出させれば、最後に終わったスレッドがfuncを実行してくれるわけです。

でもdojoにdojo.Deferredクラスを見つけました。dojo的にはこっちを使うみたいです。
まだ使い慣れていませんが、そのうちこっちに乗り換えよう…。

ImageLockMode.UserInputBuffer | ImageLockMode.WriteOnly

2009-09-19T23:38:00.001+09:00

データからBitmapの生成をよくするんですが、だいたいこんなコードを書きます。

byte[] pixels;

var bitmap = new Bitmap( width, height, PixelFormat.Format32bppArgb );
var data = bitmap.LockBits( new Rectangle( 0, 0, width, height ), ImageLockMode.WriteOnly, PixelFormat.Format32bppArgb );
Marshal.Copy( pixels, 0, data.Scan0, pixels.Length );
bitmap.UnlockBits( data );

Marshal.Copy()が無駄に思えたのでImageLockMode.UserInputBufferを使ってみました。するとこんな風に書き換わります。

byte[] pixels;

var bitmap = new Bitmap( width, height, PixelFormat.Format32bppArgb );
bar handle = GCHandle.Alloc( pixcels, GCHandleType.Pinned );
try{
var data = new BitmapData{
PixelFormat = PixelFormat.Format32bppArgb,
Width = width,
Height = height,
Stride = stride,
Scan0 = Marshal.UnsafeAddrOfPinnedArrayElement( pixels, 0 ),
};
bitmap.LockBits( new Rectangle( 0, 0, width, height ), ImageLockMode.UserInputBuffer|ImageLockMode.WriteOnly,
PixelFormat.Format32bppArgb, data );
bitmap.UnlockBits( data );
}
finally{
handle.Free();
}

無駄なコピーが排除できた！と喜んだものの、処理がかなり遅くなりました…。GCHandle.Alloc()のせいではなく、ImageLockMode.UserInputBufferが原因のようです。

IE6 CSSのclass selectorの酷さ

2009-09-07T21:20:00.003+09:00

IE6の酷いところはいろいろ言われていますが、今更ながらこんなことではまるとは。と言うことで書き留めておきます。

<style type="text/css">
.a.c {
color: red;
}
.b.c {
color: blue;
}
</style>

何の変哲もないスタイルです。classにa cが同時に含まれていれば赤く、b cが同時に含まれていれば青くなります。
そうこんな感じ

<div class="a c">
color: red;
</div>

…ところが、IE6はclassにbが含まれていないのに青くなります。いやマジで。

追記：
間違ってました。IE6はCSS1しかサポートしておらず、CSS1ではclass selectorのネストを許していませんでした。

Windows 7 導入

2009-08-13T09:20:00.002+09:00

Windows 7を導入しました。Hyper-Vが使いたかったのでWindows Server 2008 R2の方がよかったのですが、Hyper-Vを有効にするとスリープが使えないのは痛いです。サーバーOSだから当たり前ですね。

以降、愚痴です。
今更ながらIRQの競合が起きてる模様？
video card、onboard sound、onboard nicがIRQを共有しているらしく、Windows 7起動時にsoundやnicが認識されない現象が。必ずvide cardは認識される辺り怪しいです。
XP / Vistaでは発生しなかった現象です。またWindows Server 2008 R2でも発生します。

Visual Studio 2010 beta1 C++でのinclude

2009-06-07T09:58:00.004+09:00

なんでもVC++が進化しているそうなので試してみたく。
プログラムを書こうとして#include <...>まで書いて気がついた。はてさて、header fileのdirectoryはどう設定するの？

Visual Studio 2008まではツール - オプション - プロジェクトおよびソリューション - VC++ディレクトリという設定項目があり、そこにディレクトリを入力できた。が、2010 beta1ではそこがなくなっている。
もちろんプロジェクトのプロパティに設定してもコンパイルできることにはできるが、システムにインストールしたheader fileのdirectoryをプロジェクトごとに書くのはおかしい。

プロジェクトファイルを参照したところ答えがあった。

<ImportGroup Label="PropertySheets">
<Import Project="$(LocalAppData)\Microsoft\VisualStudio\10.0\Microsoft.Cpp.$(Platform).user.props"
Condition="exists('$(LocalAppData)\Microsoft\VisualStudio\10.0\Microsoft.Cpp.$(Platform).user.props')" />
</ImportGroup>

つまり$(LocalAppData)\Microsoft\VisualStudio\10.0\Microsoft.Cpp.$(Platform).user.propsに書けば取り込まれます。

C# 4.0 dynamic その2

2009-06-05T18:45:00.003+09:00

というわけでサンプルコードを使って、C# 3.0とC# 4.0とでどのように変わってくるかを説明します。
サンプルは、Outlook 2007の受信トレイ以下のフォルダにある重複メール（Message-Idが一致するメール）をゴミ箱へ移動するコードです。Outlook 2007の新機能Tableオブジェクトを使用しているのでOutlook 2003以前では動作しません。

まずはC# 3.0でのコード

static class Program {
// Outlookを初期化し、受信トレイに対してVisit()を呼びます。
static void Main( string[] args ) {
var application = new Application();
Visit( application.Session.GetDefaultFolder( OlDefaultFolders.olFolderInbox ) );
}

// 各フォルダに対してProcess()を呼びます。また再帰的にフォルダを探索していきます。
static void Visit( MAPIFolder folder ) {
Process( folder );
foreach( MAPIFolder f in folder.Folders )
Visit( f );
}

// ちょっとだけ読みやすくなる拡張メソッドです。
static IEnumerable<Row> AsEnumerable( this Table table ) {
while( !table.EndOfTable )
yield return table.GetNextRow();
}

// 本題の処理です。Message-Id一覧を作成し、重複するものがあったらゴミ箱へ移動します。
static void Process( MAPIFolder folder ) {
var messageIds = new HashSet<string>();
var table = folder.GetTable( null, OlTableContents.olUserItems );
table.Columns.RemoveAll();
table.Columns.Add( "http://schemas.microsoft.com/mapi/proptag/0x1035001E" );
table.Columns.Add( "EntryID" );
var ns = folder.Session;
var trash = ns.GetDefaultFolder( OlDefaultFolders.olFolderDeletedItems );
foreach( var row in table.AsEnumerable() )
if( !messageIds.Add( (string)row[1] ) ) {
MailItem mailItem = (MailItem)ns.GetItemFromID( (string)row[2], null );
Console.WriteLine( "{0}", mailItem.Subject );
mailItem.Move( trash );
}
}
}

続いてC# 4.0でのコード。違いがあるのはProcess()メソッドだけです。

static void Process( MAPIFolder folder ) {
var messageIds = new HashSet<string>();
var table = folder.GetTable( TableContents: OlTableContents.olUserItems );
table.Columns.RemoveAll();
table.Columns.Add( "http://schemas.microsoft.com/mapi/proptag/0x1035001E" );
table.Columns.Add( "EntryID" );
var ns = folder.Session;
var trash = ns.GetDefaultFolder( OlDefaultFolders.olFolderDeletedItems );
foreach( var row in table.AsEnumerable() )
if( !messageIds.Add( row[1] ) ) {
MailItem mailItem = ns.GetItemFromID( row[2] );
Console.WriteLine( "{0}", mailItem.Subject );
mailItem.Move( trash );
}
}

まず、デフォルト引数に対応したため、本質的でないnull引数を記述しなくてもよくなっています。

次に、row[1]とrow[2]の実体はstring型ですが宣言はobject型でした。C# 4.0ではここがdynamic型になっているため、明示的なキャストなしでメソッド引数に使えます。
ns.GetItemFromID()の戻り値もobjectがdynamicに変わっています。実体はCOMオブジェクトです。dynamicのまま扱ってもSubjectプロパティやMove()メソッドは呼び出せますが、MailItem型ということがわかっていますのでキャストしています。その際にも明示的にキャスト式を書く必要はありません。

C# 4.0 dynamic

2009-06-04T21:16:00.003+09:00

Visual Studio 2010 beta1で遊んでいます。
C# 4.0および.NET Framework 4.0で提供されるdynamicキーワードについて誤解していました。

dynamic宣言した変数はメソッド呼び出しを行っても、実行時にバインドされます。
ここまでは合ってます。

誤解していたのは、ソースコード上で明示的に宣言したもののみがdynamic変数になると考えていました。（object→dynamicにキャストするイメージでした。）しかし、Visual Studio 2010で試していてわかったのですが、PIAなどのクラスメソッドの戻り値がそもそもdynamicになっています。（C# 3.0まではobject型）
なので、今までstringなどの変数に代入するためにはobject→stringの明示的なキャストが必要でした。C# 4.0ではdynamicになっているため、stringに代入しようとするだけで自動的にキャストされます。C# 3.0のvarで受けた場合、dynamicのままでした。

文字だけなのでイメージがわきづらいですが、PIAを使った場合に思った以上にdynamicの恩恵が受けられそうです。

サンプルコードでも書けばわかりやすいかな？

mod_cacheまわり

2009-04-19T21:21:00.000+09:00

Apache Web Serverでコンテンツのcacheをしたくなり調査しました。
まず、cache方法には３種類あって

Reverse Proxy
Web serverとWeb browserとの間に介入して、cacheする。Apacheにもその機能はあるし、別のツールでも実現できる。Web serverとは別モノを必要とするので構造がややこしくなるのでパス。
mod_file_cache
Apacheが最終的に読み込むfileそのものをcacheしてしまう。方法をfile openしっぱなしやmmap()しっぱなしなど、安直だけどうまくいけば効果的。cacheの対象がfileなので動的なコンテンツには対応できない。パス。
mod_cache
Apacheのfilterとして動作し、出力内容をcacheし、次に同じリクエストがあればcache内容を返す。動的なコンテンツにも対応する。本命。

というわけでmod_cacheの設定をします。

そもそもmod_rewriteを使った記事を参考に、コンテンツ圧縮をしていました。というのもApacheのmod_deflateはリクエストの度にコンテンツ圧縮をするので効率が悪かったのです。mod_cacheで圧縮後のコンテンツをcacheできればmod_rewriteのトリッキーな方法ともおさらばです。

さてmod_cacheにはdisk cacheを行うmod_disk_cacheとmemory cacheを行うmod_mem_cacheがあります。ディスクアクセスを減らしたいのでここはmod_mem_cacheで決まりです。
mod_mem_cacheはプロセスごとにmemory cacheを行うためマルチプロセスとなるpreforkモデルでは効果がありません。ここはマルチスレッドを併用するworkerモデルに切り替えます。（Debianなのでapache2-mpm-workerパッケージをインストールするだけ。）

次にmod_deflateによるコンテンツ圧縮の設定です。

AddOutputFilterByType DEFLATE text/plain text/xml application/javascript

text/htmlは加えません。そもそも細かい設定もしません。そこには事情があります。
text/htmlをコンテンツ圧縮したところIE6が固まりました。正確にはKeep Aliveが切断されるまで処理が固まり、他のコンテンツはタイムアウトエラーになりました。mod_setenvifを使用してIE6のみKeep Aliveを拒否してみましたがいまいち効果もなく、またConnection continueが使えないのは応答速度にも影響します。htmlコンテンツは大きくもなく、数も少ないため圧縮対象外としました。
mod_deflateに対して細かい設定をしないことにも事情があります。コンテンツ圧縮を行うことで古いブラウザでは問題を引き起こします。一般的にはそこでブラウザごとに圧縮可否を変えます。これを行ってしまうと、Varyレスポンスヘッダに影響を与えてしまいます。つまり、User-Agentリクエストヘッダに応じてコンテンツを切り替えていることになり「Vary: Accept-Encoding, User-Agent」となってしまいます。mod_cacheはこれを見てUser-Agentごとに異なるcacheを生成します。User-Agentにはブラウザバージョンなどの文字列が含まれているためほとんどcache hitが見込めなくなります。というわけであえてUser-Agentには依存しない設定にしました。

Vary: Accept-Encodingにも問題がありました。リクエストヘッダに「Accept-Encoding: gzip」とあれば圧縮する（なければ圧縮しない）わけですから、Varyに含めるのは当然なのですが、Accept-Encodingの内容がブラウザごとに異なるため、それぞれにcacheを生成してしまいます。そこで考えました。

SetEnvIf Accept-Encoding "\bgzip\b" gzip
RequestHeader set Accept-Encoding gzip env=gzip
RequestHeader unset Accept-Encoding env=!gzip

Accept-Encodingにgzipを含むか含まないかの２択でヘッダを書き換えてしまう方法です。これはどうやらダメでした。cacheのhit判定にはこの書き換えは含まれず、逆にcache保存時にはこの書き換えの影響を受けるためcache hitしなくなりました。というわけでこれに関しては目をつぶります。

他にも問題がありました。mod_deflateはコンテンツ圧縮後のETagに「-gzip」を付与します。cacheのhit判定には「-gzip」が付与されていないためこれまたcache hitしませんでした。そこで

FileETag None

でETagを消しました。元々Last-Modifiedレスポンスヘッダは付いているのでそれほど問題にはなりません。

最後にmod_cacheとmod_mem_cacheの設定です。これはパラメータを適切に設定するだけです。

ToolStripMenuItem.CheckOnClick

2009-04-11T22:24:00.003+09:00

こんな機能が欲しかった！
ToolStripMenuItem.CheckOnClickより

ToolStripMenuItemが自動的にチェックされた状態で表示され、クリックしたときにチェック解除されるかどうかを示す値を取得または設定します。
...
クリックしたときにToolStripMenuItemが自動的にチェックされた状態で表示される場合はtrue。それ以外の場合はfalse。既定値はfalseです。

何か矛盾してる。ソースコードを追ってみたところ、前半はウソ。後半が正しい。もう一度、引用しよう。

クリックしたときにToolStripMenuItemが自動的にチェックされた状態で表示される場合はtrue。それ以外の場合はfalse。

翻訳すると、trueにした場合の振る舞いとして、このメニューをクリックするとチェックが付く…チェックを外す方法については言及していません。

大事なことなので２度言いましたよ。

C#でできることはC++/CLIでもできる

2009-04-04T10:23:00.003+09:00

私にもそう思っていた頃がありました。
ADO.NET周りに新機能が多くて何か使ってみようと思って調べてみました。

Data Entity Framework: C#とVB.NETのみ。code generatorがC++/CLIに対応してない。ちなみにVisual Studioが生成するファイルとcode generatorが引数に要求するファイルは異なるので自分で処理するのは面倒。次バージョンに期待。
SQL Server Compact 3.5 SP1: C++/CLIからも使用可能。やったね☆
Linq to SQL: さすがにC#のような構文拡張はC++/CLIに期待しないとして…C#とVB.NETのみ。code generatorがC++/CLIに対応してない。更にSQL Server Compact 3.5 SP1はLinq to SQLに未対応。
型指定されたDataSet: C#とVB.NETのみ。code generatorがC++/CLIに対応してよくわからないエラーを吐く。そのためなのか、Visual Studioでも「新しい項目の追加」のテンプレートからも外されている。
Linq to DataSet: 型指定されたDataSetが作れない時点で終わってます。
番外編…Settings.settings: 動いてるような、動いてないような。型指定されたwrapperクラスを作ろうとSettings.hファイルを作成しstdafx.hに書き込むところまで自動でやってくれます。Settings.hファイルの中身？しらんがな。そのためなのか、Visual Studioでも「新しい項目の追加」のテンプレートからも外されている。

C++/CLIはnativeと.NETとの橋渡し程度に考えておくべきかもしれません…。

逆double thunking

2009-04-02T20:39:00.002+09:00

double thunkingに逆も何もないけどなんとなく…。

状況としては次の関数をnative C++でコンパイルしa.dllに入れます。

__declspec(dllexport) LRESULT CALLBACK CBTProc( int nCode, WPARAM wParam, LPARAM lParam );

そしてa.dllにリンクするb.exe内でC++/CLIを使って次の呼び出しをします。

HINSTANCE module = GetModuleHandleW( L"a.dll" );
SetWindowsHookExW( WH_CBT, CBTProc, module, 0 );

するとどうなるか。

コンパイラは単なる関数ポインタCBTProcをmanaged codeから呼べるようwrapします（１段目のthunk）。
次にwrapされたmanagedな関数ポインタをunmanaged codeから呼べるようにwrapします（２段目のthunk）。
この２重にthunkされた関数ポインタをSetWindowsHookExW()に渡します。

#pragma unmanagedとか試してみましたが変化しませんでした。結局、この部分だけソースコードを独立させ、/clrコンパイルオプションを外して強制的にnative C++としてコンパイルすることで回避できました。もっとsmartな方法がありそうですが、見つけられなかった。

/NODEFAULTLIB:msvcmrt.lib

2009-03-29T23:23:00.003+09:00

どこかでVS2008のC++/CLIだと.NET Frameworkを使用しているのにVC++ランタイムライブラリとの依存関係が切れなくて、結局VC++ランタイムライブラリもインストール必要になってしまう＆x86とx64で共存できない、というような記述を見かけた…気がしました。
後になって探したのですがどこで見かけたのやら。

で、方法 : CRT ライブラリ DLL との依存関係を削除して部分信頼アプリケーションを作成するによると/NODEFAULTLIB:msvcmrt.libを指定することにより依存関係を切れるとのこと。ただしこれでは必要な処理が足りていないのでptrustm.libかptrustmd.libのどちらかとリンクすること。

えっとこの.libによってx86かx64のどちらかに固定されてしまうのか。でも.NET Frameworkだけで動作できるようになる、VC++ランタイムライブラリのインストール不要となるならそれはそれで大きいかな。

あ、ちなみに結果がどうなるか試してません。

zh-Hansとzh-CHS

2009-03-28T13:57:00.000+09:00

カルチャには特定カルチャとニュートラルカルチャとインバリアントカルチャがある。
特定カルチャはja-JPとかen-USとか、言語＋地域情報を持つもの。
ニュートラルカルチャはjaとかenとか、言語だけで地域情報を持たないもの。特定カルチャで完全一致できなかった場合にニュートラルカルチャにフォールバックします。
インバリアントカルチャは言語も地域も表さないもの。「要するに、体系を体系たらしめるために要請される意味の不在を否定する記号なんだよ。そのアナログなのが神で、デジタルなのがゼロ。どうかな？」

で、ニュートラルカルチャには唯一の例外としてzh-CHSとzh-CHTがある。中国語には簡体字と繁体字があるから。そしてこのカルチャ名はWindows Vistaからzh-Hansとzh-Hantに変更されてたりする。

Windows XP上の.NET Framework 2.0 SPなしだとzh-Hansを認識しない
Windows XP上の.NET Framework 2.0 SP1以降だとzh-Hansを認識し、zh-CHS→zh-Hansの順でフォールバックする
Windows Vista上の.NET Framework 2.0 SPなし（SP1以降も）zh-CHSを認識し、zh-CHS→zh-Hansの順でフォールバックする

結局の所、Windows XPを意識するならzh-CHSを使うことになるが、例えば.NET Framework 3.5 SP1 Client Profileだと.NET Framework 2.0 SP2を含むのでzh-Hansでもいいかもしれない。

自作ツールのWindows 7対応

2009-03-22T01:10:00.001+09:00

対応に向けて調査を始めました。途中で飽きたらそのまま放置になりますが…。
まず今のツールはUIを設計する気がないため設定項目は全てiniを使い、タスクトレイに置いたアイコンのメニューから最低限の操作ができるようになっています。
Windows 7ではタスクトレイはデフォルトで非表示なので困ってしまうため抜本的な見直しを行うことにしました。

Windows Live Messengerがtaskbarを使いこなしているためこれを参考に調査を進めます。まずWindows 7環境ではこんな感じ。

タスクトレイにはアイコンが出なくなります。メインウィンドウの他にもう一つウィンドウが存在するような。そしてタスクバーを右クリックするとこんな感じ。
プログラムから好きなメニューを登録できます。ちなみにこのメニューはスタートメニューにも表示されてこんな感じ。

さてメインウィンドウを閉じるとこんな感じ。

やはり何かいるようです。spyで見ると

とんでもない座標に隠しWindowがいました。これを参考にしてみようと思います。

二項係数

2009-03-19T21:48:00.002+09:00

どこかの影響を受けて書いてみました。

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<title>二項係数</title>
<base href="http://ajax.googleapis.com/ajax/libs/dojo/1.2.3/" />
<link rel="stylesheet" type="text/css" href="dojo/resources/dojo.css" />
<link rel="stylesheet" type="text/css" href="dijit/themes/soria/soria.css" />
<script type="text/javascript" src="dojo/dojo.xd.js" djconfig="parseOnLoad: true"></script>
<script type="text/javascript">
// <![CDATA[
dojo.require("dijit.form.NumberTextBox");
var MAX = 10000000;
function onChange() {
var n = N.attr('value');
var k = K.attr('value');
if (isNaN(n) || isNaN(k) || k > n)
return;
k = Math.min(k, n - k);
if(k == 0)
k = 1;
else {
var numerator = [];
for(var i = 0; i < k; i++)
numerator.push(n - i);

for(var i = 2; i <= k; i++) {
var j = i;
for(var p = 2; j > 1; p++) {
while(j % p == 0) {
j /= p;
for(var l = 0; l < numerator.length; l++) {
if(numerator[l] % p == 0) {
numerator[l] /= p;
break;
}
}
}
}
}
var result = [1];
dojo.forEach(numerator, function(i) {
var rest = 0;
for(var j = 0; j < result.length; j++) {
var k = result[j] * i + rest;
result[j] = k % MAX;
rest = (k - result[j]) / MAX;
}
if(rest > 0)
result.push(rest);
});
k = result.pop().toFixed();
dojo.forEach(result.reverse(), function(i) {
k += (i + MAX).toFixed().substr(1);
});
}
dojo.byId('result').innerHTML = k;
}
// ]]>
</script>
</head>
<body class="soria">
<h1><sub>n</sub>C<sub>k</sub></h1>
n = <input type="text" dojotype="dijit.form.NumberTextBox" jsid="N" value="0"
required="true" constraints="{fractional: false, min: 0}" intermediatechanges="true" onchange="onChange" /><br />
k = <input type="text" dojotype="dijit.form.NumberTextBox" jsid="K" value="0"
required="true" constraints="{fractional: false, min: 0}" intermediatechanges="true" onchange="onChange" /><br />
<span id="result"></span>
</body>
</html>

Windows Server 2008 R2 build 7048

2009-03-13T08:01:00.002+09:00

そろそろ2008 R2に環境を移そうとしています。ベータテストと、自作アプリのWindows 7対応のために。
Windows 7ではタスクバーが新しくなり、右下の通知領域がデフォルトで非表示になってしまうので、
アプリケーションの設計を見直す必要が。
で、どうせならHyper-Vとか使いたいので2008 R2です。

build 7048ですがところどころ不安定でした。まだ翻訳がおかしいですし、機能の追加の後の再起動に
失敗したりVirtual Clone Driveのインストールの直後はシャットダウンできなかったり。
ただ、RadeonのバグいドライバでWindows Vistaだとblue screenなのが、2008 R2だとドライバの
再起動を繰り返しつつも耐えてました。（耐えてる間に正常に再起動がかけれた。）
まぁRadeonがわるいんですが。

PNGの再圧縮

2009-02-22T15:52:00.002+09:00

GDI+で作成したPNGファイルをGIMPで開いて保存し直したところ結構ファイルサイズが大きくなってびっくり。そういえば色形式も色々ありましたっけ。
調べたところ、OptiPNGとか他にもいろいろ再圧縮ツールがあるそうで。
手元のWebページの画像7,433ファイルをこのツールにかけたところ82MB→65MBと削減できました。

Debian 5.0 lenny

2009-02-21T11:18:00.003+09:00

Debian 5.0 (lenny)がリリースされたのでアップグレードしました。
思兼 GNU/Linuxからアップグレードを繰り返してそろそろ10年でしょうか。

find /etc/ -type f | xargs ls -ltdr | head

で/etc内にある一番古いファイルが2000/01/29でした。

アップグレードの中でproftpdがはまることがわかっています。FTPにはそもそもファイル名に関する規定がありません。今までproftpdは8bit cleanでしたが、Debian 5.0にパッケージされているproftpd 1.3.1は8bit cleanではなくなり、日本語ファイル名を通すことが困難になりました。
こんなときでもDebianは古いパッケージをholdしておけば共存できます。つまりproftpdとそれに依存するパッケージはDebian 4.0のままで、それ以外はDebian 5.0に移行しました。

それでもまだはまることがあるんですね。
iptablesがバージョンアップして以前のiptables.confが使えませんでした。おかげでfirewall設定が消えて外部から攻撃を受ける羽目に…。
udev絡みでしょうか、mdのデバイスファイル名が/dev/md/1から/dev/md1に変わってしまいました。おかげでmount失敗に泣きました。
dhcpサーバが設定に厳しくなりました。ノートパソコンに対して無線LAN経由でも有線LANでも同じIPアドレスを割り当てていましたが、まとめて１つの設定にできなくなり、２つに分ける必要がありました。
rexecプロトコルが勝手にtcpd経由にされ、接続できなくなりました。tcpd嫌いっ

Apache、samba辺りは設定もややこしく毎回見直すべきなのは、それなりに。

まぁそれでもいい感じにアップグレードできたと思います。
ちなみにGCC周りが4.1から4.3にアップグレードされていますが、なぜか4.1のパッケージも残ったままなので手動で消す必要があります。

ADODB.SreamのSaveToFile()メソッド

2009-02-06T07:39:00.003+09:00

ADODB.SreamオブジェクトにSaveToFile()メソッドがあります。書き込みのオプションとしてSaveOptionsEnumを設定します。これによると…

adSaveCreateNotExist	1	既定値です。FileNameパラメータで指定したファイルがない場合は新しいファイルが作成されます。
adSaveCreateOverWrite	2	FileNameパラメータで指定したファイルがある場合は、現在開かれているStreamオブジェクトのデータでファイルが上書きされます。

一見普通のEnumです。
でもよく読むと…

これらの値はAND演算子で結合することができます。

ちょっと待て。新規作成もしくは上書きをするにはAND結合？ 1と2をAND結合すると0ですよね？ね？
こういうとき普通はOR結合して3になりませんか？いえ、値が重複していない以上、識別は可能ですが。
で、試してみる……0→引数エラー、1→OK、2→OK、3→引数エラー。
あれっ？ ANDもORも受け付けないんですが。

仕方がないのでSRきりました。最終回答は出ていないもののドキュメントミスで次のようになるらしいとのこと。

adSaveCreateNotExist	1	既定値です。新規作成します。ただし上書きはしません。
adSaveCreateOverWrite	2	新規作成もしくは上書きします。

Windows 7 RRP

2009-01-28T09:09:00.003+09:00

世の中、Windows 7βで賑わってますが、RRPというのを試してみました。何の略語かわかりません。
ともかくβのビルド番号が7000でRRPは7022となってました。
よく言われているようにセットアップ直後の感想として早い気がします。Vistaよりスムーズ、動きがなめらかな印象です。
今後、時間を見つけてアプリを入れてソフトの動作確認などもしていこうかと。

ちなみにβを試している友人と表示を比較させてもらいましたが、文字化けが酷い…悪化してます。

RAIDの拡張

2009-01-15T21:45:00.003+09:00

Linuxのsoftware RAID（md）の場合、disk controllerをまたがって好きなようにRAIDを構成できるため重宝します。云々は前に書きました。

今回ハードディスクを更新したので、RAIDの拡張をしてみました。

md2 : active raid5 sdf[0] sdg[3] sde[2] sdh[1]

という４玉構成のRAID5に対してsda4とsdc4を追加して６玉構成にしようと思います。

# mdadm /dev/md2 -a /dev/sda4
# mdadm /dev/md2 -a /dev/sdc4
# mdadm /dev/md2 -G -n 6

最初にSpare Devicesとして２玉追加し、次にgrowコマンドでActive Devicesを６玉に変更します。えー、7800min後に完了とか言い出しました。

よく見ると

md: reshape of RAID array md2
md: minimum _guaranteed_ speed: 1000 KB/sec/disk.
md: using maximum available idle IO bandwidth (but not more than 200000 KB/sec) for reshape.
md: using 128k window, over a total of 488386496 blocks.

とか言って本気を出していません。
こんなときLinux Kernelはオープンソースなので出しているメッセージや理由、どうすればいいかなどをソースコードから調べることができます。

# cat /proc/sys/dev/raid/speed_limit_min
1000
# echo 6000 > /proc/sys/dev/raid/speed_limit_min

他のプロセスの邪魔にならないようにこうやって速度が抑えられていたようです。その上で、早く完了させたいためスピードアップしてみました。これで残り1300minに…それでも丸一日かかるのね。

S.M.A.R.T on Linux

2009-01-11T20:01:00.002+09:00

久々にハードディスクの健康状態が知りたくなり、smartmontoolsで情報を見てみました。
まずはありきたりなところからHDDの温度

# for d in a b c d e f g h; do echo -n "sd$d "; smartctl -a -d ata /dev/sd$d|grep Temperature_Celsius; done
sda 194 Temperature_Celsius 0x0022 035 055 000 Old_age Always - 35 (Lifetime Min/Max 0/17)
sdb 194 Temperature_Celsius 0x0002 196 196 000 Old_age Always - 28 (Lifetime Min/Max 16/55)
sdc 194 Temperature_Celsius 0x0002 196 196 000 Old_age Always - 28 (Lifetime Min/Max 16/58)
sdd 194 Temperature_Celsius 0x0022 034 047 000 Old_age Always - 34 (Lifetime Min/Max 0/16)
sde 194 Temperature_Celsius 0x0002 214 214 000 Old_age Always - 28 (Lifetime Min/Max 14/50)
sdf 194 Temperature_Celsius 0x0022 120 099 000 Old_age Always - 30
sdg 194 Temperature_Celsius 0x0002 230 230 000 Old_age Always - 26 (Lifetime Min/Max 14/38)
sdh 194 Temperature_Celsius 0x0022 120 097 000 Old_age Always - 30

あからさまな温度差はなさそうです。
次にread error

# for d in a b c d e f g h; do echo -n "sd$d "; smartctl -a -d ata /dev/sd$d|grep Raw_Read_Error_Rate; done
sda 1 Raw_Read_Error_Rate 0x000f 109 099 006 Pre-fail Always - 0
sdb 1 Raw_Read_Error_Rate 0x000b 094 094 016 Pre-fail Always - 851977
sdc 1 Raw_Read_Error_Rate 0x000b 085 085 016 Pre-fail Always - 6029424
sdd 1 Raw_Read_Error_Rate 0x000f 119 091 006 Pre-fail Always - 0
sde 1 Raw_Read_Error_Rate 0x000b 100 100 016 Pre-fail Always - 0
sdf 1 Raw_Read_Error_Rate 0x000f 200 200 051 Pre-fail Always - 0
sdg 1 Raw_Read_Error_Rate 0x000b 100 100 016 Pre-fail Always - 0
sdh 1 Raw_Read_Error_Rate 0x000f 200 200 051 Pre-fail Always - 0

sdbとsdcでエラーが出てる…そろそろやばいかも。

そして「for d in a b c d e f g h; do echo sd$d; smartctl -A -d ata /dev/sd$d; done」を眺めて気になる表示をピックアップ。

sda 190 Unknown_Attribute 0x0022 064 045 045 Old_age Always In_the_past 756809764
sda 195 Hardware_ECC_Recovered 0x001a 061 058 000 Old_age Always - 6361756
sdd 190 Unknown_Attribute 0x0022 064 053 045 Old_age Always - 740032548
sdd 195 Hardware_ECC_Recovered 0x001a 067 064 000 Old_age Always - 42581156

そこでテストを実行し、エラーの確認

# for d in a b c d e f g h; do smartctl -t short -d ata /dev/sd$d; done
# for d in a b c d e f g h; do echo "sd$d "; smartctl -l error -d ata /dev/sd$d; done
（特にエラーなし）
# for d in a b c d; do smartctl -t long -d ata /dev/sd$d; done
# for d in a b c d e f g h; do echo sd$d; smartctl -l selftest -d ata /dev/sd$d; done
sbc
Num Test_Description Status Remaining LifeTime(hours) LBA_of_first_error
# 1 Extended offline Completed: read failure 30% 22500 387518271

うわーsbcダメかも。

DataContractJsonSerializerでDictionaryを表現

2008-12-28T14:31:00.004+09:00

DataContractJsonSerializerはまじめなので、.NETとJSONとの双方向で型が復元されることを前提にしています。そのため、Dictionary<TKey,TValue>を素直にobject表現してくれません。（TKeyがstringに限定され、intなどが復元できないため。TValueの型が不明なため。）
具体的にどうなるかというと

new Dictionary<string,object>{ { "abc", 1 }, { "def", "ghi" } };

は

[{"Key":"abc","Value":1},{"Key":"def","Value":"ghi"}]

になります。
一般的にJSONを扱う人は

{"abc":1,"def":"ghi"}

を期待していることでしょう。

どうにかしたいと思い、必死に対策を考え、遂に実現しました。

class Surrogate: IDataContractSurrogate {
[Serializable]
class JsonDictionary: ISerializable {
Dictionary<string, object> Dictionary { get; set; }
public JsonDictionary( Dictionary<string, object> dictionary ) {
Dictionary = dictionary;
}
public void GetObjectData( SerializationInfo info, StreamingContext context ) {
foreach( var pair in Dictionary )
info.AddValue( pair.Key, pair.Value );
}
}

public Type GetDataContractType( Type type ) {
return type == typeof( Dictionary<string, object> ) ? typeof( JsonDictionary ) : type;
}
public object GetObjectToSerialize( object obj, Type targetType ) {
var dictionary = obj as Dictionary<string, object>;
if( obj == null )
throw new NotImplementedException();
return new JsonDictionary( dictionary );
}

#region NotImplemented
object IDataContractSurrogate.GetCustomDataToExport( Type clrType, Type dataContractType ) {
throw new NotImplementedException();
}
object IDataContractSurrogate.GetCustomDataToExport( MemberInfo memberInfo, Type dataContractType ) {
throw new NotImplementedException();
}
object IDataContractSurrogate.GetDeserializedObject( object obj, Type targetType ) {
throw new NotImplementedException();
}
void IDataContractSurrogate.GetKnownCustomDataTypes( Collection<Type> customDataTypes ) {
throw new NotImplementedException();
}
Type IDataContractSurrogate.GetReferencedTypeOnImport( string typeName, string typeNamespace, object customData ) {
throw new NotImplementedException();
}
CodeTypeDeclaration IDataContractSurrogate.ProcessImportedType( CodeTypeDeclaration typeDeclaration, CodeCompileUnit compileUnit ) {
throw new NotImplementedException();
}
#endregion
}

あとはDataContractJsonSerializerコンストラクタのIDataContractSurrogate引数にSurrogateインスタンスを渡せば、変換してくれます。
もちろん型保証が外れるため、deserializeはできません。

グループ定義の均等化 Balancing group definition

2008-12-16T23:32:00.002+09:00

グループ定義の均等化と言われても、何のことかさっぱり想像がつきませんが、.NET Frameworkの正規表現に不思議な機能があります。実際、役立つシーンがあります。
ネストされる()のペアを対応関係を維持しつつマッチさせたい、というときに使えます。具体的にはCの関数呼び出しやキャストなど。

(?:(?'Open'<)[^<>]*)+(?:(?'Close-Open'>)[^<>]*)+

丸括弧だと正規表現エスケープで読みづらくなるため山括弧の一致にしていますが、もちろん丸括弧でも対応できます。

べき乗 pow() xy

2008-12-16T21:59:00.010+09:00

ふとべき乗計算を考えてみた。

double pow( double x, int y ){
return y > 0 ? pow( x, y - 1 ) * x : 1;
}

整数の時は簡単。

実数になると

__declspec(noinline) double pow( double x, double y ){
__asm{
fld y
fld x
fyl2x
fst ST(1)
frndint
fxch ST(1)
fsub ST(0), ST(1)
f2xm1
fld1
faddp ST(1), ST(0)
fscale
}
}

なんかinline assemblerを使ってしまった。うん、何やってるのかさっぱりです。命令とそのときのスタック状態を表にすると

命令	ST(0)	ST(1)	ST(2)
fld y	y
fld x	x	y
fyl2x	y×log₂x
fst ST(1)	y×log₂x	y×log₂x
frndint	⌊y×log₂x⌋	y×log₂x
fxch ST(1)	y×log₂x	⌊y×log₂x⌋
fsub ST(0), ST(1)	y×log₂x-⌊y×log₂x⌋	⌊y×log₂x⌋
f2xm1	2^{y×log₂x-⌊y×log₂x⌋}-1	⌊y×log₂x⌋
fld1	1	2^{y×log₂x-⌊y×log₂x⌋}-1	⌊y×log₂x⌋
faddp ST(1), ST(0)	2^{y×log₂x-⌊y×log₂x⌋}	⌊y×log₂x⌋
fscale	2^{y×log₂x-⌊y×log₂x⌋}×2^{⌊y×log₂x⌋}

ここで2^{y×log₂x-⌊y×log₂x⌋}×2^{⌊y×log₂x⌋} = 2^{y×log₂x-⌊y×log₂x⌋+⌊y×log₂x⌋} = 2^y×log₂x = x^yです。
はい、さっぱりわかりませんでした。

ファイルの高速コピー

2008-12-03T08:49:00.004+09:00

Webサイトのコンテンツを更新するとき、ローカルディスクからWebサーバにアップロード（ファイルのコピー）をしていますが、ファイル数が多くてExplorerじゃとてもとても。
調べたところFastCopyとかコピーツールがありましたが、ふとC#で書いてみたらどうなるんだろう、と。

static void Copy( FileInfo source, FileInfo destination ) {
var src = new FileStream( source.FullName, FileMode.Open, FileAccess.Read, FileShare.None, 4096, true );
var buffer = new byte[ source.Length ];
src.BeginRead( buffer, 0, buffer.Length, rar => {
src.EndRead( rar );
src.Close();
if( destination.Exists )
destination.Attributes &= ~FileAttributes.ReadOnly;
var dst = new FileStream( destination.FullName, FileMode.Create, FileAccess.Write, FileShare.None, 4096, true );
dst.BeginWrite( buffer, 0, buffer.Length, war => {
　 dst.EndWrite( war );
dst.Close();
}, null );
}, null );
}
static void Copy( DirectoryInfo source, DirectoryInfo destination ) {
if( !destination.Exists )
destination.Create();
foreach( var src in source.GetDirectories() )
Copy( src, new DirectoryInfo( Path.Combine( destination.FullName, src.Name ) ) );
var srcfiles = source.GetFiles();
foreach( var dst in destination.GetFiles() )
if( !srcfiles.Any( src => String.Equals( src.Name, dst.Name, StringComparison.OrdinalIgnoreCase ) ) )
dst.Delete();
foreach( var src in srcfiles )
Copy( src, new FileInfo( Path.Combine( destination.FullName, src.Name ) ) );
}
static void Main( string[] args ) {
Copy( new DirectoryInfo( args[ 0 ] ), new DirectoryInfo( args[ 1 ] ) );
}

まずはお試しで、属性やタイムスタンプなどは保存しませんが。
で、コピー時間ですがFastCopyが740秒なのに対して、C#は200秒…。
何も考えずに並列でファイルオープンしているためハンドル数やバッファサイズなど問題点はいろいろあるとは思いますが、この所要時間の差はいったい…？！
ちなみにこのコード、途中に1回だけ30秒間ストールが発生しています。この問題を解決すれば更に30秒短くなるはず…。

PtrToStructureArray(): 配列のマーシャリング

2008-11-29T22:33:00.004+09:00

Marshal.PtrToStructure()を使うと、メモリの内容を元に構造体などを復元することができます。これでC言語などとデータをやりとりできるようになります。
構造体の配列に関してもMarshalAs属性を使用すれば扱えますが、この場合、コンパイル時にサイズを決定した固定長配列に限られます。
そこで、実行時にサイズを決定できるPtrToStructureArray()を作ってみました。どれほど使い道があるやら。

public class Marshal{
static ModuleBuilder moduleBuilder;
static ModuleBuilder ModuleBuilder {
get {
if( moduleBuilder == null ) {
var name = new AssemblyName( "Sayuri.Dynamic" );
var ab = AppDomain.CurrentDomain.DefineDynamicAssembly( name, AssemblyBuilderAccess.Run );
moduleBuilder = ab.DefineDynamicModule( name.Name );
}
return moduleBuilder;
}
}
public static T[] PtrToStructureArray<T>( IntPtr ptr, int size ) {
var type = typeof(T);
var typeName = string.Format( "{0}Array{1}", type.Name, size );
var arrayType = ModuleBuilder.GetType( typeName );
if( arrayType == null ){
var tb = ModuleBuilder.DefineType( typeName, TypeAttributes.SequentialLayout );
var fb = tb.DefineField( "array", type.MakeArrayType(), FieldAttributes.Public|FieldAttributes.HasFieldMarshal );
var ctype = typeof( MarshalAsAttribute );
var cb = new CustomAttributeBuilder( ctype.GetConstructor( new[] { typeof( UnmanagedType ) } ),
new object[] { UnmanagedType.ByValArray }, new[] { ctype.GetField( "SizeConst" ) }, new object[] { size } );
fb.SetCustomAttribute( cb );
arrayType = tb.CreateType();
}
var obj = SystemMarshal.PtrToStructure( ptr, arrayType );
var fi = arrayType.GetField( "array" );
return (T[])fi.GetValue( obj );
}
}

やってることはT型とサイズ20が与えられた場合に

[StructLayout(LayoutKind.Sequential)]
class TArray20{
[MarshalAs(UnmanagedType.ByValArray, SizeConst=20)]
public T[] array;
}

というクラスをその場で生成して使っています。

IComparableとその派生

2008-11-28T08:45:00.004+09:00

以前、Dictionary<TKey, TValue>とIEquatable<T>で実行時エラーもなくハマる問題を書きましたが、今度は類似で実行時エラーでわかる問題がありました。

class Base: IComparable<Base>{
}
class Derived: Base{
}

とした場合、DerivedはIComparable<Base>を実装するため、通常の比較は行えます。しかしIComparable<Derived>は実装していないため、List<Derived>.Sort()などは行えません。

class Base<T>: IComparable<T> where T: Base{
}
class Derived: Base<Derived>{
}

とかやり出すか、素直にIComparableに切り替えるか。

swprintf()とwsprintf()

2008-11-04T08:01:00.009+09:00

Cランタイムライブラリにsprintf()があります。同様の機能を持つwsprintf()がUSER32.dllにもあります。実はsprintf()はntdll.dllにもあります。

これらの関係を整理すると

宣言	DLL	TCHAR.Hのルーチン	ANSI版	Unicode版
tchar.h	MSVCRT90.dll	_stprintf()	sprintf()	swprintf()
windows.h	USER32.dll	wsprintf()	wsprintfA()	wsprintfW()
-	ntdll.dll	-	sprintf()	swprintf()

となります。

ちなみに注意点がいくつか。
swprintf()の第２引数はバッファサイズで書式指定文字列は第３引数にずれています。他のものは第２引数が書式指定文字列です。代わりに他のものと互換のある_swprintf()も第２引数が書式指定文字列になっています。
wsprintf()は指定できる書式に制限があります。例えば浮動小数（%f）がサポートされていません。
ntdll.dllに含まれるsprintf()は使用方法が公開されてなく、サポートされている機能も公開されていません。ただし、全てのプロセスにロードされるDLLなので何かの役に立つかも。

CallNextHookEx()のHHOOK引数

2008-11-03T23:30:00.000+09:00

SetWindowsHookEx( WH_CBT, CBTProc, ... )でDLL injectionしています。このCBTProc()のドキュメントによると、正確な型宣言は

LRESULT CALLBACK CBTProc( int nCode, WPARAM wParam, LPARAM lParam );

です。そしてこのhookプロシージャの中ではnCodeが負のときはCallNextHookEx()を呼び更にその戻り値を返すこととあります。

さてCallNextHookEx()のドキュメントによると、正確な型宣言は

LRESULT CallNextHookEx( HHOOK hhk, int nCode, WPARAM wParam, LPARAM lParam );

です。ちなみに記述が矛盾していて、CallNextHookEx()の呼び出しはoptionalだが、呼び出すことを強く推奨するそうです。CBTProc()側では負の時呼べばいいのに、こう書かれてしまうと0または正の時にも呼ばざるを得なくなります。仕方がないので呼ぶことにしましょう。

問題はここからです。CallNextHookEx()の第一引数hhk。hookプロシージャは進入した各プロセスで実行されます。にもかかわらずCBTProc()には存在しないパラメータが要求されています。とても面倒くさいですが、SetWindowsHookEx()の戻り値を共有メモリに格納しておき、それを読み出して使っていました。

ところが今日ふと気がついたら、

Windows NT/XP/2003: Ignored.

などと書かれているではありませんか。うーん…今まで共有メモリにわざわざ準備していたhhkは無駄でしたか…。

ウィンドウプロシージャとメンバ関数その２

2008-11-01T20:04:00.001+09:00

ウィンドウプロシージャとメンバ関数を書いてみたものの、１つのthreadに複数のWindow Procedureが混在する場合、うまく振り分けできませんね。
どうすればいいんだろう…？まぁ、複数Windowを扱ったことがないからいいけど…。

ウィンドウプロシージャとメンバ関数

2008-10-26T23:39:00.006+09:00

コールバック関数の１つウィンドウプロシージャWindowProc()をクラスメンバ関数にしたいという話。
調べたところ、ATLはlinked listでクラスインスタンスを管理しておき、atlbase.inlファイルのAtlWinModuleExtractCreateWndData()関数でthread idをキーにして検索をしていました。これウィンドウメッセージが届くたびにやってる気がします。
読んで勉強になったのは、CreateWindowを呼び出したスレッドにウィンドウメッセージが届くのね。だからthread idがキーとして使える、と。

なら１歩進めてthread local storageに情報を置いてしまえばいいのでは？

class Window{
LRESULT WindowProc( HWND hwnd, UINT uMsg, WPARAM wParam,LPARAM lParam ){
// ここが本体
...;
}
static __declspec(thread) Window* window;
static LRESULT CALLBACK StaticWindowProc( HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam ){
return window->WindowProc( hwnd, uMsg, wParam, lParam );
}
void CreateWindowOnThisThread(){
Window::window = this;
CreateWindowEx( .../* 適切に */ );
}
};
Window* Window::window = NULL;

こうすれば無難な関数に仕上がりました。ちなみにStaticWindowProc()はかなり負担の少ない実装になっていました。

mov eax, DWORD PTR _lParam$[esp-4]
mov ecx, DWORD PTR _wParam$[esp-4]
mov edx, DWORD PTR fs:__tls_array
push ebx
mov ebx, DWORD PTR _hwnd$[esp]
push eax
mov eax, DWORD PTR _uMsg$[esp+4]
push ecx
mov ecx, DWORD PTR [edx]
mov ecx, DWORD PTR Window::window[ecx]
call Window::WindowProc
pop ebx
ret 16
; 一部構文に矛盾がありますが、読みやすさのためのデマングルですので…

呼び出し規約がCALLBACKから__thiscallに変わるので、無意味なスタックの積み直しが行われてますが、まぁ仕方がありませんね。

DateTimeと時差情報

2008-10-22T09:10:00.002+09:00

DateTime構造体は2.0からKind情報を持つようになり、UTCとローカル時間を区別できるようになりました。これによってどんなことが起きるかというと…

DateTime now = DateTime.Now;
DateTime utcNow = now.ToUniversalTime();
Console.WriteLine( "now {0} utcNow", now == utcNow ? "==" : "!=" );
// => now != utcNow

ダメじゃん。epoch秒に慣れてる人は確実にはまりますね。
MSDNを読むと…あー書いてある書いてある

DateTime オブジェクトの計算および比較では、対象となる複数のオブジェクトが同じタイムゾーンの時刻を表している場合にのみ、意味のある結果を得ることができます。

裏返せば、タイムゾーンが違ったら意味がない…。

この場合どうすればいいかというと、DateTimeOffset構造体を使うそうです。ただし、こちらは2.0SP1から。

Data Entity FrameworkとSQL Server Compact 3.5 SP1

2008-10-21T23:14:00.002+09:00

Visual Studio 2008 SP1の新機能Data Entity Frameworkを使ってみたくなりました。ついでにずっと気になっていたSQL Server Compact 3.5 SP1と組み合わせて試してみることにしました。
SQL Server Compactはプロセス内で動作する軽量なSQLエンジンです。SQLiteみたいなものと言えばわかりやすいでしょうか。

Wizardに従って作っていきいざ実行すると…

ハンドルされていない例外: System.ArgumentException: 指定されたストアプロバイダが構成内に見つからないか、無効です。
---> System.ArgumentException: 要求された .Net Framework データプロバイダが見つかりません。これは、インストールされていない可能性があります。

何を言っているのかわからない例外になります。
「指定されたストアプロバイダ」とか言われてもWizardの生成したデフォルトそのままだし。「データプロバイダが見つかりません」と言われてもサーバエクスプローラでもWizardでも表示できてるし…。

いろいろググりましたが見つかりません。ならばまずSQL Server Compact 3.5 SP1を単体で動かしてみましょう…

ハンドルされていない例外: System.DllNotFoundException: DLL 'sqlceme35.dll' を読み込めません: 指定されたモジュールが見つかりません。 (HRESULT からの例外: 0x8007007E)

見つからないってどういうこと？

ならばプライベートファイルベースの配置をしてみましょう…

ハンドルされていない例外: System.BadImageFormatException: 間違ったフォーマットのプログラムを読み込もうとしました。 (HRESULT からの例外: 0x8007000B)

…やっとっわかった気がする。

Microsoft SQL Server Compact 3.5 ReadmeやSQL Server Compact 3.5 と Visual Studioに色々書いてありました。

SQL Server Compact 3.5 SP1 の 64 ビットリリースは、Microsoft ダウンロードセンターからダウンロードできます (Web からの提供のみ)。
Visual Studio と SQL Server Compact 3.5 で 64 ビット開発を行う場合は、[コンパイラの詳細設定] の [ターゲット CPU] オプションを明示的に [x86] に設定する必要があります。

ええ、私はVista x64で開発してますよ…。Visual Studio自身が32bitで動作していることを忘れてましたよ。普通、開発環境なんだから64bit版もインストール済みと思うよっ！

ArraySegment classと拡張メソッド

2008-10-20T14:24:00.004+09:00

C#で部分配列を扱いたくなったとき、unsafe fixedしてpointerを使うこともできますが、ArraySegment classでがんばってみようと思いました。ところがArraySegmentにはインデクサなどのアクセッサが用意されてなく扱いづらいです。

var array = new int[10];
var segment = new ArraySegment<int>( array, 5, 5 );
segment.Array[ segment.Offset + 3 ]; // array[8] 相当

ここで拡張メソッドを思い出しました。といっても拡張インデクサは実装できません。気を取り直してArray.GetValue()やArray.SetValue()の真似をしてみました。

public static class ArraySegmentUtility{
public static T GetValue<T>( this ArraySegment<T> segment, int index ){
return segment.Array[ segment.Offset + index ];
}
public static void SetValue<T>( this ArraySegment<T> segment, T value, int index ){
segment.Array[ segment.Offset + index ] = value;
}
}

こうすれば最初の例は

segment.GetValue( 3 );

おおいい感じ。
早速使ってみよう…

segment.Array[ segment.Offset + i ] ^= x;

ぽか～ん。アクセッサが用意されてない理由がわかった気がする…。

演算子の優先順位

2008-10-19T19:30:00.003+09:00

自分でも呆れるくらいのミスを…
演算子の優先順位を勘違いしてました。
シフト演算<<や>>よりも先に二項演算子＋や－が結合されるんですね。

XmlWriter.Flush()

2008-09-30T08:54:00.002+09:00

XmlWriterを使っているとよくXMLが崩れます。ってXmlWriterが悪いような書き方ですが、単に使い方が間違っていました。
普段、auto flushに慣れているわけですが、残念ながらXmlWriterはauto flushモードがなく、定期的にFlush()メソッドを呼び出す必要があります。
といっても、元々buffer fullになればFlush()されるわけですから本当に必要なのは、最後の１回だけです。
デストラクタが自動的にFlush() / Close()してくれるんじゃ…と思いましたがなんとデストラクタがありません。
となると手動でFlush()かClose()かDispose()を呼ぶ必要があるわけですが、Dispose()がpublicではありません。この場合のFlush()は意味が違いますし、Close()で変なステートメントを増やしたくないですし…

結局、using構文が一番しっくりきます。

IEでのinherit

2008-08-31T22:06:00.005+09:00

ググったけど話題になっていなかったので。CSSには親要素から値を継承するinherit値がありますが、実はIEではこれがあまり動作しません。

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<title>test</title>
<style type="text/css">
body{ font-weight: normal; }
span{ font-weight: bold; }
span{ font-weight: inherit; }
</style>
</head>
<body>
<span>normalが継承される</span>
</body>
</html>

spanはbold指定を打ち消し、bodyからnormalを継承しなければなりませんが、IE7ではinherit行自体が指定されていなかったものと見なし、boldで表示されてしまいます。

ちなみにIE8 beta2で確認したところ、こちらは正しくnormalで表示されていました。

.NET Framework 3.5 SP1とSQL Server 2008

2008-08-11T08:00:00.002+09:00

.NET Framework 3.5 SP1 betaとVistal Studio 2008 SP1 betaを試していましたが、.NET Framework 3.5 SP1側がこっそりリリース？されていました。
正確にはダウンロード可能になっていませんし、再配布可能ものジュールも提供されていないのでまだまだ使えませんが、SQL Server 2008にさりげなく入っていました。

TextureCoordinates

2008-07-21T10:45:00.002+09:00

WPFを使って3Dを扱っていたのだが、TextureCoordinatesという概念がよくわからなかった。MSDNの記述もいい加減で

テクスチャ座標に関する追加の情報は、後続のトピックまたは Managed Direct3D SDK を参照してください。

と逃げているし…Managed Direct3Dってもう終わったんじゃ？
ググっていたらDaniel Lehenbauer's Blog : 3D for the Rest of Us: Texture Coordinatesを見つけた。これはわかりやすいかも？

…何の情報もない投稿だなぁ

FizzBuzz Questions

2008-05-30T01:09:00.000+09:00

思いつきでFizzBuzz Questionsをやってみる。お題はこちら：

Write a program that prints the numbers from 1 to 100. But for multiples of three print "Fizz" instead of the number and for the multiples of five print "Buzz". For numbers which are multiples of both three and five print "FizzBuzz".

普通に解くと

#include <iostream>
using namespace std;

void FizzBuzz( int n ){
if( n % 15 )
if( n % 5 )
if( n % 3 )
cout << n;
else
cout << "Fizz";
else
cout << "Buzz";
else
cout << "FizzBuzz";
cout << endl;
}

int main(){
for( int i = 1; i < 101; i++ )
FizzBuzz( i );
}

こんな感じ？

当たり前ですが実行時に分岐しています。でもTMP（Template MetaProgramming）を使えばコンパイル時に分岐できます。

#include <iostream>
using namespace std;

template<int n, int mod3 = n % 3, int mod5 = n % 5>
struct FizzBuzz{
static ostream& print(){
return FizzBuzz<n-1>::print() << n << endl;
}
};

template<int n, int mod5>
struct FizzBuzz<n, 0, mod5>{
static ostream& print(){
return FizzBuzz<n-1>::print() << "Fizz" << endl;
}
};

template<int n, int mod3>
struct FizzBuzz<n, mod3, 0>{
static ostream& print(){
return FizzBuzz<n-1>::print() << "Buzz" < endl;
}
};

template<int n>
struct FizzBuzz<n, 0, 0>{
static ostream& print(){
return FizzBuzz<n-1>::print() << "FizzBuzz" << endl;
}
};

template<> ostream& FizzBuzz<0>::print(){
return cout;
}

int main(){
FizzBuzz<100>::print();
}

本当はループ展開とかもTMPでできるかも…でもやり方がよくわかりませんでした。

しかし更にすごい方法が…

#include <iostream>
#include <boost/preprocessor/arithmetic/mod.hpp>
#include <boost/preprocessor/control/if.hpp>
#include <boost/preprocessor/repetition/repeat_from_to.hpp>
using namespace std;

#define FizzBuzz( z, n, data ) \
BOOST_PP_IF( BOOST_PP_MOD( n, 15 ), \
BOOST_PP_IF( BOOST_PP_MOD( n, 5 ), \
BOOST_PP_IF( BOOST_PP_MOD( n, 3 ), \
#n, \
"Fizz" ), \
"Buzz" ), \
"FizzBuzz" ) \
"\n"

int main(){
cout << BOOST_PP_REPEAT_FROM_TO( 1, 101, FizzBuzz, );
}

コンパイル前にすべての処理を終わらせてしまい、preprocessorだけで単一の文字列を作り上げてしまうことも。いやはや。

SslStream

2008-05-16T08:46:00.004+09:00

Boost.Asioを書いたけど、.NET Frameworkにも同様にSslStreamクラスが用意されている。
使い方もほぼ同じで

var c = new TcpClient( "ホスト名", 443 );
var s = new SslStream( c.GetStream() );

s.AuthenticateAsClient( "ホスト名" );

s.Write( Encoding.Default.GetBytes( "GET / HTTP/1.0\r\n\r\n" ) );

var r = new StreamReader( s, Encoding.Default );
Console.WriteLine( r.ReadToEnd() );

こんな感じ。違いは

Windows環境ではgetservbyname()が信用できないので直接443と書いている点
.NET FrameworkはByteとCharを区別しているので明示的な変換が必要になる点
Byte→Char変換を中断するのは面倒くさいのでReadToEnd()ですべて読み込んでしまっている点

でしょうか。

Boost.Asio

2008-05-16T00:00:00.004+09:00

BoostというC++ライブラリが気になっていたのですが、1.35がリリースされ、Boost.Asioという非同期I/Oライブラリが追加されていることを知りました。このライブラリはWindows、Linux、各種Unix上で動作し、各種コンパイラをサポートしています。さらによく見たらOpenSSLによるSSLまでサポートしていました。

まずは試しに同期I/Oでhttps clientを書いてみました。

io_service i;
ssl::context c( i, ssl::context::sslv3_client );
ssl::stream s( i, c );
s.lowest_layer().connect( *ip::tcp::resolver(i)
.resolve( ip::tcp::resolver::query( "ホスト名", "https" ) ) );

s.handshake( ssl::stream_base::client );

write( s, buffer( "GET / HTTP/1.0\r\n\r\n" ) );

asio::streambuf res;
error_code e;
while( read( s, res, transfer_at_least(1), e ) )
cout << &res;

うーん、これだけで動いちゃいました。

Windows XP SP3

2008-04-26T09:02:00.002+09:00

Windows XP SP3が公開されたようです。Release To Manufacturing(RTM)後、１週間ほどでRelease To Web(RTW)されるそうです。
SP2と互換は高いという噂なので特に言及することもなさそうでしたが…１点、すでにWindows Vistaがリリースされていることもあり、Windows XP with SP3は作られないとかなんとか。というわけで後からSP3を追加する形のみになるようです。…ちなみにSP3のインストール条件にSP1が入っていました。つまり素のXPには一旦SP1aかSP2を入れた後にSP3を入れることになるようです。

インサイドWindows第４版下

2008-03-29T14:06:00.001+09:00

インサイドWindows第４版上に続いてようやくインサイドWindows第４版下を買えました。近くの本屋さんにはいつ見ても上しか置いてなくて…でも注文するのは負けた気がするし。
読んでいて一つ参考になった話題を。大容量のメモリを搭載しているWindows XPでもタスクマネージャのシステムキャッシュを見ると512MBで抑えられている場合があります。このPCは68MBとしょぼしょぼですが（；；
こういう場合、パフォーマンスオプションで「システムキャッシュ」を選択すると512MB以上のメモリをシステムキャッシュに割り当てられるようになります。メモリが余ってる人はどうぞ。
64bit版やWindows Vistaはこのリミッターが最初から解除されています。

HTTP Server API

2008-03-29T13:00:00.002+09:00

以前からWindows OSにはIISが含まれていたけど、Windows XP SP2、Windows Server 2003以降にはOS側にWebサーバ機能が組み込まれていて、IISもこれを使う設計らしい。
試しにこのHTTP Server APIを使ってみた。

HTTPAPI_VERSION version = HTTPAPI_VERSION_1;
HttpInitialize( version, HTTP_INITIALIZE_SERVER, NULL );

HANDLE handle;
HttpCreateHttpHandle( &handle, NULL );

HttpAddUrl( handle, L"http://+:80/", NULL );

while( !stop ){
HTTP_REQUEST_ID requestId;
HTTP_SET_NULL_ID( &requestId );
char buffer[ 4096 ] = {};
PHTTP_REQUEST request = reinterpret_cast<PHTTP_REQUEST>( buffer );
ULONG size;
HttpReceiveHttpRequest( handle, requestId, 0, request, sizeof buffer, &size, NULL );

HTTP_RESPONSE response;
memset( &response, 0, sizeof response ); // デフォルトコンストラクタ用意してください（；；）
HTTP_DATA_CHUNK chunk;
HANDLE file = INVALID_HANDLE_VALUE;
if( request->Verb != HttpVerbGET )
response.StatusCode = 503;
else{
// URLパスの先頭の'/'をスキップ
file = CreateFileW( &request->CookedUrl.pAbsPath[1], FILE_READ_DATA, 0, NULL, OPEN_EXISTING, 0, NULL );
if( file == INVALID_HANDLE_VALUE )
response.StatusCode = 404;
else{
chunk.DataChunkType = HttpDataChunkFromFileHandle;
chunk.FromFileHandle.ByteRange.StartingOffset.QuadPart = 0;
chunk.FromFileHandle.ByteRange.Length.QuadPart = HTTP_BYTE_RANGE_TO_EOF;
chunk.FromFileHandle.FileHandle = file;
response.StatusCode = 200;
response.EntityChunkCount = 1;
response.pEntityChunks = &chunk;
}
}
HttpSendHttpResponse( handle, request->RequestId, 0, &response, NULL, &size, NULL, 0, NULL, NULL );
if( file != INVALID_HANDLE_VALUE )
CloseHandle( file );
}
HttpRemoveUrl( handle, L"http://+:80/" );
CloseHandle( handle );
HttpTerminate( HTTP_INITIALIZE_SERVER, NULL );

サンプルなのでエラー処理は省いてます。機能的には、カレントディレクトリのファイルを返します。
stop = trueとしてもすぐには終了しません。HttpReceiveHttpRequest()でブロックされているので、次のリクエストを処理したところでループを抜けます。

fwrite()と改行コード

2008-03-02T23:17:00.003+09:00

fwrite()は任意のバイナリデータをstreamに書き込むライブラリ関数だと理解していましたが、今更ながらstreamがテキストモードの場合、任意文字列を書き込むものだと知りました。具体的にはバイナリデータを文字列と見なし、その中からNL（0x0A）をCR-LF（0x0D-0x0A）に置き換えられてはまりました。
テキストとバイナリを混在させたstreamの場合、その都度モードを切り替える必要があるそうです。

FILE* stream;
_setmode( _fileno( stream ), _O_BINARY );

WPADのContent-Type

2008-02-27T20:53:00.003+09:00

Web Proxy Auto-Discovery ProtocolいわゆるWPADですが、なんとWindows Update ClientはContent-Typeをちゃんと見ていました。application/x-ns-proxy-autoconfigに設定されていないと、無効と見なされてしまうようです。
これ気づいてる人は少ないようで、proxycfg.exeに頼ってる記述が多々ありました。

RAIDデバイス名の変更

2008-02-20T21:54:00.000+09:00

Linuxのsoftware RAID（md）の場合、disk controllerをまたがって好きなようにRAIDを構成できるため重宝します。またhardware RAIDの場合、raid controllerが故障すると読み出せませんが、そのような欠点もありません。
mdはディスク内に自身のデバイス名（md0）などを保持しています。ここで例えばディスク交換のために、/パーティションをmd0からmd1にコピーした場合、新たに作られる/はmd1というデバイス名を持ってしまいます。これを繰り返すとデバイス名がどんどんいびつになっていきます。
これをどうにか整理したかったのですが、どこにも書かれていなかったので自力で解決しました。

まだまだ説明が続きます。多くのドキュメントではmdのcreateについてしか記述されていませんでした。しかし実際にはassembleとstopという行為が重要になってきます。なぜこれらが記述されていないのかというと、Linuxの各ディストリでは起動時やshutdown時のscriptにあらかじめ組み込まれていて、説明する必要がないわけです。そして、試した結果わかったのですが、「mdはディスク内に自身のデバイス名（md0）などを保持しています。」これはcreate時だけでなくassemble時にも更新されるようです。

いよいよデバイス名の変更の仕方です。例えばmd2をmd1に変更するには

# umount md2
# mdadm -S /dev/md2
# mdadm -A /dev/md1 /dev/sd... /dev/sd...
# mount ...

わかってしまえば簡単でした。
このあと/etc/fstabの変更も忘れずに。

ただしこれができるのはumount可能なパーティションだけです。CD bootなどでもいいかもしれません。
CD bootできなくてもがんばれば更新できます。例えば/のデバイス名をmd0に変更する場合kernel optionで

raid=noautodetect md=0,/dev/sd...,/dev/sd... root=/dev/md0

で変更されます。raid=noautodetectを指定しておかないと、autodetectされ、保持されているデバイス名でassembleされてしまい変更できません。またデバイス名が変わるためroot=/dev/md0の指定をしないと起動に失敗します。
このあと/boot/grub/menu.listや/etc/fstabの更新も忘れずに。

ハードディスクの2TBの壁

2008-02-11T17:55:00.000+09:00

750GB×4のハードウェアRAID5で、2.25TBになります。このときハードディスクのパーティションテーブルは32bit sectors（4giga sectors）×512bytes/sector＝2TBまでしか表現できないという、2TBの壁にぶつかりました。
Debian GNU/Linux（etch）をインストールしたところ、パーティションエディタは2TBの壁を超えるために新しいGPT形式に対応していて、ファイルのインストール自体はできました。ところがブートローダのGRUBがGPTに未対応のバージョンのため、結局ブート不可能なインストール結果となってしまいました。

ハードディスクの問題が検出されました

2008-02-09T13:40:00.000+09:00

時々、OSからハードディスクが認識されなくて、先週からは起動時のBIOSからも認識されなくなって、やばいと思っていました。週末ということもあり、バックアップして徹底的にチェック！ …まずはバックアップを～こんなダイアログが出ました。Windows VistaってSelf-Monitoring, Analysis and Reporting Technology、いわゆるS.M.A.R.T.に対応してたのね。
ググると遭遇している方が結構いらっしゃるようです。でも…この警告を無視するコメントが多数…う～ん、無理に使ってデータが壊れても自己責任ですよ。

Windows Vista SP1 RTM

2008-02-09T13:27:00.000+09:00

2/4にWindows Server 2008とWindows Vista SP1のRelease To Manufacturing、RTMがアナウンスされました。それと同時にMSDNでWindows Server 2008の提供も開始されましたが、Vista SP1に関しては３月中旬に公開されるそうです。
…と、これでは寂しいのでVista SP1のRTM版を入手してインストールしました。普通にインストールできました。ハイ、それだけです。

robocopy

2008-02-09T13:19:00.000+09:00

ファイルを多数コピーしたくなりました。Explorerでは遅いからここはxcopyコマンドだと思い、まずはコマンドヘルプを…

C:\Users\sayuri>xcopy /?
ファイルとディレクトリツリーをコピーします。

注意: Xcopy は現在推奨されていません。Robocopy を使用してください。

XCOPY 送り側 [受け側] [/A | /M] [/D[:日付]] [/P] [/S [/E]] [/V] [/W]
[/C] [/I] [/Q] [/F] [/L] [/G] [/H] [/R] [/T] [/U]
[/K] [/N] [/O] [/X] [/Y] [/-Y] [/Z] [/B]
[/EXCLUDE:ファイル1[+ファイル2][+ファイル3]...]

…ん？

C:\Users\sayuri>robocopy /?

-------------------------------------------------------------------------------
ROBOCOPY :: Windows の堅牢性の高いファイルコピー

-------------------------------------------------------------------------------

これはバックアップとか便利に使えそうなコマンドのようです。

LoadLibrary

2008-02-02T19:15:00.000+09:00

今までLoadLibrary()を使ってましたが、実はLoadLibraryEx()にLOAD_WITH_ALTERED_SEARCH_PATHフラグを付けた方がいいことが判明。
こうすることによって、ロード対象のDLLがさらに依存するDLLを探す際に、DLL自身のdirectoryを検索対象に含めることができるようになる。

DictionaryとIEquatable

2008-01-26T14:26:00.000+09:00

ある意味当たり前ですが、気づかずにはまってしまいました。
Dictionary<TKey,TValue>はIEquatable<T>が実装されていればそれを使って比較してくれます。Object.Equals()と違って型保証されているので便利に使っていました。
しかし、Dictionary<TKey,TValue>はTKeyを比較する前にまずハッシュします。この際、IEquatable<T>の有無にかかわらずObject.GetHashCode()を使います。つまり、このハッシュ値が異なるTKeyはIEquatable<T>.Equals()が呼び出されることなく異なる値として扱われてしまいます。
むーん。

ILogicalThreadAffinativeとThread Local Storage

2008-01-07T20:26:00.000+09:00

TLSつまりThread Local Storageは便利で、コンテキスト情報を持たせるときに活用しようとずっと考えていました。すでにある例としてはIPrincipalでしょうか。Threadにプリンシパルを持たせることで、実行に必要な権限があるかをいつでもテストできます。
ですがこれ、Thread Localということは当然Threadをまたぐことができません。.NETでは簡単に非同期処理などを利用でき複数Threadにまたがってしまう。そうなったときTLSは使えません。

そこで自分の生成した子スレッドにのみ引き継がれる都合のいいTLSはないかと.NETクラスライブラリを調べていましたがなかなか出合えませんでした。
が、やはり根気よく調べればありました。それがILogicalThreadAffinativeです。このinterfaceはメンバがありません。ただ継承すればそれだけでTLSの内容が子スレッドにも引き継がれるようになります。
日本語圏でググったところ、まだあまり使われていないようですが、これはかなり使えます。

??演算子

2008-01-07T20:16:00.000+09:00

C#で??演算子というものを見つけました。調べたところ、C# 2.0、つまりVS2005からあったそうで、ずっと気づいていませんでした。

a = b ?? c;

は

a = b != null ? b : c;

とほぼ等価です。違うのは、bが１回しか評価されないことです。Perlの||的な動きをすると言えばいいでしょうか。

C++/CLIと#include

2007-12-16T12:50:00.000+09:00

もっと根本的な問題#define MessageBox MessageBoxWとSystem::Windows::Forms::MessageBoxの名前がぶつかる問題とか解決してほしいなぁ。

と書いたけど、一応現時点での対策も書いておきます。

#include <Windows.h>
...
#pragma push_macro("MessageBox")
#undef MessageBox
MessageBox::Show( "message", "caption" );
#pragma pop_macro("MessageBox")

です。でも面倒くさい…。

VS2008の変更点： C++

2007-12-16T12:37:00.000+09:00

VS2008を使い始めて気がついた点をあげていきます。今回はC++について。

まず/Wp64（64 ビット移植性の問題の検出）のサポートがなくなっています。VS2005の１代でつぶれました。せっかく警告たとしても、Win32では無理やりcastするのが正しいときが多々あり、警告の意味が薄れてしまうからでしょうか。更にはx64コンパイラも用意されていますし、x64プロセッサもクライアントPCにまで出回ってきて、実機でテストしなさい、ってことかもしれません。

新しくSTL/CLRライブラリとC++マーシャリングライブラリが増えています。STL/CLRは本当はVS2005に入るはずだったとか間に合わなかったとかだそうで？ C++/CLIは個人的にはC#で書ききれないWin32 nativeな部分のマーシャリング？に使うものという位置づけで、STLの出番はちょっと少ないです。JITで最適化していく.NETでSTL/CLRのコンパイル時インライン展開の最適化はどうなんでしょう？
もう一つのC++マーシャリングはまぁ、今まで必要になった人が書いていたものをあらかじめ用意しましたよ、程度で。こちらもgenericではなくtemplateで書かれているのでコンパイル時にインライン展開されます。
マーシャリングはうれしいけど、もっと根本的な問題#define MessageBox MessageBoxWとSystem::Windows::Forms::MessageBoxの名前がぶつかる問題とか解決してほしいなぁ。

今回なくなったライブラリとしてはATL ServerとATL_MIN_CRT関連。obsolateではなくきれいさっぱり削除されています。ATL Serverは使っていませんでしたがATL_MIN_CRT関連は使っていたのでちょっと痛手。もちろん#ifdefで分けていたので、ファイルサイズが大きくなる程度ですが、気分的に。
一応

Visual C++ 2008では、ATL_MIN_CRTが定義されているかどうかに関係なく、ATLプロジェクトのCRTに対する依存はすべて最小限に抑えられます。

と書かれていますが、この説明に意味はなく、ソースを見る限り「リンカが選択的にリンクしますよ」程度のことでした。

ついでにATLのソースをVS2005とVS2008で比較してみたところ、気づいたことが２点ありました。VS2005ではATL_MIN_CRTの影響なのかセキュリティ強化されたCRTを使わないバージョンが存在しましたが、VS2008ではセキュリティ強化されたCRTが強制的に使われます。おかげでガンガンにCRTを使います。
もう１点、なぜかVS2008でも_MTを見ています。VS2005以降、シングルスレッドCRTライブラリが削除されてマルチスレッドCRTライブラリしか存在しないわけですが、ATLは_MTを見てシングルスレッド動作も意識しています。…でもATL_MIN_CRTが廃止されたためにマルチスレッドCRTライブラリが必須なはずですが f(^^;

Visual Studio Team System 2008 Team Suite

2007-12-15T12:31:00.000+09:00

VS2008の続報です。Visual Studio Team System 2008 Team Suite日本語版が12/14にリリースされていました。国内での販売は2008/02/01からだそうです。
ところで、.NET Framework 2.0 SP1日本語 Language Packや.NET Framework 3.0SP1はどうなってることやら。インストールして詳しく調べることにします。

ダイアログの表示のされ方（２）

2007-12-03T23:09:00.000+09:00

ダイアログの表示のされ方（１）の続きです。
ダイアログには、タイトルバーがあり各種ボタンが並びますが、これまた制御がややこしいため調査しました。
ボタンの場合、表示されているかどうかの他に、動作するかどうかもあります。簡単な話に聞こえますが、表示されていなくてもマウス操作やショートカットキーで動作することもあるため、独立して調査する必要があります。

// ControlBoxが表示される条件
Form.ControlBox == true && Form.ShowIcon == true &&
( Form.FormBorderStyle == FormBorderStyle.FixedSingle || Form.FormBorderStyle == FormBorderStyle.Fixed3D ||
Form.FormBorderStyle == FormBorderStyle.Sizable ||
Form.FormBorderStyle == FormBorderStyle.FixedDialog && Form.Icon != null );

// ControlBoxが動作する条件
Form.ControlBox == true && Form.FormBorderStyle != FormBorderStyle.None;

アイコンが表示されていなくても、Alt+Spaceで動作します。最初からかなりややこしい条件で、泣けました。

// HelpButtonが表示される条件、及び動作する条件
Form.HelpButton == true && Form.ControlBox == true && Form.MinimizeBox == false && Form.MaximizeBox == false &&
( Form.FormBorderStyle == FormBorderStyle.FixedSingle || Form.FormBorderStyle == FormBorderStyle.Fixed3D ||
Form.FormBorderStyle == FormBorderStyle.FixedDialog || Form.FormBorderStyle == FormBorderStyle.Sizable );

Shift+F1については確認できていません。今やヘルプボタンはマイナーな存在になりつつあるため、気にする必要はないかもしれませんね。

// MinimizeBoxが表示される条件、及びMaximizeBoxが表示される条件
( Form.MinimizeBox == true || Form.MaximizeBox == true ) && Form.ControlBox == true &&
( Form.FormBorderStyle == FormBorderStyle.FixedSingle || Form.FormBorderStyle == FormBorderStyle.Fixed3D ||
Form.FormBorderStyle == FormBorderStyle.FixedDialog || Form.FormBorderStyle == FormBorderStyle.Sizable );

// MinimizeBoxが動作する条件
Form.MinimizeBox == true && Form.ControlBox == true &&
( Form.FormBorderStyle == FormBorderStyle.FixedSingle || Form.FormBorderStyle == FormBorderStyle.Fixed3D ||
Form.FormBorderStyle == FormBorderStyle.FixedDialog || Form.FormBorderStyle == FormBorderStyle.Sizable );

// MaximizeBoxが動作する条件
Form.MaximizeBox == true && Form.FormBorderStyle != FormBorderStyle.None;

最小化ボタン・最大化ボタンどちらかが有効になっているときに表示されます。最小化のショートカットを知らないため、見えていて有効になっているとき動作するとしました。最大化に関してはタイトルバーのダブルクリックを含めています。

// CloseBoxが表示される条件
Form.ControlBox == true && Form.FormBorderStyle != FormBorderStyle.None;

// CloseBoxが動作する条件
true;

ControlBoxプロパティそのものでした。Alt+F4は絶えず有効でした。

…疲れました。

ダイアログの表示のされ方（１）

2007-12-02T19:24:00.000+09:00

タイトルは何の変哲もないものになってしまいました。
Windowsでは、ダイアログを出すとき、タスクバーに表示されるか・Alt+TABのリストに並ぶか・タスクマネージャに表示されるか、それぞれ制御できるようです。ところが.NET Frameworkには直接的に制御できるのはShowInTaskbarというプロパティぐらいしかなく、制御しづらい上にわかりにくいです。
そこでひたすらパターンを組み合わせてどのように表示されるかまとめてみました。とはいえ、総当たり表を見てもパターンが多すぎてわかりづらいので、逆引き形式で並べてみます。

// タスクバーに表示される条件
Form.ShowInTaskbar == true;

// 3D Flipに表示される条件
Form.ShowInTaskbar == true;

// Alt+Tabに表示される条件
Form.ShowInTaskBar == true ||
Form.FormBorderStyle != FormBorderStyle.FixedToolWindow && Form.FormBorderStyle != FormBorderStyle.SizableToolWindow;

// タスクマネージャに表示される条件
Form.FormBorderStyle != FormBorderStyle.FixedToolWindow && Form.FormBorderStyle != FormBorderStyle.SizableToolWindow;

だんだん、関係ないパラメータに依存してきていることがわかりました。

さらに、タスクバー・Alt+Tab・タスクマネージャにはダイアログアイコンが表示されます。表示されるアイコン自体は共通したものでしたが、アイコンの選択のされ方には微妙な違いがありました。

if( Form.ShowIcon == true && Form.Icon != null )
TheIcon = Form.Icon;
else if( Form.ShowIcon == true && Form.Icon == null && Form.FormBorderStyle != FormBorderStyle.FixedDialog )
TheIcon = Form.ParentForm.Icon;
else
TheIcon = null;

この式でTheIconに値が設定されないときはタスクバーなりタスクマネージャなりのデフォルトが使われる模様？
こうもややこしいと困りますね。

Dictionary.TryGetValue

2007-11-29T20:20:00.000+09:00

Dictionary.TryGetValue()にはまった。

このメソッドから制御が戻るときに、キーが見つかった場合は、指定したキーに関連付けられている値が格納されます。それ以外の場合は value パラメータの型に対する既定の値。このパラメータは初期化せずに渡されます。

と書かれているものの深く読んでなくて、valueは変更されないものと勘違い。
書かれているとおり、見つからなかった場合は既定値で初期化されます。

Bitmap、ColorPalette

2007-11-23T12:24:00.000+09:00

ごめんなさい、ColorPaletteのAccessViolationExceptionは別の原因でした。
Bitmapコンストラクタには

scan0パラメータで指定されたメモリブロックの割り当てと解放は呼び出し元が行いますが、関連するBitmapが解放されるまでメモリは解放されません。

とありますが、これを守っていませんでした。Bitmapコンストラクタが終了した時点でメモリブロックを解放していました。Bitmap.LockBits()をするのが正解なようです。

ColorPaletteクラスが変則的な理由を調べるためにGDI+について調べました。
GDI+はもともとnative（unmanaged）で実装されていてBitmapクラスなどはそのwrapperになっています。そしてColorPaletteはというと、単なる構造体であり対応するnativeクラスはありません。…だからと言って扱いづらいクラス設計をしていいわけではありませんがっ。

見た感じColorPaletteクラスは複数のBitmapクラスで共有してもよさそうです。というよりも対応するnativeクラスが存在しないため、Bitmap.Paletteに代入された時点で値だけがnativeクラス側にコピーされColorPaletteの共有状態にはならないようです。

ColorPalette

2007-11-22T08:39:00.000+09:00

複数のBitmapが同一のColorPaletteを持つとき、このColorPaletteが非常に扱いづらい。

なぜかコンストラクタがない。
そのためBitmap.Paletteプロパティから取得する必要がある。
ところがBitmap.Paletteプロパティにアクセスするたびに新しいインスタンスが生成される。

文章だと説明しづらいので問題になるコードを

Bitmap[] bitmaps; // ここにColorPaletteを設定したい
Color[] colors; // このColorを設定したい

foreach( Bitmap bitmap in bitmaps ){
for( int i = 0; i < 256; i++ )
bitmap.Palette.Entries[i] = color[i];
bitmap.MakeTransparent(); // ついでに透明色の設定
}

ちゃんとColorを設定しているつもりでも、毎回ColorPaletteが生成され直してColor値が保存されない。じゃあ、どうするかというと

Bitmap[] bitmaps; // ここにColorPaletteを設定したい
Color[] colors; // このColorを設定したい

foreach( Bitmap bitmap in bitmaps ){
ColorPalette palette = bitmap.Palette; // ColorPaletteを取得、この時点でBitmapとは切り離されている
for( int i = 0; i < 256; i++ )
palette.Entries[i] = color[i];
bitmap.Palette = palette;
bitmap.MakeTransparent(); // ついでに透明色の設定
}

こんな感じ。コンストラクタが提供されないにも係わらず、インスタンスの設定が求められるのはおかしい。
ここでふと気づく。ループごとにColorPaletteを作成し直すのは無駄では？つまり

Bitmap[] bitmaps; // ここにColorPaletteを設定したい
Color[] colors; // このColorを設定したい

ColorPalette palette = bitmaps[0].Palette; // ColorPaletteを取得、この時点でBitmapとは切り離されている
for( int i = 0; i < 256; i++ )
palette.Entries[i] = color[i];
foreach( Bitmap bitmap in bitmaps ){
bitmap.Palette = palette;
bitmap.MakeTransparent(); // ついでに透明色の設定
}

こうすればColorPaletteの作成は１回で済む…というのは罠です。ColorPaletteはクラスなので、複数のBitmapでインスタンスが共有されてしまいます。具体的にはMakeTransparent()でAccessViolationExceptionが発生したりする。
インスタンスを独立させたくてもICloneable.Clone()も提供されないので、ひたすらコピーするしかない。なんとも迷惑な話です。

インサイドWindows第４版上

2007-11-20T22:11:00.000+09:00

セカンド・オピニオン OS小論:OSの構造をもう少し考えてみるを見つけました。
奥深くまでいろいろ語られていて参考になりました。その影響で「インサイドWindows第４版上」なる本を買ってしまいました。下は売ってなかったのでそのうちにでも。

VS2008

2007-11-20T21:10:00.000+09:00

Visual Studio Team System 2008 Team Suite提供開始。まずは英語版を入手。
LINQやAjaxや面白い機能がいっぱい。既にβ版を試してたけど、自分の目線で追々紹介していきます。

プロセッサの情報

2007-11-19T22:43:00.000+09:00

コンピュータのプロパティはVistaだとこんな感じ。xpもダイアログは違うけど、プロセッサについて書かれてる。周波数は２回書かれてるし、空白のバランスが悪い。
でもこれには理由があって、赤下線部分の文字列、これはCPUから直接取得できる。こんな感じ。Visual C++依存のコードです。

#include <stdio.h>
#include <intrin.h>

int main(){
int cpuInfo[4];
__cpuid( cpuInfo, 0x80000000 );
if( cpuInfo[0] >= 0x80000004 ){
char brand[48];
__cpuid( (int*)&brand[ 0], 0x80000002 );
__cpuid( (int*)&brand[16], 0x80000003 );
__cpuid( (int*)&brand[32], 0x80000004 );
printf( "%.48s\n", &brand[0] );
}
return 0;
}

プレビュー

2007-11-18T14:10:00.000+09:00

こんなことして遊んでいます。RO以外でも使えるclass libraryができました。

ZlibStream
zlibなstreamを読み書きできる。
FileDataObject
実在しないfileをclipboardに入れる。explorerにdropするときにも使える。ただしDataObject classと相性が悪い。
Tga
TGA形式の画像をBitmapクラスに読み込む。

IDataObject

2007-11-18T09:55:00.000+09:00

IDataObject、DataFormats.Format、FORMATETCこの辺りは定義がいい加減で困る。

しょーもないところではIDataObject.DUnadvise()。戻り値voidなのに戻り値の解説がついてます。Cの#define値を見せられてもどうにもなりません…そもそもどうやって返せと。.NET Framework 3.5ではドキュメント修正されてめでたしめでたし…んなことありません。
お隣りのIDataObject.DAdvise()。戻り値intだから解説が…ふむふむ真っ当に見える？ところが、OLE_E_ADVISENOTSUPPORTEDを返そうとすると、refやらoutの値を設定しなさいとコンパイルエラーが。いえ、設定できないからOLE_E_ADVISENOTSUPPORTEDを返したいのですが…結局、戻り値ではなく例外を投げることに。

本題はこっち。FORMATETC.cfFormatはshort型。実際の値としてはshortで負になる値がよく使われる。
でもDataFormats.Format.Idとしてはint型なので正に…単純に==演算子で比較すると一致しません。結局

FORMATETC formatEtc;
DataFormats.Format dataFormat;
if( formatEtc.cfFormat == unchecked((short)dataFormat.Id) ){
...;
}

とするしかないでしょうか。

GCHandle.AddrOfPinnedObject()とToIntPtr()の違い

2007-11-17T21:32:00.000+09:00

GCHandle: managed objectに対するHandleを表す。
GCHandle.Alloc(): managed objectに対するGCHandleを取得する。同時に固定することも可能。
GCHandle.AddrOfPinnedObject(): GCHandleが表しているmanaged objectのaddressを返す。このとき、GCHandleが表しているmanaged objectはあらかじめ固定していないと例外が発生する。
GCHandle.ToIntPtr(): GCHandle自身のaddressを返す。GCHandleが表しているmanaged object自体は固定されている必要はない。
GCHandle.FromIntPtr(): GCHandle.ToIntPtr()で得られたaddressからGCHandleへ復元する。もちろん同じmanaged objectが追跡できている。