2 files changed, 367 insertions, 0 deletions
diff --git a/DcsInfo/DcsInfo.c b/DcsInfo/DcsInfo.c
new file mode 100644
index 0000000..bec72d9
--- /dev/null
+++ b/DcsInfo/DcsInfo.c
@@ -0,0 +1,290 @@
+/** @file
+  This is DCS platform information application
+
+Copyright (c) 2016. Disk Cryptography Services for EFI (DCS), Alex Kolotnikov
+Copyright (c) 2016. VeraCrypt, Mounir IDRASSI 
+
+This program and the accompanying materials
+are licensed and made available under the terms and conditions
+of the GNU Lesser General Public License, version 3.0 (LGPL-3.0).
+
+The full text of the license may be found at
+https://opensource.org/licenses/LGPL-3.0
+**/
+
+#include <Uefi.h>
+#include <Library/CommonLib.h>
+#include <Library/UefiBootServicesTableLib.h>
+#include <Library/DevicePathLib.h>
+#include <Library/BaseMemoryLib.h>
+#include <Library/PrintLib.h>
+#include <Guid/GlobalVariable.h>
+#include <Library/PasswordLib.h>
+#include <Library/GraphLib.h>
+
+#ifdef _M_X64
+#define ARCH_NAME L"x64"
+#else
+#define ARCH_NAME L"IA32"
+#endif
+CHAR8 Temp[1024];
+CHAR8 StrBuffer[1024];
+UINTN gXmlTabs = 0;
+
+UINTN
+XmlOutTab() {
+	UINTN len;
+	UINTN i = gXmlTabs;
+	CHAR8*   pos = (CHAR8*)StrBuffer;
+	INTN     remains = sizeof(StrBuffer) - 1;
+	while (i > 0 && remains > 0) {
+		*pos = ' ';
+		remains--;
+		i--;
+		pos++;
+	}
+	len = sizeof(StrBuffer) - remains - 1;
+	return len;
+}
+
+UINTN
+XmlTag(
+	IN EFI_FILE            *infoFileTxt,
+	IN CONST CHAR8         *tag,
+	IN BOOLEAN             closeTag,
+	IN CONST CHAR8         *value,
+	...
+	) {
+	VA_LIST  args;
+	UINTN    len = XmlOutTab();
+	CHAR8*   pos = (CHAR8*)StrBuffer + len;
+	CHAR8*   attrFormat = NULL;
+	INTN     remains = sizeof(StrBuffer) - 1 - len;
+	if (infoFileTxt == NULL) return 0;
+	VA_START(args, value);
+	len = AsciiSPrint(pos, remains, "<%a", tag);
+	remains -= len;
+	pos += len;
+	if ((attrFormat = VA_ARG(args, CHAR8 *)) != NULL) {
+		len = AsciiVSPrint(pos, remains, attrFormat, args);
+		remains -= len;
+		pos += len;
+	}
+	VA_END(args);
+	if (closeTag) {
+		if (value == NULL) {
+			len = AsciiSPrint(pos, remains, "/>\n");
+			remains -= len;
+			pos += len;
+		}
+		else {
+			len = AsciiSPrint(pos, remains, ">%a</%a>\n", value, tag);
+			remains -= len;
+			pos += len;
+		}
+	}	else {
+		if (value == NULL) {
+			len = AsciiSPrint(pos, remains, ">");
+			remains -= len;
+			pos += len;
+		}
+		else {
+			len = AsciiSPrint(pos, remains, ">%a", value, tag);
+			remains -= len;
+			pos += len;
+		}
+	}
+	len = sizeof(StrBuffer) - remains - 1;
+	infoFileTxt->Write(infoFileTxt, &len, StrBuffer);
+	return len;
+}
+
+UINTN
+XmlStartTag(
+	IN EFI_FILE            *infoFileTxt,
+	IN CONST CHAR8         *tag) 
+{
+	UINTN    len = XmlOutTab();
+	CHAR8*   pos = (CHAR8*)StrBuffer + len;
+	INTN     remains = sizeof(StrBuffer) - 1 - len;
+	gXmlTabs += remains > 0 ? 1 : 0;
+	len = AsciiSPrint(pos, remains, "<%a>\n", tag);
+	remains -= len;
+	pos += len;
+	len = sizeof(StrBuffer) - remains - 1;
+	infoFileTxt->Write(infoFileTxt, &len, StrBuffer);
+
+	return len;
+}
+
+UINTN
+XmlEndTag(
+	IN EFI_FILE            *infoFileTxt,
+	IN CONST CHAR8         *tag
+	)
+{
+	UINTN    len;
+	CHAR8*   pos;
+	INTN     remains;
+	gXmlTabs -= gXmlTabs > 0 ? 1 : 0;
+	len = XmlOutTab();
+	pos = (CHAR8*)StrBuffer + len;
+	remains = sizeof(StrBuffer) - 1 - len;
+
+	if (infoFileTxt == NULL) return 0;
+	len = AsciiSPrint(pos, remains, "</%a>\n", tag);
+	remains -= len;
+	pos += len;
+	len = sizeof(StrBuffer) - remains - 1;
+	infoFileTxt->Write(infoFileTxt, &len, StrBuffer);
+	return len;
+}
+
+
+UINTN
+XmlEndTagPrint(
+	IN EFI_FILE            *infoFileTxt,
+	IN CONST CHAR8         *tag,
+	IN CONST CHAR8         *formatValue,
+	...
+	)
+{
+	VA_LIST  args;
+	UINTN    len = 0;
+	CHAR8*   pos = (CHAR8*)StrBuffer + len;
+	INTN     remains = sizeof(StrBuffer) - 1 - len;
+	if (infoFileTxt == NULL) return 0;
+	VA_START(args, formatValue);
+	if (formatValue != NULL) {
+		len = AsciiVSPrint(pos, remains, formatValue, args);
+		remains -= len;
+		pos += len;
+	}
+	VA_END(args);
+	len = AsciiSPrint(pos, remains, "</%a>\n", tag);
+	remains -= len;
+	pos += len;
+	len = sizeof(StrBuffer) - remains -1;
+	infoFileTxt->Write(infoFileTxt, &len, StrBuffer);
+	return len;
+}
+
+/**
+The actual entry point for the application.
+
+@param[in] ImageHandle    The firmware allocated handle for the EFI image.
+@param[in] SystemTable    A pointer to the EFI System Table.
+
+@retval EFI_SUCCESS       The entry point executed successfully.
+@retval other             Some error occur when executing this entry point.
+
+**/
+EFI_STATUS
+EFIAPI
+DcsInfoMain(
+   IN EFI_HANDLE        ImageHandle,
+   IN EFI_SYSTEM_TABLE  *SystemTable
+   )
+{
+   EFI_STATUS          res;
+//	EFI_INPUT_KEY       key;
+	EFI_FILE            *info;
+	UINTN               i;
+	UINTN               j;
+	InitBio();
+   res = InitFS();
+   if (EFI_ERROR(res)) {
+      ERR_PRINT(L"InitFS %r\n", res);
+		return res;
+   }
+	res = FileOpen(NULL, L"EFI\\VeraCrypt\\PlatformInfo", &info, EFI_FILE_MODE_READ | EFI_FILE_MODE_CREATE | EFI_FILE_MODE_WRITE, 0);
+	if (EFI_ERROR(res)) {
+		ERR_PRINT(L"PlatformInfo create %r\n", res);
+		return res;
+	}
+	FileAsciiPrint(info, "<?xml version=\"1.0\" encoding=\"utf-8\"?>\n");
+	XmlStartTag(info, "PlatformInfo");
+
+	XmlStartTag(info, "EFI");
+	XmlTag(info, "Version", FALSE, NULL, NULL);
+	XmlEndTagPrint(info, "Version", "%d.%d", gST->Hdr.Revision >> 16, gST->Hdr.Revision & 0xFFFF);
+	XmlTag(info, "Vendor", FALSE, NULL, NULL);
+	XmlEndTagPrint(info, "Vendor", "%s", gST->FirmwareVendor);
+	XmlTag(info, "Revision", FALSE, NULL, NULL);
+	XmlEndTagPrint(info, "Revision", "0x0%x", gST->FirmwareRevision);
+	XmlEndTag(info, "EFI");
+
+	res = SMBIOSGetSerials();
+	if (!EFI_ERROR(res)) {
+//		XmlTag(info, "System",FALSE, NULL, NULL);
+		XmlStartTag(info, "System");
+		XmlTag(info, "Manufacture", TRUE, gSmbSystemManufacture, NULL);
+		XmlTag(info, "Model", TRUE, gSmbSystemModel, NULL);
+		XmlTag(info, "Version", TRUE, gSmbSystemVersion, NULL);
+		XmlEndTag(info, "System");
+		XmlStartTag(info, "BIOS");
+		XmlTag(info, "Vendor", TRUE, gSmbBiosVendor, NULL);
+		XmlTag(info, "Version", TRUE, gSmbBiosVersion, NULL);
+		XmlTag(info, "Date", TRUE, gSmbBiosDate, NULL);
+		XmlEndTag(info, "BIOS");
+	}
+	// Devices info
+	InitTcg();
+	XmlTag(info, "TPM12", TRUE, NULL, " count=\"%d\"", gTcgCount, NULL);
+	XmlTag(info, "TPM20", TRUE, NULL, " count=\"%d\"", gTcg2Count, NULL);
+	XmlTag(info, "BlockDevices", TRUE, NULL, " count=\"%d\"", gBIOCount, NULL);
+	InitUsb();
+	XmlTag(info, "UsbDevices", TRUE, NULL, " count=\"%d\"", gUSBCount, NULL);
+	InitTouch();
+	XmlTag(info, "TouchDevices", FALSE, NULL, " count=\"%d\"", gTouchCount, NULL);
+	FileAsciiPrint(info, "\n");
+	gXmlTabs++;
+	for (i = 0; i < gTouchCount; ++i) {
+		EFI_ABSOLUTE_POINTER_PROTOCOL *aio;
+		res = TouchGetIO(gTouchHandles[i], &aio);
+		if (!EFI_ERROR(res)) {
+			XmlTag(info, "TouchDevice", TRUE, NULL, 
+				" index=\"%d\" minx=\"%d\" miny=\"%d\" minz=\"%d\" maxx=\"%d\" maxy=\"%d\" maxz=\"%d\" attr=\"0x0%x\"", i, 
+				aio->Mode->AbsoluteMinX, aio->Mode->AbsoluteMinY, aio->Mode->AbsoluteMinZ, 
+				aio->Mode->AbsoluteMaxX, aio->Mode->AbsoluteMaxY, aio->Mode->AbsoluteMaxZ, 
+				aio->Mode->Attributes, NULL);
+		}
+	}
+	XmlEndTag(info, "TouchDevices");
+	InitGraph();
+	XmlTag(info, "GraphDevices", FALSE, NULL, " count=\"%d\"", gGraphCount, NULL);
+	FileAsciiPrint(info, "\n");
+	gXmlTabs++;
+	for (i = 0; i < gGraphCount; ++i) {
+		EFI_GRAPHICS_OUTPUT_PROTOCOL *gio;
+		res = GraphGetIO(gGraphHandles[i], &gio);
+		if (!EFI_ERROR(res)) {
+			XmlTag(info, "GraphDevice", FALSE, NULL,
+				" index=\"%d\" modes=\"%d\" H=\"%d\" V=\"%d\"", i,
+				gio->Mode->MaxMode, gio->Mode->Info->HorizontalResolution, gio->Mode->Info->VerticalResolution,
+				NULL);
+			FileAsciiPrint(info, "\n");
+			gXmlTabs++;
+			for (j = 0; j < gio->Mode->MaxMode; ++j) {
+				EFI_GRAPHICS_OUTPUT_MODE_INFORMATION *mode;
+				UINTN sz = sizeof(mode);
+				res = gio->QueryMode(gio, (UINT32)j, &sz, &mode);
+				if (!EFI_ERROR(res)) {
+					XmlTag(info, "GraphMode", TRUE, NULL,
+						" index=\"%d\" H=\"%d\" V=\"%d\"", j,
+						mode->HorizontalResolution, mode->VerticalResolution,
+						NULL);
+				}
+			}
+			XmlEndTag(info, "GraphDevice");
+		}
+	}
+	XmlEndTag(info, "GraphDevices");
+	InitBluetooth();
+	XmlTag(info, "BluetoothIo", TRUE, NULL, " count=\"%d\"", gBluetoothIoCount, NULL);
+	XmlTag(info, "BluetoothConfig", TRUE, NULL, " count=\"%d\"", gBluetoothConfigCount, NULL);
+	XmlTag(info, "BluetoothHC", TRUE, NULL, " count=\"%d\"", gBluetoothHcCount, NULL);
+	XmlEndTag(info, "PlatformInfo");
+	FileClose(info);
+	return EFI_SUCCESS;
+}
diff --git a/DcsInfo/DcsInfo.inf b/DcsInfo/DcsInfo.inf
new file mode 100644
index 0000000..64eadee
--- /dev/null
+++ b/DcsInfo/DcsInfo.inf
@@ -0,0 +1,77 @@
+## @file
+#  This is DCS platform information application
+#
+# Copyright (c) 2016. Disk Cryptography Services for EFI (DCS), Alex Kolotnikov
+# Copyright (c) 2016. VeraCrypt, Mounir IDRASSI 
+# 
+# This program and the accompanying materials are licensed and made available
+# under the terms and conditions of the GNU Lesser General Public License, version 3.0 (LGPL-3.0).
+# 
+# The full text of the license may be found at
+# https://opensource.org/licenses/LGPL-3.0
+#
+##
+
+[Defines]
+  INF_VERSION                    = 0x00010006
+  BASE_NAME                      = DcsInfo
+  FILE_GUID                      = 49AD8535-F480-46C9-9E4D-2EC11041F39D
+  MODULE_TYPE                    = UEFI_APPLICATION
+  VERSION_STRING                 = 1.0
+  ENTRY_POINT                    = DcsInfoMain
+
+
+#
+# The following information is for reference only and not required by the build tools.
+#
+#  VALID_ARCHITECTURES           = IA32 X64 IPF EBC
+#
+
+[Sources]
+  DcsInfo.c
+
+
+[Packages]
+  MdePkg/MdePkg.dec
+  MdeModulePkg/MdeModulePkg.dec
+  DcsPkg/DcsPkg.dec
+
+[LibraryClasses]
+  UefiApplicationEntryPoint
+  UefiLib
+  BaseLib
+  MemoryAllocationLib
+  PasswordLib
+  GraphLib
+  CommonLib
+
+[Guids]
+  gEfiGlobalVariableGuid
+  gEfiDcsVariableGuid
+  gEfiFileInfoGuid
+
+[Protocols]
+  gEfiBlockIoProtocolGuid
+
+[BuildOptions.IA32]
+RELEASE_VS2010x86_IA32_CC_FLAGS  = /FAcs /D_UEFI
+DEBUG_VS2010x86_IA32_CC_FLAGS    = /FAcs /D_UEFI
+NOOPT_VS2010x86_IA32_CC_FLAGS    = /FAcs /D_UEFI
+
+RELEASE_VS2015x86_IA32_CC_FLAGS  = /arch:IA32 /FAcs /D_UEFI
+DEBUG_VS2015x86_IA32_CC_FLAGS    = /arch:IA32 /FAcs /D_UEFI
+NOOPT_VS2015x86_IA32_CC_FLAGS    = /arch:IA32 /FAcs /D_UEFI
+
+[BuildOptions.X64]
+RELEASE_VS2010x86_X64_CC_FLAGS    =  /D_UEFI
+DEBUG_VS2010x86_X64_CC_FLAGS    = /D_UEFI
+NOOPT_VS2010x86_X64_CC_FLAGS    = /D_UEFI
+
+RELEASE_VS2015x86_X64_CC_FLAGS    =  /D_UEFI
+DEBUG_VS2015x86_X64_CC_FLAGS    = /D_UEFI
+NOOPT_VS2015x86_X64_CC_FLAGS    = /D_UEFI
+
+[FeaturePcd]
+
+[Pcd]
+