わんくま同盟

[VMWare]VMWare Server 2.0でVMWare Tools

kazuki@wankuma.com (かずき) — Fri, 21 Nov 2008 14:45:00 GMT

VMWare Server 2.0から1系と比べて管理ツールのUIががらっと変わった。
ということで、VMWare Toolsのインストールをするためのボタンの位置も変わった。

よく使うのでメモ。
下の画面の右側の部分にInstall VMWare Tools...というものがある。
（ゲストOSを起動した状態で押せるようになる）

これをクリックするとゲストOS側でインストーラが起動するっていう寸法だ。

デザインパターンを学ぶ～その21：Commandパターン(1)～

まさる — Fri, 21 Nov 2008 14:40:00 GMT

Command

命令

Commandパターンは、「命令」をオブジェクトとして扱うパターンです。これにより「命令」を呼び出す側は、その「命令」が実際どのように動作するか気にする必要がなくなります。

このパターンの概要は以下の通り。

「命令」を実行するメソッドExecuteをもつインターフェイスを定義します。

C#

public interface ICommand
{
  void Execute();
}

VB

Public Interface ICommand
  Sub Execute()
End Interface

「命令」を受け取るクラス、Recieverを定義します。RecieverはどんなクラスでもOKです。コード例ではLightにしました。

C#

public class Light
{
  private enum State
  {
    On
    , Off
  }

  private State state = State.Off;

  public void On()
  {
    this.state = State.On;
    Console.WriteLine("ライトが点きました");
  }

  public void Off()
  {
    this.state = State.Off;
    Console.WriteLine("ライトが消えました");
  }

  public void DisplayState()
  {
    if (this.state == State.On)
    {
      Console.WriteLine("ライトは点いています");
    }
    else
    {
      Console.WriteLine("ライトは消えています");
    }
  }
}

VB

Public Class Light

  Private Enum PowerState
    [On]
    Off
  End Enum

  Private state As PowerState = PowerState.Off

  Public Sub [On]()
    Me.state = PowerState.On
    Console.WriteLine("ライトが点きました")
  End Sub

  Public Sub Off()
    Me.state = PowerState.Off
    Console.WriteLine("ライトが消えました")
  End Sub

  Public Sub DisplayState()
    If Me.state = PowerState.On Then
      Console.WriteLine("ライトは点いています")
    Else
      Console.WriteLine("ライトは消えています")
    End If
  End Sub

End Class

実際にRecieverに対しての命令をICommandを実装したクラスとして定義します。コード例ではLightのOn、OffそれぞれのCommandを定義しています。

C#

public class LightOnCommand : ICommand
{
  private Light light;

  public LightOnCommand(Light light)
  {
    this.light = light;
  }

  public void Execute()
  {
    this.light.On();
  }
}

public class LightOffCommand : ICommand
{
  private Light light;

  public LightOffCommand(Light light)
  {
    this.light = light;
  }

  public void Execute()
  {
    this.light.Off();
  }
}

VB

Public Class LightOnCommand
  Implements ICommand

  Private light As Light

  Public Sub New(ByVal light As Light)
    Me.light = light
  End Sub

  Public Sub Execute() Implements ICommand.Execute
    Me.light.On()
  End Sub

End Class

Public Class LightOffCommand
  Implements ICommand

  Private light As Light

  Public Sub New(ByVal light As Light)
    Me.light = light
  End Sub

  Public Sub Execute() Implements ICommand.Execute
    Me.light.Off()
  End Sub

End Class

Commandを登録して、実際に起動するInvokerを定義します。コード例ではRemoteControllerとして、On、OffそれぞれのCommandを登録できるようにしています。

C#

public class RemoteController
{
  private ICommand onCommand;
  public ICommand OnCommand
  {
    set
    {
      this.onCommand = value;
    }
  }

  private ICommand offCommand;
  public ICommand OffCommand
  {
    set
    {
      this.offCommand = value;
    }
  }

  public void OnButtonWasPressed()
  {
    if (this.onCommand == null)
    {
      return;
    }
    this.onCommand.Execute();
  }

  public void OffButtonWasPressed()
  {
    if (this.offCommand == null)
    {
      return;
    }
    this.offCommand.Execute();
  }
}

VB

Public Class RemoteController

  Private _onCommand As ICommand
  Public WriteOnly Property OnCommand() As ICommand
    Set(ByVal value As ICommand)
      Me._onCommand = value
    End Set
  End Property

  Private _offCommand As ICommand
  Public WriteOnly Property OffCommand() As ICommand
    Set(ByVal value As ICommand)
      _offCommand = value
    End Set
  End Property

  Public Sub OnButtonWasPressed()
    If Me._onCommand Is Nothing Then
      Return
    End If
    Me._onCommand.Execute()
  End Sub

  Public Sub OffButtonWasPressed()
    If Me._offCommand Is Nothing Then
      Return
    End If
    Me._offCommand.Execute()
  End Sub

End Class

実行してみましょう。Clientでは次のようにCommandを使用します。

C#

public class Program
{
  public static void Main(string[] args)
  {
    // Invokerのインスタンス作成
    RemoteController remoCon = new RemoteController();

    Console.WriteLine("■Lightに対してCommand実行");

    // Reciever:Lightのインスタンス作成
    Light light = new Light();

    light.DisplayState();

    // Light用Command作成
    LightOnCommand lightOnCommand = new LightOnCommand(light);
    LightOffCommand lightOffCommand = new LightOffCommand(light);

    // Light用CommandをInvokerに設定
    remoCon.OnCommand = lightOnCommand;
    remoCon.OffCommand = lightOffCommand;

    // InvokerよりOnCommand実行
    remoCon.OnButtonWasPressed();

    light.DisplayState();

    // InvokerよりOffCommand実行
    remoCon.OffButtonWasPressed();

    light.DisplayState();

    Console.ReadKey();
  }
}

VB

Public Class Program

  Public Shared Sub Main(ByVal args As String())
    ' Invokerのインスタンス作成
    Dim remoCon As New RemoteController()

    Console.WriteLine("■Lightに対してCommand実行")

    ' Reciever:Lightのインスタンス作成
    Dim light As New Light()

    light.DisplayState()

    ' Light用Command作成
    Dim lightOnCommand As New LightOnCommand(light)
    Dim lightOffCommand As New LightOffCommand(light)

    ' Light用CommandをInvokerに設定
    remoCon.OnCommand = lightOnCommand
    remoCon.OffCommand = lightOffCommand

    ' InvokerよりOnCommand実行
    remoCon.OnButtonWasPressed()

    light.DisplayState()

    ' InvokerよりOffCommand実行
    remoCon.OffButtonWasPressed()

    light.DisplayState()

    Console.ReadKey()
  End Sub

End Class

上記のクラス、インターフェイスの関連をクラス図で現わすと、次のようになります。

それでは、コードを実行してみましょう。

ClientはInvokerに登録されたCommandを通して、Recieverの動作を呼び出していることがわかります。

そして、Commandを入れ替えれば、他のRecieverに対しても処理を行うことが可能です。

例えばCDPlayerに対する処理を行うとして、次のようにReciever、Commandを新たに作成し、Clientのコードを変更します。このとき、Invoker、すでに作成されたCommandへの変更を行う必要はありません。

C#

public class CDPlayer
{
  enum State
  {
    Play
    , Stop
  }

  private State state = State.Stop;

  public void Play()
  {
    this.state = State.Play;
    Console.WriteLine("CDが再生されました");
  }

  public void Stop()
  {
    this.state = State.Stop;
    Console.WriteLine("CDが停止されました");
  }

  public void DisplayState()
  {
    if (this.state == State.Play)
    {
      Console.WriteLine("CDは再生中です");
    }
    else
    {
      Console.WriteLine("CDは停止中です");
    }
  }
}

public class CDPlayerPlayCommand : ICommand
{
  private CDPlayer player;

  public CDPlayerPlayCommand(CDPlayer player)
  {
    this.player = player;
  }

  #region ICommand メンバ

  public void Execute()
  {
    this.player.Play();
  }

  #endregion
}

public class CDPlayerStopCommand : ICommand
{
  private CDPlayer player;

  public CDPlayerStopCommand(CDPlayer player)
  {
    this.player = player;
  }

  #region ICommand メンバ

  public void Execute()
  {
    this.player.Stop();
  }

  #endregion
}

public class Program
{
  public static void Main(string[] args)
  {
    // Invokerのインスタンス作成
    RemoteController remoCon = new RemoteController();

    Console.WriteLine("■CDPlayerに対してCommand実行");

    // Reciever:CDPlayerのインスタンス作成
    CDPlayer player = new CDPlayer();

    player.DisplayState();

    // CDPlayer用Command作成
    CDPlayerPlayCommand playCommand = new CDPlayerPlayCommand(player);
    CDPlayerStopCommand stopCommand = new CDPlayerStopCommand(player);

    // CDPlaer用CommandをInvokerに設定
    remoCon.OnCommand = playCommand;
    remoCon.OffCommand = stopCommand;

    // InvokerよりOnCommand実行
    remoCon.OnButtonWasPressed();

    player.DisplayState();

    // InvokerよりOffCommand実行
    remoCon.OffButtonWasPressed();

    player.DisplayState();


    Console.ReadKey();
  }
}

VB

Public Class CDPlayer

  Private Enum BehaviorState
    Play
    [Stop]
  End Enum

  Private state As BehaviorState = BehaviorState.[Stop]

  Public Sub Play()
    Me.state = BehaviorState.Play
    Console.WriteLine("CDが再生されました")
  End Sub

  Public Sub [Stop]()
    Me.state = BehaviorState.[Stop]
    Console.WriteLine("CDが停止されました")
  End Sub

  Public Sub DisplayState()
    If Me.state = BehaviorState.Play Then
      Console.WriteLine("CDは再生中です")
    Else
      Console.WriteLine("CDは停止中です")
    End If
  End Sub

End Class

Public Class CDPlayerPlayCommand
  Implements ICommand

  Private player As CDPlayer

  Public Sub New(ByVal player As CDPlayer)
    Me.player = player
  End Sub

  Public Sub Execute() Implements ICommand.Execute
    Me.player.Play()
  End Sub

End Class

Public Class CDPlayerStopCommand
  Implements ICommand

  Private player As CDPlayer

  Public Sub New(ByVal player As CDPlayer)
    Me.player = player
  End Sub

  Public Sub Execute() Implements ICommand.Execute
    Me.player.Stop()
  End Sub

End Class

Public Class Program

  Public Shared Sub Main(ByVal args As String())
    ' Invokerのインスタンス作成
    Dim remoCon As New RemoteController()

    Console.WriteLine("■CDPlayerに対してCommand実行")

    ' Reciever:CDPlayerのインスタンス作成
    Dim player As New CDPlayer()

    player.DisplayState()

    ' CDPlayer用Command作成
    Dim playCommand As New CDPlayerPlayCommand(player)
    Dim stopCommand As New CDPlayerStopCommand(player)

    ' Light用CommandをInvokerに設定
    remoCon.OnCommand = playCommand
    remoCon.OffCommand = stopCommand

    ' InvokerよりOnCommand実行
    remoCon.OnButtonWasPressed()

    player.DisplayState()

    ' InvokerよりOffCommand実行
    remoCon.OffButtonWasPressed()

    player.DisplayState()

    Console.ReadKey()
  End Sub

End Class

CDPlayerの動作に変更されたことが確認できました。

さて、以上がCommandパターンの基本形です。

次回は、複数のCommandをまとめて呼び出す方法について紹介します。

福岡に来ています

Fri, 21 Nov 2008 14:20:00 GMT

明日は福岡勉強会です。

今日は前ノリで福岡に来ています。

皆さんも当日でも入れますので、是非いらっしゃってください。

こんにちは。うつせみです。
わんくま同盟福岡勉強会 #04に登録ありがとうございます。
いよいよ明日は開催です。

http://www.wankuma.com/seminar/20081122fukuoka04/Default.aspx
場所は　福岡市博多区博多駅東2丁目17-5　A.R.Kビル　第二会議室です。

現地までは
http://www.wankuma.com/seminar/20081122fukuoka04/Default.aspx
を参考にしてください。

【資料について】
資料を希望されている方は450円となります。
できるだけお釣りの不要なように準備をしてきてください。よろしくおねがいします。

【懇親会について】
懇親会に参加される方は4000円になります。
学生（社会人学生は除く）の方は2000円です。当日学生証を確認させてください。
追加は何名でもいけると思いますので、当日受付で確認させてください。

参加費は「お代は見てのお帰りだい」方式ですので、お帰りの際に所定の箱にお願いします。何口でもOK(^^
特にプロジェクタ・ビデオのカンパ期待しています。よろしくおねがいします。

喫煙される方などは係りの指示に従っていただきますようにお願いします。

    * 10:00 ～ 10:10 わんくまについて
    * 10:10 ～ 11:00 「WPFの初歩の初歩」うつせみ lv1くまー
    * 11:10 ～ 12:00 「DBパフォーマンスチューニングの基礎」おいろん lv1くまー
    * 12:00 ～ 12:30 おひるごはん
    * 12:30 ～ 13:00 ライトニングトーク５分間の真剣勝負
          odolan
          oうつせみ（虚蝉）
    * 13:00 ～ 14:00 「yieldについて」るーごん lv1くまー
    * 14:10 ～ 15:10 「ありうべき日本語処理とは」中博俊 lv1くまー
    * 15:20 ～ 16:20 「素人でもわかるWeb標準(1)」hirotow Lv1～2くまー
    * 16:30 ～ 17:30 「匠の伝承ｗ（PART3：マルチな時代の設計と開発」ゆーちlv3くまー
    * 18:00 ～懇親会～

[Excel][VBA]Tips：オートシェイプ内にて表示されている文字列を設定する

CH3COOH — Fri, 21 Nov 2008 11:32:00 GMT

オートシェイプ内に表示されている文字列(テキスト)に
任意の文字列を設定し表示します。

''' <summary>
'''　オートシェイプに文字列を設定する
''' </summary>
''' <param name="sheetName">シート名</param>
''' <param name="shapeName">シェイプ名</param>
''' <param name="text">表示する文字列</param>
''' <returns>
'''  無し
''' </returns>
Public Sub SetShapeText(sheetName As String, shapeName As String, text As String)

    ' ワークシートのオブジェクトを取得
    Dim tempSheet As Worksheet
    Set tempSheet = Worksheets(sheetName)

    ' シェイプのオブジェクトを取得
    Dim tempShape As shape
    Set tempShape = tempSheet.Shapes(shapeName)

    ' シェイプにテキストを設定する
    tempShape.TextFrame.Characters.text = text

End Sub

特定のシートが表示された時に、
ワークシート"Sheet1"のシェイプ"shikaku"に表示されている文字列を
「Piyo」に変更する場合は、下記の様なコードを書く事が出来ます。

Private Sub Worksheet_Activate()

 ' ワークシート"Sheet1"のシェイプ"shikaku"に「piyo」を設定する
    Call SetShapeText("Sheet1", "shikaku", "piyo")

End Sub

シートを開くと、シェイプ"shikaku"に「piyo」が表示されているのが確認出来ます。

[Excel][VisualBasic]Excel.XlColorIndexの標準カラーのインデックスの値

CH3COOH — Fri, 21 Nov 2008 11:18:00 GMT

Excel.XlColorIndexはRGB値ではなく、
標準カラーパレットのインデックス値で持っています。
インデックス値をRGB値に変換してみました。

    Public Function ColorIndexToRGB(ByVal xlColorIndex As Integer) As Integer() 

        Dim ht As New Hashtable
        '                         ↓↓左からR、G、B値
        ht.Add(1,  New Integer() {&HFF, &H0,  &H0,  &H0 })
        ht.Add(2,  New Integer() {&HFF, &HFF, &HFF, &HFF})
        ht.Add(3,  New Integer() {&HFF, &HFF, &H0,  &H0 })
        ht.Add(4,  New Integer() {&HFF, &H0,  &HFF, &H0 })
        ht.Add(5,  New Integer() {&HFF, &H0,  &H0,  &HFF})
        ht.Add(6,  New Integer() {&HFF, &HFF, &HFF, &H0 })
        ht.Add(7,  New Integer() {&HFF, &HFF, &H0,  &HFF})
        ht.Add(8,  New Integer() {&HFF, &H0,  &HFF, &HFF})
        ht.Add(9,  New Integer() {&HFF, &H80, &H0,  &H0 })
        ht.Add(10, New Integer() {&HFF, &H0,  &H80, &H0 })
        ht.Add(11, New Integer() {&HFF, &H0,  &H0,  &H80})
        ht.Add(12, New Integer() {&HFF, &H80, &H80, &H0 })
        ht.Add(13, New Integer() {&HFF, &H80, &H0,  &H80})
        ht.Add(14, New Integer() {&HFF, &H0,  &H80, &H80})
        ht.Add(15, New Integer() {&HFF, &HC0, &HC0, &HC0})
        ht.Add(16, New Integer() {&HFF, &H80, &H80, &H80})
        ht.Add(33, New Integer() {&HFF, &H0,  &HCC, &HFF})
        ht.Add(34, New Integer() {&HFF, &HCC, &HFF, &HFF})
        ht.Add(35, New Integer() {&HFF, &HCC, &HFF, &HCC})
        ht.Add(36, New Integer() {&HFF, &HFF, &HFF, &H99})
        ht.Add(37, New Integer() {&HFF, &H99, &HCC, &HFF})
        ht.Add(38, New Integer() {&HFF, &HFF, &H99, &HCC})
        ht.Add(39, New Integer() {&HFF, &HCC, &H99, &HFF})
        ht.Add(40, New Integer() {&HFF, &HFF, &HCC, &H99})
        ht.Add(41, New Integer() {&HFF, &H33, &H66, &HFF})
        ht.Add(42, New Integer() {&HFF, &H33, &HCC, &HCC})
        ht.Add(43, New Integer() {&HFF, &H99, &HCC, &H0 })
        ht.Add(44, New Integer() {&HFF, &HFF, &HCC, &H0 })
        ht.Add(45, New Integer() {&HFF, &HFF, &H99, &H0 })
        ht.Add(46, New Integer() {&HFF, &HFF, &H66, &H0 })
        ht.Add(47, New Integer() {&HFF, &H66, &H66, &H99})
        ht.Add(48, New Integer() {&HFF, &H96, &H96, &H96})
        ht.Add(49, New Integer() {&HFF, &H0,  &H33, &H66})
        ht.Add(50, New Integer() {&HFF, &H33, &H99, &H66})
        ht.Add(51, New Integer() {&HFF, &H0,  &H33, &H0 })
        ht.Add(52, New Integer() {&HFF, &H33, &H33, &H0 })
        ht.Add(53, New Integer() {&HFF, &H99, &H33, &H0 })
        ht.Add(54, New Integer() {&HFF, &H99, &H33, &H66})
        ht.Add(55, New Integer() {&HFF, &H33, &H33, &H99})
        ht.Add(56, New Integer() {&HFF, &H33, &H33, &H33}) 

        Return ht(xlColorIndex)
    End Function

xlColorIndexAutomaticは、-4105、xlColorIndexNoneは、-4142なのですが、
これらに関しては変換していません。

でも標準カラーパレットの色が変わったらどうしようかなぁ……
別の方法で取得する事を考えなきゃ。

[Excel][VBA]Tips：オートシェイプに登録したマクロ名を取得する

CH3COOH — Fri, 21 Nov 2008 11:15:00 GMT

オートシェイプに登録されたマクロ名を取得します。

''' <summary>
'''　オートシェイプに登録されているマクロ名を取得する
''' </summary>
''' <param name="sheetName">シート名</param>
''' <param name="shapeName">シェイプ名</param>
''' <returns>
'''  オートシェイプに登録されているマクロ名
''' </returns>
Public Function GetShapeActionMacro(sheetName As String, shapeName As String) As String

    ' ワークシートのオブジェクトを取得
    Dim tempSheet As Worksheet
    Set tempSheet = Worksheets(sheetName)

    ' シェイプのオブジェクトを取得
    Dim tempShape As shape
    Set tempShape = tempSheet.Shapes(shapeName)

    ' シェイプに登録されたマクロ名を取得
    Dim retMacroName As String
    retActionMacro = tempShape.OnAction
    GetShapeActionMacro = retActionMacro

End Function

ワークシート"Sheet1"のシェイプ"shikaku"に登録されているマクロ名を
取得する場合には、下記の様なコードを書く事が出来ます。

Private Sub Worksheet_Activate()

    Dim sctionMacroName As String
    sctionMacroName = GetShapeActionMacro("Sheet1", "shikaku")

    MsgBox "Sheet1のシェイプshikakuの登録マクロは「" & sctionMacroName & "」です"

End Sub

シートを開くと、あらかじめ登録していたマクロ「Sheet1.hogeMacro」が
取得出来ているのが確認出来ます。

iPhone 2.2 登場。絵文字を使うには･･･？

囚人 — Fri, 21 Nov 2008 11:12:00 GMT

iPhone 2.2 が登場。さて肝心の絵文字の使い方は、

設定 → 一般 → キーボード → 各国のキーボード → 日本語 → 絵文字

を「オン」にすれば OK！

できるヤツから離れていく

はなおかじった — Fri, 21 Nov 2008 10:31:00 GMT

ネタもと：護送船団方式→1メソッドは 50行以内

誰もができる→ダメダメな奴でもできる→できん子に足並み揃える

いやだ。。。

できん子は、あるいは「新人」に置き換えてもいいと思います。←これは、知識がたまっていないという意味です。

彫刻や絵画などの、手を動かす技術者は、何度も同じことを繰り返すことで、より短い時間、より少ない手間で同じものを作り、また、より美しいものを作ることができるようになります。ここに護送船団方式はあり得ません。言うなれば、「快速船方式」でしょうか。できるヤツに合わさなければ、売り物にならないのです。

しかし、ソフトウェア業界では、中身と外見が一致しないことがあります。どんな汚いコードでも、要望がかなっていれば良しとされます。そのため、護送船団方式が通ります。

このとき、できる人とできない人の差は、知識です。

επιστημηさんが書かれるコードは、時々理解できません。それは、私に STL の知識がないからです。Ｒ・田中一郎さんが書かれるコードが、時々理解できません。それは、私にラムダ式の知識がないからです。

じゃぁ、この3人が一緒に仕事をすることになったとき、どうするでしょう？個人組合であれば、それぞれがそれぞれの力量で行います。しかし、企業では、一番知識のない人、つまり私が理解できるコードを書くことが強要されます。なぜなら、新卒もまた、わからないと思われ、メンテナンスを担当することになってしまった人が理解できるかどうか、わからないからです。

できる人にとっては、面白くないですよね。第一、向上心が削がれます。できる、できないの差は、ここにこそあるはずです。そこを「評価しない」と言っているにも等しいことです。

結果。できる人から離れていく(辞めていく)ということになるでしょう。

言葉が生まれる瞬間

はなおかじった — Fri, 21 Nov 2008 10:28:00 GMT

いまだに検索キーワードとしてトップを走っている「押下」ですが、なんと！「言葉を広めたのは私かもしれない」という方からコメントをいただけました！！コメントとして埋もらせてしまうのはもったいないと思い、エントリとして取り上げて良いかと尋ねたところ、了解をいただきましたので、ここに引用してきます。

それは私かもより：

１９８４年頃、ある大手生保の端末システムの基本設計書を記述しているとき、画面の操作説明を記述する際、「Ｆ２キーを○○する」と言う文章の○○に何を使うか半日ほど悩みました。
「押す」では前方の物を向こうに押すニュアンスがある、「打鍵」ではピアノの様に叩くニュアンスがあり、字面的に「押下」が一番ピッタリで、広辞苑で調べても載って無く、漢字辞典で調べてもソンな言葉はありません。

しかし一度「押下」と言う字を頭に刷り込むとそれ以外は思いつかなくなり、「押下」で基本設計書を作成し、提出しました。

設計書のレビューの時に「この字はなんて読むの」と聞かれたとき赤面しながら「”おうか”と読んでます」と応えたのを覚えています。

その頃は、まだワープロもなく手書きで設計書を作っていた頃でしたので、どこかの文章を引用したのでは無いと思います。

その大手生保の端末システムは、日本の大手コンピュータメーカで、ホストシステムはＩＢＭでしたので、その後主にその２社を中心に「押下」が蔓延していったのだと思います。

すごい！！一度「押下」と言う字を頭に刷り込むとそれ以外は思いつかなくなりって、ありますね。言葉が思いつかなくて、「＊＊ということなんだけど、それよりもっといい言葉…」と思っていると、「＊＊」がもう頭から離れなくて、「それでいいや」となってしまう。でも、初めて見た人にでも、意味しているところは通じているのですからすごいですよね。

情報をいただきましたu_2さん、ありがとうございます。

Live Search で「押下」を検索すると、関連検索として、「押下とは」「押下読み方」が出てきます。Google では他に「押下対義語」がありますね。ほぇ～

あらゆる可能性に思いを馳せる

はなおかじった — Fri, 21 Nov 2008 10:26:00 GMT

スレッドについて（Insider.NET 会議室）より：

言語：Visual Stdio2008 C#
プロジェクト形態：Windowsサービス

１つのスレッドで、複数（5種類）のメソッドに優先順位をつけて同期処理したいの
ですがどのようなスレッドの作りにしたらいいでしょうか？
スレッドについてのアドバイスをご教授下さい。

すてき。。。

「1つのスレッドで」と書いてあるのに、いくつかのメソッドを「同期処理したい」とは、どんな感じ？

と思ったら、メソッドを逐次処理したい、と。

締め切りが迫って焦っているのかなぁ？だったら掲示板なんかで聞いてないで、上司に相談した方がいいよ。

で終わると、ネタにならないので。

いったい質問者は、どんなことを聞いて、プログラムを始めたのでしょう？このスレッドに出ている情報だけでは、正しく安全なプログラムを作ることはできません。

まず、メソッド A～D の内容がわかりません。「投稿日時: 2008-11-20 10:37」には、あるメソッドが終了しない状態になった場合、各メソッドをタイムアウトで終了させようと考えていますとあります。A～D のメソッドで行う処理は、いつでも中断して良いのでしょうか。

例えばですね、ファイルを処理します。具体例を出すと、Microsoft Office の場合、ファイルの第2ストリーム？か何かに、使用中であることを記録します。そのため、他のインスタンスから同じファイルを使用しようとすると、「＊＊が使用中です」というメッセージが出ます。時々、この記録を消さずに死んでくれるときがあります。そうすると、編集できなくなってしまいます、何とかしてください。。。

メソッド A～D の間に、そういう処理はないのかな、と。そもそも、なぜ「30秒周期」なのか。その「30秒周期」というのは、どのようなことを検討して、どのようにして妥当性を確認したのか。

また、メソッド A～D は、どれくらいの時間で終了することが見込まれるのか。それは、どのような条件で計測したものなのか。どのような条件だと、どれくらい遅くなるのか。どうやってそれを計測して、どのように分析したのか。

んと。情報処理技術者試験（プロジェクトマネージャ）にでます。マジで。過去、遭遇しました。プロジェクトマネージャなんかじゃないから関係ない？じゃぁ、あなたがプロマネから質問されたら、どう答えます？

はい。あらゆる可能性に思いを巡らせましょう。抜けるのは仕方がないことです。また、普通はあり得ないけど、あってもおかしくない可能性というものもあります。例えば、「ネズミがケーブルをかじった為に停電した」とか。実際にあったことですが、まずあり得ないことです。そんなところまでは、必要ありません。線引きも大事です。

読み直していて気がついたのだけど、A～D？4つしかあらへんやん！！

不用意に投げ出（キャスト）さない

はなおかじった — Fri, 21 Nov 2008 10:25:00 GMT

一行で書くのは難しいなぁ。ルビ使っても、IE 以外は一行になるしなぁ。。。(タイトル)

閑話休題。ネタ元から。

Formを閉じたときの処理（わんくま掲示板）より：

No 28057
■No28055 (のろさん) に返信
> (2)classの中でprivate Form1 f1;と宣言しておき、Form2が呼び出されたとき、Form1を引数に入れる。

>
> public Form2(Form1 form1)
> {
> InitializeComponent();
> f1 = form1;
> }
>

こんなことしなくても、f2.ShowDialog(this); とすれば、OwnerプロパティでForm1が参照できます。

No 28134
# それと Owner は情報を得るために設定するものではないと思います。
# Owner から取得するくらいならフツーにプライベートメンバで厳密な型を設定した方がマシです。

これ、じゃんぬさんに賛成。理由は、Owner から参照するなら、キャストをしなければならないから。

キャストする、ってこと以外でも、ここで Form2 が他のフォームから表示される可能性について考えなければなりません。その場合、インターフェイスでもってプロパティを用意することになるでしょう。

ってなわけで、cast、投げるという意味もあるので、「不用意に投げ出さない」というタイトルにしてみました。

社内でＣプログラミング診断室というページが紹介されていることに気がつきました。最後に仲間にも本ページのURLや、本の存在を知らせるのですよ。とあるので、義務を果たすことにします。ここにね、あるんですよ(苦笑)

タニシタニシタニシタニシタニシタニシ...

とっちゃん — Fri, 21 Nov 2008 09:03:00 GMT

某所でいっぱいいるよー。と言っていたタニシです。お食事中ではない夜中の一シーンなので散らばってます。

ご先祖様１号(殻の大きさで、４センチくらい)

子孫最新号

上から(中央に...)

横から

ちなみに、餌(余ってる金魚のえさｗ)を上げないと大きいやつがいなくなります。意外ともろいんですよねぇ。。。ｗ

[写真] 夕焼け

りょーいち — Fri, 21 Nov 2008 08:04:00 GMT

最近夕焼けがきれいです。
仕事してる部屋は西向きなので、最近は夕方になるとブラインド開けてちょっと和んでます。

インフルエンザ予防接種の補助開始

kox@wankuma.com — Fri, 21 Nov 2008 05:35:00 GMT

うちの会社でインフルエンザ予防接種の補助が受けられるようになりました。（今のところ家族分あり＋全額負担）

福利厚生の一環で強制ではありませんが、インフルエンザになってしまうと業務に多大な影響を与えてしまいますので、

なるべく受けていただきたいですね。

#家族は受けましたが、まだ自分は受けてませんorz

暗号の2010年問題

nakaP — Fri, 21 Nov 2008 04:10:00 GMT

ネタ元：[ITMedia]暗号の2010年問題--「運用見直しが迫る」とRSA

あまり詳しくは無いのですが。

技術の進歩により、PCなども性能が飛躍的に向上してます。

PCの処理速度が上がるのはよいことなのでしょうが、こういった負の面もあります。

「悪いことしないでくれ」って言っても聞かない人もいますからね・・・。

いたちごっこはいつまでも続くのでしょうね。

[写真] ご飯タイムその２

りょーいち — Fri, 21 Nov 2008 02:27:00 GMT

昨日の写真撮ってる最中の別の一枚ｗ

タイムスタンプ

Ｒ・田中一郎 — Fri, 21 Nov 2008 01:40:00 GMT

例えば「いつ」「何をした」を記録に取る必要があるとします。
この記録を、世界中で行うとします。
更に、世界中の記録をマージして時系列に並べる必要があるとします。

さて、ここで問題が生じます。

何故なら、今この瞬間の時刻は、世界中の国が同じ訳ではないからです。

各国の時刻を元に「何をした」をリストアップする仕様なら、システムの日時を取得するだけで良いのですが、何をしたのかを時系列で並べる場合は、世界中で共通な日時を使う必要が生じます。

ここで登場するのが

UTC(協定世界時)

です。

以前は、GMT(グリニッジ標準時)を使うのが一般的でしたが、今は UTC を使う場合が増えているそうです。

ちなみに日本の場合は、UTC の時刻より 9 時間進んでいます。
従って、システム日時から UTC を得るには 9 時間分の時間を遅らせれば良いのです。

しかし、これらの詳細を自分で処理しなくても C# では以下のように簡単に処理することができます。

DateTime utc = DateTime.UtcNow;

ローカル時刻と UTC の変換は以下の通りです。

DateTime utc = local.ToUniversalTime();
DateTime local = utc.ToLocalTime();

以上、今調べたことのメモ終了です。
さて、修正作業開始だ orz

ちょっと疑問に思ったのですが・・・

UTC とローカル時刻の差分ってコンパネのタイムゾーンから取得しているのですか？
サマータイムが導入されている国の場合でも正しく UTC 時刻を得られるのですか？

今日のニュース脊髄反射

αετος — Fri, 21 Nov 2008 01:39:00 GMT

MS、有料セキュリティサービス「Windows Live OneCare」と「Equipt」の中止へ

OneCare って登場当初に買ったけど、全然使わずに解約したなぁ。
ちなみに OneCare って名前がつくものには、

Windows Live OneCare
Windows Live OneCare PC セーフティ
Windows Live OneCare PC セーフティ（同名の Windows Live Messenger 用スキャンツール）
Windows Live OneCare ファミリーセーフティ
Windows Live OneCare for Server

なんてのがあるけど、全部移行するのかな？

舌の根も乾かぬうちに激変したGoogle Mobile App - builder by ZDNet Japan

携帯電話での音声入力のサポートは、それほど目新しい話ではない（日本の携帯キャリアも数年前から実施している）ものの、やはりGoogle謹製であることがポイントなのだと思う。

Googleに期待を寄せる理由は、ここ日本でもストリートビューを実現したように、力業で膨大な量のデータを集めてしまう同社の「凝り性」な性質にある。

最近の流れで行くと、その集めたデータを全部ぶちまけてしまう性質もありそうだけど…

MS、スタートアップのベンチャー企業を支援する「Microsoft BizSpark」--開発環境などを無償提供:ニュース - CNET Japan

ウチの会社にも導入を提案してみようかなぁ。

「護送船団方式」と「属人性の排除」

επιστημη — Fri, 21 Nov 2008 01:29:00 GMT

ネタ元 → 1メソッドは 50行以内

んー...理解できるが納得できないルール。
縛りを与えておかないとヘタな奴がだらだらとベタ書きしますか。

護送船団方式てぇやつですわね。

護送船団：
　　船団の中で最も速度の遅い船に速度を合わせて、全体が統制を確保しつつ進んでいくこと

まぁ、いちばん遅い船にみんながあわせれば落伍者は出ないでしょうけどねぇ...

TechEd2008のBoFで「属人性の排除」の話が出たんです。
特定の誰とかさんじゃなきゃ知らない/できない事をなくしましょう、と。
それが望ましいことだとは思います。
が、ともすると護送船団方式になりそうで怖い。
誰もができる→ダメダメな奴でもできる→できん子に足並み揃える
てーことになりゃせんかと心配します。

[追記]
思うにそもそもcreativeな作業を必要とするところに
属人性の排除を求めていいものかしら。
それは個々のcreativityを押し殺せと命じるに等しいんじゃないかしら。
青写真通りに組み立てる製造ラインならともかくも、
研究部門から属人性を抜いたらそりゃまさしく"骨抜き"ですよね。
ソフト屋さんのお仕事には製造ライン的なとこもあれば研究部門的な
とこもありますよねぇ。

「誰にもできるはずのこと」を誰にもできるようにしようって意味での
属人性の排除であれば賛成します。
個々のcreativityを発揮するのに足枷となる(誰にもできるはずの)雑事
から開放され、「ヤツにしかできないこと」を存分にやらせてあげられるなら。

してみると「1メソッドは 50行以内」ってなルールが設けられるのは
「codingはcreativeな工程じゃない」ってことでしょか。
coding大好きなεπιには寂しいなー...

Unity と PIAB を連携させる

なかむら — Fri, 21 Nov 2008 00:54:00 GMT

はじめに

Unity と Policy Injection Application Block (以下 PIAB) と連携させてみました。

カスタム Callhandler とカスタム HandlerAttribute

[ConfigurationElementType(typeof(CustomCallHandlerData))]
public class EventLogCallHandler : ICallHandler
{
    public int Order { get; set; }

    public EventLogCallHandler(NameValueCollection attributes)
    {
        // このコンストラクタは必須みたい
    }

    private const string SOURCE = "PIABSample";

    public IMethodReturn Invoke(IMethodInvocation input, GetNextHandlerDelegate getNext)
    {
        // メソッド呼び出し前にログを出力
        EventLog.WriteEntry(SOURCE,
            string.Format("{0} メソッドを呼び出します。", input.MethodBase.Name),
            EventLogEntryType.Information);

        // メソッド呼び出し
        IMethodReturn result = getNext()(input, getNext);

        // メソッド呼び出し後にログを出力
        if (result.Exception != null)
        {
            // 例外が発生したとき
            EventLog.WriteEntry(SOURCE,
            string.Format("{0} メソッド呼び出しで例外が発生しました。", input.MethodBase.Name),
            EventLogEntryType.Error);
        }
        else
        {
            EventLog.WriteEntry(SOURCE,
            string.Format("{0} メソッドを呼び出しました。", input.MethodBase.Name),
            EventLogEntryType.Information);
        }

        return result;
    }
}

public class EventLogCallHandlerAttribute : HandlerAttribute
{
    public override ICallHandler CreateHandler()
    {
        return new EventLogCallHandler();
    }
}

『PIAB で属性を使ってインターセプト対象メソッドを指定する』のエントリで作成したものを流用します。

DI で使用するインタフェースとクラスを用意

public interface IAnimal
{
    // Cry メソッド呼び出し時にイベントログを出力する
    [EventLogCallHandler]
    void Cry();
}

public class Wankuma : IAnimal
{
    public void Cry()
    {
        Console.WriteLine("クマ～");
    }
}

public class Person
{
    [Dependency]
    public IAnimal Pet { get; set; }

    public void CallPet()
    {
        Pet.Cry();
    }
}

毎度おなじみのインタフェースとクラスです^^;

PIAB と Unity を連携させるために UnityContainerExtension を作成

ここからが本番。

public class EventLogExtension : UnityContainerExtension
{
    protected override void Initialize()
    {
        // ここで登録した PolicyIjectionPolicy は次に登録する
        // PolicyInjectionStrategy で使われます。
        Context.Policies.SetDefault<IPolicyInjectionPolicy>(new PolicyInjectionPolicy(true));
        
        // Unity がインスタンスを生成するパイプラインの PreCreation ステージで、
        // PolicyInjectionStrategy の処理が実行されるように登録します。
        Context.Strategies.AddNew<PolicyInjectionStrategy>(UnityBuildStage.PreCreation);
    }
}

PolicyInjectionStrategy は登録した PolicyInjectionPolicy を使って、Unity が生成したインスタンスに PIAB のポリシーを適用します。つまり RealProxy の派生クラスでラップする。この辺りは『PIABの中身を見てみた』のエントリを見て下さい。

Strategies や Policies がどう利用されるのかについては、後でエントリにする予定です。

作成した UnityContainerExtension を使ったコードに修正

static void Main(string[] args)
{
    // DI コンテナ取得
    UnityContainer container = new UnityContainer();

    // DI コンテナを拡張
    container.AddNewExtension<EventLogExtension>();

    // 型を登録
    container.RegisterType<IAnimal, Wankuma>();

    // インスタンスを取得
    Person person = container.Resolve<Person>();

    // ペットを呼び出す
    person.CallPet();

    Console.ReadLine();
}

作成した EventLogExtension を使って、UnityContainer を拡張しています。

このコードを実行すると、CallPet メソッド内で Cry メソッドが呼ばれる前後にイベントログが出力されます。

まとめ

Unity と PIAB の連携は、UnityContainer のインスタンス生成処理のパイプラインに、ポリシーを適用する処理を組み込むための UnityContainerExtension を作成することで実現可能です。

あさめしパクパクにゃ～

出水洸太郎 — Thu, 20 Nov 2008 21:38:00 GMT

検索くんを導入してみました。

RSSから見ている人には一度サイトを見てください。
左のところにこんなものが追加されています。

要は、YahooやGoogleから飛んできたユーザーがいた場合、
そのキーワードを拾って、順位を表示するプラグインです。

ちなみに、私のBlogはこんな感じ。
「女装」とか「変態」とかのキーワードで引っかかることもない
非常に健全なBlogとなっているようです。

Blogの設定変更でRefererが収集されなくなったので、
残念だなーと思っている人には導入してみてはどうでしょうか。

MSが正式発表：「ＩE8」は2009年に入ってから

おぎわら — Thu, 20 Nov 2008 18:17:00 GMT

http://japan.zdnet.com/sp/feature/07microsoft/story/0,3800083079,20384040,00.htm?ref=rss

拝承

Windows Mobile Xmas 「Touch the Illumination」

おぎわら — Thu, 20 Nov 2008 17:54:00 GMT

Windows Mobile イベント

http://www.microsoft.com/japan/windowsmobile/touch/event/default.mspx

日時 : 2008 年 11 月 22 日 (土) ～ 12 月 25 日 (木)
会場 : 六本木ヒルズ森タワー 52 F　東京シティビュー
主催 : J-WAVE、TOKYO CITY VIEW
特別協賛 : Windows Mobile

おぉ。綺麗・・

1メソッドは 50行以内

Ｏｇｎａｃ — Thu, 20 Nov 2008 16:22:00 GMT

開発標準に1メソッドは50行以内という規約があったりします。
この基準の真意は、50行という数字には意味がなく、この制限を設けないと、べた書きをする開発者が続出するから、仕方なく、設定していると聞きマした。
センスのある開発者は、1メソッドか何百行になっても、読みやすいのでずか、センスがない人は、数十行でも読みにくいです。
1メソッドn行以内という制約を設けることで、べた書きする人が少ないなるそうです。
その趣旨の適用のために、センスのある開発者に「n行制約」で泣いて貰っていると聞きます。
　センスある開発者からみると、「なんで、彼らに足を引っ張られな、あかんねん」という言う分もあるのですが、比率的には、無センスの人が多いのだそうです。プロジェクト運営を円滑にするって難しいものです。
同様な規約に、ループのネストは二重まで、とか、再帰禁止とか継承は二重までとかあるそうです。
「無センスなプログラマの存在を排除せよ」は暴論で否定しますが、健全な開発体制に与える負の要素も感じます。
この矛盾感は解消されないのでしょうね。オフショアで特に感じました。

[Java][Silverlight][NetBeans]Web(Java) + Silverlight2

kazuki@wankuma.com (かずき) — Thu, 20 Nov 2008 16:11:00 GMT

NetBeansも6.5の正式版が出て、Silverlight2も正式版が出たばっかりということなので両方使って簡単なものを作ってみようと思う。
Silverlight2を使うので、クライアント側はSilverlight2を使わなければならない。
なので、サーバーはJavaでWebサービスを作るようにしてみる。

NetBeans側

作るWebサービスは、NetBeansに付属してくるサンプルデータベースの中にあるCUSTOMERテーブルの中身を返すものにしてみる。

とりあえずNetBeansでWebアプリケーションを新規作成する。とりあえず、フレームワークを何も選択しないで素のWebアプリケーションにしてみた。

プロジェクトを作ったらソースパッケージに適当なパッケージ（自分の作ったプログラムではcom.wankuma.kazukiにした）を作ってそこにWebサービスを新規作成する。

新規にサービスを作ると、下のようなエラーが起きる。

クイックフィックスでとりあえずオペレーションを１つ追加する。名前はgetCustomersにした。
とりあえず、戻り値はStringにしておく。

/**
 *
 * @author Kazuki
 */
@WebService()
public class CustomerService {

    /**
     * Web service operation
     */
    @WebMethod(operationName = "getCustomers")
    public String getCustomers() {
        //TODO 実装コードをここに記述します:
        return null;
    }

}

次に、Customerのデータをとってくるためのクラスを作る。
ここはJPAでやろうと思う。新規作成で、データベースからのエンティティークラスを使いCustomerテーブルのエンティティを作成する。
Customerテーブルのエンティティを作ると関連があるのかDiscountCodeクラスも作られる。

DBアクセスの処理を書く前に、Java DB ドライバをライブラリから追加しておく。
そうして、CustomerServiceに以下のようなコードを書く。要は全件とってくるだけ。

@WebService()
public class CustomerService {

    @PersistenceContext
    private EntityManager em;
    /**
     * Web service operation
     */
    @WebMethod(operationName = "getCustomers")
    public CustomerResult[] getCustomers() {
        // DBからデータ取得
        List<Customer> customers = (List<Customer>) em.createQuery("select c from Customer c").getResultList();

        // 戻り値用のリストを作る
        List<CustomerResult> results = new ArrayList<CustomerResult>();
        for (Customer c : customers) {
            // 詰め替え
            CustomerResult result = new CustomerResult();
            result.setCustomerId(c.getCustomerId());
            result.setName(c.getName());
            result.setEmail(c.getEmail());
            results.add(result);
        }
        // 配列にして戻す
        return results.toArray(new CustomerResult[results.size()]);
    }

}

CustomerResultクラスはcustomerIdプロパティとnameプロパティとemailプロパティの３つを持っただけのシンプルなクラスです。もちろんSerializableを実装する形で作る。

これで基本的に完成。Webサービスをテストからテストも可能になってる。

テスト画面は下のような感じになる。

ボタンを押すことで実行結果の確認も出来る。いい感じ。

Silverlight2側

SilverlightJavaという名前でSilverlightアプリケーションを作成する。
まずは、サービス参照を追加する。追加するのはもちろんJavaで作ったサービス。

JavaのサービスのWSDLへのURLを指定すると普通にサービス参照に追加される。
名前をつけるのがめんどくさかったので、とりあえずServiceReference1という名前で参照した。

Page.xaml.csでは、Webサービスを単純に呼び出して結果をDataContextに入れているだけのシンプル実装。

public partial class Page : UserControl
{
    public Page()
    {
        InitializeComponent();
    }

    private void UserControl_Loaded(object sender, RoutedEventArgs e)
    {
        // 処理を呼び出し
        var client = new ServiceReference1.CustomerServiceClient();
        client.getCustomersCompleted += new EventHandler<SilverlightJava.ServiceReference1.getCustomersCompletedEventArgs>(client_getCustomersCompleted);
        client.getCustomersAsync(client);
    }

    void client_getCustomersCompleted(object sender, SilverlightJava.ServiceReference1.getCustomersCompletedEventArgs e)
    {
        // 実行結果をDataContextへ
        DataContext = e.Result;
    }
}

後はXAMLで見た目を整えれば大丈夫。今回はDataGridに単純に表示するだけにした。

<UserControl xmlns:data="clr-namespace:System.Windows.Controls;assembly=System.Windows.Controls.Data"  x:Class="SilverlightJava.Page"
    xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation" 
    xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml" 
    Width="400" Height="300" Loaded="UserControl_Loaded">
    <Grid x:Name="LayoutRoot" Background="White">
        <data:DataGrid x:Name="dataGrid" ItemsSource="{Binding}" />
    </Grid>
</UserControl>

これでSilverlight側もおしまい。

仕上げ

これでWebサービスとSiliverlight2の両方を実行してもエラーが出てしまう。
これは、WebサービスとSilverlightをホストしてるサーバーのドメインが違うからおきてしまうらしい。

まぁSilverlightからWebサービスが呼び放題とかどうよ？って感じになるからね。

これを、呼び出せるようにするにはWebサービス側にclientaccesspolicy.xmlという名前のファイルを置いてやる必要がある。置く場所は、Webサービスのある側のルートに置くらしい。つまり、http://ドメイン/clientaccesspolicy.xmlでアクセスできないといけない。

実際には、何処に何をアクセスさせるか決めないといけないけど、とりあえずは全アクセス許可で作った。

<?xml version="1.0" encoding="utf-8"?>
<access-policy>
  <cross-domain-access>
    <policy>
      <allow-from http-request-headers="*">
        <domain uri="*"/>
      </allow-from>
      <grant-to>
        <resource path="/" include-subpaths="true"/>
      </grant-to>
    </policy>
  </cross-domain-access>
</access-policy>

これをGlassFishのpersonalDomain/docrootに置いて実行する。
今度は無事実行される。

いい感じ。

FolderShare終了、Live Syncへ

Thu, 20 Nov 2008 14:50:00 GMT

　ファイル共有サービスの、Windows Live FolderShareがサービスを終了し、12月からWindows Live Syncがリリースされると開発チームBlog で発表がありました。FolderShareユーザーにはメールも届いています。Blogによると（メールよりBlogの方が情報多い）、Live SyncはFolderShareと比べ

20までのフォルダ、2万までのファイルの同期が可能
Live IDとの統合（FolderShareはLive IDではありませんでした）
ゴミ箱との統合（FolderShareはゴミ箱用フォルダがありました）
WindowsとMacクライアントの提供
Unicodeサポート（FolderShareは日本語が文字化けしていました）

とのこと。Live Syncリリース後にFolderShareは使用できなくなり、Live Syncへのアップグレードが通知されるとあります。アップグレードにより自動でLive Syncへ移行できるようですが、多くのフォルダを同期していた場合、自分で再構築する必要があるようです。

　2005年に買収して、Liveブランドとして今年3月にアップデートされましたが、そのままひっそりと？　終了という感じでしょうか。「The Windows Live Sync (formerly FolderShare) team」とあるので、開発チームは同じなのかな？

[VMWare]VMWare Server 2をVistaに入れる

kazuki@wankuma.com (かずき) — Thu, 20 Nov 2008 14:16:00 GMT

ダウンロードして、キーを登録してインストールは普通に出来た。
YESマンでいいのは素晴らしい。

VMWare Server2でびっくりしたことなんだけど、管理画面がWebベースになっちゃってる。
しかも起動すると証明書がどうのって言われて、ログイン画面までがめんどくさい。

そして、ログイン画面ではAdministratorでログインしないといけない。
Vistaではオフになってるのでログインできない！！
ということでAdministratorを有効にしてパスワード入れてログインする。

後はPermissionというタブで自分のアカウントをAdministratorsのロールで登録しておく。
これでよさげ？

そして、イメージを作成してあまってるOSのCDをドライブにセットして起動！！
とやるとVMWare Remote Console Plug-inのインストールをしないといけないといわれる。

仕方ないのでインストール。因みに画面はこんな感じ。

インストールが終わると、ブラウザが落ちてしまった。（落としますかって聞かれてはいを押したから当然なんだけど）

再度立ち上げてついに起動か！！と思うと次は、「あなたはAdministratorじゃない」みたいなエラーが出ている。

うむぅ…。Administratorで起動しないのがいけなかったのだろうか？
でも、普段使ってるユーザはAdministratorsに属してるんだけどなぁ。ということで、IEを管理者権限で実行して再度挑戦！

そうすると、無事コンソールが起動した！！！やったね。後はインストールするだけだ。

次の山場はネットワークかな…？

今週は福岡勉強会です。

うつせみ（虚蝉） — Thu, 20 Nov 2008 05:09:00 GMT

件名の通り、福岡勉強会が今週末に開催されます。

資料の申し込みはそろそろ終了ですが、
当日飛び込みで来ていただいても席の方は用意できます。

皆様お誘い合わせの上ご参加ください。

詳細・申し込みはこちら

今回、既にやらかしてしまったことに先ほど気づきました。

緊張する人を緊張するタイミングで投入してしまうという
ポカをかましてしまってます。

最大限フォローさせていただきます。

申し訳ないです。

刑事とプログラマの共通点

Ｒ・田中一郎 — Thu, 20 Nov 2008 04:38:00 GMT

刑事とプログラマの共通点

・経験と勘が物をいう

・足を使って情報収集が基本

・まずは疑うことから始める

・容疑者を徹底的に尾行する

・長時間の張り込みをする

・汗だくでホシをあげようとすると、賢い奴が出てきて推理力を働かせて事件を解決してしまう

たった今、果てしない戦いの末、僕なりに出した結論です。
ちなみに、刑事のイメージはドラマから得たものですｗ

PIAB の中身を見てみた

なかむら — Thu, 20 Nov 2008 02:30:00 GMT

はじめに

「使っているものの仕組みをしれ！」みたいな教えを以前受けた気がするので、 Policy Injection Application Block のソースコードを読んでみました。

先日のエントリ『PIABで属性を使ってインターセプト対象メソッドを指定する』で作成したサンプルの

var animal = PolicyInjection.Create<Wankuma>();

の部分で何をやっているのかを、ざっと追っていきます。

PolicyInjection クラス

Create メソッド

public static class PolicyInjection
{
    private static volatile PolicyInjector defaultPolicyInjector;
    private static readonly object singletonLock = new object();

    public static TObject Create<TObject>(params object[] args)
    {
        return DefaultPolicyInjector.Create<TObject>(args);
    }

デフォルトの PolicyInjector を取得して、Create メソッドを呼んでいます。

DefaultPolicyInjector プロパティ

private static PolicyInjector DefaultPolicyInjector
{
    get
    {
        if( defaultPolicyInjector == null)
        {
            lock(singletonLock)
            {
                if(defaultPolicyInjector == null)
                {
                    IConfigurationSource configurationSource =
                        ConfigurationSourceFactory.Create();
                    defaultPolicyInjector = GetInjectorFromConfig(configurationSource);
                }
            }
        }
        return defaultPolicyInjector;
    }
}

private static PolicyInjector GetInjectorFromConfig(IConfigurationSource configurationSource)
{
    PolicyInjectorFactory injectorFactory = new PolicyInjectorFactory(configurationSource);
    return injectorFactory.Create();
}

構成ファイルの内容を PolicyInjectorFactory に渡し、Create メソッドで PolicyInjector を生成してます。初めてこのプロパティを使うときに、1回だけ生成されるみたいですね。

PolicyInjectorFactory クラス

Create メソッド

public class PolicyInjectorFactory
{
    public PolicyInjector Create()
    {
        return EnterpriseLibraryFactory.BuildUp<PolicyInjector>(configurationSource);
    }

EnterpriseLibraryFactory は内部で ObjectBuilder を使って PolicyInjector を生成しています。

PolicyInjector クラス

Create メソッド

[CustomFactory(typeof(PolicyInjectorCustomFactory))]
public abstract class PolicyInjector
{
    public object Create(Type typeToCreate, Type typeToReturn, params object[] args)
    {
        // 構成ファイルや属性をチェックして、型に適用するポリシーを取り出す
        PolicySet policiesForThisType = policies.GetPoliciesFor(typeToCreate);

        // インターセプト可能かどうかチェックする。
        // インターセプト出来ない場合は ArgumentException を発生させる。
        EnsureTypeIsInterceptable(typeToReturn, policiesForThisType);

        return DoCreate(typeToCreate, typeToReturn, policiesForThisType, args);
    }

インターセプト可能かどうかの判断基準は「ポリシーが指定されているか」「MarshalByRefObject を継承しているか」など。PolicyInjector の実装によって異なります。あと、実際にインスタンスを生成しているのは DoCreate メソッド。

DoCreate メソッド

protected virtual object DoCreate(Type typeToCreate, Type typeToReturn, PolicySet policiesForThisType, object[] arguments)
{
    object target = Activator.CreateInstance(typeToCreate, arguments);
    return DoWrap(target, typeToReturn, policiesForThisType);
}

リフレクションを使ってインスタンスを生成したあと、DoWrap メソッド呼んでいますね。 DoWrap メソッドは abstract なので、今回は RemotingPolicyInjector クラスの DoWrap を見てみる。

RemotingPolicyInjector クラス

DoWrap メソッド

[ConfigurationElementType(typeof(RemotingInjectorData))]
public class RemotingPolicyInjector : PolicyInjector
{
    protected override object DoWrap(object instance, Type typeToReturn, PolicySet policiesForThisType)
    {
        if (PolicyRequiresInterception(policiesForThisType))
        {
            // instance が既に RealProxy でラップされている場合は、ラップを解いて渡す。
            // ラップされていない場合はそのまま渡す。
            InterceptingRealProxy proxy =
                new InterceptingRealProxy(UnwrapTarget(instance), typeToReturn, policiesForThisType);
            return proxy.GetTransparentProxy();
        }
        return instance;
    }

InterceptingReadProxy は RealProxy を継承したクラスです。透過プロキシを返しているのかぁ。

InterceptingReadProxy クラス

コンストラクタ

public InterceptingRealProxy(object target, Type classToProxy, PolicySet policies)
    : base(classToProxy)
{
    this.target = target;
    this.typeName = target.GetType().FullName;
    Type targetType = target.GetType();

    memberHandlers = new Dictionary<MethodBase, HandlerPipeline>();

　　// クラスの情報から CallHandler を取得して memberHandlers に追加します
    AddHandlersForType(targetType, policies);

    // ここではベースクラスから
    Type baseTypeIter = targetType.BaseType;
    while (baseTypeIter != null && baseTypeIter != typeof(object))
    {
        AddHandlersForType(baseTypeIter, policies);
        baseTypeIter = baseTypeIter.BaseType;
    }

    foreach (Type inter in targetType.GetInterfaces())
    {
        // クラスとインタフェースをマッピングしたあと、
        // クラスのメソッド情報をもとに取得した CallHandler を
        // インタフェースのメソッド用の CallHandler として再登録している
        AddHandlersForInterface(targetType, inter);
    }        
}

コンストラクタ内でクラスの情報をもとに CallHandler を取得して、メンバに保存しています。

Create の流れはここで終了。でもせっかくなので、メソッドが実際にインターセプトされる処理も見てみます。

Invoke メソッド

public class InterceptingRealProxy : RealProxy, IRemotingTypeInfo
{
    public override IMessage Invoke(IMessage msg)
    {
        IMethodCallMessage callMessage = (IMethodCallMessage)msg;

        // メソッドをインターセプトして実行する CallHandler を取得する
        HandlerPipeline pipeline;
        if (memberHandlers.ContainsKey(callMessage.MethodBase))
        {
            pipeline = memberHandlers[callMessage.MethodBase];
        }
        else
        {
            pipeline = new HandlerPipeline();
        }

        RemotingMethodInvocation invocation = new RemotingMethodInvocation(callMessage, target);
        IMethodReturn result =
            pipeline.Invoke(
                invocation,
                delegate(IMethodInvocation input, GetNextHandlerDelegate getNext)
                {
                    try
                    {
                        // インターセプト対象のメソッドを実行
                        object returnValue = callMessage.MethodBase.Invoke(target, invocation.Arguments);
                        return input.CreateMethodReturn(returnValue, invocation.Arguments);
                    }
                    catch (TargetInvocationException ex)
                    {
                        // The outer exception will always be a reflection exception; we want the inner, which is
                        // the underlying exception.
                        return input.CreateExceptionMethodReturn(ex.InnerException);
                    }
                });
        return ((RemotingMethodReturn)result).ToMethodReturnMessage();
    }

インターセプト対象メソッドの情報をもとに HandlerPipeline を取得して、その Invoke メソッドを呼び出しているのか。インターセプトされたメソッドは、リフレクション(MethodBase.Invoke)で呼び出しています。

HandlerPipeline クラス

Invoke メソッド

public class HandlerPipeline
{
    private List<ICallHandler> handlers;

    public IMethodReturn Invoke(IMethodInvocation input, InvokeHandlerDelegate target)
    {
        if( handlers.Count == 0 )
        {
            return target(input, null);
        }

        int handlerIndex = 0;

        // メソッドをインターセプトして実行する処理を、連鎖して呼び出す
        IMethodReturn result = handlers[0].Invoke(input, delegate
                                  {
                                      ++handlerIndex;
                                      if(handlerIndex < handlers.Count)
                                      {
                                          return handlers[handlerIndex].Invoke;
                                      }
                                      else
                                      {
                                          return target;
                                      }
                                  });
        return result;
    }

構成ファイルなどで指定した CallHander がこのクラスに登録されています。先に登録されているハンドラを呼び出して、最後にインターセプト対象のメソッドが呼ばれる・・・と。

最後に

PIAB では RealProxy を使って AOP を実現しているのか！

本名で行きます。

今川美保(夏椰) {Miho Imagawa as Kaya} — Thu, 20 Nov 2008 02:19:00 GMT

こんにちは、皆様。

ライブ錬金術霊視を受けて、且つフミヨミさん、インディゴさんとメールのやり取りをしていたんですが、

私にライトワーカーの属性がある事に気づきました。

(リンク先はドリーン・バーチュー日本語公式Webサイトってサイトの1ページです)

今まで、自分(ここでいう自分=美保です)は、まぁダークな人生を送ってきて、

自分を守るために、いろいろな事に心を閉ざしたり、

今川(@仕事)だったり、夏椰(@オンライン)だったりを作り上げて、

そのフィルターを通じて、人々とコネクトさせてもらってきました。

でも、本質の私はやっぱりお人好しっていうか、

人のために存在していたい思いが強いので、

今川にも夏椰にも負担を強いてきたし、結果として自分自身も歪だったと思います。

そんな事をして生きてきたから、

当然拒食も鬱病にもなったんだと気づきました。

#本当は拒食の時点で気づけよって感じですが･･･。まぁ若かったんでしょ(w

# 22歳だったしぃ

で、霊視を受けて、自分が自分の中にダイブする(瞑想する)ようになり、

空や大地や水や･･･自然に対して、今まで以上にコネクトするようになったんです。

そういうことをしていくと、

自分の中でいろいろな言葉がくっついたり、

映像が頭にひらめいたりするようになるんですよね。

そうした環境下において、インディゴさんとお話しながら

ライトワーカーって言葉からいろいろ調べてみた時に、

自分の頭の中でいろいろなものが繋がり、

今まで私に必要だったフィルターがいらなくなったんです。

正確には、まだいるんだけど

それは社会と繋がる自分であり、魂の自分とはちょっと違う感じです。

だから、私は今夏椰としてではなく、今川美保として存在して生きたいのです。

なので、BLOGの表示名もHNと名前を入れ替えました。

今までの名前で呼びなれている人も多いでしょうから、

私を夏椰と呼んでもらっても構いません。

ただ、夏椰と呼んでも反応するのは今川美保だと言うことだけ覚えておいてください。

私は、これからいろいろなものにコネクトして、

見えたもの、聞こえたもの、感じたものを書いていきたいと思っています。

技術関連サイトで、にわかには信じ難い内容になっているかと思います。

でもね、考えてみてください。

私達には同じように動いていると感じられる時間ですが

常に一定の速度で動いてはいないんですよ。

# @see Relativity　特殊相対性理論中学生にもわかる特殊相対性理論　2002年3月製作参照

誰にでもある、『嫌な予感がする･･･』とかそういうものを

もっと的確に捉えて話すことが出来るような世界だと思ってください。

私達が作っているプログラムや、

触っているパソコンも

電気ってエネルギーを使って、

いろいろなものがコラボレーションして、一つの形を成しているじゃないですか。

そういう風に、この世界に

同じようにエネルギーが流れていて、

私達がそのエネルギーをもらって、お互いにコラボレーションしているんですよ。

もちろん、技術屋として働いているのに変化はないし、

この仕事好きだから、

技術ネタも書くけど、

そういう技術に携わっている人達にも分るように

見えた物を美保として伝えていけたらいいなぁって思っています。

お付き合いくだされば幸いですわ♪(^^)b

わんくま同盟

[VMWare]VMWare Server 2.0でVMWare Tools

デザインパターンを学ぶ～その21：Commandパターン(1)～

C#

VB

C#

VB

C#

VB

C#

VB

C#

VB

C#

VB

福岡に来ています

[Excel][VBA]Tips：オートシェイプ内にて表示されている文字列を設定する

[Excel][VisualBasic]Excel.XlColorIndexの標準カラーのインデックスの値

[Excel][VBA]Tips：オートシェイプに登録したマクロ名を取得する

iPhone 2.2 登場。絵文字を使うには･･･？

できるヤツから離れていく

言葉が生まれる瞬間

あらゆる可能性に思いを馳せる

不用意に投げ出（キャスト）さない

タニシタニシタニシタニシタニシタニシ...

[写真] 夕焼け

インフルエンザ予防接種の補助開始

暗号の2010年問題

[写真] ご飯タイム その２

タイムスタンプ

今日のニュース脊髄反射

「護送船団方式」と「属人性の排除」

Unity と PIAB を連携させる

はじめに

カスタム Callhandler とカスタム HandlerAttribute

DI で使用するインタフェースとクラスを用意

PIAB と Unity を連携させるために UnityContainerExtension を作成

作成した UnityContainerExtension を使ったコードに修正

まとめ

あさめしパクパクにゃ～

MSが正式発表：「ＩE8」は2009年に入ってから

Windows Mobile Xmas 「Touch the Illumination」

1メソッドは 50行以内

[Java][Silverlight][NetBeans]Web(Java) + Silverlight2

NetBeans側

Silverlight2側

仕上げ

FolderShare終了、Live Syncへ

[VMWare]VMWare Server 2をVistaに入れる

今週は福岡勉強会です。

刑事とプログラマの共通点

PIAB の中身を見てみた

はじめに

PolicyInjection クラス

Create メソッド

DefaultPolicyInjector プロパティ

PolicyInjectorFactory クラス

Create メソッド

PolicyInjector クラス

Create メソッド

DoCreate メソッド

RemotingPolicyInjector クラス

DoWrap メソッド

InterceptingReadProxy クラス

コンストラクタ

Invoke メソッド

HandlerPipeline クラス

Invoke メソッド

最後に

本名で行きます。

[写真] ご飯タイムその２