[0001]
[0002]
[0003]
[0004]
[0005]
[0006]
[0007]
[0008]
[0009]
[0010]
[0011]
[0012]
[0013]
[0014]
[0015]
[0016]
[0017]
[0018]
[0019]
[0020]
[0021]
[0022]
[0023]
[0024]
[0025]
[0026]
[0027]
[0028]
[0029]
[0030]
[0031]
[0032]
[0033]
[0034]
[0035]
[0036]
[0037]
[0038]
[0039]
[0040]
[0041]
[0042]
[0043]
[0044]
[0045]
[0046]
[0047]
[0048]
[0049]
[0050]
[0051]
[0052]
[0053]
[0054]
[0055]
[0056]
[0057]
[0058]
[0059]
[0060]
[0061]
[0062]
[0063]
[0064]
[0065]
[0066]
[0067]
[0068]
[0069]
[0070]
[0071]
[0072]
[0073]
[0074]
[0075]
[0076]
[0077]
[0078]
[0079]
[0080]
[0081]
[0082]
[0083]
[0084]
[0085]
[0086]
[0087]
[0088]
[0089]
[0090]
[0091]
[0092]
[0093]
[0094]
[0095]
[0096]
[0097]
[0098]
[0099]
[0100]
[0101]
[0102]
[0103]
[0104]
[0105]
[0106]
[0107]
[0108]
[0109]
[0110]
[0111]
[0112]
[0113]
[0114]
[0115]
[0116]
[0117]
[0118]
[0119]
[0120]
[0121]
[0122]
[0123]
[0124]
[0125]
[0126]
[0127]
[0128]
[0129]
[0130]
[0131]
[0132]
[0133]
[0134]
[0135]
[0136]
[0137]
[0138]
[0139]
[0140]
[0141]
[0142]
[0143]
[0144]
[0145]
[0146]
[0147]
[0148]
[0149]
[0150]
[0151]
[0152]
[0153]
[0154]
[0155]
[0156]
[0157]
[0158]
[0159]
[0160]
[0161]
[0162]
[0163]
[0164]
[0165]
[0166]
[0167]
[0168]
[0169]
[0170]
[0171]
[0172]
[0173]
[0174]
[0175]
[0176]
[0177]
[0178]
[0179]
[0180]
[0181]
[0182]
[0183]
[0184]
[0185]
[0186]
[0187]
[0188]
[0189]
[0190]
[0191]
[0192]
[0193]
[0194]
[0195]
[0196]
[0197]
[0198]
[0199]
[0200]
[0201]
[0202]
[0203]
[0204]
[0205]
[0206]
[0207]
[0208]
[0209]
[0210]
[0211]
[0212]
[0213]
[0214]
[0215]
[0216]
[0217]
[0218]
[0219]
[0220]
[0221]
[0222]
[0223]
[0224]
[0225]
[0226]
[0227]
[0228]
[0229]
[0230]
[0231]
[0232]
[0233]
[0234]
[0235]
[0236]
[0237]
[0238]
[0239]
[0240]
[0241]
[0242]
[0243]
[0244]
[0245]
[0246]
[0247]
[0248]
[0249]
[0250]
[0251]
[0252]
[0253]
[0254]
[0255]
[0256]
[0257]
[0258]
[0259]
[0260]
[0261]
[0262]
[0263]
[0264]
[0265]
[0266]
[0267]
[0268]
[0269]
[0270]
[0271]
[0272]
[0273]
[0274]
[0275]
[0276]
[0277]
[0278]
[0279]
[0280]
[0281]
[0282]
[0283]
[0284]
[0285]
[0286]
[0287]
[0288]
[0289]
[0290]
[0291]
[0292]
[0293]
[0294]
[0295]
[0296]
[0297]
[0298]
[0299]
[0300]
[0301]
[0302]
[0303]
[0304]
[0305]
[0306]
[0307]
[0308]
[0309]
[0310]
[0311]
[0312]
[0313]
[0314]
[0315]
[0316]
[0317]
[0318]
[0319]
[0320]
[0321]
[0322]
[0323]
[0324]
[0325]
[0326]
[0327]
[0328]
[0329]
[0330]
[0331]
[0332]
[0333]
[0334]
[0335]
[0336]
[0337]
[0338]
[0339]
[0340]
[0341]
[0342]
[0343]
[0344]
[0345]
[0346]
[0347]
[0348]
[0349]
[0350]
[0351]
[0352]
[0353]
[0354]
[0355]
[0356]
[0357]
[0358]
[0359]
[0360]
[0361]
[0362]
[0363]
[0364]
[0365]
[0366]
[0367]
[0368]
[0369]
[0370]
[0371]
[0372]
[0373]
[0374]
[0375]
[0376]
[0377]
[0378]
[0379]
[0380]
[0381]
[0382]
[0383]
[0384]
[0385]
[0386]
[0387]
[0388]
[0389]
[0390]
[0391]
[0392]
[0393]
[0394]
[0395]
[0396]
[0397]
[0398]
[0399]
[0400]
[0401]
[0402]
[0403]
[0404]
[0405]
[0406]
[0407]
[0408]
[0409]
[0410]
[0411]
[0412]
[0413]
[0414]
[0415]
[0416]
[0417]
[0418]
[0419]
[0420]
[0421]
[0422]
[0423]
[0424]
[0425]
[0426]
[0427]
[0428]
[0429]
[0430]
[0431]
[0432]
[0433]
[0434]
[0435]
[0436]
[0437]
[0438]
[0439]
[0440]
[0441]
[0442]
[0443]
[0444]
[0445]
[0446]
[0447]
[0448]
[0449]
[0450]
[0451]
[0452]
[0453]
[0454]
[0455]
[0456]
[0457]
[0458]
[0459]
[0460]
[0461]
[0462]
[0463]
[0464]
[0465]
[0466]
[0467]
[0468]
[0469]
[0470]
[0471]
[0472]
[0473]
[0474]
[0475]
[0476]
[0477]
[0478]
[0479]
[0480]
[0481]
[0482]
[0483]
[0484]
[0485]
[0486]
[0487]
[0488]
[0489]
[0490]
[0491]
[0492]
[0493]
[0494]
[0495]
[0496]
[0497]
[0498]
[0499]
[0500]
[0501]
[0502]
[0503]
[0504]
[0505]
[0506]
[0507]
[0508]
[0509]
[0510]
[0511]
[0512]
[0513]
[0514]
[0515]
[0516]
[0517]
[0518]
[0519]
[0520]
[0521]
[0522]
[0523]
[0524]
[0525]
[0526]
[0527]
[0528]
[0529]
[0530]
[0531]
[0532]
[0533]
[0534]
[0535]
[0536]
[0537]
[0538]
[0539]
[0540]
[0541]
[0542]
[0543]
[0544]
[0545]
[0546]
[0547]
[0548]
[0549]
/*****************************************************************************/
/*
MapUrl.h
*/
/*****************************************************************************/
#ifndef MAPURL_H_LOADED
#define MAPURL_H_LOADED 1
#include "wasd.h"
#include "metacon.h"
#define MAPURL_RULE_EXEC 1
#define MAPURL_RULE_FAIL 2
#define MAPURL_RULE_MAP 3
#define MAPURL_RULE_PASS 4
#define MAPURL_RULE_REDIRECT 5
#define MAPURL_RULE_SCRIPT 6
#define MAPURL_RULE_SET 7
#define MAPURL_RULE_USER 8
#define MAPURL_RULE_UXEC 9
#define MAPURL_RULE_PROTECT 10
#define MAPURL_REPORT_MATCH_NOT 0
#define MAPURL_REPORT_MATCH_RULE 1
#define MAPURL_REPORT_MATCH_RULECOND 2
#define MAPURL_REPORT_MATCH_RULENOCOND 3
#define MAPURL_REPORT_MATCH_VIRT 4
#define MAPURL_PATH_ODS_0 -1
#define MAPURL_PATH_ODS_2 2
#define MAPURL_PATH_ODS_5 5
#define MAPURL_PATH_ODS_ADS 66
#define MAPURL_PATH_ODS_PWK 77
#define MAPURL_PATH_ODS_SMB 88
#define MAPURL_PATH_ODS_SRI 99
#define MAPURL_PATH_ODS_SRI 99
#define MAPURL_DIR_FONT_INHERIT 1
#define MAPURL_DIR_FONT_MONOSPACE 2
#define MAPURL_DIR_STYLE_DEFAULT -1
#define MAPURL_DIR_STYLE_DEFAULT2 -2
#define MAPURL_DIR_STYLE_NONE 0
#define MAPURL_DIR_STYLE_ORIGINAL 1 /* pre-v8.2 */
#define MAPURL_DIR_STYLE_ORIGINAL2 2 /* pre-v8.2 minus <HR>s */
#define MAPURL_DIR_STYLE_ANCHOR 3 /* post-v8.2 */
#define MAPURL_DIR_STYLE_ANCHOR2 4 /* post-v8.2 minus <HR>s */
#define MAPURL_DIR_STYLE_SORT 5 /* HTML table and sortable */
#define MAPURL_DIR_STYLE_SORT2 6 /* table and sortable minus <HR>s */
#define MAPURL_DIR_STYLE_HTDIR 7 /* Alex Ivanov's HTdir, etc. */
#define MAPURL_DIR_STYLE_HTDIR2 8 /* HTdir, etc. minus <HR>s */
#define MAPURL_DIR_STYLE_TABLE 9 /* post-v10.4 table element */
#define MAPURL_DIR_STYLE_TABLE2 10 /* post-v10.4 table element */
#define MAPURL_DIR_TITLE_THIS -5 /* literal string */
#define MAPURL_DIR_TITLE_OWNER -4
#define MAPURL_DIR_TITLE_REMOTE -3
#define MAPURL_DIR_TITLE_DEFAULT -2
#define MAPURL_DIR_TITLE_NONE -1
/* then as 1, 2, 3 .. 99999 */
#define MAPURL_DIR_DELIMIT_BOTH 1
#define MAPURL_DIR_DELIMIT_HEADER 2
#define MAPURL_DIR_DELIMIT_FOOTER 3
#define MAPURL_DIR_DELIMIT_NONE 4
#define MAPURL_PATH_ALERT_END 0x0001
#define MAPURL_PATH_ALERT_AUTH 0x0002
#define MAPURL_PATH_ALERT_MAP 0x0004
#define MAPURL_PATH_ALERT_DONE 0x8000 /* bit that is ORed into the flag */
#define MAPURL_ODS_DEFAULT -1
#define MAPURL_ODS_8BIT 1 /* native encoding (default) */
#define MAPURL_ODS_UTF8 2 /* utf-8 encoding */
#define MAPURL_CLIENT_FORWARDED 1
#define MAPURL_CLIENT_IF_FORWARDED 2
#define MAPURL_CLIENT_LITERAL 3
#define MAPURL_CLIENT_RESET 4
#define MAPURL_CLIENT_XFORWARDEDFOR 5
#define MAPURL_CLIENT_IF_XFORWARDEDFOR 6
#define MAPURL_RESPONSE_GZIP_NONE -1
#define MAPURL_RESPONSE_GZIP_ALL -2
/* any other non-zero integer represents kilobytes */
/* used to mask the actual reason for denying access to a USER rule username */
#define MAPURL_USER_RULE_FORBIDDEN_MSG "\0" "403 USER forbidden!"
/* put a brake on potentially runaway mapping restarts */
#define MAPURL_RESTART_MAX 5
#define MAPURL_NO_REVERSE_PATH "NO:[REVERSE.MAPPING.FOR.THIS]FILE.PATH!"
#define MAPURL_PROXY_HEADER_MAX 4
/*******************/
/* data structures */
/*******************/
#pragma member_alignment __save
#pragma member_alignment
typedef struct MapPathSetMetaStruct MAP_SET_META;
struct MapPathSetMetaStruct
{
BOOL AcceptLangWildcard,
AcceptLangTypeVariant,
NoAcceptLang,
AccessProfile,
AccessNoProfile,
AccessRead,
AccessNoRead,
AccessServer,
AccessNoServer,
AccessWrite,
AccessNoWrite,
Alert,
NoAlert,
AuthAll,
NoAuthAll,
AuthMapped,
NoAuthMapped,
AuthOnce,
NoAuthOnce,
Cache,
NoCache,
CacheCGI,
CacheNoCGI,
CacheCookie,
CacheNoCookie,
CacheFile,
CacheNoFile,
CacheNet,
CacheNoNet,
CacheNPH,
CacheNoNPH,
CachePermanent,
CacheNoPermanent,
CacheQuery,
CacheNoQuery,
CacheScript,
CacheNoScript,
CacheSSI,
CacheNoSSI,
CacheSetting,
CgiPlusInWriteof,
CgiPlusInNoWriteof,
DefaultSearch,
NoDefaultSearch,
DirAccess,
DirAccessSelective,
DirNoAccess,
DirIconLink,
DirNoIconLink,
DirImpliedWildcard,
DirNoImpliedWildcard,
DirWildcard,
DirNoWildcard,
Expired,
NoExpired,
Extended,
GetUai,
NoGetUai,
NoHtmlEquals,
Http2SendPing,
Http2ToHttp11,
Log,
NoLog,
MapEllipsis,
NoMapEllipsis,
MapEmpty,
MapNonEmpty,
MapExtensionMethod,
NoMapExtensionMethod,
MapOnce,
NoMapOnce,
MapRestart,
MapSetIgnore,
MapSetNoIgnore,
MapSetRequest,
MapSetNoRequest,
MapUri,
NoOp,
PrivSsi,
NoPrivSsi,
Profile,
NoProfile,
ProxyAffinity,
ProxyNoAffinity,
ProxyReverseVerify,
NoProxyReverseVerify,
ProxyReverseAuthHeader,
NoProxyReverseAuthHeader,
ProxyUnknownRequestFields,
NoProxyUnknownRequestFields,
ResponseChunked,
ResponseNoChunked,
ResponseHeaderBegin,
ResponseHeaderFull,
ResponseHeaderNone,
ResponseHeaderNoAdd,
ResponseHttpOriginal,
ResponseHttpNoOriginal,
ScriptBodyDecode,
ScriptBodyNoDecode,
ScriptFind,
ScriptNoFind,
ScriptPathFind,
ScriptNoPathFind,
ScriptQueryNone,
ScriptNoQueryNone,
ScriptQueryRelaxed,
ScriptNoQueryRelaxed,
ScriptSymbolTruncate,
ScriptSymbolNoTruncate,
ScriptSyntaxUnix,
ScriptSyntaxNoUnix,
StmLF,
ThrottleSet,
ThrottleNoSet,
NoStmLF,
WildcardEllipsis,
NoWildcardEllipsis,
WebDavAll,
WebDavNoAll,
WebDavAuth,
WebDavNoAuth,
WebDavHidden,
WebDavNoHidden,
WebDavLock,
WebDavNoLock,
WebDavMetaDirLength,
WebDavProfile,
WebDavNoProfile,
WebDavProp,
WebDavNoProp,
WebDavPutLock,
WebDavNoPutLock,
WebDavRead,
WebDavNoRead,
WebDavServer,
WebDavNoServer,
WebDavWinProp,
WebDavNoWinProp,
WebDavWrite,
WebDavNoWrite;
int AcceptLangLength,
AuthRevalidateTimeout,
AuthSysUafPwdExpUrlLength,
CacheExpiresAfter,
CacheGuardSeconds,
CacheMaxKBytes,
CgiPrefixLength,
CgiVarLength,
ChangeServiceLength,
CharsetLength,
ClientAddress,
ClientAddressLiteralLength,
ContentTypeLength,
CorsAllowCredentials,
CorsNoAllowCredentials,
CorsAllowHeadersLength,
CorsAllowMethodsLength,
CorsAllowOriginLength,
CorsExposeHeadersLength,
CorsMaxAge,
DirCharsetLength,
DirTargetLength,
DirTheseLength,
DirTitle,
DirTitleLength,
DirDelimit,
DirFont,
DirStyle,
DirVersionsOf,
HtmlBodyTagLength,
HtmlFooterLength,
HtmlFooterTagLength,
HtmlHeaderLength,
HtmlHeaderTagLength,
Http2MaxStreams,
Http2SendGoAway,
Http2SendReset,
Http2WriteQueue,
HttpAcceptCharsetLength,
HttpAcceptLangLength,
IndexLength,
MapRootLength,
OdsName,
PathOds,
ProxyBindIpAddressLength,
ProxyChainCredLength,
ProxyChainHostPortLength,
ProxyChainPort,
ProxyForwardedBy,
ProxyHeaderCount,
ProxyReverseLocationLength,
ProxyReworkLength,
ProxyTunnelRequestLength,
ProxyXForwardedFor,
PutRFM,
PutMaxKbytes,
QueryStringLength,
RegexSyntax,
Report400as,
Report403as,
Report404as,
ReportType,
Response200is203,
ResponseCspLength,
ResponseCsproLength,
ResponseGzip,
ResponseHeaderAddLength,
ResponseStrictTransSecLength,
ResponseVarRecord,
ScriptAgentAsLength,
ScriptAsLength,
ScriptCommandLength,
ScriptControlLength,
ScriptBitBucketTimeout,
ScriptCpuMax,
ScriptDefaultLength,
ScriptLifeTime,
ScriptParamsLength,
SsiExecLength,
SSLCGIvar,
StyleSheetLength,
ThrottleIndex,
ThrottleBusy,
ThrottleFrom,
ThrottlePerUser,
ThrottleResume,
ThrottleTo,
ThrottleTimeoutBusy,
ThrottleTimeoutQueue,
TimeoutNoProgress,
TimeoutOutput,
TimeoutPersistent,
WebDavLockTimeoutDefault,
WebDavLockTimeoutMax,
WebSocketInputSize,
WebSocketOutputSize,
WebSocketFraming;
char AcceptLangChar,
RmsSubChar;
char *AcceptLangPtr,
*AuthSysUafPwdExpUrlPtr,
*CgiPrefixPtr,
*CgiVarPtr,
*ChangeServicePtr,
*CharsetPtr,
*ClientAddressLiteralPtr,
*ContentTypePtr,
*CorsAllowHeadersPtr,
*CorsAllowMethodsPtr,
*CorsAllowOriginPtr,
*CorsExposeHeadersPtr,
*DictionaryPtr,
*DirCharsetPtr,
*DirTargetPtr,
*DirThesePtr,
*DirTitlePtr,
*HtmlBodyTagPtr,
*HtmlFooterPtr,
*HtmlFooterTagPtr,
*HtmlHeaderPtr,
*HtmlHeaderTagPtr,
*HttpAcceptCharsetPtr,
*HttpAcceptLangPtr,
*IndexPtr,
*MapRootPtr,
*NotePadPtr,
*ProxyBindIpAddressPtr,
*ProxyChainCredPtr,
*ProxyChainHostPortPtr,
*ProxyReverseLocationPtr,
*ProxyReworkPtr,
*ProxyTunnelRequestPtr,
*QueryStringPtr,
*ResponseCspPtr,
*ResponseCsproPtr,
*ResponseHeaderAddPtr,
*ResponseStrictTransSecPtr,
*ScriptAgentAsPtr,
*ScriptAsPtr,
*ScriptCommandPtr,
*ScriptControlPtr,
*ScriptDefaultPtr,
*ScriptParamsPtr,
*SsiExecPtr,
*StyleSheetPtr,
*WebDavMetaDirPtr;
char *ProxyHeader [MAPURL_PROXY_HEADER_MAX];
char DirSort [3];
IPADDRESS ProxyBindIpAddress,
ProxyChainIpAddress;
char CgiPlusInCC [4];
};
typedef struct MappingRuleMetaStruct MAP_RULE_META;
struct MappingRuleMetaStruct
{
BOOL IsCgiPlusScript,
PathSet;
int MetaConNumber,
ResultLength,
ResultPathOds,
RuleType;
char *ConditionalPtr,
*ResultPtr,
*TemplatePtr;
/* storage for pre-compiled regular expression */
regex_t RegexPregTemplate;
MAP_SET_META mpPathSet;
/* strings are stored straight after and pointed to by the above */
char Storage[];
};
typedef struct MappingMetaStruct MAPPING_META;
struct MappingMetaStruct
{
int ThrottleIndex,
ThrottlePerUserTotal,
ThrottleTotal;
REQUEST_STRUCT *RequestPtr;
};
#define MAPURL_USER_NAME_SIZE 12
#define MAPURL_USER_DEFDEV_SIZE 31
#define MAPURL_USER_DEFDIR_SIZE 63
#define MAPURL_USER_PATH_SIZE MAPURL_USER_DEFDEV_SIZE + MAPURL_USER_DEFDIR_SIZE
typedef struct MapUrlUserCacheStruct MAP_URL_USER_ENTRY;
struct MapUrlUserCacheStruct
{
LIST_ENTRY UserCacheListEntry;
int HitCount,
PathOds,
ReuseCount;
int64 LastTime64;
char UserName [MAPURL_USER_NAME_SIZE+1],
UserPath [MAPURL_USER_PATH_SIZE+1];
};
#pragma member_alignment __restore
/***********************/
/* function prototypes */
/***********************/
/* "quick and dirty" return path equivalent of VMS file specification */
#define MapVmsPath(vp,rp) \
MapUrl_Map (NULL, 0, vp, 0, NULL, 0, NULL, 0, NULL, 0, NULL, rp, NULL)
/* (re)load the mappings */
#define MapUrl_Load() \
MapUrl_Map (NULL,0,NULL,0,NULL,0,NULL,0,NULL,0,NULL,NULL,NULL)
/************/
/* MAPURL.C */
/************/
char* MapUrl_Map (char*, int, char*, int, char*, int, char*, int, char*, int,
int*, REQUEST_STRUCT*, REQUEST_PATHSET*);
char* MapUrl__Map (char*, int, char*, int, char*, int, char*, int, char*, int,
int*, REQUEST_STRUCT*, REQUEST_PATHSET*);
int MapUrl_ConfigLoad (META_CONFIG**);
BOOL MapUrl_ConfigLoadCallBack (META_CONFIG*);
MapUrl_ConfigUnload (META_CONFIG*);
MapUrl_ConfigUnloadLineData (void*);
MapUrl_ControlReload ();
char* MapUrl_GuaranteeAccess (REQUEST_STRUCT*, char*);
char* MapUrl_ReportMessage (struct MappingRuleListStruct*, char*, int);
void MapUrl_ResetClientAddress (REQUEST_STRUCT*);
char* MapUrl_SetClientAddress (REQUEST_STRUCT*);
int MapUrl_SetSeconds (struct MappingRuleListStruct*, char*, int);
char* MapUrl_Substitute (REQUEST_STRUCT*, char*);
MAP_RULE_META* MapUrl_ThrottleRule (int);
MapUrl_ConfigParseValue (char*);
int MapUrl_VirtualPath (char*, char*, char*, int);
MapUrl_WatchRule (REQUEST_STRUCT*, MAP_RULE_META*, METACON_LINE*,
char*, int, int, BOOL);
/************/
/* MAPCON.C */
/************/
BOOL MapConList (REQUEST_STRUCT*, char*, char*);
BOOL MapConString (REQUEST_STRUCT*, MAP_RULE_META*, REQUEST_PATHSET*);
/************/
/* MAPODS.C */
/************/
int MapOds2VmsToUrl (char*, char*, int, BOOL);
int MapOds5VmsToUrl (char*, char*, int, BOOL);
int MapOdsAdsVmsToUrl (char*, char*, int, BOOL);
char* MapOdsAdsFileType (char*);
int MapOdsElementsToVms (char*, int, char*, int, BOOL);
int MapOdsPwkVmsToUrl (char*, char*, int, BOOL);
char MapOdsSriCharVmsToUrl (char**, BOOL*);
char* MapOdsSriFileType (char*);
int MapOdsSriVmsToUrl (char*, char*, int, BOOL);
int MapOdsUrlToVms (char*, char*, int, char, BOOL, int);
int MapOdsUrlToAdsVms (char*, char*, int, BOOL);
int MapOdsUrlToPwkVms (char*, char*, int, BOOL);
int MapOdsUrlToSriVms (char*, char*, int, BOOL);
int MapOdsUrlToOds2Vms (char*, char*, int, BOOL, char);
int MapOdsUrlToOds5Vms (char*, char*, int, BOOL);
int MapOdsVmsToUrl (char*, char*, int, BOOL, int);
int MapOdsVmsToUnix (char*, char*, int);
/************/
/* MAPSET.C */
/************/
BOOL MapSetConfig (char*, char*, META_CONFIG*, MAP_SET_META*, BOOL*);
char* MapSetExplain (REQUEST_STRUCT*, MAP_RULE_META*);
int MapSetPath (REQUEST_STRUCT*, REQUEST_PATHSET*, MAP_SET_META*);
/*************/
/* MAPUSER.C */
/*************/
char* MapUserName (REQUEST_STRUCT*, char*, int*);
char* MapUserNameCache (REQUEST_STRUCT*, char*, char*, int*);
#endif /* MAPURL_H_LOADED */
/*****************************************************************************/