- Silence TCPIP.
[reactos.git] / reactos / ntoskrnl / ob / ntobj.c
index e4d9016..527ac5d 100644 (file)
@@ -1,20 +1,16 @@
-/* $Id: ntobj.c,v 1.13 2003/06/02 10:03:52 ekohl Exp $
- *
- * COPYRIGHT:     See COPYING in the top level directory
- * PROJECT:       ReactOS kernel
- * FILE:          ntoskrnl/ob/ntobj.c
- * PURPOSE:       User mode interface to object manager
- * PROGRAMMER:    David Welch (welch@cwcom.net)
- * UPDATE HISTORY:
- *               10/06/98: Created
+/* $Id$
+ *
+ * COPYRIGHT:       See COPYING in the top level directory
+ * PROJECT:         ReactOS kernel
+ * FILE:            ntoskrnl/ob/ntobj.c
+ * PURPOSE:         User mode interface to object manager
+ *
+ * PROGRAMMERS:     David Welch (welch@cwcom.net)
  */
 
 /* INCLUDES *****************************************************************/
 
-#include <ddk/ntddk.h>
-#include <internal/ob.h>
-#include <internal/id.h>
-
+#include <ntoskrnl.h>
 #define NDEBUG
 #include <internal/debug.h>
 
@@ -24,7 +20,7 @@
 /**********************************************************************
  * NAME                                                        EXPORTED
  *     NtSetInformationObject
- *     
+ *
  * DESCRIPTION
  *
  * ARGUMENTS
  */
 NTSTATUS STDCALL
 NtSetInformationObject (IN HANDLE ObjectHandle,
-                       IN CINT ObjectInformationClass,
+                       IN OBJECT_INFORMATION_CLASS ObjectInformationClass,
                        IN PVOID ObjectInformation,
                        IN ULONG Length)
 {
-  UNIMPLEMENTED;
-}
+  PVOID Object;
+  NTSTATUS Status;
 
+  PAGED_CODE();
 
-/*Very, very, very new implementation. Test it!
+  if (ObjectInformationClass != ObjectHandleInformation)
+    return STATUS_INVALID_INFO_CLASS;
 
-  Probably we should add meaning to QueryName in POBJECT_TYPE, no matter if we know
-  the correct parameters or not. For FILE_OBJECTs, it would probably look like the code
-  for ObjectNameInformation below. You give it a POBJECT and a PUNICODE_STRING, and it
-  returns the full path in the PUNICODE_STRING
+  if (Length != sizeof (OBJECT_HANDLE_ATTRIBUTE_INFORMATION))
+    return STATUS_INFO_LENGTH_MISMATCH;
+
+  Status = ObReferenceObjectByHandle (ObjectHandle,
+                                     0,
+                                     NULL,
+                                     (KPROCESSOR_MODE)KeGetPreviousMode (),
+                                     &Object,
+                                     NULL);
+  if (!NT_SUCCESS (Status))
+    {
+      return Status;
+    }
+
+  Status = ObpSetHandleAttributes (ObjectHandle,
+                                  (POBJECT_HANDLE_ATTRIBUTE_INFORMATION)ObjectInformation);
+
+  ObDereferenceObject (Object);
+
+  return Status;
+}
 
-  If we don't do it this way, we should anyway add switches and separate functions to handle
-  the different object types*/
 
 /**********************************************************************
  * NAME                                                        EXPORTED
  *     NtQueryObject
- *     
+ *
  * DESCRIPTION
  *
  * ARGUMENTS
@@ -67,22 +80,25 @@ NtSetInformationObject (IN HANDLE ObjectHandle,
  */
 NTSTATUS STDCALL
 NtQueryObject (IN HANDLE ObjectHandle,
-              IN CINT ObjectInformationClass,
+              IN OBJECT_INFORMATION_CLASS ObjectInformationClass,
               OUT PVOID ObjectInformation,
               IN ULONG Length,
-              OUT PULONG ReturnLength)
+              OUT PULONG ResultLength  OPTIONAL)
 {
-  POBJECT_TYPE_INFORMATION typeinfo;
+  OBJECT_HANDLE_INFORMATION HandleInfo;
   POBJECT_HEADER ObjectHeader;
+  ULONG InfoLength;
   PVOID Object;
   NTSTATUS Status;
 
+  PAGED_CODE();
+
   Status = ObReferenceObjectByHandle (ObjectHandle,
                                      0,
                                      NULL,
-                                     KeGetPreviousMode(),
+                                     (KPROCESSOR_MODE)KeGetPreviousMode(),
                                      &Object,
-                                     NULL);
+                                     &HandleInfo);
   if (!NT_SUCCESS (Status))
     {
       return Status;
@@ -92,18 +108,58 @@ NtQueryObject (IN HANDLE ObjectHandle,
 
   switch (ObjectInformationClass)
     {
+      case ObjectBasicInformation:
+       InfoLength = sizeof(OBJECT_BASIC_INFORMATION);
+       if (Length != sizeof(OBJECT_BASIC_INFORMATION))
+         {
+           Status = STATUS_INFO_LENGTH_MISMATCH;
+         }
+       else
+         {
+           POBJECT_BASIC_INFORMATION BasicInfo;
+
+           BasicInfo = (POBJECT_BASIC_INFORMATION)ObjectInformation;
+           BasicInfo->Attributes = HandleInfo.HandleAttributes;
+           BasicInfo->GrantedAccess = HandleInfo.GrantedAccess;
+           BasicInfo->HandleCount = ObjectHeader->HandleCount;
+           BasicInfo->PointerCount = ObjectHeader->PointerCount;
+           BasicInfo->PagedPoolUsage = 0; /* FIXME*/
+           BasicInfo->NonPagedPoolUsage = 0; /* FIXME*/
+           BasicInfo->NameInformationLength = 0; /* FIXME*/
+           BasicInfo->TypeInformationLength = 0; /* FIXME*/
+           BasicInfo->SecurityDescriptorLength = 0; /* FIXME*/
+           if (ObjectHeader->Type == ObSymbolicLinkType)
+             {
+               BasicInfo->CreateTime.QuadPart =
+                 ((PSYMLINK_OBJECT)Object)->CreateTime.QuadPart;
+             }
+           else
+             {
+               BasicInfo->CreateTime.QuadPart = (ULONGLONG)0;
+             }
+           Status = STATUS_SUCCESS;
+         }
+       break;
+
       case ObjectNameInformation:
        Status = ObQueryNameString (Object,
                                    (POBJECT_NAME_INFORMATION)ObjectInformation,
                                    Length,
-                                   ReturnLength);
+                                   &InfoLength);
        break;
 
       case ObjectTypeInformation:
-       typeinfo = (POBJECT_TYPE_INFORMATION)ObjectInformation;
-       if (Length!=sizeof(OBJECT_TYPE_INFORMATION))
-         return STATUS_INVALID_BUFFER_SIZE;
+#if 0
+//     InfoLength =
+       if (Length != sizeof(OBJECT_TYPE_INFORMATION))
+         {
+           Status = STATUS_INVALID_BUFFER_SIZE;
+         }
+       else
+         {
+           POBJECT_TYPE_INFORMATION TypeInfo;
 
+           TypeInfo = (POBJECT_TYPE_INFORMATION)ObjectInformation;
        // FIXME: Is this supposed to only be the header's Name field?
        // Can somebody check/verify this?
        RtlCopyUnicodeString(&typeinfo->Name,&ObjectHeader->Name);
@@ -113,27 +169,80 @@ NtQueryObject (IN HANDLE ObjectHandle,
            break;
          }
 
-       RtlCopyUnicodeString(&typeinfo->Type,&ObjectHeader->ObjectType->TypeName);
+       RtlCopyUnicodeString(&typeinfo->Type,&ObjectHeader->Type->TypeName);
        //This should be info from the object header, not the object type, right?
        typeinfo->TotalHandles = ObjectHeader-> HandleCount;
-       typeinfo->ReferenceCount = ObjectHeader -> RefCount;
+       typeinfo->ReferenceCount = ObjectHeader -> PointerCount;
+         }
+#endif
+       Status = STATUS_NOT_IMPLEMENTED;
        break;
 
-      default:
+      case ObjectAllTypesInformation:
        Status = STATUS_NOT_IMPLEMENTED;
        break;
+
+      case ObjectHandleInformation:
+       InfoLength = sizeof (OBJECT_HANDLE_ATTRIBUTE_INFORMATION);
+       if (Length != sizeof (OBJECT_HANDLE_ATTRIBUTE_INFORMATION))
+         {
+           Status = STATUS_INFO_LENGTH_MISMATCH;
+         }
+       else
+         {
+           Status = ObpQueryHandleAttributes (ObjectHandle,
+                                              (POBJECT_HANDLE_ATTRIBUTE_INFORMATION)ObjectInformation);
+         }
+       break;
+
+      default:
+       Status = STATUS_INVALID_INFO_CLASS;
+       break;
     }
 
-  ObDereferenceObject(Object);
+  ObDereferenceObject (Object);
+
+  if (ResultLength != NULL)
+    *ResultLength = InfoLength;
 
   return Status;
 }
 
 
+/**********************************************************************
+ * NAME                                                        PRIVATE
+ *     ObpSetPermanentObject/2
+ *
+ * DESCRIPTION
+ *     Fast general purpose routine to set an object's permanent
+ *     attribute, given a  pointer to the object's body.
+ */
+VOID FASTCALL
+ObpSetPermanentObject (IN PVOID ObjectBody, IN BOOLEAN Permanent)
+{
+  POBJECT_HEADER ObjectHeader;
+
+  ObjectHeader = BODY_TO_HEADER(ObjectBody);
+  ASSERT (ObjectHeader->PointerCount > 0);
+  if (Permanent)
+  {
+     ObjectHeader->Flags |= OB_FLAG_PERMANENT;
+  }
+  else
+  {
+     ObjectHeader->Flags &= ~OB_FLAG_PERMANENT;
+     if (ObjectHeader->HandleCount == 0 && HEADER_TO_OBJECT_NAME(ObjectHeader)->Directory)
+     {
+        /* Remove the object from the namespace */
+        ObpRemoveEntryDirectory(ObjectHeader);
+     }
+  }
+}
+
 /**********************************************************************
  * NAME                                                        EXPORTED
- *     ObMakeTemporaryObject
- *     
+ *     ObMakeTemporaryObject/1
+ *
  * DESCRIPTION
  *
  * ARGUMENTS
@@ -141,21 +250,20 @@ NtQueryObject (IN HANDLE ObjectHandle,
  * RETURN VALUE
  *
  * REVISIONS
+ *
+ * @implemented
  */
 VOID STDCALL
-ObMakeTemporaryObject (IN PVOID ObjectBody)
+ObMakeTemporaryObject(IN PVOID ObjectBody)
 {
-  POBJECT_HEADER ObjectHeader;
-
-  ObjectHeader = BODY_TO_HEADER(ObjectBody);
-  ObjectHeader->Permanent = FALSE;
+  ObpSetPermanentObject (ObjectBody, FALSE);
 }
 
 
 /**********************************************************************
  * NAME                                                        EXPORTED
  *     NtMakeTemporaryObject
- *     
+ *
  * DESCRIPTION
  *
  * ARGUMENTS
@@ -164,29 +272,69 @@ ObMakeTemporaryObject (IN PVOID ObjectBody)
  *
  * REVISIONS
  */
-NTSTATUS
-STDCALL
-NtMakeTemporaryObject (IN HANDLE Handle)
+NTSTATUS STDCALL
+NtMakeTemporaryObject(IN HANDLE ObjectHandle)
 {
-  POBJECT_HEADER ObjectHeader;
-  PVOID Object;
+  PVOID ObjectBody;
   NTSTATUS Status;
 
-  Status = ObReferenceObjectByHandle(Handle,
+  PAGED_CODE();
+
+  Status = ObReferenceObjectByHandle(ObjectHandle,
                                     0,
                                     NULL,
-                                    KernelMode,
-                                    & Object,
+                                    (KPROCESSOR_MODE)KeGetPreviousMode(),
+                                    &ObjectBody,
                                     NULL);
   if (Status != STATUS_SUCCESS)
     {
       return Status;
     }
 
-  ObjectHeader = BODY_TO_HEADER(Object);
-  ObjectHeader->Permanent = FALSE;
+  ObpSetPermanentObject (ObjectBody, FALSE);
+
+  ObDereferenceObject(ObjectBody);
+
+  return STATUS_SUCCESS;
+}
+
+
+/**********************************************************************
+ * NAME                                                        EXPORTED
+ *     NtMakePermanentObject/1
+ *
+ * DESCRIPTION
+ *
+ * ARGUMENTS
+ *
+ * RETURN VALUE
+ *
+ * REVISIONS
+ *
+ * @implemented
+ */
+NTSTATUS STDCALL
+NtMakePermanentObject(IN HANDLE ObjectHandle)
+{
+  PVOID ObjectBody;
+  NTSTATUS Status;
+
+  PAGED_CODE();
+
+  Status = ObReferenceObjectByHandle(ObjectHandle,
+                                    0,
+                                    NULL,
+                                    (KPROCESSOR_MODE)KeGetPreviousMode(),
+                                    &ObjectBody,
+                                    NULL);
+  if (Status != STATUS_SUCCESS)
+    {
+      return Status;
+    }
+
+  ObpSetPermanentObject (ObjectBody, TRUE);
 
-  ObDereferenceObject(Object);
+  ObDereferenceObject(ObjectBody);
 
   return STATUS_SUCCESS;
 }