No regular expressions were active.
1 |
|
<?
|
|
1 |
|
<?
|
2 |
|
/**
|
|
2 |
|
/**
|
3 |
|
*
O
rca Intera
ctive Foru
m Script
|
|
3 |
|
*
O
rca Intera
ctive Foru
m Script
|
4 |
|
*
---------
------
|
|
4 |
|
*
---------
------
|
5 |
|
* Star
ted
: Mo
n Mar 23 2
006
|
|
5 |
|
* Star
ted
: Mo
n Mar 23 2
006
|
6 |
|
* Copy
right
: (C
) 2007 Boo
nEx Group
|
|
6 |
|
* Copy
right
: (C
) 2007 Boo
nEx Group
|
7 |
|
* Webs
ite
: ht
tp://www.b
oonex.com
|
|
7 |
|
* Webs
ite
: ht
tp://www.b
oonex.com
|
8 |
|
* This fil
e is part
of Orca -
Interactiv
e Forum Sc
ript
|
|
8 |
|
* This fil
e is part
of Orca -
Interactiv
e Forum Sc
ript
|
9 |
|
* GPL
|
|
9 |
|
* Creative
Commons A
ttribution
3.0 Licen
se
|
10 |
|
**/
|
|
10 |
|
**/
|
11 |
|
|
|
11 |
|
|
12 |
|
|
|
12 |
|
|
13 |
|
/**
|
|
13 |
|
/**
|
14 |
|
* Main in
tegration
file
|
|
14 |
|
* Main in
tegration
file
|
15 |
|
*/
|
|
15 |
|
*/
|
16 |
|
|
|
16 |
|
|
17 |
|
er
ror_report
ing(E_ALL
& ~E_NOTIC
E);
|
|
17 |
|
/*
*
|
|
|
18 |
|
*
determine
special u
ser permis
sions
|
|
|
19 |
|
*
@param $u
ser userna
me to chec
k
|
|
|
20 |
|
*
@param re
turn true
if user ha
s special
permission
s in the f
orum
|
|
|
21 |
|
*
/
|
|
|
22 |
|
if
(!functio
n_exists('
isSpecialO
rcaUser'))
|
|
|
23 |
|
{
|
|
|
24 |
|
function
isSpecial
OrcaUser (
$user)
|
|
|
25 |
|
{
|
|
|
26 |
|
retu
rn 0;
|
|
|
27 |
|
}
|
|
|
28 |
|
}
|
|
|
29 |
|
|
|
|
30 |
|
/*
*
|
|
|
31 |
|
*
determine
admin use
r
|
|
|
32 |
|
*
@param $u
ser userna
me to chec
k
|
|
|
33 |
|
*
@param re
turn true
if user ha
s special
permission
s in the f
orum
|
|
|
34 |
|
*
/
|
|
|
35 |
|
if
(!functio
n_exists('
isOrcaAdmi
n'))
|
|
|
36 |
|
{
|
|
|
37 |
|
function
isOrcaAdm
in ($user)
|
|
|
38 |
|
{
|
|
|
39 |
|
glob
al $logged
;
|
|
|
40 |
|
retu
rn $logged
['admin']
? true : f
alse;
|
|
|
41 |
|
}
|
|
|
42 |
|
}
|
18 |
|
|
|
43 |
|
|
|
|
44 |
|
//
---------
----------
----------
----------
--
|
|
|
45 |
|
|
|
|
46 |
|
if
('url' ==
$gConf['i
ntegration
'] || !iss
et($gConf)
)
|
|
|
47 |
|
{
|
19 |
|
ch
dir ('..')
;
|
|
48 |
|
chdir ('
..');
|
20 |
|
|
|
49 |
|
|
21 |
|
$_
COOKIE['me
mberID'] =
$_GET['me
mberID'];
|
|
50 |
|
header (
"content-t
ype: text/
xml");
|
22 |
|
$_
COOKIE['me
mberPasswo
rd'] = $_G
ET['member
Password']
;
|
|
51 |
|
|
|
|
52 |
|
$orca_in
tegration_
xml = '<?x
ml version
="1.0" enc
oding="utf
-8"?>';
|
23 |
|
|
|
53 |
|
|
24 |
|
$_
COOKIE['ad
minID'] =
$_GET['adm
inID'];
|
|
54 |
|
$orca_in
tegration_
vars = &$_
GET;
|
25 |
|
$_
COOKIE['ad
minPasswor
d'] = $_GE
T['adminPa
ssword'];
|
|
|
26 |
|
|
|
55 |
|
|
27 |
|
re
quire_once
( './inc/h
eader.inc.
php'); //
orca confi
g file
|
|
56 |
|
require_
once( './i
nc/header.
inc.php');
// orca c
onfig file
|
28 |
|
re
quire_once
( './../in
c/header.i
nc.php');
// dolphin
config fi
le
|
|
57 |
|
require_
once( './.
./inc/head
er.inc.php
'); // dol
phin confi
g file
|
29 |
|
|
|
58 |
|
|
30 |
|
re
quire_once
( BX_DIREC
TORY_PATH_
INC . 'uti
ls.inc.php
' );
|
|
59 |
|
require_
once( BX_D
IRECTORY_P
ATH_INC .
'utils.inc
.php' );
|
31 |
|
re
quire_once
( BX_DIREC
TORY_PATH_
INC . 'db.
inc.php' )
;
|
|
60 |
|
require_
once( BX_D
IRECTORY_P
ATH_INC .
'db.inc.ph
p' );
|
32 |
|
re
quire_once
( BX_DIREC
TORY_PATH_
INC . 'adm
in.inc.php
' );
|
|
61 |
|
require_
once( BX_D
IRECTORY_P
ATH_INC .
'admin.inc
.php' );
|
|
|
62 |
|
}
|
|
|
63 |
|
el
se
|
|
|
64 |
|
{
|
|
|
65 |
|
global $
MySQL, $di
r, $site;
|
|
|
66 |
|
$orca_in
tegration_
xml = '';
|
|
|
67 |
|
}
|
|
|
68 |
|
|
|
|
69 |
|
$_
COOKIE['me
mberID'] =
$orca_int
egration_v
ars['membe
rID'];
|
|
|
70 |
|
$_
COOKIE['me
mberPasswo
rd'] = $or
ca_integra
tion_vars[
'memberPas
sword'];
|
|
|
71 |
|
|
|
|
72 |
|
$_
COOKIE['ad
minID'] =
$orca_inte
gration_va
rs['adminI
D'];
|
|
|
73 |
|
$_
COOKIE['ad
minPasswor
d'] = $orc
a_integrat
ion_vars['
adminPassw
ord'];
|
33 |
|
|
|
74 |
|
|
34 |
|
if
( !( $log
ged['admin
'] = membe
r_auth( 1,
false ) )
)
|
|
75 |
|
if
( !( $log
ged['admin
'] = membe
r_auth( 1,
false ) )
)
|
35 |
|
if
(
!(
$logged['m
ember']
=
member_aut
h(
0,
false
)
)
)
|
|
76 |
|
$logged['m
ember']
=
member_aut
h(
0,
false
)
;
|
36 |
|
if (
!( $logge
d['aff'] =
member_au
th( 2, fal
se )) )
|
|
77 |
|
|
37 |
|
$logged['m
oderator']
= member_
auth( 3, f
alse );
|
|
|
38 |
|
|
|
78 |
|
|
39 |
|
|
|
79 |
|
|
40 |
|
he
ader ("con
tent-type:
text/xml"
);
|
|
|
41 |
|
|
|
80 |
|
|
42 |
|
ec
ho '<?xml
version="1
.0" encodi
ng="utf-8"
?>';
|
|
81 |
|
$o
rca_integr
ation_xml
.= '<bxfor
um>';
|
|
|
82 |
|
$o
rca_integr
ation_xml
.= '<time>
' . time (
) . '</tim
e>';
|
43 |
|
|
|
83 |
|
|
44 |
|
ec
ho '<bxfor
um>';
|
|
84 |
|
$a
ction = $o
rca_integr
ation_vars
['action']
;
|
45 |
|
ec
ho '<time>
' . time (
) . '</tim
e>';
|
|
85 |
|
$u
ser = $orc
a_integrat
ion_vars['
user'];
|
|
|
86 |
|
|
|
|
87 |
|
if
(empty($u
ser) && $_
COOKIE['me
mberID'] &
& $logged[
'member'])
|
|
|
88 |
|
{
|
|
|
89 |
|
$user =
getNickNam
e(getID((i
nt)$_COOKI
E['memberI
D']));
|
|
|
90 |
|
}
|
46 |
|
|
|
91 |
|
|
47 |
|
$a
ction = $_
GET['actio
n'];
|
|
92 |
|
if
(empty($u
ser) && $_
COOKIE['ad
minID'] &&
$logged['
admin'])
|
48 |
|
$user
=
$_
G
E
T
['
user
'];
|
|
93 |
|
{
|
|
|
94 |
|
$user
=
$_
COOKI
E
['
adminID
'];
|
|
|
95 |
|
}
|
49 |
|
|
|
96 |
|
|
50 |
|
sw
itch ($act
ion)
|
|
97 |
|
sw
itch ($act
ion)
|
51 |
|
{
|
|
98 |
|
{
|
52 |
|
/**
|
|
99 |
|
/**
|
53 |
|
* get l
ogged in u
ser (initi
al informa
tion about
logged in
user must
be provid
ed in url)
|
|
100 |
|
* get l
ogged in u
ser (initi
al informa
tion about
logged in
user must
be provid
ed in url)
|
54 |
|
*/
|
|
101 |
|
*/
|
55 |
|
case 'lo
gin_user':
|
|
102 |
|
case 'lo
gin_user':
|
56 |
|
|
|
103 |
|
|
57 |
|
//
check logi
n and pass
word
|
|
104 |
|
//
check logi
n and pass
word
|
58 |
|
|
|
105 |
|
|
59 |
|
$use
r = '';
|
|
106 |
|
$use
r = '';
|
60 |
|
|
|
107 |
|
|
61 |
|
if (
$logged['m
ember'])
|
|
108 |
|
if (
$logged['m
ember'])
|
62 |
|
$user = ge
tNickName(
getID((int
)$_COOKIE[
'memberID'
]));
|
|
109 |
|
$user = ge
tNickName(
getID((int
)$_COOKIE[
'memberID'
]));
|
63 |
|
else
if ($logge
d['admin']
)
|
|
110 |
|
else
if ($logge
d['admin']
)
|
64 |
|
$user
=
'admin
'
;
|
|
111 |
|
$user
=
$_COOKIE[
'admin
ID
'
]
;
|
65 |
|
|
|
|
66 |
|
|
|
112 |
|
|
67 |
|
echo
<<<EOF
|
|
113 |
|
$orc
a_integrat
ion_xml .=
<<<EOF
|
68 |
|
<login_u
ser>$user<
/login_use
r>
|
|
114 |
|
<login_u
ser>$user<
/login_use
r>
|
69 |
|
EOF;
|
|
115 |
|
EOF;
|
70 |
|
brea
k;
|
|
116 |
|
brea
k;
|
71 |
|
|
|
117 |
|
|
72 |
|
|
|
118 |
|
|
73 |
|
/**
|
|
119 |
|
/**
|
74 |
|
* get u
ser info
|
|
120 |
|
* get u
ser info
|
75 |
|
*/
|
|
121 |
|
*/
|
76 |
|
case 'us
er_info':
|
|
122 |
|
case 'us
er_info':
|
77 |
|
|
|
123 |
|
|
78 |
|
if
(!$user)
echo
'<false
/>'
;
|
|
124 |
|
if
(!$user)
|
79 |
|
|
|
125 |
|
{
|
|
|
126 |
|
$orca_inte
gration_xm
l .= '<fal
se />' ;
|
|
|
127 |
|
}
|
|
|
128 |
|
else
|
|
|
129 |
|
{
|
80 |
|
$spe
cial_user
= isSpecia
lOrcaUser
($user);
|
|
130 |
|
$special_u
ser = isSp
ecialOrcaU
ser ($user
);
|
81 |
|
$orc
a_admin =
isOrcaAdmi
n ($user);
|
|
131 |
|
$orca_admi
n = isOrca
Admin ($us
er);
|
82 |
|
|
|
132 |
|
|
83 |
|
requ
ire_once(
BX_DIRECTO
RY_PATH_RO
OT . 'inc/
utils.inc.
php' );
|
|
133 |
|
require_on
ce( BX_DIR
ECTORY_PAT
H_ROOT . '
inc/utils.
inc.php' )
;
|
84 |
|
requ
ire_once(
BX_DIRECTO
RY_PATH_RO
OT . 'prof
ilePhotos.
php' );
|
|
134 |
|
require_on
ce( BX_DIR
ECTORY_PAT
H_ROOT . '
profilePho
tos.php' )
;
|
85 |
|
|
|
135 |
|
|
86 |
|
$oPr
ofile = ne
w BxDolPro
file ($use
r);
|
|
136 |
|
$oProfile
= new BxDo
lProfile (
$user);
|
87 |
|
$use
rID = $oPr
ofile->_iP
rofileID;
|
|
137 |
|
$userID =
$oProfile-
>_iProfile
ID;
|
88 |
|
|
|
138 |
|
|
89 |
|
$av
= $gConf['
url']['ico
n'] .'basi
c.gif';
|
|
139 |
|
$av = $gCo
nf['url'][
'icon'] .'
basic.gif'
;
|
90 |
|
$pro
file_url =
$gConf['u
rl']['base
'] . "?act
ion=goto&a
mp;amp;use
r=$user";
|
|
|
91 |
|
|
|
140 |
|
|
92 |
|
if
(
$orca_
admin
)
|
|
141 |
|
if ( getPa
ram('enabl
e_modrewri
te') == 'o
n' )
|
|
|
142 |
|
$profi
le_url = $
site['url'
] . $user;
|
|
|
143 |
|
else
|
|
|
144 |
|
$profi
le_url = $
site['url'
] . 'profi
le.php?ID=
' . $userI
D;
|
|
|
145 |
|
|
|
|
146 |
|
if
(
'
admin
'
==
$user
)
|
93 |
|
{
|
|
147 |
|
{
|
94 |
|
$av = $gCo
nf['url'][
'icon'] .
'admin.gif
';
|
|
148 |
|
$av =
$gConf['ur
l']['icon'
] . 'admin
.gif';
|
|
|
149 |
|
$profi
le_url = $
gConf['url
']['base']
. "?actio
n=goto&
;amp;user=
$user";
|
95 |
|
}
|
|
150 |
|
}
|
96 |
|
else
if ($userI
D)
|
|
151 |
|
elseif ($u
serID)
|
97 |
|
{
|
|
152 |
|
{
|
98 |
|
$oPhoto =
new Profil
ePhotos ($
userID);
|
|
153 |
|
$oPhot
o = new Pr
ofilePhoto
s ($userID
);
|
99 |
|
$oPhoto->g
etMediaArr
ay();
|
|
154 |
|
$oPhot
o->getMedi
aArray();
|
100 |
|
$aFile = $
oPhoto->ge
tPrimaryPh
otoArray()
;
|
|
155 |
|
$aFile
= $oPhoto
->getPrima
ryPhotoArr
ay();
|
101 |
|
|
|
156 |
|
|
102 |
|
if (extFil
eExists ($
oPhoto->sM
ediaDir .
'icon_' .
$aFile['me
d_file']))
|
|
157 |
|
if (ex
tFileExist
s ($oPhoto
->sMediaDi
r . 'icon_
' . $aFile
['med_file
']))
|
103 |
|
$av =
$oPhoto->s
MediaUrl .
'icon_' .
$aFile['m
ed_file'];
|
|
158 |
|
$a
v = $oPhot
o->sMediaU
rl . 'icon
_' . $aFil
e['med_fil
e'];
|
104 |
|
elseif ($s
pecial_use
r)
|
|
159 |
|
elseif
($special
_user)
|
105 |
|
$av =
$gConf['ur
l']['icon'
] .'specia
l.gif';
|
|
160 |
|
$a
v = $gConf
['url']['i
con'] .'sp
ecial.gif'
;
|
106 |
|
|
|
|
107 |
|
$profile_u
rl = $site
['url'] .
'profile.p
hp?ID=' .
$userID;
|
|
|
108 |
|
}
|
|
161 |
|
}
|
109 |
|
|
|
162 |
|
|
110 |
|
// R
ay integra
tion [begi
n]
|
|
163 |
|
// Ray int
egration [
begin]
|
111 |
|
|
|
164 |
|
|
112 |
|
$iId
= $userID
;
|
|
165 |
|
$iId = $us
erID;
|
113 |
|
$sPa
ssword = m
d5(getPass
word($iId)
);
|
|
166 |
|
$sPassword
= md5(get
Password($
iId));
|
114 |
|
$bEn
ableRay =
(getParam(
'enable_r
ay' ) == '
on');
|
|
167 |
|
$bEnableRa
y = (getPa
ram( 'enab
le_ray' )
== 'on');
|
115 |
|
$che
ck_res = c
heckAction
($iId, AC
TION_ID_US
E_RAY_IM);
|
|
168 |
|
$check_res
= checkAc
tion ($iId
, ACTION_I
D_USE_RAY_
IM);
|
116 |
|
|
|
169 |
|
|
117 |
|
$aRa
y = '<ray_
on>0</ray_
on>';
|
|
170 |
|
$aRay = '<
ray_on>0</
ray_on>';
|
118 |
|
if (
$bEnableRa
y && $chec
k_res[CHEC
K_ACTION_R
ESULT] ==
CHECK_ACTI
ON_RESULT_
ALLOWED)
|
|
171 |
|
if ($bEnab
leRay && $
check_res[
CHECK_ACTI
ON_RESULT]
== CHECK_
ACTION_RES
ULT_ALLOWE
D)
|
119 |
|
$aRay = '<
ray_on>1</
ray_on><ra
y_id>' . $
iId . '</r
ay_id><ray
_pwd>' . $
sPassword
. '</ray_p
wd>';
|
|
172 |
|
$aRay
= '<ray_on
>1</ray_on
><ray_id>'
. $iId .
'</ray_id>
<ray_pwd>'
. $sPassw
ord . '</r
ay_pwd>';
|
120 |
|
|
|
173 |
|
|
121 |
|
// R
ay integra
tion [ end
]
|
|
174 |
|
// Ray int
egration [
end ]
|
122 |
|
|
|
175 |
|
|
123 |
|
echo
<<<EOF
|
|
176 |
|
$orca_inte
gration_xm
l .=
<<<EOF
|
124 |
|
<user_in
fo name="$
user">
|
|
177 |
|
<user_
info name=
"$user">
|
125 |
|
<ava
tar>$av</a
vatar>
|
|
178 |
|
<a
vatar>$av<
/avatar>
|
126 |
|
<spe
cial>$spec
ial_user</
special>
|
|
179 |
|
<s
pecial>$sp
ecial_user
</special>
|
127 |
|
<adm
in>$orca_a
dmin</admi
n>
|
|
180 |
|
<a
dmin>$orca
_admin</ad
min>
|
128 |
|
<pro
file_url>$
profile_ur
l</profile
_url>
|
|
181 |
|
<p
rofile_url
>$profile_
url</profi
le_url>
|
129 |
|
<pro
file_oncli
ck />
|
|
182 |
|
<p
rofile_onc
lick />
|
130 |
|
<joi
n_date>$jo
in_date</j
oin_date>
|
|
183 |
|
<j
oin_date>$
join_date<
/join_date
>
|
131 |
|
$aRa
y
|
|
184 |
|
$a
Ray
|
132 |
|
</user_i
nfo>
|
|
185 |
|
</user
_info>
|
133 |
|
EOF;
|
|
186 |
|
EOF;
|
|
|
187 |
|
}
|
134 |
|
brea
k;
|
|
188 |
|
brea
k;
|
135 |
|
|
|
189 |
|
|
136 |
|
/**
|
|
190 |
|
/**
|
137 |
|
* get u
ser permis
sions
|
|
191 |
|
* get u
ser permis
sions
|
138 |
|
*/
|
|
192 |
|
*/
|
139 |
|
case 'us
er_perm':
|
|
193 |
|
case 'us
er_perm':
|
140 |
|
|
|
194 |
|
|
141 |
|
$mem
berID = $l
ogged['mem
ber'] ? $_
COOKIE['me
mberID'] :
0;
|
|
195 |
|
$mem
berID = $l
ogged['mem
ber'] ? $_
COOKIE['me
mberID'] :
0;
|
142 |
|
|
|
196 |
|
|
143 |
|
$isO
rcaAdmin =
isOrcaAdm
in ($user)
;
|
|
197 |
|
$isO
rcaAdmin =
isOrcaAdm
in ($user)
;
|
|
|
198 |
|
if (
$isOrcaAdm
in)
|
|
|
199 |
|
$user = $_
COOKIE['ad
minID'];
|
144 |
|
|
|
200 |
|
|
145 |
|
$isLoggedI
n
=
$
memberID
&&
$user
?
1
:
0;
|
|
201 |
|
$isLoggedI
n
=
$
logged['ad
min']
||
($
memberID
&&
$user
)
?
1
:
0;
|
146 |
|
|
|
202 |
|
|
147 |
|
$aCh
eckRes = c
heckAction
( $memberI
D, ACTION_
ID_USE_ORC
A_PUBLIC_F
ORUM, true
);
|
|
203 |
|
$aCh
eckRes = c
heckAction
( $memberI
D, ACTION_
ID_USE_ORC
A_PUBLIC_F
ORUM, true
);
|
148 |
|
$isP
ublicForum
Allowed =
CHECK_ACTI
ON_RESULT_
ALLOWED ==
$aCheckRe
s[CHECK_AC
TION_RESUL
T] && $isL
oggedIn ?
1 : 0;
|
|
204 |
|
$isP
ublicForum
Allowed =
CHECK_ACTI
ON_RESULT_
ALLOWED ==
$aCheckRe
s[CHECK_AC
TION_RESUL
T] && $isL
oggedIn ?
1 : 0;
|
149 |
|
|
|
205 |
|
|
150 |
|
$aCh
eckRes = c
heckAction
( $memberI
D, ACTION_
ID_USE_ORC
A_PRIVATE_
FORUM, tru
e );
|
|
206 |
|
$aCh
eckRes = c
heckAction
( $memberI
D, ACTION_
ID_USE_ORC
A_PRIVATE_
FORUM, tru
e );
|
151 |
|
$isP
rivateForu
mAllowed =
CHECK_ACT
ION_RESULT
_ALLOWED =
= $aCheckR
es[CHECK_A
CTION_RESU
LT] && $is
LoggedIn ?
1 : 0;
|
|
207 |
|
$isP
rivateForu
mAllowed =
CHECK_ACT
ION_RESULT
_ALLOWED =
= $aCheckR
es[CHECK_A
CTION_RESU
LT] && $is
LoggedIn ?
1 : 0;
|
152 |
|
|
|
208 |
|
|
153 |
|
$rea
d_public =
1;
|
|
209 |
|
$rea
d_public =
1;
|
154 |
|
$pos
t_public =
$isPublic
ForumAllow
ed || $isO
rcaAdmin ?
1 : 0;
|
|
210 |
|
$pos
t_public =
$isPublic
ForumAllow
ed || $isO
rcaAdmin ?
1 : 0;
|
155 |
|
$edi
t_public =
$isOrcaAd
min ? 1 :
0;
|
|
211 |
|
$edi
t_public =
$isOrcaAd
min ? 1 :
0;
|
156 |
|
$del
_public =
$isOrcaAd
min ? 1 :
0;
|
|
212 |
|
$del
_public =
$isOrcaAd
min ? 1 :
0;
|
157 |
|
|
|
213 |
|
|
158 |
|
$rea
d_private
= $isPriva
teForumAll
owed || $i
sOrcaAdmin
? 1 : 0;
|
|
214 |
|
$rea
d_private
= $isPriva
teForumAll
owed || $i
sOrcaAdmin
? 1 : 0;
|
159 |
|
$pos
t_private
= $isPriva
teForumAll
owed || $i
sOrcaAdmin
? 1 : 0;
|
|
215 |
|
$pos
t_private
= $isPriva
teForumAll
owed || $i
sOrcaAdmin
? 1 : 0;
|
160 |
|
$edi
t_private
= $isOrcaA
dmin ? 1 :
0;
|
|
216 |
|
$edi
t_private
= $isOrcaA
dmin ? 1 :
0;
|
161 |
|
$del
_private
= $isOrcaA
dmin ? 1 :
0;
|
|
217 |
|
$del
_private
= $isOrcaA
dmin ? 1 :
0;
|
162 |
|
|
|
218 |
|
|
163 |
|
$edi
t_own = 1;
|
|
219 |
|
$edi
t_own = 1;
|
164 |
|
$del
_own = 1;
|
|
220 |
|
$del
_own = 1;
|
165 |
|
|
|
221 |
|
|
166 |
|
$search
=
$memberID
?
1
:
0;
|
|
222 |
|
$search
=
$memberID
||
$isOrcaAdm
in
?
1
:
0;
|
167 |
|
$sti
cky = $isO
rcaAdmin ?
1 : 0;
|
|
223 |
|
$sti
cky = $isO
rcaAdmin ?
1 : 0;
|
168 |
|
|
|
224 |
|
|
169 |
|
echo
<<<EOF
|
|
225 |
|
$orc
a_integrat
ion_xml .=
<<<EOF
|
170 |
|
<user_pe
rm name="$
user">
|
|
226 |
|
<use
r_perm nam
e="$user">
|
171 |
|
|
|
227 |
|
|
172 |
|
<rea
d_public>$
read_publi
c</read_pu
blic>
|
|
228 |
|
<read_publ
ic>$read_p
ublic</rea
d_public>
|
173 |
|
<pos
t_public>$
post_publi
c</post_pu
blic>
|
|
229 |
|
<post_publ
ic>$post_p
ublic</pos
t_public>
|
174 |
|
<edi
t_public>$
edit_publi
c</edit_pu
blic>
|
|
230 |
|
<edit_publ
ic>$edit_p
ublic</edi
t_public>
|
175 |
|
<del
_public>$d
el_public<
/del_publi
c>
|
|
231 |
|
<del_publi
c>$del_pub
lic</del_p
ublic>
|
176 |
|
|
|
232 |
|
|
177 |
|
<rea
d_private>
$read_priv
ate</read_
private>
|
|
233 |
|
<read_priv
ate>$read_
private</r
ead_privat
e>
|
178 |
|
<pos
t_private>
$post_priv
ate</post_
private>
|
|
234 |
|
<post_priv
ate>$post_
private</p
ost_privat
e>
|
179 |
|
<edi
t_private>
$edit_priv
ate</edit_
private>
|
|
235 |
|
<edit_priv
ate>$edit_
private</e
dit_privat
e>
|
180 |
|
<del
_private>$
del_privat
e</del_pri
vate>
|
|
236 |
|
<del_priva
te>$del_pr
ivate</del
_private>
|
181 |
|
|
|
237 |
|
|
182 |
|
<edi
t_own>$edi
t_own</edi
t_own>
|
|
238 |
|
<edit_own>
$edit_own<
/edit_own>
|
183 |
|
<del
_own>$del_
own</del_o
wn>
|
|
239 |
|
<del_own>$
del_own</d
el_own>
|
184 |
|
|
|
240 |
|
|
185 |
|
<sea
rch_>$sear
ch</search
_>
|
|
241 |
|
<search_>$
search</se
arch_>
|
186 |
|
<sti
cky_>$stic
ky</sticky
_>
|
|
242 |
|
<sticky_>$
sticky</st
icky_>
|
187 |
|
|
|
243 |
|
|
188 |
|
</user_p
erm>
|
|
244 |
|
</us
er_perm>
|
189 |
|
EOF;
|
|
245 |
|
EOF;
|
|
|
246 |
|
|
190 |
|
brea
k;
|
|
247 |
|
brea
k;
|
191 |
|
default:
|
|
248 |
|
default:
|
192 |
|
}
|
|
249 |
|
}
|
193 |
|
|
|
250 |
|
|
194 |
|
e
c
h
o
'</bxforum
>';
|
|
251 |
|
$or
c
a_integrat
i
o
n_xml
.=
'</bxforum
>';
|
195 |
|
|
|
|
196 |
|
|
|
252 |
|
|
197 |
|
/*
*
|
|
253 |
|
if
('url' ==
$gConf['i
ntegration
'])
|
198 |
|
*
determine
special u
ser permis
sions
|
|
254 |
|
echo $or
ca_integra
tion_xml;
|
199 |
|
*
@param $u
ser userna
me to chec
k
|
|
|
200 |
|
*
@param re
turn true
if user ha
s special
permission
s in the f
orum
|
|
|
201 |
|
*
/
|
|
|
202 |
|
fu
nction isS
pecialOrca
User ($use
r)
|
|
|
203 |
|
{
|
|
|
204 |
|
return 0
;
|
|
|
205 |
|
}
|
|
|
206 |
|
|
|
255 |
|
|
207 |
|
/*
*
|
|
|
208 |
|
*
determine
admin use
r
|
|
|
209 |
|
*
@param $u
ser userna
me to chec
k
|
|
|
210 |
|
*
@param re
turn true
if user ha
s special
permission
s in the f
orum
|
|
|
211 |
|
*
/
|
|
|
212 |
|
fu
nction isO
rcaAdmin (
$user)
|
|
|
213 |
|
{
|
|
|
214 |
|
global $
logged;
|
|
|
215 |
|
if ($log
ged['admin
'] || $log
ged['moder
ator']) re
turn true;
|
|
|
216 |
|
return f
alse;
|
|
|
217 |
|
}
|
|
|
218 |
|
?>
|
|
256 |
|
?>
|