Tj(8 d dl Z d dlZd dlZd dlZd dlZd dlZd dlZd dlmZ G d de Z
G d de Z dZ d"d Z
d
Zd ed efd
Zd#dZi Zd$dZ ej d Zd Zd%dZ ej dej ej z ej z Zd Z d Z d Z d Z d Z d Z!d Z"d Z# ed g d Z$d Z%d ed efd!Z&dS )& N)
namedtuplec e Zd Zd ZdS )WebConfigParsingErrorc || _ d S Nmessageselfr s /builddir/build/BUILDROOT/alt-python27-cllib-3.4.41-1.el8.cloudlinux.x86_64/opt/cloudlinux/venv/lib/python3.11/site-packages/clcommon/clconfpars.py__init__z WebConfigParsingError.__init__
N__name__
__module__ __qualname__r
r r r r # r r c e Zd Zd ZdS )WebConfigMissingc || _ d S r r r
s r r
zWebConfigMissing.__init__ r r Nr r r r r r r r r asectionFc & t j dd d }|r t |_ |rbt | d 5 }| t j d }d d d n # 1 swxY w Y n>t | dd 5 }| }d d d n # 1 swxY w Y | d t d
|z | t | t S )
NTF)allow_no_value
interpolationstrictrbreplacerutf-8encoding[z]
)source)section)
configparser ConfigParserstr optionxformopenreaddecodelocalegetpreferredencoding read_stringSECHEADdictitems)pathcase_sensitiveignore_bad_encodingconfigfraws r loadr: s
&d59.35 5 5F !
$
L&&((//&"="?"?KKC L L L L L L L L L L L L L L L $g
.
.
. !&&((C
'7'''#-d;;; W -- . ..s# :A>>BB B==CC)'"valreturnc | t r$| t r
| dd S | S )zW
Strips single or double quote char only if the quote present from both sides.
)
startswith_QUOTESendswith)r= s r $_strip_escape_quotes_of_config_valuerE 2 s> ~~g 3<<#8#8 1R4y Jr =c f i }t | ddd 5 }| D ]m}| |d } |\ }}n# t $ r Y +w xY w| }|rt | n|}||| < n d d d n # 1 swxY w Y |S )Nr r! surrogateescape)r# errorsr@ )r+ readlinessplit
ValueErrorstriprE ) r4 delimiter strip_quotesdatar8 linepartskeyvalues r load_fastrU ; s
D
dC'2C D D D &KKMM & &DJJy!,,E
"
UU
KKMME 4U;;;
!&D && & & & & & & & & & & & & & & Ks6 -B&A
B&
AB&AAB&&B*-B*c t | }nV# t $ rI t | x}t | < n+# t t j f$ r |s i x}t | < Y nw xY wY nw xY w|S )zD
Read ini file once (cached) and return its content as dict
)cacheKeyErrorr: IOErrorr' Error)r4
ignore_errorsress r load_oncer] R s #Dk # # # #!%d +C5;; +, # # #
" "C%+++ ## Js/
A#5A#%A A# A A#"A#z^[A-Za-z0-9_.\\-]+$c t | st d| dt | v sdt | v rt d| dS )z>Reject keys/values that would inject config directives (F-11).z change_settings: invalid key
z*change_settings: newline in value for key N) _SAFE_KEY_REmatchrL r) )rS rT s r _validate_conf_kvrc e sp c " " B@@@AAA s5zzTSZZ / /McMMNNN 0 /r c | D ]\ }}t || g }|rHt j |t j t j z t j z t j z d }nYt j t j
| pdt j
| dz d \ }} t j
|dd 5 }t |dd 5 } t j | } t j | t j | j t j | | j | j n# t, $ r Y nw xY wn# t. $ r Y nw xY w|D ]}
|
} | r}| d sh| d
d \ } }
| } | | v r7| | d
| | d | | | |
| D ]'} | |vr!| | d
| | d ( d d d n # 1 swxY w Y d d d n # 1 swxY w Y t j || d S # t< $ r( t j | n# t@ $ r Y nw xY w w xY w)
Ni .z.tmp)dirprefixsuffixwr! r" r #rF r@ r_ )!r3 rc osr+ O_CREATO_EXCLO_WRONLY
O_NOFOLLOWtempfilemkstempr4 dirnamebasenamefdopenstatfchmodfilenoS_IMODEst_modefchownst_uidst_gidPermissionErrorFileNotFoundErrorrM rB rK writeappendr
BaseExceptionunlinkOSError)
settings_dictr4 tmp_pathkv used_keysfdfoutfinorigrQ
stripped_linerS _s r change_settingsr m s ##%% 1!Q I @
WXZ")+bk9BMI5R R '%%,7##D))C/@ @ @ H "
Yr3
1
1
1 @TT3111 @58
wt}} $++-- dl)C)CDDDIdkkmmT[$+FFFF& D$
!
! $
! )A)A#)F)F ! * 0 0a 8 8FC ))++Cm++
c#B#BM#,>#B#B#BCCC!((---
4 $
@
@i''JJ# > >
c(: > > >???
@1 @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @6
8T""""" Ih D
s K (J ;J=AF2FF
F
FFFJ
F! J F!!CJ< J J J J J K J##K &J#'K
K3 K! K3!
K.+K3-K..K3a
(
# Comments
(:? \# .* $ )
# Single-, double-quoted strings and bare strings without whitespaces
| (:? "[^"\n]*?" )
| (:? '[^'\n]*?' )
| (:? [^"';\s\{\}]+ )
# Structural characters
| ;
| \{
| \}
| \n
)
c b d t | D }d |D S )Nc 3 n K | ]0}|| d | d V 1dS )r N)group).0rb s r z _ngx_tokenize.. sZ [[^^
A r c 3 D K | ]}| d |V dS )rj N)rB )r toks r r z _ngx_tokenize.. s3 = =C )<)< =C = = = = = =r )_NGINX_TOKENS_REfinditer)rP tokenss r
_ngx_tokenizer sD %..t44 F > =6 = = ==r c # * K | D ]
}||v r d S |V d S r r )itr= r s r _ngx_take_untilr s: #:: FF r c # ` K d}| D ]&}|dk r|dz
}n |dk r|dz }|dk r d S |V 'd S )Nr@ {}r )r lvlts r _ngx_take_until_block_endr se
C
88 1HCC
#XX 1HC 77 FF r c i }| D ]@}|dk rt | D ]}||v r"t | d }t | ||< A|S )z5Scan a block for required fields, skips nested blocksr z;
)r r list) block_tokens need_fieldsinfor r value_tokenss r _ngx_scan_block_infor sj
D + + #::.|<<
+ *<??L \**DI Kr c # z K t | }|D ]}|dk r t |d D ]}t | }t |d } |d }|d }n# t $ r Y Yw xY w|s|sbt |d t |d d| dg v d V d
S ) aq
Parse content of NGINX configuration in a manner tolerant to minor mistakes
and extract relevant fields from all `server` directives.
Relevant fields are:
- `server_name`
- `root` - returned as `document_root`
- `ssl` - if `listen` field contains "ssl" word
Doesn't handle interpolated values (ex. `${val}`) outside of quoted strings
serverr ) server_namerootlistenr r r sslr )r
document_rootr N)r r r r rX rE get)rP r r r r r r r s r nginx_conf_loose_parserr s 4
F
(??
!-- A 188 $L2STT }-K>) $ $ D By B BCCC7 BBJ '
33 4 44r c t j | st d| g }t | }d |D }d}d}i }g }t
| dk r| d }d|v r| d } d}
| d \ } }
|
d d
}
n# t $ r | } Y nw xY w| | | |
d }d |v r|||< |dz
}d}g }|r| | t
| dk | D ]} d d
d
d t | d dd
}| D ]O}
d|
v rD|
d dd
|d< Kd|
v rC|
d d |d< d|
v r=d d |
dd D |d< d|
v r/|
d |d< d|
v rE|
d dk |d < Q| | |S ) Nr c < g | ]}t j d | |S )z ^((?!#).)*$)research)r is r
z&apache_conf_parser..' s) ? ? ?!29]A#>#> ?A ? ? ?r r Fz Tzuserr r server_aliasportr
ServerNamezwww.r DocumentRootr< r ServerAlias,c 3 4 K | ]}t | V d S r )r) )r ns r r z%apache_conf_parser..\ s( /Q/Q1A/Q/Q/Q/Q/Q/Qr r SuexecUserGroupr SSLEngineonr )rk r4 r r r
splitlineslenpoprK r rL r valuesintrM joinlower)r conf_datadata_allrP IDenableresultvhostoutip_portr iprT rQ s r apache_conf_parserr s*
7>>) $ $ D By B BCCCI5i@@KKMMH ? ?x ? ? ?D
B
F
F E
d))a--hhqkk S iikk!nGD
"==--D||C,,
LL LL F s " " F2J EBFE LL 1 d))a--4 ""$!% U1X
F FDt##&*jjll1o&;&;&=&=&E&Efb&Q&Q]# %%(,
Q(=(=(?(?(E(Ec(J(J_% $$'*xx/Q/Q
QRR@P/Q/Q/Q'Q'Q^$ D(( #zz||A 4 4 6 6V d"" "jjll1o 3 3 5 5 ; ; = = EU s 2.C! ! C0/C0c | t j | st d| g }t | }d}|D ]}| }| d r^|r| | ddddddd}t j
d| }|r"t | d nd|d< || d r3|
}t | d
k r |d |d < | d r4|
}t | d
k r |d |d < | d
r4|
}t | d
k r |d |d< g| d r4|
}t | d
k r |d |d< | d rd|d< |r| | |S )z
Parsing Open Litespeed config
Retrieves data from user's openlitespeed.conf
:param: full httpd.conf path (/usr/local/directadmin/data/users//openlitespeed.conf)
:return: list of virtual host configurations.
zFile does not exist N virtualHostFr z-(\d+)r@ r r docRootr vhDomainr vhAliasesr vhsslTr )rk r4 r r r r rM rB r r r r r rK r )r r r
vhost_dictrQ
match_portrR s r openlitespeed_conf_parserr h sC 7>>) $ $ C Ai A ABBBI5i@@KKMMHJ "% "%zz|| ??= ) )
R
- ,,,"&td*.UL LJ 9d33J=G!QZ%5%5a%8%8!9!9!9TJv ??6 " " %JJLLE5zzQ%*1X
6"
__Y
'
'
%JJLLE5zzQ.3Ah
?+
__Z
(
( %JJLLE5zzQ,1!H
=)
__[
)
) %JJLLE5zzQ-21X
>*
__W
%
% % $Ju %$$$ r PamLVECfg)min_uidcagefs_enabledgroupsc Z t | dd 5 }|D ]}| d r| }t | dk r|d dk rt | dk rt |d nd }t | d
k r"t t |d nd }t | d k r|d
d
ndg}t
||| c cddd S ddd n # 1 swxY w Y dS )aD
Parse string like:
"session required pam_lve.so 500 1 group1,group2"
:param configfile: path to config file to parse
:type configfile: str
:return: PamLVECfg instance when pam_lve configuratiom is found, None otherwise
:rtype: namedtuple
:raises: IOError, ValueError
r r! r" rj r z
pam_lve.so i F r wheelN)r+ rB rK r r boolr )
configfiler8 rQ sr r r s r parse_pam_lve_configr s
j# 0 0 0
BA B BDs##
A1vv{{qt| 3 3'*1vv{{#ad)))47FFaKKc!A$ii U,/FFaKK1C gY .&AAAA
B
B
B
B
B
B
B
B B
B
B
B
B
B
B
B
B
B
B
B
B
B
B
B 4s C2D D D$'D$ file_pathc 6 t | d 5 }| }d d d n # 1 swxY w Y | S # t $ r< t j t j d| d | d cY S w xY w)Nr zFailed to decode "zL" content as utf-8 - loading with placeholders for invalid unicode sequencesr )rI )r+ r, r- UnicodeDecodeErrorsyslog LOG_WARNING)r r8 raw_datas r r r s
i !6688 1 1 1 1
x x x x
i00000 1s 266A ABB)FF)rF F)Fr )'r' r. rk r ru r rp collectionsr Exceptionr r r1 r: rC r) rE rU rW r] compilera rc r
IGNORECASE MULTILINEVERBOSEr r r r r r r r r r r r r r r r s`
" " " " " " I
y
/
/
/
/ c c *
rz011 O O O9 9 9 9x 2:" MBL 2:-% ,> > >
(
(
(
V5 5 5F F FR6 6 6r
J{$K$K$K L L 2
1c
1c
1
1
1
1
1
1r