One Hat Cyber Team
Your IP :
10.30.1.1
Server IP :
103.148.201.5
Server :
Linux web-olt 5.15.0-156-generic #166-Ubuntu SMP Sat Aug 9 00:02:46 UTC 2025 x86_64
Server Software :
Apache/2.4.52 (Ubuntu)
PHP Version :
8.1.29
Buat File
|
Buat Folder
Eksekusi
Dir :
~
/
lib
/
python3
/
dist-packages
/
samba
/
__pycache__
/
View File Name :
upgradehelpers.cpython-310.pyc
o f�0b�� � @ s� d Z ddlZddlZddlZddlZddlmZ ddlmZmZm Z ddl m Z m Z m Z ddl Z ddlmZmZmZmZmZmZ ddlmZ ddlmZ dd lmZ dd lm Z dd l m Z dd lm Z ddl Z d Z!dZ"dZ#dZ$dZ%dZ&dZ'e(g d��Z)G dd� de*�Z+dd� Z,dd� Z-d@dd�Z.d d � Z/dAd d �Z0d d!� Z1d"d#� Z2d$d%� Z3d&d'� Z4d(d)� Z5d*d+� Z6d,d-� Z7d.d/� Z8d0d1� Z9d2d3� Z:d4d5� Z;d6d7� Z<d8d9� Z=d:d;� Z>d<d=� Z?d>d?� Z@dS )Bz>Helpers used for upgrading between different database formats.� N)�cmp)�Ldb�version�ntacls)� SCOPE_SUBTREE�SCOPE_ONELEVEL� SCOPE_BASE)�provision_paths_from_lp� getpolicypath�create_gpo_struct� provision�ProvisioningError�secretsdb_self_join)� FILL_FULL)�drsblobs)� SEC_CHAN_BDC)� ndr_unpack)�SamDB)�_glue���� � � � � ) �dn� whenCreated� whenChanged� objectGUID� uSNCreated�replPropertyMetaData� uSNChanged� parentGUID�objectCategory�distinguishedName� nTMixedDomain�showInAdvancedViewOnly� instanceTypezmsDS-Behavior-Version�nextRid�cn� versionNumber� lmPwdHistory� pwdLastSet� ntPwdHistory� unicodePwd�dBCSPwd�supplementalCredentials�gPCUserExtensionNames�gPCMachineExtensionNames� maxPwdAge�secret�possibleInferiors� privilege�sAMAccountTypec @ s4 e Zd Zdd� Zdd� Zdd� Zdd� Zd d � Zd S ) � ProvisionLDBc C s4 d | _ d | _d | _d | _d | _d | _d | _d | _d S �N)�sam�secrets�idmapr6 �hkcr�hkcu�hku�hklm��self� rC �6/usr/lib/python3/dist-packages/samba/upgradehelpers.py�__init__F s zProvisionLDB.__init__c C s | j | j| j| jfS r9 )r: r; r< r6 rA rC rC rD �dbsP s zProvisionLDB.dbsc C s | � � D ]}|�� qd S r9 )rF �transaction_start�rB �dbrC rC rD �startTransactionsS s �z ProvisionLDB.startTransactionsc C s8 d}| � � D ]}z|�� W q ty d}Y qw |S )NTF)rF �transaction_cancel� Exception)rB �okrI rC rC rD �groupedRollback\ s �z ProvisionLDB.groupedRollbackc C sn z | � � D ]}|�� qW n ty | �� Y S w z| � � D ]}|�� q W dS ty6 | �� Y S w )NT)rF �transaction_prepare_commitrL rN �transaction_commitrH rC rC rD � groupedCommitj s � � � � �zProvisionLDB.groupedCommitN)�__name__� __module__� __qualname__rE rF rJ rN rQ rC rC rC rD r8 D s r8 c C s` t � }t| j|||dgdd�|_t| j|||d�|_t| j|||d�|_t| j|||d�|_|S )a� Return LDB object mapped on most important databases :param paths: An object holding the different importants paths for provision object :param creds: Credential used for openning LDB files :param session: Session to use for openning LDB files :param lp: A loadparam object :return: A ProvisionLDB object that contains LDB object for the different LDB files of the provisionzmodules:samba_dsdbr )� session_info� credentials�lp�options�flags)rU rV rW ) r8 r �samdbr: r r; �idmapdbr< r6 )�paths�creds�sessionrW �ldbsrC rC rD �get_ldbs� s �r` c C sn d}d}d}|r5|t |�krd}q| t|| �k r#|d dkr!d}d}| t|| �kr/d}d}|d }|s|S )a� Check if the usn is in one of the range provided. To do so, the value is checked to be between the lower bound and higher bound of a range :param usn: A integer value corresponding to the usn that we want to update :param range: A list of integer representing ranges, lower bounds are in the even indices, higher in odd indices :return: True if the usn is in one of the range, False otherwise r TFr r )�len�int)�usn�range�idx�contrM rC rC rD � usn_in_range� s" � rg c C s� |dur(t j�|�st �|� t j�|d�}t j�|�s!t �|� t j�|d�}|du r0| �� }t j�|�s<td| ��| �� }|� |� t ||� d��}|S )a Get paths to important provision objects (smb.conf, ldb files, ...) :param param: Param object :param targetdir: Directory where the provision is (or will be) stored :param smbconf: Path to the smb.conf file :return: A list with the path of important provision objectsN�etczsmb.confz Unable to find smb.conf at %s�realm) �os�path�exists�mkdir�join�makedirs� default_pathr �LoadParm�loadr �get)�param� targetdir�smbconf�etcdirrW r\ rC rC rD � get_paths� s rx c C s� |j ddt| j� tddgd�}t|d d ��dd��d d�| _|j d dt| j� tddgd�}t|�d krJt|d d ��dd��d d�| _d S d | _d S ) z�Update policy ids that could have changed after sam update :param names: List of key provision parameters :param samdb: An Ldb object conntected with the sam DB z#(displayName=Default Domain Policy)zCN=Policies,CN=System,r) � displayName�� expression�base�scope�attrsr �{� �}z/(displayName=Default Domain Controllers Policy)r N)�search�str�rootdnr �replace�policyidra � policyid_dc)�namesrZ �res�res2rC rC rD �update_policyids� s �" � & r� c C s� t j�|�r t�|� t �|� |�d|� t||fi d|�d|�dt�d| j �d| j �d| j �d| j �d | j �d | j�d | j�d | j�� �d d�dd�d| j�d| j�dd�dd�dd�dd�dd�dd�dd�d| j�d| j�d d �d d �d |��S ) a� Create a new provision. This provision will be the reference for knowing what has changed in the since the latest upgrade in the current provision :param names: List of provision parameters :param creds: Credentials for the authentification :param session: Session object :param smbconf: Path to the smb.conf file :param provdir: Directory where the provision will be stored :param logger: A Logger zProvision stored in %srv ru � samdb_fillri �domain� domainguid� domainsid�ntdsguid� policyguid� policyguid_dc�hostname�hostipN�hostip6� invocationid� adminpass� krbtgtpass� machinepass�dnspass�root�nobody�users� serverrolezdomain controller�dom_for_fun_level� dns_backend�useeadbT� use_ntvfs� base_schema)rj rk �isdir�shutil�rmtreerm �infor r ri r� r� r� r� r� r� � netbiosname�lower� invocationr� � domainlevelr� )r� r^ rv �provdir�loggerr� rC rC rD � newprovision� sr ��������� ����������� � � � � � �r� c C s� t �d�}|�t| ��}|�t|��}tt|�t|��}t|�d }t|�d }td|�D ];}t||| ||| �} | dkrD| S ||d krh||ks^J dd�|� d d�|� ��||kre dS dS q-| S )z�Sorts two DNs in the lexicographical order it and put higher level DN before. So given the dns cn=bar,cn=foo and cn=foo the later will be return as smaller :param x: First object to compare :param y: Second object to compare z (?<!\\), ?r r zPB PB PB� z / r ) �re�compile�splitr� �minra rd r rn ) �x�y�p�tab1�tab2�minimum�len1�len2�i�retrC rC rD �dn_sort s" (�r� c C sX t |��dd�\}}| �|t�| d||f �dg� | �t�| d||f �|dg� dS )z�Perform a back and forth rename to trigger renaming on attribute that can't be directly modified. :param lbdobj: An Ldb Object :param dn: DN of the object to manipulate �=r z%s=foo%szrelax:0N)r� r� �rename�ldb�Dn)�ldbobjr �before�afterrC rC rD �identic_rename* s $r� c C s� |t d� | jdtd�}|jdtd�}|sJ d��t|�dkr7|�t�� |d �}|d j|_|�|d � n|�|d |d �}|d j|_|� |� | jddt dgd �}|jddt dgd �}i }i }g }g } t�� } t dt|��D ]} || d |t || d �� � < qst dt|��D ]} || d |t || d �� � < q�|�� D ]} | |vr�|�|| � q�| �|| � q�|D ]I} | jd | dt d �}|jd | dt d �}|�| |d �}tD ]}|�|� q�|td |d j � |D ] }|td | � q�|d j|_|�|� q�| D ]P} | jd | dt d �}|jd | dt d �}|�|d |d �}tD ]}|�|� �q*|D ]!}|dk�rP|td|d j � t||d j� �q5|�|� �q5�q| D ]X} | jd | dt d �}|jd | dt d �}|�|d |d �}tD ]}|�|� �q}|D ] }|dk�r�|�|� |dk�r�|td||d jf � �q�|d j|_|� |� �q[|jdt dgd�}t|�dk�r�|t d� |�|d d � dS dS )z�Update secrets.ldb :param newsecrets_ldb: An LDB object that is connected to the secrets.ldb of the reference provision :param secrets_ldb: An LDB object that is connected to the secrets.ldb of the updated provision zUpdate of secrets.ldbz@MODULES)r| r} z'Reference modules list can not be emptyr zobjectClass=topr� r rz �distinguishedName=%s)r{ r| r} z$Entry %s is missing from secrets.ldbz Adding attribute %s�namez/Found attribute name on %s, must rename the DN�msDS-KeyVersionNumberz"Adding/Changing attribute %s to %sz(samaccountname=dns))r{ r} r~ r zRemove old dns accountN)�SIMPLEr� r ra �msg_diffr� �Messager �add�modifyr rd r� r� �keys�append�hashAttrNotCopied�remove�CHANGEr� �delete)�newsecrets_ldb� secrets_ldb� messagefunc� reference�current�delta�hash_new�hash� listMissing� listPresent�emptyr� �k�entry�attr� rC rC rD �update_secrets7 s� ��"" � � � � � �� � � ��� � �r� c C sH | j dt|�tddgd�}t|�dkr"|d �d�r"|d d }|S dS )z�Return OEM Information on the top level Samba4 use to store version info in this field :param samdb: An LDB object connect to sam.ldb :param rootdn: Root DN of the domain :return: The content of the field oEMInformation (if any) �(objectClass=*)r �oEMInformationrz r r� )r� r� r ra rs )rZ r� r� r� rC rC rD � getOEMInfo� s � r� c C s� | j d|tddgd�}t|�dkrK|d �d�r!t|d d �}nd}d|tf }t�� }t�| t|d d ��|_ t� |tj d�|d< | � |� dS dS ) z�Update the OEMinfo field to add information about upgrade :param samdb: an LDB object connected to the sam DB :param rootdn: The string representation of the root DN of the provision (ie. DC=...,DC=...) r� r r� rz r r� z%s, upgrade to %sN) r� r ra rs r� r r� r� r� r �MessageElement�FLAG_MOD_REPLACEr� )rZ r� r� r� r� rC rC rD � updateOEMInfo� s � ��r� c C sf t | j|j|j�}tj�|�st|� |jdu r t d��t | j|j|j�}tj�|�s1t|� dS dS )z-Create missing GPO file object if needed Nz*Policy ID for Domain controller is missing) r �sysvol� dnsdomainr� rj rk r� r r� r )r\ rZ r� rW �message�dirrC rC rD � update_gpo� s �r� c C s� | j dt�| t|��tdgdgd�}d}t|�dkr td��|D ]8}t|j��� |v rX|� d�}|s4d}t t|t|j��� ��}t t|��|k rX|d }| � t|j�d |d � q d S ) a For a given hash associating dn and a number, this function will update the replPropertyMetaData of each dn in the hash, so that the calculated value of the msDs-KeyVersionNumber is equal or superior to the one associated to the given dn. :param samdb: An SamDB object pointing to the sam :param rootdn: The base DN where we want to start :param hashDns: A hash with dn as key and number representing the minimum value of msDs-KeyVersionNumber that we want to have z(objectClass=user)zmsDs-KeyVersionNumber�search_options:1:2�r{ r| r} r~ �controlsr z$Unable to find msDs-KeyVersionNumber�0r r. TN) r� r� r� r� r ra r r r� rs rb �"set_attribute_replmetadata_version)rZ r� �hashDnsr� �done�e�valr rC rC rD �&increment_calculated_keyversion_number� s, � ���r� c C sN |t d� t| |||dgd�}t||||dgd�}t�� }d} |jdd�} | D ]}} |jd| d td �} t| �sg|�|| �} |td t | j � � t | j �d kr]| � t j j�r]| �t j j� | j | _ |�| � q'|�| d | �} t | j �d kr~|�| | d �} t | j �d kr�| � t j j�r�| �t j j� t| �� �dkr�| j | _ |�| � q'| S )a Update the provision container db: sam.ldb This function is aimed for alpha9 and newer; :param refsampath: Path to the samdb in the reference provision :param sampath: Path to the samdb in the upgraded provision :param creds: Credential used for openning LDB files :param session: Session to use for openning LDB files :param lp: A loadparam object :return: A msg_diff object with the difference between the @ATTRIBUTES of the current provision and the reference provision z<Update base samdb by searching difference with reference onezmodules:)rU rV rW rX Nr� �r{ r� r )r{ r} zAdding %s to sam dbz @PROVISIONr z @ATTRIBUTESr )r� r r� r� r� r ra r� r� r� r rs �sambar � LAST_PROVISION_USN_ATTRIBUTEr� r� �itemsr� )� refsampath�sampathr] r^ rW r� �refsamr: r� � deltaattrr� �refentryr� r� rC rC rD �delta_update_basesamdb� sJ �� � � � � �r c C s6 d}t | �dkrd}| D ]}d||f }q d| }|S )z�Construct a exists or LDAP search expression. :param attrs: List of attribute on which we want to create the search expression. :return: A string representing the expression, if attrs is empty an empty string is returned r� r z(|z%s(%s=*)z%s))ra )r~ �exprr� rC rC rD �construct_existor_expr' s r c C s d|j }|j|dgd�}t|d d d �tkr�| j|g d�}t|�dks(J �t�|d j�}t� dd�}|� d�}t� |tj d�|d< | � |� | jd|j d gd�}t|�dks]J �tt|d d ��} t|d d d �} t||j|j|j|j|j || | d � d S td ��) aR Update (change) the password of the current DC both in the SAM db and in secret one :param samdb: An LDB object related to the sam.ldb file of a given provision :param secrets_ldb: An LDB object related to the secrets.ldb file of a given provision :param names: List of key provision parameterszsamAccountName=%s$�secureChannelType�r{ r~ r r �x � utf-16-le�clearTextPassword�msDs-keyVersionNumber)r� ri r� r� r� r� �key_version_number�secure_channel_typez3Unable to find a Secure Channelof type SEC_CHAN_BDCN)r� r� rb r ra r� r� r r� � generate_random_machine_password�encoder� r� r� r� r r� ri r� r� r ) rZ r� r� r{ � secrets_msgr� �msgr� �mputf16�kvno� secChanTyperC rC rD � update_machine_account_password8 s> � � � � r c C s� d|j }|j|d�}t|�dkr}| j|g d�}t|�dks J �t�|d j�}t�dd�}|�d�}t� |tj d �|d < | � |� | j|d gd�}t|�dksRJ �t |d d �} t�|d j�}t� |tj d �|d < t� | tj d �|d < |� |� d S d S )aK Update (change) the password of the dns both in the SAM db and in secret one :param samdb: An LDB object related to the sam.ldb file of a given provision :param secrets_ldb: An LDB object related to the secrets.ldb file of a given provision :param names: List of key provision parameterszsamAccountName=dns-%sr� r r r � r r r r r4 r� N) r� r� ra r� r� r r� �generate_random_passwordr r� r� r� r� ) rZ r� r� r{ r r� r r� r r rC rC rD �update_dns_account_passwordc s: � ����r c C sj d}| j |g d�}t|�dksJ �t�|d j�}t�dd�}|�d�}t�|tj d�|d< | � |� d S ) z�Update (change) the password of the krbtgt account :param samdb: An LDB object related to the sam.ldb file of a given provisionzsamAccountName=krbtgtr r r r r r r N) r� ra r� r� r r� r r r� r� r� )rZ r{ r� r r� �kputf16rC rC rD � update_krbtgt_account_password� s �r c C s� i }t |�}|dkr |S | j|t�| t|��t|ddgd�}t|�dkr&|S |D ]3}|D ].}|�|�rZ||v rGt|| �|| t|j�� � < q,i ||< t|| �|| t|j�� � < q,q(|S )a� Search a given sam DB for calculated attributes that are still stored in the db. :param samdb: An LDB object pointing to the sam :param rootdn: The base DN where the search should start :param attrs: A list of attributes to be searched :return: A hash with attributes as key and an array of array. Each array contains the dn and the associated values for this attribute as they are stored in the sam.r� r� zbypassoperational:0r� r ) r r� r� r� r� r ra rs r r� )rZ r� r~ �hashAttr r� �entr� rC rC rD � search_constructed_attrs_stored� s( � ��r c C s| d}i }| j |dtjdgdgd�}|D ]�}|d }ttjt|d ��j}|jD ]�}t � |j �d }|� t|j ��} | du rXi } |j| d < |j| d < d| d < t|j�g| d < i } nU| � |�} | du rzi } |j| d < |j| d < d| d < t|j�g| d < n3| d |jkr�|j| d < | d |jk r�|j| d < t|j�| d vr�| d d | d < | d �t|j�� | | |< | |t|j �< q'q||fS ) a Find ranges of usn grouped by invocation id and then by timestamp rouned at 1 minute :param samdb: An LDB object pointing to the samdb :param basedn: The DN of the forest :return: A two level dictionary with invoication id as the first level, timestamp as the second one and then max, min, and number as subkeys, representing respectivily the maximum usn for the range, the minimum usn and the number of object with usn in this range. r z objectClass=*r r� )r| r{ r} r~ r� r �< Nr� �max�num�list)r� r� r r r �replPropertyMetaDataBlobr� �ctr�arrayr � nttime2unix�originating_change_timers �originating_invocation_id�originating_usnr r� ) rZ �basedn�nb_obj�hash_idr� r� �obj�o� minutestamp�hash_ts�obrC rC rD �findprovisionrange� sT � �� � r0 c C s� d}| D ]�}| | }g }|� |�� � |�� g } |D ]3} || } | d |krAt�t�| d ��} td| | d | d | d f � || d dkrN| �| � qtdt | ��D ]8} | dkr�| | }| | d }|| d kr�t || d �t || d �d kr�|| d || d< d || d < qV| D ]} || } | � d �d u r�d || d | d |f }q�q|dkr�t j |ddd�\}}t� td� td| � td| � tdt|�|f � d||f }t�||� t�|� d S d S )as print the differents ranges passed as parameter :param dic: A dictionary as returned by findprovisionrange :param limit_print: minimum number of object in a range in order to print it :param dest: Destination directory :param samdb_path: Path to the sam.ldb file :param invoicationid: Invocation ID for the current provision r� r r z*%s # of modification: %d min: %d max: %dr� r iX r r T�skippedNz %slastProvisionUSN: %d-%d;%s �usnprovz.ldif)r� �prefix�suffixzFTo track the USNs modified/created by provision and upgrade proivsion,zM the following ranges are proposed to be added to your provision sam.ldb: %szdWe recommend to review them, and if it's correct to integrate the following ldif: %s in your sam.ldbz2You can load this file like this: ldbadd -H %s %s z$dn: @PROVISION provisionnerID: %s %s)�extendr� �sortr � nttime2string� unix2nttime�printr� rd ra rb rs �tempfile�mkstempr� rj �write�close)�dic� limit_print�dest� samdb_pathr� �ldif�idr. � sorted_keys� kept_recordr� r+ �dtr� �key1�key2�fd�filerC rC rD �print_provision_ranges s\ � � $ � ��� �rK c C s t | �}d|d@ |d? f }|S )z�Display the int64 range stored in value as xxx-yyy :param value: The int64 range :return: A string of the representation of the range z%d-%dl �� � )rb )�value�lvaluer� rC rC rD �int64range2str; s rO )NNr9 )A�__doc__rj r� r� r� � samba.commonr r r r r� r r r �samba.provisionr r r r r r �samba.provision.commonr � samba.dcerpcr �samba.dcerpc.miscr � samba.ndrr � samba.samdbr r r: �ERRORr� r� �CHANGESD�GUESS� PROVISION� CHANGEALL�setr� �objectr8 r` rg rx r� r� r� r� r� r� r� r� r� r r r r r r r0 rK rO rC rC rC rD �<module> s^ ? i!1+(#< ;