2 * PROJECT: ReactOS Kernel
3 * LICENSE: GPL - See COPYING in the top level directory
4 * FILE: ntoskrnl/ob/oblife.c
5 * PURPOSE: Manages the lifetime of an Object, including its creation,
6 * and deletion, as well as setting or querying any of its
7 * information while it is active. Since Object Types are also
8 * Objects, those are also managed here.
9 * PROGRAMMERS: Alex Ionescu (alex.ionescu@reactos.org)
11 * Thomas Weidenmueller (w3seek@reactos.org)
14 /* INCLUDES ******************************************************************/
20 extern ULONG NtGlobalFlag
;
22 POBJECT_TYPE ObpTypeObjectType
= NULL
;
23 KEVENT ObpDefaultObject
;
24 KGUARDED_MUTEX ObpDeviceMapLock
;
26 GENERAL_LOOKASIDE ObpNameBufferLookasideList
, ObpCreateInfoLookasideList
;
28 WORK_QUEUE_ITEM ObpReaperWorkItem
;
29 volatile PVOID ObpReaperList
;
31 ULONG ObpObjectsCreated
, ObpObjectsWithName
, ObpObjectsWithPoolQuota
;
32 ULONG ObpObjectsWithHandleDB
, ObpObjectsWithCreatorInfo
;
33 POBJECT_TYPE ObpObjectTypes
[32];
35 /* PRIVATE FUNCTIONS *********************************************************/
39 ObpDeallocateObject(IN PVOID Object
)
42 POBJECT_HEADER Header
;
43 POBJECT_TYPE ObjectType
;
44 POBJECT_HEADER_HANDLE_INFO HandleInfo
;
45 POBJECT_HEADER_NAME_INFO NameInfo
;
46 POBJECT_HEADER_CREATOR_INFO CreatorInfo
;
47 POBJECT_HEADER_QUOTA_INFO QuotaInfo
;
48 ULONG PagedPoolCharge
, NonPagedPoolCharge
;
51 /* Get the header and assume this is what we'll free */
52 Header
= OBJECT_TO_OBJECT_HEADER(Object
);
53 ObjectType
= Header
->Type
;
54 HeaderLocation
= Header
;
56 /* To find the header, walk backwards from how we allocated */
57 if ((CreatorInfo
= OBJECT_HEADER_TO_CREATOR_INFO(Header
)))
59 HeaderLocation
= CreatorInfo
;
61 if ((NameInfo
= OBJECT_HEADER_TO_NAME_INFO(Header
)))
63 HeaderLocation
= NameInfo
;
65 if ((HandleInfo
= OBJECT_HEADER_TO_HANDLE_INFO(Header
)))
67 HeaderLocation
= HandleInfo
;
69 if ((QuotaInfo
= OBJECT_HEADER_TO_QUOTA_INFO(Header
)))
71 HeaderLocation
= QuotaInfo
;
74 /* Decrease the total */
75 InterlockedDecrement((PLONG
)&ObjectType
->TotalNumberOfObjects
);
77 /* Check if we have create info */
78 if (Header
->Flags
& OB_FLAG_CREATE_INFO
)
80 /* Double-check that it exists */
81 if (Header
->ObjectCreateInfo
)
84 ObpFreeObjectCreateInformation(Header
->ObjectCreateInfo
);
85 Header
->ObjectCreateInfo
= NULL
;
90 /* Check if it has a quota block */
91 if (Header
->QuotaBlockCharged
)
93 /* Check if we have quota information */
96 /* Get charges from quota information */
97 PagedPoolCharge
= QuotaInfo
->PagedPoolCharge
+
98 QuotaInfo
->SecurityDescriptorCharge
;
99 NonPagedPoolCharge
= QuotaInfo
->NonPagedPoolCharge
;
103 /* Get charges from object type */
104 PagedPoolCharge
= ObjectType
->TypeInfo
.DefaultPagedPoolCharge
;
105 NonPagedPoolCharge
= ObjectType
->
106 TypeInfo
.DefaultNonPagedPoolCharge
;
108 /* Add the SD charge too */
109 if (Header
->Flags
& OB_FLAG_SECURITY
) PagedPoolCharge
+= 2048;
112 /* Return the quota */
113 DPRINT("FIXME: Should return quotas: %lx %lx\n", PagedPoolCharge
, NonPagedPoolCharge
);
115 PsReturnSharedPoolQuota(ObjectHeader
->QuotaBlockCharged
,
123 /* Check if a handle database was active */
124 if ((HandleInfo
) && !(Header
->Flags
& OB_FLAG_SINGLE_PROCESS
))
127 ExFreePool(HandleInfo
->HandleCountDatabase
);
128 HandleInfo
->HandleCountDatabase
= NULL
;
131 /* Check if we have a name */
132 if ((NameInfo
) && (NameInfo
->Name
.Buffer
))
135 ExFreePool(NameInfo
->Name
.Buffer
);
136 NameInfo
->Name
.Buffer
= NULL
;
139 /* Catch invalid access */
140 Header
->Type
= (POBJECT_TYPE
)0xBAADB0B0;
142 /* Free the object using the same allocation tag */
143 ExFreePoolWithTag(HeaderLocation
, ObjectType
->Key
);
148 ObpDeleteObject(IN PVOID Object
,
149 IN BOOLEAN CalledFromWorkerThread
)
151 POBJECT_HEADER Header
;
152 POBJECT_TYPE ObjectType
;
153 POBJECT_HEADER_NAME_INFO NameInfo
;
154 POBJECT_HEADER_CREATOR_INFO CreatorInfo
;
158 /* Get the header and type */
159 Header
= OBJECT_TO_OBJECT_HEADER(Object
);
160 ObjectType
= Header
->Type
;
162 /* Get creator and name information */
163 NameInfo
= OBJECT_HEADER_TO_NAME_INFO(Header
);
164 CreatorInfo
= OBJECT_HEADER_TO_CREATOR_INFO(Header
);
166 /* Check if the object is on a type list */
167 if ((CreatorInfo
) && !(IsListEmpty(&CreatorInfo
->TypeList
)))
169 /* Lock the object type */
170 ObpEnterObjectTypeMutex(ObjectType
);
172 /* Remove the object from the type list */
173 RemoveEntryList(&CreatorInfo
->TypeList
);
175 /* Release the lock */
176 ObpLeaveObjectTypeMutex(ObjectType
);
179 /* Check if we have a name */
180 if ((NameInfo
) && (NameInfo
->Name
.Buffer
))
183 ExFreePool(NameInfo
->Name
.Buffer
);
184 RtlInitEmptyUnicodeString(&NameInfo
->Name
, NULL
, 0);
187 /* Check if we have a security descriptor */
188 if (Header
->SecurityDescriptor
)
190 /* Call the security procedure to delete it */
191 ObpCalloutStart(&CalloutIrql
);
192 ObjectType
->TypeInfo
.SecurityProcedure(Object
,
193 DeleteSecurityDescriptor
,
197 &Header
->SecurityDescriptor
,
200 ObpCalloutEnd(CalloutIrql
, "Security", ObjectType
, Object
);
203 /* Check if we have a delete procedure */
204 if (ObjectType
->TypeInfo
.DeleteProcedure
)
206 /* Save whether we were deleted from worker thread or not */
207 if (!CalledFromWorkerThread
) Header
->Flags
|= OB_FLAG_DEFER_DELETE
;
210 ObpCalloutStart(&CalloutIrql
);
211 ObjectType
->TypeInfo
.DeleteProcedure(Object
);
212 ObpCalloutEnd(CalloutIrql
, "Delete", ObjectType
, Object
);
215 /* Now de-allocate all object members */
216 ObpDeallocateObject(Object
);
221 ObpReapObject(IN PVOID Parameter
)
223 POBJECT_HEADER ReapObject
, NextObject
;
228 /* Get the reap object */
229 ReapObject
= InterlockedExchangePointer(&ObpReaperList
, (PVOID
)1);
231 /* Start deletion loop */
234 /* Get the next object */
235 NextObject
= ReapObject
->NextToFree
;
237 /* Delete the object */
238 ObpDeleteObject(&ReapObject
->Body
, TRUE
);
240 /* Move to the next one */
241 ReapObject
= NextObject
;
242 } while ((ReapObject
) && (ReapObject
!= (PVOID
)1));
243 } while ((ObpReaperList
!= (PVOID
)1) ||
244 (InterlockedCompareExchange((PLONG
)&ObpReaperList
, 0, 1) != 1));
248 * @name ObpSetPermanentObject
250 * The ObpSetPermanentObject routine makes an sets or clears the permanent
251 * flag of an object, thus making it either permanent or temporary.
254 * Pointer to the object to make permanent or temporary.
257 * Flag specifying which operation to perform.
261 * @remarks If the object is being made temporary, then it will be checked
262 * as a candidate for immediate removal from the namespace.
267 ObpSetPermanentObject(IN PVOID ObjectBody
,
268 IN BOOLEAN Permanent
)
270 POBJECT_HEADER ObjectHeader
;
273 ObjectHeader
= OBJECT_TO_OBJECT_HEADER(ObjectBody
);
275 /* Acquire object lock */
276 ObpAcquireObjectLock(ObjectHeader
);
278 /* Check what we're doing to it */
281 /* Set it to permanent */
282 ObjectHeader
->Flags
|= OB_FLAG_PERMANENT
;
284 /* Release the lock */
285 ObpReleaseObjectLock(ObjectHeader
);
289 /* Remove the flag */
290 ObjectHeader
->Flags
&= ~OB_FLAG_PERMANENT
;
292 /* Release the lock */
293 ObpReleaseObjectLock(ObjectHeader
);
295 /* Check if we should delete the object now */
296 ObpDeleteNameCheck(ObjectBody
);
302 ObpAllocateObjectNameBuffer(IN ULONG Length
,
303 IN BOOLEAN UseLookaside
,
304 IN OUT PUNICODE_STRING ObjectName
)
309 /* Set the maximum length to the length plus the terminator */
310 MaximumLength
= Length
+ sizeof(UNICODE_NULL
);
312 /* Check if we should use the lookaside buffer */
313 if (!(UseLookaside
) || (MaximumLength
> OBP_NAME_LOOKASIDE_MAX_SIZE
))
315 /* Nope, allocate directly from pool */
316 /* Since we later use MaximumLength to detect that we're not allocating
317 * from a list, we need at least MaximumLength + sizeof(UNICODE_NULL)
320 * People do call this with UseLookasideList FALSE so the distinction
323 if (MaximumLength
<= OBP_NAME_LOOKASIDE_MAX_SIZE
)
325 MaximumLength
= OBP_NAME_LOOKASIDE_MAX_SIZE
+ sizeof(UNICODE_NULL
);
327 Buffer
= ExAllocatePoolWithTag(PagedPool
,
333 /* Allocate from the lookaside */
334 MaximumLength
= OBP_NAME_LOOKASIDE_MAX_SIZE
;
335 Buffer
= ObpAllocateObjectCreateInfoBuffer(LookasideNameBufferList
);
338 /* Setup the string */
339 ObjectName
->MaximumLength
= (USHORT
)MaximumLength
;
340 ObjectName
->Length
= (USHORT
)Length
;
341 ObjectName
->Buffer
= Buffer
;
347 ObpFreeObjectNameBuffer(IN PUNICODE_STRING Name
)
349 PVOID Buffer
= Name
->Buffer
;
351 /* We know this is a pool-allocation if the size doesn't match */
352 if (Name
->MaximumLength
!= OBP_NAME_LOOKASIDE_MAX_SIZE
)
354 /* Free it from the pool */
359 /* Otherwise, free from the lookaside */
360 ObpFreeCapturedAttributes(Buffer
, LookasideNameBufferList
);
366 ObpCaptureObjectName(IN OUT PUNICODE_STRING CapturedName
,
367 IN PUNICODE_STRING ObjectName
,
368 IN KPROCESSOR_MODE AccessMode
,
369 IN BOOLEAN UseLookaside
)
371 NTSTATUS Status
= STATUS_SUCCESS
;
373 PWCHAR StringBuffer
= NULL
;
374 UNICODE_STRING LocalName
;
377 /* Initialize the Input String */
378 RtlInitEmptyUnicodeString(CapturedName
, NULL
, 0);
380 /* Protect everything */
383 /* Check if we came from user mode */
384 if (AccessMode
!= KernelMode
)
386 /* First Probe the String */
387 LocalName
= ProbeForReadUnicodeString(ObjectName
);
388 ProbeForRead(LocalName
.Buffer
, LocalName
.Length
, sizeof(WCHAR
));
392 /* No probing needed */
393 LocalName
= *ObjectName
;
396 /* Make sure there really is a string */
397 if ((StringLength
= LocalName
.Length
))
399 /* Check that the size is a valid WCHAR multiple */
400 if ((StringLength
& (sizeof(WCHAR
) - 1)) ||
401 /* Check that the NULL-termination below will work */
402 (StringLength
== (MAXUSHORT
- sizeof(UNICODE_NULL
) + 1)))
404 /* PS: Please keep the checks above expanded for clarity */
405 Status
= STATUS_OBJECT_NAME_INVALID
;
409 /* Allocate the string buffer */
410 StringBuffer
= ObpAllocateObjectNameBuffer(StringLength
,
415 /* Set failure code */
416 Status
= STATUS_INSUFFICIENT_RESOURCES
;
421 RtlCopyMemory(StringBuffer
, LocalName
.Buffer
, StringLength
);
422 StringBuffer
[StringLength
/ sizeof(WCHAR
)] = UNICODE_NULL
;
427 _SEH2_EXCEPT(ExSystemExceptionFilter())
429 /* Handle exception and free the string buffer */
430 Status
= _SEH2_GetExceptionCode();
433 ObpFreeObjectNameBuffer(CapturedName
);
444 ObpCaptureObjectCreateInformation(IN POBJECT_ATTRIBUTES ObjectAttributes
,
445 IN KPROCESSOR_MODE AccessMode
,
446 IN KPROCESSOR_MODE CreatorMode
,
447 IN BOOLEAN AllocateFromLookaside
,
448 IN POBJECT_CREATE_INFORMATION ObjectCreateInfo
,
449 OUT PUNICODE_STRING ObjectName
)
451 NTSTATUS Status
= STATUS_SUCCESS
;
452 PSECURITY_DESCRIPTOR SecurityDescriptor
;
453 PSECURITY_QUALITY_OF_SERVICE SecurityQos
;
454 PUNICODE_STRING LocalObjectName
= NULL
;
457 /* Zero out the Capture Data */
458 RtlZeroMemory(ObjectCreateInfo
, sizeof(OBJECT_CREATE_INFORMATION
));
460 /* SEH everything here for protection */
463 /* Check if we got attributes */
464 if (ObjectAttributes
)
466 /* Check if we're in user mode */
467 if (AccessMode
!= KernelMode
)
469 /* Probe the attributes */
470 ProbeForRead(ObjectAttributes
,
471 sizeof(OBJECT_ATTRIBUTES
),
475 /* Validate the Size and Attributes */
476 if ((ObjectAttributes
->Length
!= sizeof(OBJECT_ATTRIBUTES
)) ||
477 (ObjectAttributes
->Attributes
& ~OBJ_VALID_ATTRIBUTES
))
479 /* Invalid combination, fail */
480 _SEH2_YIELD(return STATUS_INVALID_PARAMETER
);
483 /* Set some Create Info and do not allow user-mode kernel handles */
484 ObjectCreateInfo
->RootDirectory
= ObjectAttributes
->RootDirectory
;
485 ObjectCreateInfo
->Attributes
= ObjectAttributes
->Attributes
& OBJ_VALID_ATTRIBUTES
;
486 if (CreatorMode
!= KernelMode
) ObjectCreateInfo
->Attributes
&= ~OBJ_KERNEL_HANDLE
;
487 LocalObjectName
= ObjectAttributes
->ObjectName
;
488 SecurityDescriptor
= ObjectAttributes
->SecurityDescriptor
;
489 SecurityQos
= ObjectAttributes
->SecurityQualityOfService
;
491 /* Check if we have a security descriptor */
492 if (SecurityDescriptor
)
495 Status
= SeCaptureSecurityDescriptor(SecurityDescriptor
,
501 if (!NT_SUCCESS(Status
))
503 /* Capture failed, quit */
504 ObjectCreateInfo
->SecurityDescriptor
= NULL
;
505 _SEH2_YIELD(return Status
);
508 /* Save the probe mode and security descriptor size */
509 ObjectCreateInfo
->SecurityDescriptorCharge
= 2048; /* FIXME */
510 ObjectCreateInfo
->ProbeMode
= AccessMode
;
513 /* Check if we have QoS */
516 /* Check if we came from user mode */
517 if (AccessMode
!= KernelMode
)
519 /* Validate the QoS */
520 ProbeForRead(SecurityQos
,
521 sizeof(SECURITY_QUALITY_OF_SERVICE
),
526 ObjectCreateInfo
->SecurityQualityOfService
= *SecurityQos
;
527 ObjectCreateInfo
->SecurityQos
=
528 &ObjectCreateInfo
->SecurityQualityOfService
;
533 /* We don't have a name */
534 LocalObjectName
= NULL
;
537 _SEH2_EXCEPT(ExSystemExceptionFilter())
539 /* Cleanup and return the exception code */
540 ObpReleaseObjectCreateInformation(ObjectCreateInfo
);
541 _SEH2_YIELD(return _SEH2_GetExceptionCode());
545 /* Now check if the Object Attributes had an Object Name */
548 Status
= ObpCaptureObjectName(ObjectName
,
551 AllocateFromLookaside
);
555 /* Clear the string */
556 RtlInitEmptyUnicodeString(ObjectName
, NULL
, 0);
558 /* He can't have specified a Root Directory */
559 if (ObjectCreateInfo
->RootDirectory
)
561 Status
= STATUS_OBJECT_NAME_INVALID
;
565 /* Cleanup if we failed */
566 if (!NT_SUCCESS(Status
))
568 ObpReleaseObjectCreateInformation(ObjectCreateInfo
);
571 /* Return status to caller */
577 ObFreeObjectCreateInfoBuffer(IN POBJECT_CREATE_INFORMATION ObjectCreateInfo
)
579 /* Call the macro. We use this function to isolate Ob internals from Io */
580 ObpFreeCapturedAttributes(ObjectCreateInfo
, LookasideCreateInfoList
);
585 ObpAllocateObject(IN POBJECT_CREATE_INFORMATION ObjectCreateInfo
,
586 IN PUNICODE_STRING ObjectName
,
587 IN POBJECT_TYPE ObjectType
,
589 IN KPROCESSOR_MODE PreviousMode
,
590 IN POBJECT_HEADER
*ObjectHeader
)
592 POBJECT_HEADER Header
;
593 ULONG QuotaSize
, HandleSize
, NameSize
, CreatorSize
;
594 POBJECT_HEADER_HANDLE_INFO HandleInfo
;
595 POBJECT_HEADER_NAME_INFO NameInfo
;
596 POBJECT_HEADER_CREATOR_INFO CreatorInfo
;
597 POBJECT_HEADER_QUOTA_INFO QuotaInfo
;
606 /* Check if we don't have an Object Type yet */
609 /* Use default tag and non-paged pool */
610 PoolType
= NonPagedPool
;
615 /* Use the pool and tag given */
616 PoolType
= ObjectType
->TypeInfo
.PoolType
;
617 Tag
= ObjectType
->Key
;
620 /* Check if we have no create information (ie: we're an object type) */
621 if (!ObjectCreateInfo
)
624 QuotaSize
= HandleSize
= 0;
625 NameSize
= sizeof(OBJECT_HEADER_NAME_INFO
);
626 CreatorSize
= sizeof(OBJECT_HEADER_CREATOR_INFO
);
630 /* Check if we have quota */
631 if ((((ObjectCreateInfo
->PagedPoolCharge
!=
632 ObjectType
->TypeInfo
.DefaultPagedPoolCharge
) ||
633 (ObjectCreateInfo
->NonPagedPoolCharge
!=
634 ObjectType
->TypeInfo
.DefaultNonPagedPoolCharge
) ||
635 (ObjectCreateInfo
->SecurityDescriptorCharge
> 2048)) &&
636 (PsGetCurrentProcess() != PsInitialSystemProcess
)) ||
637 (ObjectCreateInfo
->Attributes
& OBJ_EXCLUSIVE
))
640 QuotaSize
= sizeof(OBJECT_HEADER_QUOTA_INFO
);
641 ObpObjectsWithPoolQuota
++;
649 /* Check if we have a handle database */
650 if (ObjectType
->TypeInfo
.MaintainHandleCount
)
652 /* Set handle database size */
653 HandleSize
= sizeof(OBJECT_HEADER_HANDLE_INFO
);
654 ObpObjectsWithHandleDB
++;
662 /* Check if the Object has a name */
663 if (ObjectName
->Buffer
)
666 NameSize
= sizeof(OBJECT_HEADER_NAME_INFO
);
667 ObpObjectsWithName
++;
675 /* Check if the Object maintains type lists */
676 if (ObjectType
->TypeInfo
.MaintainTypeList
)
678 /* Set owner/creator size */
679 CreatorSize
= sizeof(OBJECT_HEADER_CREATOR_INFO
);
680 ObpObjectsWithCreatorInfo
++;
689 /* Set final header size */
690 FinalSize
= QuotaSize
+
694 FIELD_OFFSET(OBJECT_HEADER
, Body
);
696 /* Allocate memory for the Object and Header */
697 Header
= ExAllocatePoolWithTag(PoolType
, FinalSize
+ ObjectSize
, Tag
);
698 if (!Header
) return STATUS_INSUFFICIENT_RESOURCES
;
700 /* Check if we have a quota header */
703 /* Initialize quota info */
704 QuotaInfo
= (POBJECT_HEADER_QUOTA_INFO
)Header
;
705 QuotaInfo
->PagedPoolCharge
= ObjectCreateInfo
->PagedPoolCharge
;
706 QuotaInfo
->NonPagedPoolCharge
= ObjectCreateInfo
->NonPagedPoolCharge
;
707 QuotaInfo
->SecurityDescriptorCharge
= ObjectCreateInfo
->SecurityDescriptorCharge
;
708 QuotaInfo
->ExclusiveProcess
= NULL
;
709 Header
= (POBJECT_HEADER
)(QuotaInfo
+ 1);
712 /* Check if we have a handle database header */
715 /* Initialize Handle Info */
716 HandleInfo
= (POBJECT_HEADER_HANDLE_INFO
)Header
;
717 HandleInfo
->SingleEntry
.HandleCount
= 0;
718 Header
= (POBJECT_HEADER
)(HandleInfo
+ 1);
721 /* Check if we have a name header */
724 /* Initialize the Object Name Info */
725 NameInfo
= (POBJECT_HEADER_NAME_INFO
)Header
;
726 NameInfo
->Name
= *ObjectName
;
727 NameInfo
->Directory
= NULL
;
728 NameInfo
->QueryReferences
= 1;
730 /* Check if this is a call with the special protection flag */
731 if ((PreviousMode
== KernelMode
) &&
732 (ObjectCreateInfo
) &&
733 (ObjectCreateInfo
->Attributes
& 0x10000))
735 /* Set flag which will make the object protected from user-mode */
736 NameInfo
->QueryReferences
|= 0x40000000;
739 /* Set the header pointer */
740 Header
= (POBJECT_HEADER
)(NameInfo
+ 1);
743 /* Check if we have a creator header */
746 /* Initialize Creator Info */
747 CreatorInfo
= (POBJECT_HEADER_CREATOR_INFO
)Header
;
748 CreatorInfo
->CreatorBackTraceIndex
= 0;
749 CreatorInfo
->CreatorUniqueProcess
= PsGetCurrentProcessId();
750 InitializeListHead(&CreatorInfo
->TypeList
);
751 Header
= (POBJECT_HEADER
)(CreatorInfo
+ 1);
754 /* Check for quota information */
758 Header
->QuotaInfoOffset
= (UCHAR
)(QuotaSize
+
766 Header
->QuotaInfoOffset
= 0;
769 /* Check for handle information */
773 Header
->HandleInfoOffset
= (UCHAR
)(HandleSize
+
780 Header
->HandleInfoOffset
= 0;
783 /* Check for name information */
787 Header
->NameInfoOffset
= (UCHAR
)(NameSize
+ CreatorSize
);
792 Header
->NameInfoOffset
= 0;
795 /* Set the new object flag */
796 Header
->Flags
= OB_FLAG_CREATE_INFO
;
798 /* Remember if we have creator info */
799 if (CreatorSize
) Header
->Flags
|= OB_FLAG_CREATOR_INFO
;
801 /* Remember if we have handle info */
802 if (HandleSize
) Header
->Flags
|= OB_FLAG_SINGLE_PROCESS
;
804 /* Initialize the object header */
805 Header
->PointerCount
= 1;
806 Header
->HandleCount
= 0;
807 Header
->Type
= ObjectType
;
808 Header
->ObjectCreateInfo
= ObjectCreateInfo
;
809 Header
->SecurityDescriptor
= NULL
;
811 /* Check if this is a permanent object */
812 if ((ObjectCreateInfo
) && (ObjectCreateInfo
->Attributes
& OBJ_PERMANENT
))
814 /* Set the needed flag so we can check */
815 Header
->Flags
|= OB_FLAG_PERMANENT
;
818 /* Check if this is an exclusive object */
819 if ((ObjectCreateInfo
) && (ObjectCreateInfo
->Attributes
& OBJ_EXCLUSIVE
))
821 /* Set the needed flag so we can check */
822 Header
->Flags
|= OB_FLAG_EXCLUSIVE
;
825 /* Set kernel-mode flag */
826 if (PreviousMode
== KernelMode
) Header
->Flags
|= OB_FLAG_KERNEL_MODE
;
828 /* Check if we have a type */
831 /* Increase the number of objects of this type */
832 InterlockedIncrement((PLONG
)&ObjectType
->TotalNumberOfObjects
);
834 /* Update the high water */
835 ObjectType
->HighWaterNumberOfObjects
= max(ObjectType
->
836 TotalNumberOfObjects
,
838 HighWaterNumberOfObjects
);
842 *ObjectHeader
= Header
;
843 return STATUS_SUCCESS
;
848 ObQueryTypeInfo(IN POBJECT_TYPE ObjectType
,
849 OUT POBJECT_TYPE_INFORMATION ObjectTypeInfo
,
851 OUT PULONG ReturnLength
)
853 NTSTATUS Status
= STATUS_SUCCESS
;
859 /* Set return length aligned to 4-byte boundary */
860 *ReturnLength
+= sizeof(*ObjectTypeInfo
) +
861 ALIGN_UP(ObjectType
->Name
.MaximumLength
, ULONG
);
863 /* Check if thats too much though. */
864 if (Length
< *ReturnLength
)
866 _SEH2_YIELD(return STATUS_INFO_LENGTH_MISMATCH
);
870 ObjectTypeInfo
->TotalNumberOfHandles
=
871 ObjectType
->TotalNumberOfHandles
;
872 ObjectTypeInfo
->TotalNumberOfObjects
=
873 ObjectType
->TotalNumberOfObjects
;
874 ObjectTypeInfo
->HighWaterNumberOfHandles
=
875 ObjectType
->HighWaterNumberOfHandles
;
876 ObjectTypeInfo
->HighWaterNumberOfObjects
=
877 ObjectType
->HighWaterNumberOfObjects
;
878 ObjectTypeInfo
->PoolType
=
879 ObjectType
->TypeInfo
.PoolType
;
880 ObjectTypeInfo
->DefaultNonPagedPoolCharge
=
881 ObjectType
->TypeInfo
.DefaultNonPagedPoolCharge
;
882 ObjectTypeInfo
->DefaultPagedPoolCharge
=
883 ObjectType
->TypeInfo
.DefaultPagedPoolCharge
;
884 ObjectTypeInfo
->ValidAccessMask
=
885 ObjectType
->TypeInfo
.ValidAccessMask
;
886 ObjectTypeInfo
->SecurityRequired
=
887 ObjectType
->TypeInfo
.SecurityRequired
;
888 ObjectTypeInfo
->InvalidAttributes
=
889 ObjectType
->TypeInfo
.InvalidAttributes
;
890 ObjectTypeInfo
->GenericMapping
=
891 ObjectType
->TypeInfo
.GenericMapping
;
892 ObjectTypeInfo
->MaintainHandleCount
=
893 ObjectType
->TypeInfo
.MaintainHandleCount
;
895 /* Setup the name buffer */
896 InfoBuffer
= (PWSTR
)(ObjectTypeInfo
+ 1);
897 ObjectTypeInfo
->TypeName
.Buffer
= InfoBuffer
;
898 ObjectTypeInfo
->TypeName
.MaximumLength
= ObjectType
->Name
.MaximumLength
;
899 ObjectTypeInfo
->TypeName
.Length
= ObjectType
->Name
.Length
;
902 RtlCopyMemory(InfoBuffer
,
903 ObjectType
->Name
.Buffer
,
904 ObjectType
->Name
.Length
);
906 /* Null-terminate it */
907 (InfoBuffer
)[ObjectType
->Name
.Length
/ sizeof(WCHAR
)] = UNICODE_NULL
;
909 _SEH2_EXCEPT(ExSystemExceptionFilter())
911 /* Otherwise, get the exception code */
912 Status
= _SEH2_GetExceptionCode();
916 /* Return status to caller */
921 /* PUBLIC FUNCTIONS **********************************************************/
925 ObCreateObject(IN KPROCESSOR_MODE ProbeMode OPTIONAL
,
926 IN POBJECT_TYPE Type
,
927 IN POBJECT_ATTRIBUTES ObjectAttributes OPTIONAL
,
928 IN KPROCESSOR_MODE AccessMode
,
929 IN OUT PVOID ParseContext OPTIONAL
,
931 IN ULONG PagedPoolCharge OPTIONAL
,
932 IN ULONG NonPagedPoolCharge OPTIONAL
,
936 POBJECT_CREATE_INFORMATION ObjectCreateInfo
;
937 UNICODE_STRING ObjectName
;
938 POBJECT_HEADER Header
;
940 /* Allocate a capture buffer */
941 ObjectCreateInfo
= ObpAllocateObjectCreateInfoBuffer(LookasideCreateInfoList
);
942 if (!ObjectCreateInfo
) return STATUS_INSUFFICIENT_RESOURCES
;
944 /* Capture all the info */
945 Status
= ObpCaptureObjectCreateInformation(ObjectAttributes
,
951 if (NT_SUCCESS(Status
))
953 /* Validate attributes */
954 if (Type
->TypeInfo
.InvalidAttributes
& ObjectCreateInfo
->Attributes
)
957 Status
= STATUS_INVALID_PARAMETER
;
961 /* Check if we have a paged charge */
962 if (!PagedPoolCharge
)
965 PagedPoolCharge
= Type
->TypeInfo
.DefaultPagedPoolCharge
;
968 /* Check for nonpaged charge */
969 if (!NonPagedPoolCharge
)
972 NonPagedPoolCharge
= Type
->TypeInfo
.DefaultNonPagedPoolCharge
;
975 /* Write the pool charges */
976 ObjectCreateInfo
->PagedPoolCharge
= PagedPoolCharge
;
977 ObjectCreateInfo
->NonPagedPoolCharge
= NonPagedPoolCharge
;
979 /* Allocate the Object */
980 Status
= ObpAllocateObject(ObjectCreateInfo
,
986 if (NT_SUCCESS(Status
))
988 /* Return the Object */
989 *Object
= &Header
->Body
;
991 /* Check if this is a permanent object */
992 if (Header
->Flags
& OB_FLAG_PERMANENT
)
994 /* Do the privilege check */
995 if (!SeSinglePrivilegeCheck(SeCreatePermanentPrivilege
,
999 ObpDeallocateObject(*Object
);
1000 Status
= STATUS_PRIVILEGE_NOT_HELD
;
1009 /* Release the Capture Info, we don't need it */
1010 ObpFreeObjectCreateInformation(ObjectCreateInfo
);
1011 if (ObjectName
.Buffer
) ObpFreeObjectNameBuffer(&ObjectName
);
1014 /* We failed, so release the Buffer */
1015 ObpFreeCapturedAttributes(ObjectCreateInfo
, LookasideCreateInfoList
);
1021 ObCreateObjectType(IN PUNICODE_STRING TypeName
,
1022 IN POBJECT_TYPE_INITIALIZER ObjectTypeInitializer
,
1024 OUT POBJECT_TYPE
*ObjectType
)
1026 POBJECT_HEADER Header
;
1027 POBJECT_TYPE LocalObjectType
;
1030 OBP_LOOKUP_CONTEXT Context
;
1033 UNICODE_STRING ObjectName
;
1034 ANSI_STRING AnsiName
;
1035 POBJECT_HEADER_CREATOR_INFO CreatorInfo
;
1037 /* Verify parameters */
1039 !(TypeName
->Length
) ||
1040 (TypeName
->Length
% sizeof(WCHAR
)) ||
1041 !(ObjectTypeInitializer
) ||
1042 (ObjectTypeInitializer
->Length
!= sizeof(*ObjectTypeInitializer
)) ||
1043 (ObjectTypeInitializer
->InvalidAttributes
& ~OBJ_VALID_ATTRIBUTES
) ||
1044 (ObjectTypeInitializer
->MaintainHandleCount
&&
1045 (!(ObjectTypeInitializer
->OpenProcedure
) &&
1046 !ObjectTypeInitializer
->CloseProcedure
)) ||
1047 ((!ObjectTypeInitializer
->UseDefaultObject
) &&
1048 (ObjectTypeInitializer
->PoolType
!= NonPagedPool
)))
1051 return STATUS_INVALID_PARAMETER
;
1054 /* Make sure the name doesn't have a separator */
1055 p
= TypeName
->Buffer
;
1056 i
= TypeName
->Length
/ sizeof(WCHAR
);
1059 /* Check for one and fail */
1060 if (*p
++ == OBJ_NAME_PATH_SEPARATOR
) return STATUS_OBJECT_NAME_INVALID
;
1063 /* Setup a lookup context */
1064 ObpInitializeLookupContext(&Context
);
1066 /* Check if we've already created the directory of types */
1067 if (ObpTypeDirectoryObject
)
1069 /* Acquire the directory lock */
1070 ObpAcquireDirectoryLockExclusive(ObpTypeDirectoryObject
, &Context
);
1073 if (ObpLookupEntryDirectory(ObpTypeDirectoryObject
,
1075 OBJ_CASE_INSENSITIVE
,
1079 /* We have already created it, so fail */
1080 ObpReleaseLookupContext(&Context
);
1081 return STATUS_OBJECT_NAME_COLLISION
;
1085 /* Now make a copy of the object name */
1086 ObjectName
.Buffer
= ExAllocatePoolWithTag(PagedPool
,
1087 TypeName
->MaximumLength
,
1089 if (!ObjectName
.Buffer
)
1091 /* Out of memory, fail */
1092 ObpReleaseLookupContext(&Context
);
1093 return STATUS_INSUFFICIENT_RESOURCES
;
1096 /* Set the length and copy the name */
1097 ObjectName
.MaximumLength
= TypeName
->MaximumLength
;
1098 RtlCopyUnicodeString(&ObjectName
, TypeName
);
1100 /* Allocate the Object */
1101 Status
= ObpAllocateObject(NULL
,
1104 sizeof(OBJECT_TYPE
),
1107 if (!NT_SUCCESS(Status
))
1109 /* Free the name and fail */
1110 ObpReleaseLookupContext(&Context
);
1111 ExFreePool(ObjectName
.Buffer
);
1115 /* Setup the flags and name */
1116 LocalObjectType
= (POBJECT_TYPE
)&Header
->Body
;
1117 LocalObjectType
->Name
= ObjectName
;
1118 Header
->Flags
|= OB_FLAG_KERNEL_MODE
| OB_FLAG_PERMANENT
;
1120 /* Clear accounting data */
1121 LocalObjectType
->TotalNumberOfObjects
=
1122 LocalObjectType
->TotalNumberOfHandles
=
1123 LocalObjectType
->HighWaterNumberOfObjects
=
1124 LocalObjectType
->HighWaterNumberOfHandles
= 0;
1126 /* Check if this is the first Object Type */
1127 if (!ObpTypeObjectType
)
1129 /* It is, so set this as the type object */
1130 ObpTypeObjectType
= LocalObjectType
;
1131 Header
->Type
= ObpTypeObjectType
;
1133 /* Set the hard-coded key and object count */
1134 LocalObjectType
->TotalNumberOfObjects
= 1;
1135 LocalObjectType
->Key
= 'TjbO';
1139 /* Convert the tag to ASCII */
1140 Status
= RtlUnicodeStringToAnsiString(&AnsiName
, TypeName
, TRUE
);
1141 if (NT_SUCCESS(Status
))
1143 /* For every missing character, use a space */
1144 for (i
= 3; i
>= AnsiName
.Length
; i
--) AnsiName
.Buffer
[i
] = ' ';
1146 /* Set the key and free the converted name */
1147 LocalObjectType
->Key
= *(PULONG
)AnsiName
.Buffer
;
1148 ExFreePool(AnsiName
.Buffer
);
1152 /* Just copy the characters */
1153 LocalObjectType
->Key
= *(PULONG
)TypeName
->Buffer
;
1157 /* Set up the type information */
1158 LocalObjectType
->TypeInfo
= *ObjectTypeInitializer
;
1159 LocalObjectType
->TypeInfo
.PoolType
= ObjectTypeInitializer
->PoolType
;
1161 /* Check if we have to maintain a type list */
1162 if (NtGlobalFlag
& FLG_MAINTAIN_OBJECT_TYPELIST
)
1164 /* Enable support */
1165 LocalObjectType
->TypeInfo
.MaintainTypeList
= TRUE
;
1168 /* Calculate how much space our header'll take up */
1169 HeaderSize
= sizeof(OBJECT_HEADER
) +
1170 sizeof(OBJECT_HEADER_NAME_INFO
) +
1171 (ObjectTypeInitializer
->MaintainHandleCount
?
1172 sizeof(OBJECT_HEADER_HANDLE_INFO
) : 0);
1174 /* Check the pool type */
1175 if (ObjectTypeInitializer
->PoolType
== NonPagedPool
)
1177 /* Update the NonPaged Pool charge */
1178 LocalObjectType
->TypeInfo
.DefaultNonPagedPoolCharge
+= HeaderSize
;
1182 /* Update the Paged Pool charge */
1183 LocalObjectType
->TypeInfo
.DefaultPagedPoolCharge
+= HeaderSize
;
1186 /* All objects types need a security procedure */
1187 if (!ObjectTypeInitializer
->SecurityProcedure
)
1189 LocalObjectType
->TypeInfo
.SecurityProcedure
= SeDefaultObjectMethod
;
1192 /* Select the Wait Object */
1193 if (LocalObjectType
->TypeInfo
.UseDefaultObject
)
1195 /* Add the SYNCHRONIZE access mask since it's waitable */
1196 LocalObjectType
->TypeInfo
.ValidAccessMask
|= SYNCHRONIZE
;
1198 /* Use the "Default Object", a simple event */
1199 LocalObjectType
->DefaultObject
= &ObpDefaultObject
;
1201 /* The File Object gets an optimized hack so it can be waited on */
1202 else if ((TypeName
->Length
== 8) && !(wcscmp(TypeName
->Buffer
, L
"File")))
1204 /* Wait on the File Object's event directly */
1205 LocalObjectType
->DefaultObject
= (PVOID
)FIELD_OFFSET(FILE_OBJECT
,
1208 else if ((TypeName
->Length
== 24) && !(wcscmp(TypeName
->Buffer
, L
"WaitablePort")))
1210 /* Wait on the LPC Port's object directly */
1211 LocalObjectType
->DefaultObject
= (PVOID
)FIELD_OFFSET(LPCP_PORT_OBJECT
,
1216 /* No default Object */
1217 LocalObjectType
->DefaultObject
= NULL
;
1220 /* Initialize Object Type components */
1221 ExInitializeResourceLite(&LocalObjectType
->Mutex
);
1222 for (i
= 0; i
< 4; i
++)
1224 /* Initialize the object locks */
1225 ExInitializeResourceLite(&LocalObjectType
->ObjectLocks
[i
]);
1227 InitializeListHead(&LocalObjectType
->TypeList
);
1229 /* Lock the object type */
1230 ObpEnterObjectTypeMutex(LocalObjectType
);
1232 /* Get creator info and insert it into the type list */
1233 CreatorInfo
= OBJECT_HEADER_TO_CREATOR_INFO(Header
);
1234 if (CreatorInfo
) InsertTailList(&ObpTypeObjectType
->TypeList
,
1235 &CreatorInfo
->TypeList
);
1237 /* Set the index and the entry into the object type array */
1238 LocalObjectType
->Index
= ObpTypeObjectType
->TotalNumberOfObjects
;
1239 if (LocalObjectType
->Index
< 32)
1241 /* It fits, insert it */
1242 ObpObjectTypes
[LocalObjectType
->Index
- 1] = LocalObjectType
;
1245 /* Release the object type */
1246 ObpLeaveObjectTypeMutex(LocalObjectType
);
1248 /* Check if we're actually creating the directory object itself */
1249 if (!(ObpTypeDirectoryObject
) ||
1250 (ObpInsertEntryDirectory(ObpTypeDirectoryObject
, &Context
, Header
)))
1252 /* Check if the type directory exists */
1253 if (ObpTypeDirectoryObject
)
1256 ObReferenceObject(ObpTypeDirectoryObject
);
1259 /* Cleanup the lookup context */
1260 ObpReleaseLookupContext(&Context
);
1262 /* Return the object type and success */
1263 *ObjectType
= LocalObjectType
;
1264 return STATUS_SUCCESS
;
1267 /* If we got here, then we failed */
1268 ObpReleaseLookupContext(&Context
);
1269 return STATUS_INSUFFICIENT_RESOURCES
;
1274 ObpDeleteObjectType(IN PVOID Object
)
1277 POBJECT_TYPE ObjectType
= (PVOID
)Object
;
1279 /* Loop our locks */
1280 for (i
= 0; i
< 4; i
++)
1282 /* Delete each one */
1283 ExDeleteResourceLite(&ObjectType
->ObjectLocks
[i
]);
1286 /* Delete our main mutex */
1287 ExDeleteResourceLite(&ObjectType
->Mutex
);
1291 * @name ObMakeTemporaryObject
1294 * The ObMakeTemporaryObject routine <FILLMEIN>
1306 ObMakeTemporaryObject(IN PVOID ObjectBody
)
1310 /* Call the internal API */
1311 ObpSetPermanentObject(ObjectBody
, FALSE
);
1315 * @name NtMakeTemporaryObject
1318 * The NtMakeTemporaryObject routine <FILLMEIN>
1320 * @param ObjectHandle
1323 * @return STATUS_SUCCESS or appropriate error value.
1330 NtMakeTemporaryObject(IN HANDLE ObjectHandle
)
1336 /* Reference the object for DELETE access */
1337 Status
= ObReferenceObjectByHandle(ObjectHandle
,
1340 KeGetPreviousMode(),
1343 if (Status
!= STATUS_SUCCESS
) return Status
;
1345 /* Set it as temporary and dereference it */
1346 ObpSetPermanentObject(ObjectBody
, FALSE
);
1347 ObDereferenceObject(ObjectBody
);
1348 return STATUS_SUCCESS
;
1352 * @name NtMakePermanentObject
1355 * The NtMakePermanentObject routine <FILLMEIN>
1357 * @param ObjectHandle
1360 * @return STATUS_SUCCESS or appropriate error value.
1367 NtMakePermanentObject(IN HANDLE ObjectHandle
)
1371 KPROCESSOR_MODE PreviousMode
= ExGetPreviousMode();
1374 /* Make sure that the caller has SeCreatePermanentPrivilege */
1375 Status
= SeSinglePrivilegeCheck(SeCreatePermanentPrivilege
,
1377 if (!NT_SUCCESS(Status
)) return STATUS_PRIVILEGE_NOT_HELD
;
1379 /* Reference the object */
1380 Status
= ObReferenceObjectByHandle(ObjectHandle
,
1386 if (Status
!= STATUS_SUCCESS
) return Status
;
1388 /* Set it as permanent and dereference it */
1389 ObpSetPermanentObject(ObjectBody
, TRUE
);
1390 ObDereferenceObject(ObjectBody
);
1391 return STATUS_SUCCESS
;
1395 * @name NtQueryObject
1398 * The NtQueryObject routine <FILLMEIN>
1400 * @param ObjectHandle
1403 * @param ObjectInformationClass
1406 * @param ObjectInformation
1412 * @param ResultLength
1415 * @return STATUS_SUCCESS or appropriate error value.
1422 NtQueryObject(IN HANDLE ObjectHandle
,
1423 IN OBJECT_INFORMATION_CLASS ObjectInformationClass
,
1424 OUT PVOID ObjectInformation
,
1426 OUT PULONG ResultLength OPTIONAL
)
1428 OBJECT_HANDLE_INFORMATION HandleInfo
;
1429 POBJECT_HEADER ObjectHeader
= NULL
;
1430 POBJECT_HANDLE_ATTRIBUTE_INFORMATION HandleFlags
;
1431 POBJECT_BASIC_INFORMATION BasicInfo
;
1432 ULONG InfoLength
= 0;
1433 PVOID Object
= NULL
;
1435 KPROCESSOR_MODE PreviousMode
= ExGetPreviousMode();
1438 /* Check if the caller is from user mode */
1439 if (PreviousMode
!= KernelMode
)
1441 /* Protect validation with SEH */
1444 /* Probe the input structure */
1445 ProbeForWrite(ObjectInformation
, Length
, sizeof(UCHAR
));
1447 /* If we have a result length, probe it too */
1448 if (ResultLength
) ProbeForWriteUlong(ResultLength
);
1450 _SEH2_EXCEPT(EXCEPTION_EXECUTE_HANDLER
)
1452 /* Return the exception code */
1453 _SEH2_YIELD(return _SEH2_GetExceptionCode());
1459 * Make sure this isn't a generic type query, since the caller doesn't
1460 * have to give a handle for it
1462 if (ObjectInformationClass
!= ObjectTypesInformation
)
1464 /* Reference the object */
1465 Status
= ObReferenceObjectByHandle(ObjectHandle
,
1468 KeGetPreviousMode(),
1471 if (!NT_SUCCESS (Status
)) return Status
;
1473 /* Get the object header */
1474 ObjectHeader
= OBJECT_TO_OBJECT_HEADER(Object
);
1479 /* Check the information class */
1480 switch (ObjectInformationClass
)
1483 case ObjectBasicInformation
:
1485 /* Validate length */
1486 InfoLength
= sizeof(OBJECT_BASIC_INFORMATION
);
1487 if (Length
!= sizeof(OBJECT_BASIC_INFORMATION
))
1490 Status
= STATUS_INFO_LENGTH_MISMATCH
;
1494 /* Fill out the basic information */
1495 BasicInfo
= (POBJECT_BASIC_INFORMATION
)ObjectInformation
;
1496 BasicInfo
->Attributes
= HandleInfo
.HandleAttributes
;
1497 BasicInfo
->GrantedAccess
= HandleInfo
.GrantedAccess
;
1498 BasicInfo
->HandleCount
= ObjectHeader
->HandleCount
;
1499 BasicInfo
->PointerCount
= ObjectHeader
->PointerCount
;
1501 /* Permanent/Exclusive Flags are NOT in Handle attributes! */
1502 if (ObjectHeader
->Flags
& OB_FLAG_EXCLUSIVE
)
1505 BasicInfo
->Attributes
|= OBJ_EXCLUSIVE
;
1507 if (ObjectHeader
->Flags
& OB_FLAG_PERMANENT
)
1510 BasicInfo
->Attributes
|= OBJ_PERMANENT
;
1513 /* Copy quota information */
1514 BasicInfo
->PagedPoolCharge
= 0; /* FIXME*/
1515 BasicInfo
->NonPagedPoolCharge
= 0; /* FIXME*/
1517 /* Copy name information */
1518 BasicInfo
->NameInfoSize
= 0; /* FIXME*/
1519 BasicInfo
->TypeInfoSize
= 0; /* FIXME*/
1521 /* Copy security information */
1522 BasicInfo
->SecurityDescriptorSize
= 0; /* FIXME*/
1524 /* Check if this is a symlink */
1525 if (ObjectHeader
->Type
== ObSymbolicLinkType
)
1527 /* Return the creation time */
1528 BasicInfo
->CreationTime
.QuadPart
=
1529 ((POBJECT_SYMBOLIC_LINK
)Object
)->CreationTime
.QuadPart
;
1533 /* Otherwise return 0 */
1534 BasicInfo
->CreationTime
.QuadPart
= (ULONGLONG
)0;
1537 /* Break out with success */
1538 Status
= STATUS_SUCCESS
;
1541 /* Name information */
1542 case ObjectNameInformation
:
1544 /* Call the helper and break out */
1545 Status
= ObQueryNameString(Object
,
1546 (POBJECT_NAME_INFORMATION
)
1552 /* Information about this type */
1553 case ObjectTypeInformation
:
1555 /* Call the helper and break out */
1556 Status
= ObQueryTypeInfo(ObjectHeader
->Type
,
1557 (POBJECT_TYPE_INFORMATION
)
1563 /* Information about all types */
1564 case ObjectTypesInformation
:
1565 DPRINT1("NOT IMPLEMENTED!\n");
1566 InfoLength
= Length
;
1567 Status
= STATUS_NOT_IMPLEMENTED
;
1570 /* Information about the handle flags */
1571 case ObjectHandleFlagInformation
:
1573 /* Validate length */
1574 InfoLength
= sizeof (OBJECT_HANDLE_ATTRIBUTE_INFORMATION
);
1575 if (Length
!= sizeof (OBJECT_HANDLE_ATTRIBUTE_INFORMATION
))
1577 Status
= STATUS_INFO_LENGTH_MISMATCH
;
1581 /* Get the structure */
1582 HandleFlags
= (POBJECT_HANDLE_ATTRIBUTE_INFORMATION
)
1586 HandleFlags
->Inherit
= HandleInfo
.HandleAttributes
& OBJ_INHERIT
;
1587 HandleFlags
->ProtectFromClose
= (HandleInfo
.HandleAttributes
&
1588 OBJ_PROTECT_CLOSE
) != 0;
1590 /* Break out with success */
1591 Status
= STATUS_SUCCESS
;
1598 InfoLength
= Length
;
1599 Status
= STATUS_INVALID_INFO_CLASS
;
1603 /* Check if the caller wanted the return length */
1606 /* Write the length */
1607 *ResultLength
= InfoLength
;
1610 _SEH2_EXCEPT(ExSystemExceptionFilter())
1612 /* Otherwise, get the exception code */
1613 Status
= _SEH2_GetExceptionCode();
1617 /* Dereference the object if we had referenced it */
1618 if (Object
) ObDereferenceObject(Object
);
1625 * @name NtSetInformationObject
1628 * The NtSetInformationObject routine <FILLMEIN>
1630 * @param ObjectHandle
1633 * @param ObjectInformationClass
1636 * @param ObjectInformation
1642 * @return STATUS_SUCCESS or appropriate error value.
1649 NtSetInformationObject(IN HANDLE ObjectHandle
,
1650 IN OBJECT_INFORMATION_CLASS ObjectInformationClass
,
1651 IN PVOID ObjectInformation
,
1655 OBP_SET_HANDLE_ATTRIBUTES_CONTEXT Context
;
1657 KAPC_STATE ApcState
;
1658 POBJECT_DIRECTORY Directory
;
1659 KPROCESSOR_MODE PreviousMode
;
1660 BOOLEAN AttachedToProcess
= FALSE
;
1663 /* Validate the information class */
1664 switch (ObjectInformationClass
)
1666 case ObjectHandleFlagInformation
:
1668 /* Validate the length */
1669 if (Length
!= sizeof(OBJECT_HANDLE_ATTRIBUTE_INFORMATION
))
1671 /* Invalid length */
1672 return STATUS_INFO_LENGTH_MISMATCH
;
1675 /* Save the previous mode */
1676 Context
.PreviousMode
= ExGetPreviousMode();
1678 /* Check if we were called from user mode */
1679 if (Context
.PreviousMode
!= KernelMode
)
1684 /* Probe and capture the attribute buffer */
1685 ProbeForRead(ObjectInformation
,
1686 sizeof(OBJECT_HANDLE_ATTRIBUTE_INFORMATION
),
1688 Context
.Information
= *(POBJECT_HANDLE_ATTRIBUTE_INFORMATION
)
1691 _SEH2_EXCEPT(EXCEPTION_EXECUTE_HANDLER
)
1693 /* Return the exception code */
1694 _SEH2_YIELD(return _SEH2_GetExceptionCode());
1700 /* Just copy the buffer directly */
1701 Context
.Information
= *(POBJECT_HANDLE_ATTRIBUTE_INFORMATION
)
1705 /* Check if this is a kernel handle */
1706 if (ObIsKernelHandle(ObjectHandle
, Context
.PreviousMode
))
1708 /* Get the actual handle */
1709 ObjectHandle
= ObKernelHandleToHandle(ObjectHandle
);
1710 ObjectTable
= ObpKernelHandleTable
;
1712 /* Check if we're not in the system process */
1713 if (PsGetCurrentProcess() != PsInitialSystemProcess
)
1716 KeStackAttachProcess(&PsInitialSystemProcess
->Pcb
, &ApcState
);
1717 AttachedToProcess
= TRUE
;
1722 /* Use the current table */
1723 ObjectTable
= PsGetCurrentProcess()->ObjectTable
;
1726 /* Change the handle attributes */
1727 if (!ExChangeHandle(ObjectTable
,
1729 ObpSetHandleAttributes
,
1730 (ULONG_PTR
)&Context
))
1733 Status
= STATUS_ACCESS_DENIED
;
1738 Status
= STATUS_SUCCESS
;
1741 /* De-attach if we were attached, and return status */
1742 if (AttachedToProcess
) KeUnstackDetachProcess(&ApcState
);
1745 case ObjectSessionInformation
:
1747 /* Only a system process can do this */
1748 PreviousMode
= ExGetPreviousMode();
1749 if (!SeSinglePrivilegeCheck(SeTcbPrivilege
, PreviousMode
))
1752 DPRINT1("Privilege not held\n");
1753 Status
= STATUS_PRIVILEGE_NOT_HELD
;
1757 /* Get the object directory */
1758 Status
= ObReferenceObjectByHandle(ObjectHandle
,
1764 if (NT_SUCCESS(Status
))
1766 /* FIXME: Missng locks */
1767 /* Set its session ID */
1768 Directory
->SessionId
= PsGetCurrentProcessSessionId();
1769 ObDereferenceObject(Directory
);
1775 /* Unsupported class */
1776 Status
= STATUS_INVALID_INFO_CLASS
;