j!4ddlZddlmZddlZddlZddlTdadaejZ dZ dZ dZ dZ d Zdd Zd ZiZejD]\ZZedd d kreee<dZdZdZdZdZdZedkr edSdS)N)Callable)*cdtz}t|}|dD]}t|d|ddg}|D],}||}td|d|-dS) zDumps the root DSELDAP://%srootDSESupportedLDAPVersionz supports ldap version CurrentTimedefaultNamingContext =N)server ADsGetObjectGetprint)pathrootdseitem attributesattrvals gC:\Users\johnn\AppData\Local\Programs\Python\Python311\Lib\site-packages\win32comext/adsi/demos/test.pyDumpRootrs  &D4  G 23366 44d445555!78J  kk$ $  cNd}t||dS)NzRAbstract lDAPDisplayName schemaIDGUID schemaNamingContext attributeSyntax oMSyntax_DumpTheseAttributessplitchildattrss r _DumpClassr! s% `E .....rcNd}t||dS)NzlDAPDisplayName schemaIDGUID adminDescription adminDisplayName rDNAttID defaultHidingValue defaultObjectCategory systemOnly defaultSecurityDescriptorrrs r_DumpAttributer#%s( dE .....rc |D]]} ||}n#tj$r }Yd}~-d}~wwxYwtdkrt d|jd|d|^dS)Nzr z: r )r pythoncom com_error verbose_levelrClass) rr rrdetailshrmsgexcargs rrr*s 3 3 $))D//CC" $ $ $ HHHH $ A   1ek11T11C11 2 2 2 3 3s 55c*dtz}t|}|d}dtz|z}td|t|}dx}x}x}}|D]`}|j} | dkrt ||dz }$| dkrt ||dz }?| d kr|dz }Ktd | |dz }atrFtd |d td |d td |dtd |ddSdS)zDumps the default DSE schemarschemaNamingContextLDAP:// Binding tor classSchemaattributeSchema subSchemazUnknown class: Processedclassesrz sub-schema'sz unknown typesN)r rrrr*r!r#r)) rrnameobnclassesnattrnsubnunkr class_names r DumpSchemarA9sb  &D4  G ;;, - -D v  $D , d  B%&&H&u&td  [  & & u    MHH , , , 5 ! ! ! QJEE ; & & AIDD "J / / / AIDD2 k8Y/// k5,/// k4000 k411111 22rc d|z}t||jd|j t|jt }n#t j$rd}YnwxYw|||}t|d|j d|j ddg}| |}|D]+}|j D]!\}} t|d|j d|",|D]} t| |d zdS) Nz z object: z RDN='z ', ObjectDN=''distinguishedNamez Attribute 'z' = r5)rr*NamerADsPathIID_IDirectoryObjectr'r(GetObjectInformationRDNObjectDNGetObjectAttributesValuesAttrName _DumpObject) r;levelprefixdir_obinfonamesr rrtyprs rrNrN\sV E\F V 1RX 1 1 1 1222bj*>??   **,, FFtxFFdmFFFGGG$%**511 G GD K G GSEET]EEEEFFFF G&&E519%%%%&&sAAAcdtz}t|}|d}dtz|z}td|t|}t |dS)z&Recursively dump the entire directory!rr r2r3N)r rrrrN)rrr:r;s rDumpAllObjectsrVrsj  &D4  G ;;- . .D v  $D , d  BOOOOOrVT_cdtd}t|t}dx}x}}|D]\}|j}|dkrg}|jr|d|jr|dd|}ddl } | j |j } td kr)td |j|| |d z }|d kr8|jrd } nd} td krtd|jd| |d z } |dkrJt$|jd} td krtd|jd| |d z }^td kr5td|dtd|dtd|ddSdS)z/Dumps the schema using an alternative techniquer2schemarclassAbstract Auxiliaryz, Nr%z.Class: Name={}, Flags={}, Primary Interface={}r5propertyz Multi-Valuedz Single-ValuedzProperty: Name=syntaxzz Syntax: Name=z , Datatype = r8r9 propertiesz syntax items)r rIID_IADsContainerr*lowerr\appendr]join win32com.utilutilIIDToInterfaceNamePrimaryInterfacer)rformatrE MultiValuedvt_mapgetOleAutoDataType) rrZnclassnpropnsyntaxr item_classitemsdescwin32comiid_nameval_type data_types r DumpSchema2rxs #V # # #D $ 1 2 2F  F UW  Z%%''  E} ) Z(((~ * [)))99U##D }778MNNH!!DKK 4 aKFF : % % +)*!!? ??X??@@@ QJEE 8 # # 4#79IJJI!!IdiIIiIIJJJ qLG k69--- k5,/// k7N33333rcztdt}|D]"}td|jd|jd#dS)z(Dumps the GC: object (whatever that is!)zGC:zGC ob:  ()N)rrarrErF)r;sub_obs rDumpGCr}sT e. / /B:: 8 88v~8889999::rcdtd}t|t}|ddg|D]"}t d|jd|jd#dS) zDumps the local machine usersWinNT:// ,computerUserGroupz User/Group: rzr{N) local_namerra put_FilterrrErF)rr;r|s rDumpLocalUsersrs{ +j + + +D d- . .BMM67#$$$?? =V[==FN===>>>>??rc .dtd}t|t}|dg|D][}t d|jd|jd|}|D]"}t d|jd|jd#\dS) zDumps the local machine groupsrrrzGroup: rzr{z Group member: N)rrrarrrErFMembers)rr;r|membersmembers rDumpLocalGroupsrs +j + + +D d- . .BMM7)GG 8 88v~888999.."" G GF EV[EEFNEEE F F F F G GGrc~ddl}td|jtjdztdtdtd|D]}t|jd|jttdt jddS) Nrz&Usage: %s [-s server ] [-v] [Test ...]z' -v : Verbose - print more informationz: -s : server - execute the tests against the named serverzwhere Test is one of::z-If not tests are specified, all tests are runr5) osrrbasenamesysargv__name____doc__exit)testsrts rusagers III 2RW5E5Echqk5R5R RSSS 3444 FGGG !""" ** aj#qy)))) GGG 9:::HQKKKKKrc.ddl}ddl}g}tD]3}t |t r|jr||4|tj ddd\}}|D]A\}}|dkr|ddvr|dz }|a |dkrt||d kr tdz a Bt|dkrtd |}n@g}|D];} |D]$} | j| kr|| n%td | z<|std t||D]?} | #td | jz|Y=xYwdS)Nrr5zs:hvz-sz\//z-hz-vz;Running all tests - use '-h' to see command-line options...zTest '%s' unknown - skippingzNothing to do!zTest %s failed)getopt tracebackglobalsvalues isinstancerrrcrrr rr)lenrr print_exc) rrrr;optsargsoptrdotestsr/rtests rmainrsMMM Eii   b( # #    LL   sx|V44JD$  S $;;2we##s F $;; %LLL $;; Q M 4yyA~~ KLLL < rs $$$$$$  %X % ' '     $/// /// 3 3 3 2 2 2F&&&&,   * #))++ID# BQBx5s )4)4)4X:::??? G G G   )")")"X zDFFFFFr