SCCM 관리 서버의 configuration.mof 파일을 수정해 수집 항목을 수정할 수 있습니다.

기본 값으로 설치한 경우 파일의 기본 위치는 C:\Program Files\Microsoft Configuration Manager\inboxes\clifiles.src\hinv\configuration.mof 입니다.

해당 파일을 먼저 백업해 놓은 후 메모장으로 열어 맨 아래 부분에 아래와 같은 형태로 추가합니다.


#pragma namespace ("\\\\.\\root\\cimv2")
#pragma deleteclass("<Name_of_Custom_Class>", NOFAIL)

[DYNPROPS]
Class <Name_of_Custom_Class>
{
[key] string <Key_Property>;
String <Property1>;
String <Property2>;
};

[DYNPROPS]
Instance of <Name_of_Custom_Class>
{
<Key_Property>="<Value>";
[PropertyContext("Local|<Registry Location>|<Value Name>"),Dynamic,Provider("RegPropProv")] <Property1>;
[PropertyContext("Local|<Registry Location>|<Value Name>"),Dynamic,Provider("RegPropProv")] <Property2>;

예:)
[PropertyContext("Local|HKEY_LOCAL_MACHINE\\SOFTWARE\\DDK|Name"),Dynamic,Provider("RegPropProv")] Name;
[PropertyContext("Local|HKEY_LOCAL_MACHINE\\SOFTWARE\\DDK|Version"),Dynamic,Provider("RegPropProv")] Version;
};

파일을 저장한 후 SCCM 콘솔에서 관리 -> 클라이언트 설정 -> 클라이언트 설정 속성을 엽니다.
하드웨어 인벤토리 항목으로 이동해 '클래스 설정' 버튼을 클릭한 후 생성한 클래스를 추가하고 체크합니다.

많은 분들이 디스크 성능 측정과 관련해 IOMeter 등의 도구들을 많이 사용하시고 계실텐데요, 제가 소개해 드릴 도구는 Microsoft에서 배포하는 SQLIO라는 디스크 성능 측정 도구입니다.

SQLIO Disk Subsystem Benchmark Tool
http://www.microsoft.com/en-us/download/details.aspx?id=20163

우선 프로그램을 다운 받아 설치하시면 되며, 기본적으로 32비트 Program Files\SQLIO 디렉터리에 설치됩니다.
실행 방법은 간단히 SQLIO.EXE 프로그램을 실행하실 수도 있겠으나 몇 가지 설정 방법을 설명 드리겠습니다.
*주의* 운영 중인 서버에서는 실행하시지 말 것을 적극 권장 드립니다.

먼저, 설치 디렉터리에 보면 param.txt 라는 이름의 기본 설정 파일이 있습니다.
이 파일을 메모장으로 열어 보시면 기본적으로 아래와 같은 내용이 입력되어 있습니다.

c:\testfile.dat 2 0x0 100
#d:\testfile.dat 2 0x0 100

입력된 값에 대한 설명은 다음과 같습니다.
c:\testfile.dat : IO 테스트 파일 경로
2 : 실행 스레드 수
0x0 : CPU 마스크
100 : 테스트 파일 크기(MB)

부연 설명을 드리자면 테스트할 드라이브에 파일을 생성하도록 설정하고, 실행 스레드 수는 시스템의 코어 수를 입력하시면 전체 CPU를 사용하게 됩니다. 그리고, 테스트에 사용할 파일은 되도록이면 크게 잡아주시는 것이 좀 더 정확한 데이터를 얻으실 수 있으니, 적어도 5GB 이상으로 설정해 주시는 것이 좋겠습니다. 참고로, 저의 테스트 환경에서는 아래와 같이 설정하였습니다.

c:\testfile.dat 16 0x0 5120
#d:\testfile.dat 2 0x0 100


설정 파일에 대한 수정이 끝나셨으면 이제 SQLIO.exe 명령을 아래의 예를 보시고 적당한 매개 변수를 달아 실행하시면 되겠습니다. 기본 테스트 시간은 30초이며, 테스트 시간을 정하시고자 하는 경우에는 -s 매개 변수를 사용하시면 됩니다.

sqlio -kR -BH -LS -o8 -fsequential -Fparam.txt -b8

옵션에 대한 설명
-kW : 쓰기 테스트 실행
-kR : 읽기 테스트 실행
-BH : 캐시 설정(하드웨어 캐시)
-LS : 지연 설정(시스템 타이머)
-o16 : 스레드 당 동시 IO 수(16개)
-frandom : 렌덤 IO 테스트
-fsequential : 순차 IO 테스트
-Fparam.txt : 참조 파라미터 파일
-b8 : 테스트 블럭 크기(8KB)


아래는 테스트 결과를 C:\<서버 이름_SQLIO>.txt 파일로 기록하는 내용인데, 텍스트 파일로 내린 이유는 아래에서 설명 드리겠지만 결과를 분석해 엑셀 시트로 간편하게 만드는 방법이 있기 때문입니다.

sqlio -kR -BH -LS -o16 -fsequential -Fparam.txt -b8 > C:\%COMPUTERNAME%_SQLIO.txt
sqlio -kR -BH -LS -o16 -fsequential -Fparam.txt -b32 >> C:\%COMPUTERNAME%_SQLIO.txt
sqlio -kR -BH -LS -o16 -fsequential -Fparam.txt -b64 >> C:\%COMPUTERNAME%_SQLIO.txt
sqlio -kR -BH -LS -o16 -fsequential -Fparam.txt -b128 >> C:\%COMPUTERNAME%_SQLIO.txt
sqlio -kR -BH -LS -o16 -fsequential -Fparam.txt -b256 >> C:\%COMPUTERNAME%_SQLIO.txt

sqlio -kW -BH -LS -o16 -fsequential -Fparam.txt -b8 >> C:\%COMPUTERNAME%_SQLIO.txt
sqlio -kW -BH -LS -o16 -fsequential -Fparam.txt -b32 >> C:\%COMPUTERNAME%_SQLIO.txt
sqlio -kW -BH -LS -o16 -fsequential -Fparam.txt -b64 >> C:\%COMPUTERNAME%_SQLIO.txt
sqlio -kW -BH -LS -o16 -fsequential -Fparam.txt -b128 >> C:\%COMPUTERNAME%_SQLIO.txt
sqlio -kW -BH -LS -o16 -fsequential -Fparam.txt -b256 >> C:\%COMPUTERNAME%_SQLIO.txt

sqlio -kR -BH -LS -o16 -frandom -Fparam.txt -b8 >> C:\%COMPUTERNAME%_SQLIO.txt
sqlio -kR -BH -LS -o16 -frandom -Fparam.txt -b32 >> C:\%COMPUTERNAME%_SQLIO.txt
sqlio -kR -BH -LS -o16 -frandom -Fparam.txt -b64 >> C:\%COMPUTERNAME%_SQLIO.txt
sqlio -kR -BH -LS -o16 -frandom -Fparam.txt -b128 >> C:\%COMPUTERNAME%_SQLIO.txt
sqlio -kR -BH -LS -o16 -frandom -Fparam.txt -b256 >> C:\%COMPUTERNAME%_SQLIO.txt

sqlio -kW -BH -LS -o16 -frandom -Fparam.txt -b8 >> C:\%COMPUTERNAME%_SQLIO.txt
sqlio -kW -BH -LS -o16 -frandom -Fparam.txt -b32 >> C:\%COMPUTERNAME%_SQLIO.txt
sqlio -kW -BH -LS -o16 -frandom -Fparam.txt -b64 >> C:\%COMPUTERNAME%_SQLIO.txt
sqlio -kW -BH -LS -o16 -frandom -Fparam.txt -b128 >> C:\%COMPUTERNAME%_SQLIO.txt
sqlio -kW -BH -LS -o16 -frandom -Fparam.txt -b256 >> C:\%COMPUTERNAME%_SQLIO.txt


출력된 결과를 직접 눈으로 확인하고 정리를 하셔도 되겠지만 좀 더 편하게 결과를 분석할 수 있는 방법을 알려 드리겠습니다. 먼저, 결과 파일을 MS Office가 설치되어 있는 PC로 복사해 온 다음 첨부된 PowerShell 스크립트 파일을 매개 변수로 결과 파일을 주어 실행하시면 아래와 같이 자동으로 결과를 Parsing 해서 엑셀 시트로 만들어 줍니다. PowerShell 스크립트의 출처는 http://sqlblog.com/blogs/jonathan_kehayias 입니다.

SQLIOResults.ps1

Microsoft 기반의 VDI 환경에서 가상 머신에 연결하는 경우 기본적으로 CRL, 인증서 해지 목록을 확인하도록 구성됩니다. 정확하게는 클라이언트 쪽에서 대상 서버의 인증서 해제 목록을 확인하는 것이지요.

외부에서 접근 가능한 CDP를 배포하면 되지만 간단히 클라이언트 쪽에서 인증서 해지 여부를 확인하지 않도록 설정할 수 있습니다. 아래와 같이 레지스트리 값을 변경하시면 됩니다.

HKLM\SYSTEM\CurrentControlSet\Control\Lsa\Credssp
UseCachedCRLOnlyAndIgnoreRevocationUnknownErrors DWORD 값을 1로 설정

HKLM\SOFTWARE\Microsoft\Terminal Server Client
CertChainRevocationCheck DWORD 값을 0으로 설정

HKCU\Software\Microsoft\Terminal Server Client
CertChainRevocationCheck  DWORD 값을 0으로 설정



Windows Registry Editor Version 5.00
[HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Lsa\Credssp]
"UseCachedCRLOnlyAndIgnoreRevocationUnknownErrors"=dword:00000001
[HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Terminal Server Client]
"CertChainRevocationCheck"=dword:00000000
[HKEY_CURRENT_USER\Software\Microsoft\Terminal Server Client]
"CertChainRevocationCheck"=dword:00000000

Lync 2013 인프라 설치 후 한 가지 빠뜨릴 수 있을 만한 기능이 있습니다.
바로 Office Web Apps 서버인데요. Lync 대화 상자의 도구들 중 프레젠테이션 공유 기능이 있습니다.

Import-Module OfficeWebApps
New-OfficeWebAppsFarm -InternalURL <HTTPS URL 주소(FQDN)> -CertificateName <인증서 이름>

창이름으로 프로세스 정보를 기록하는 스크립트와 연계해 레지스트리에 모니터링할 프로세스(창 이름)을 기준으로 로그 파일에 존재 여부로 실행 중인지의 여부를 판단하는 SCOM 용 VBS VB 스크립트 모니터입니다. 아래 스크립트와 마찬가지로, 로그 파일 생성(변경) 시간이 10분 이상되었거나 내용이 없는 경우(헤더만 있는 경우)에는 스크립트를 종료합니다.


'==========================================================
'Log File Configuration
'==========================================================
sLogDir = "C:\Dimensiondata\"
sLogFile = "NOTEPAD.Log"
'==========================================================

'==========================================================
'Registry Key Path, the Name of String Value
'==========================================================
KeyPath = "SOFTWARE\DDK"
sName = "NOTEPAD.exe"
'==========================================================

'==========================================================
'State Mapping/Definition
'==========================================================
'Error State: Property[@Name='State'] equals ERROR
'Normal State: Property[@Name='State'] equals NORMAL
'Stopped Processes: $Data/Context/Property[@Name='StoppedProc']$
'==========================================================


'If Log File doesn't Exist Then Quit
Set oFSO = CreateObject("Scripting.FileSystemObject")
If oFSO.FileExists(sLogDir&sLogFile) Then
Else
 Set oFSO = Nothing
 WScript.Quit
End If

'Check Log File Modified Date/Time
Set oFile = oFSO.GetFile(sLogDir&sLogFile)
FileModified = CDate(oFile.DateLastModified)
TimeGapMin = DateDiff("n",FileModified,Now)

If TimeGapMin > 10 Then
 Set oFSO = Nothing
 Set oAPI = CreateObject("MOM.ScriptAPI")
 Call oAPI.LogScriptEvent("DDK", 2001, 2, "Modified Date of Log File is Older than 10 Minutes. Modified Date of Log File("&sLogDir&sLogFile&") is "&FileModified&".")
 Set oAPI = Nothing
 WScript.Quit
End If

'Check Log File Content
sData = oFSO.OpenTextFile(sLogDir&sLogFile,1).ReadAll
arrLines = Split(sData,vbCrLf)
LineCount = UBound(arrLines)-1

If LineCount = 0 Then
 Set oFSO = Nothing
 Set oAPI = CreateObject("MOM.ScriptAPI")
 Call oAPI.LogScriptEvent("DDK", 2001, 2, "Log File("&sLogDir&sLogFile&") is Empty.")
 Set oAPI = Nothing
 WScript.Quit
End If

'Get Registry Value
Const HKLM = &H80000002
Set oReg = getObject("WINMGMTS:root\default:StdRegProv")
oReg.GetStringValue HKLM,KeyPath,sName,sValue

If IsNull(sValue) OR sValue = "" Then
 Set oReg = Nothing
 WScript.Quit
End If

arrValue = Split(sValue,"|")

'Check the Process is Exist in Log File, Except First Line
Set oAPI = CreateObject("MOM.ScriptAPI")
Set oBag = oAPI.CreatePropertyBag()
For i = 0 to Ubound(arrValue)
 tmpState = 0
 CurrLine = 1
 Do While CurrLine <> UBound(arrLines)
  tmpLine = Split(arrLines(CurrLine),"|")
  If Ucase(tmpLine(2)) = Ucase(arrValue(i)) Then
   tmpState = 1
  End If
  CurrLine =  CurrLine + 1
 Loop

 If tmpState = 0 Then
  StoppedProc = StoppedProc & arrValue(i)&", "
  Call oBag.AddValue(arrValue(i), "Not running")
 ElseIf tmpState = 1 Then
  Call oBag.AddValue(arrValue(i), "Running")
 End If
Next

If StoppedProc <> "" Then
 Call oBag.AddValue("State", "ERROR")
 Call oBag.AddValue("Stopped Process(es)",Left(StoppedProc,Len(StoppedProc)-2))
Else
 Call oBag.AddValue("State", "NORMAL")
End If

Call oAPI.Return(oBag)
Set oFSO = Nothing
Set oAPI = Nothing

아래 스크립트와 연계해 해당 PID에 기반해 CPU 사용률과 메모리 사용량 - WorkingSet (MB)을 수집하는 스크립트이며, SCOM에서 성능 수집 규칙(컬렉션 방식)으로 사용합니다. 로그 파일 생성(변경) 시간이 10분 이상되었거나 내용이 없는 경우(헤더만 있는 경우)에는 스크립트를 종료합니다.


'==========================================================
'Log File Configuration
'==========================================================
sLogDir = "C:\Dimensiondata\"
sLogFile = "NOTEPAD.Log"
'==========================================================

'==========================================================
'Performance Mapper
'==========================================================
'Object: Process
'Counter: $Data/Property[@Name='Counter']$
'Instance: $Data/Property[@Name='Instance']$
'Value: $Data/Property[@Name='PerfValue']$
'==========================================================


'If Log File doesn't Exist Then Quit
Set oFSO = CreateObject("Scripting.FileSystemObject")
If oFSO.FileExists(sLogDir&sLogFile) Then
Else
 Set oFSO = Nothing
 WScript.Quit
End If

'Check Log File Modified Date/Time
Set oFile = oFSO.GetFile(sLogDir&sLogFile)
FileModified = CDate(oFile.DateLastModified)
TimeGapMin = DateDiff("n",FileModified,Now)

If TimeGapMin > 10 Then
 Set oFSO = Nothing
 Set oAPI = CreateObject("MOM.ScriptAPI")
 Call oAPI.LogScriptEvent("DDK", 2001, 2, "Modified Date of Log File is Older than 10 Minutes. Modified Date of Log File("&sLogDir&sLogFile&") is "&FileModified&".")
 Set oAPI = Nothing
 WScript.Quit
End If

'Check Log File Content
sData = oFSO.OpenTextFile(sLogDir&sLogFile,1).ReadAll
arrLines = Split(sData,vbCrLf)
LineCount = UBound(arrLines)-1

If LineCount = 0 Then
 Set oFSO = Nothing
 Set oAPI = CreateObject("MOM.ScriptAPI")
 Call oAPI.LogScriptEvent("DDK", 2001, 2, "Log File("&sLogDir&sLogFile&") is Empty.")
 Set oAPI = Nothing
 WScript.Quit
End If

'Create Array and Insert PID, Performance Data of CPU and WorkingSet into Array
Set objWMIService = GetObject("WINMGMTS:\\.\root\cimv2")
Set colProcess = objWMIService.ExecQuery("Select * from Win32_PerfFormattedData_PerfProc_Process")
ProcessCount = colProcess.Count
ReDim tmpProcessID(ProcessCount),tmpProcessCPU(ProcessCount),tmpProcessMB(ProcessCount)

i = 0
For Each ProcInst in colProcess
 tmpProcessID(i) = ProcInst.IDProcess
 tmpProcessCPU(i) = ProcInst.PercentProcessorTime
 tmpProcessMB(i) = Round(ProcInst.WorkingSet/1048576,2)
 i = i + 1
Next

Set colProcess = Nothing
Set objWMIService = Nothing

'Get/Return CPU, Memory Performance Data, Except First Line
Set oAPI = CreateObject("MOM.ScriptAPI")
CurrLine = 1
Do While CurrLine <> UBound(arrLines)
 tmpLine = Split(arrLines(CurrLine),"|")
 tmpCPU = 0
 tmpMB = 0

 For i = 0 to ProcessCount
  If cDbl(tmpLine(1)) = cDbl(tmpProcessID(i)) Then
    tmpCPU = tmpProcessCPU(i)
    tmpMB = tmpProcessMB(i)
  End If
 Next

 Set propertyBag = oAPI.CreatePropertyBag()
 propertyBag.AddValue "Counter", "% Processor Time"
 propertyBag.AddValue "Instance", tmpLine(0)&"_"&tmpLine(2)
 propertyBag.AddValue "PerfValue", tmpCPU
 oAPI.AddItem(propertyBag)
 Call oAPI.Return(propertyBag)

 Set propertyBag = oAPI.CreatePropertyBag()
 propertyBag.AddValue "Counter", "Memory Usage MB"
 propertyBag.AddValue "Instance", tmpLine(0)&"_"&tmpLine(2)
 propertyBag.AddValue "PerfValue", tmpMB
 oAPI.AddItem(propertyBag)
 Call oAPI.Return(propertyBag)

 CurrLine =  CurrLine + 1
Loop

oAPI.ReturnItems
Set oFSO = Nothing
Set oAPI = Nothing

VBS VB Script VB 스크립트
특정 프로세스로 실행되는 프로그램 목록을 텍스트 파일로 찍는 스크립트입니다. 텍스트 파일에 프로세스 이름, PID 및 창 제목을 기록합니다. 사실, 창 제목(프로세스에 파라미터를 달고 실행되는 애플리케이션)을 보고 프로세스의 실행 상태를 모니터링하기 위해 사용하였던 스크립트입니다.


'==========================================================
'Configuration - Host Process Name, Log File
'==========================================================
sProcess = "notepad.exe"
sLogDir = "C:\Dimensiondata\"
sLogFile = "NOTEPAD.Log"
'==========================================================


'Check/Create Log Directory
Set oFSO = CreateObject("Scripting.FileSystemObject")
If oFSO.FolderExists(sLogDir) Then
Else
 oFSO.CreateFolder sLogDir
End If

'Check/Create Log File
If oFSO.FileExists(sLogDir&sLogFile) Then
Else
 oFSO.CreateTextFile sLogDir&sLogFile
End If

'Run Tasklist Command and then Write Result to the Log File
Set LogFile = oFSO.OpenTextFile(sLogDir&sLogFile,2)
sCmd = "cmd /c Tasklist /FO CSV /V /FI "&chr(34)&"ImageName eq "&sProcess&chr(34)&" | Findstr /I "&chr(34)&sProcess&chr(34)
Set objShell = WScript.CreateObject("WScript.Shell")
Set objExecObject = objShell.Exec(sCmd)

LogFile.Write "ProcessName|PID|WindowName"&vbCRLF
tmp = 0

Do While Not objExecObject.StdOut.AtEndOfStream
 sLine = objExecObject.StdOut.ReadLine
 tmpLine = Split(sLine,chr(34))
 LogFile.Write tmpLine(1)&"|"&tmpLine(3)&"|"&tmpLine(17)&vbCRLF
Loop

LogFile.Close
Set oFSO = Nothing
Set objExecObject = Nothing
Set objShell = Nothing