サービス依存関係の迷宮を解く：WMIによる構成マップ自動生成の極意
Windowsのサービス依存関係は、一度こじれるとブラックボックス化する。サーバーの計画停止時、「このサービスを止めたら何が巻き添えを食うのか」という問いに対し、管理画面を一つ一つクリックして確認するような非効率な作業は、今すぐやめるべきだ。
今日は、WMI（Windows Management Instrumentation）とVBScriptを駆使し、依存関係のツリーを再帰的に叩き出す「システムサービス構成マップ」の自動生成手法を授ける。これは単なるスクリプトではない。「見えない負債」を可視化するためのエンジニアリングだ。
—
なぜWMIか、そしてなぜVBScriptなのか
多くの現場でPowerShellが主流となる中、なぜあえてVBScriptなのか。それは「環境を選ばない汎用性と、OSへの深い親和性」にある。管理者権限が必要なWMI操作において、余計なランタイムを必要とせず、レガシーなWindows Server環境でも確実に動作するこの選択は、堅牢なツールを求める現場において最も合理的だ。
依存関係解析の論理的アプローチ
依存関係には「前提サービス（Dependent）」と「依存サービス（Antecedent）」の双方向が存在する。今回は「あるサービスを停止した際、何が影響を受けるか」という影響調査に焦点を当て、再帰（Recursion）を用いてツリー構造を構築する。
堅牢な設計のための3つの鉄則
1. 無限ループの回避: 循環参照（AがBに依存し、BがAに依存するケース）をスタック管理で防ぐこと。
2. エラーハンドリングの徹底: WMIクエリは時としてアクセス拒否やタイムアウトを返す。`On Error Resume Next` を制御下に置き、適切にログへ落とすこと。
3. ストリーム出力の活用: 大規模なサービス群を扱う場合、メモリを圧迫しないよう、結果は逐次テキストファイルへ追記する設計にする。
—
プロダクションコード：ServiceDependencyMapper.vbs
このコードは、指定したサービスの依存先を再帰的に掘り下げ、タブ階層で出力する。
‘ サービス依存関係可視化スクリプト
Option Explicit
Dim objWMIService, strService, objFSO, objFile
Set objWMIService = GetObject(“winmgmts:{impersonationLevel=impersonate}!\\.\root\cimv2”)
Set objFSO = CreateObject(“Scripting.FileSystemObject”)
Set objFile = objFSO.CreateTextFile(“ServiceMap.txt”, True)
‘ 解析開始点（サービス名）
strService = “LanmanWorkstation” ‘ 例: Workstationサービス
objFile.WriteLine “依存関係ツリー: ” & strService
TraverseDependencies strService, 0, “”
objFile.Close
WScript.Echo “解析完了: ServiceMap.txtを確認してください。”
‘ 再帰関数：依存関係を掘り下げる
Sub TraverseDependencies(serviceName, depth, visited)
Dim colDeps, objDep, indent
indent = Space(depth 4)
‘ 循環参照防止
If InStr(visited, “|” & serviceName & “|”) > 0 Then Exit Sub
visited = visited & “|” & serviceName & “|”
‘ WMIクエリ：このサービスを必要としているサービスを検索
Set colDeps = objWMIService.ExecQuery _
(“SELECT FROM Win32_DependentService WHERE Antecedent = ‘Win32_Service.Name=””” & serviceName & “””‘”)
For Each objDep In colDeps
Dim childName
childName = Split(objDep.Dependent, “=”)(1)
childName = Replace(childName, “”””, “”)
objFile.WriteLine indent & “└── ” & childName
‘ 再帰呼出
TraverseDependencies childName, depth + 1, visited
Next
End Sub
—
実務運用における注意点
- 権限の壁: WMIオブジェクトは管理者権限で実行しなければ、アクセス拒否（0x80041003）が発生する。スクリプト実行時は必ず「管理者として実行」されたコマンドプロンプトから起動すること。
- パフォーマンスへの配慮: サービス数が多い環境では、再帰の深さやクエリの頻度がネックになる。結果は必ずテキストファイルに吐き出し、画面出力は最小限に留めるのがエンジニアの流儀だ。
- 拡張性: このコードをベースに、`Win32_Service` クラスの `State` プロパティ（Running/Stopped）をチェックし、停止中のサービスを赤字で出力するように改修すれば、より実用的な運用ツールへと昇華できる。
最後に：自動化は「思考」を止めることではない
このスクリプトは、あなたの調査時間を劇的に短縮するだろう。しかし、真の自動化エンジニアであれば、生成されたマップを見て「なぜこのサービス構成になっているのか」「不要な依存関係はないか」という構造上の問いを立ててほしい。
ツールに仕事をさせるのではない。ツールによって生まれた「余白」を使い、システムの健全性を守るための知的な判断を行うこと。それこそが、VBScriptを掌握した者に許された特権だ。
