1 files changed, 128 insertions, 0 deletions
diff --git a/private/ntos/nthals/halflex/alpha/info.c b/private/ntos/nthals/halflex/alpha/info.c
new file mode 100644
index 000000000..02e46848b
--- /dev/null
+++ b/private/ntos/nthals/halflex/alpha/info.c
@@ -0,0 +1,128 @@
+/*++
+
+Copyright (c) 1991  Microsoft Corporation
+Copyright (c) 1994  Digital Equipment Corporation
+
+Module Name:
+
+    info.c
+
+Abstract:
+
+Author:
+
+    Ken Reneris (kenr)  08-Aug-1994
+
+Environment:
+
+    Kernel mode only.
+
+Revision History:
+
+--*/
+
+
+#include "halp.h"
+
+#ifdef _PNP_POWER_
+HAL_CALLBACKS   HalCallback;
+#endif // _PNP_POWER_
+
+#ifdef ALLOC_PRAGMA
+#pragma alloc_text(PAGE,HaliQuerySystemInformation)
+#pragma alloc_text(PAGE,HaliSetSystemInformation)
+#endif
+
+
+NTSTATUS
+HaliQuerySystemInformation(
+    IN HAL_QUERY_INFORMATION_CLASS  InformationClass,
+    IN ULONG     BufferSize,
+    OUT PVOID    Buffer,
+    OUT PULONG   ReturnedLength
+    )
+/*++
+
+Routine Description:
+
+    The function returns system-wide information controlled by the HAL for a
+    variety of classes.
+
+Arguments:
+
+    InformationClass - Information class of the request.
+
+    BufferSize - Size of buffer supplied by the caller.
+
+    Buffer - Supplies the space to store the data.
+
+    ReturnedLength - Supplies a count in bytes of the amount of data returned.
+
+Return Value:
+
+    STATUS_SUCCESS or error.
+
+--*/
+{
+    NTSTATUS Status;
+
+    switch (InformationClass) {
+        case HalProfileSourceInformation:
+            Status = HalpProfileSourceInformation (
+                        Buffer,
+                        BufferSize,
+                        ReturnedLength);
+            break;
+
+        default:
+            Status = STATUS_INVALID_LEVEL;
+            break;
+    }
+
+    return(Status);
+}
+
+NTSTATUS
+HaliSetSystemInformation (
+    IN HAL_SET_INFORMATION_CLASS    InformationClass,
+    IN ULONG     BufferSize,
+    IN PVOID     Buffer
+    )
+/*++
+
+Routine Description:
+
+    The function allows setting of various fields return by
+    HalQuerySystemInformation.
+
+Arguments:
+
+    InformationClass - Information class of the request.
+
+    BufferSize - Size of buffer supplied by the caller.
+
+    Buffer - Supplies the data to be set.
+
+Return Value:
+
+    STATUS_SUCCESS or error.
+
+--*/
+{
+    NTSTATUS Status;
+
+    switch (InformationClass) {
+
+        case HalProfileSourceInterval:
+            Status = HalpProfileSourceInterval (
+                        Buffer,
+                        BufferSize);
+            break;
+
+        default:
+            Status = STATUS_INVALID_LEVEL;
+            break;
+    }
+
+    return Status;
+}