[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]
[0550]
[0551]
[0552]
[0553]
[0554]
[0555]
[0556]
[0557]
[0558]
[0559]
[0560]
[0561]
[0562]
[0563]
[0564]
[0565]
[0566]
[0567]
[0568]
[0569]
[0570]
[0571]
[0572]
[0573]
[0574]
[0575]
[0576]
[0577]
[0578]
[0579]
[0580]
[0581]
[0582]
[0583]
[0584]
[0585]
[0586]
[0587]
[0588]
[0589]
[0590]
[0591]
[0592]
[0593]
[0594]
[0595]
[0596]
[0597]
[0598]
[0599]
[0600]
[0601]
[0602]
[0603]
[0604]
[0605]
[0606]
[0607]
[0608]
[0609]
[0610]
[0611]
[0612]
[0613]
[0614]
[0615]
[0616]
[0617]
[0618]
[0619]
[0620]
[0621]
[0622]
[0623]
[0624]
[0625]
[0626]
[0627]
[0628]
[0629]
[0630]
[0631]
[0632]
[0633]
[0634]
[0635]
[0636]
[0637]
[0638]
[0639]
[0640]
[0641]
[0642]
[0643]
[0644]
[0645]
[0646]
[0647]
[0648]
[0649]
[0650]
[0651]
[0652]
[0653]
[0654]
[0655]
[0656]
[0657]
[0658]
[0659]
[0660]
[0661]
[0662]
[0663]
[0664]
[0665]
[0666]
[0667]
[0668]
[0669]
[0670]
[0671]
[0672]
[0673]
[0674]
[0675]
[0676]
[0677]
[0678]
[0679]
[0680]
[0681]
[0682]
[0683]
[0684]
[0685]
[0686]
[0687]
[0688]
[0689]
[0690]
[0691]
[0692]
[0693]
[0694]
[0695]
[0696]
[0697]
[0698]
[0699]
[0700]
[0701]
[0702]
[0703]
[0704]
[0705]
[0706]
[0707]
[0708]
[0709]
[0710]
[0711]
[0712]
[0713]
[0714]
[0715]
[0716]
[0717]
[0718]
[0719]
[0720]
[0721]
[0722]
[0723]
[0724]
[0725]
[0726]
[0727]
[0728]
[0729]
[0730]
[0731]
[0732]
[0733]
[0734]
[0735]
[0736]
[0737]
[0738]
[0739]
[0740]
[0741]
[0742]
[0743]
[0744]
[0745]
[0746]
[0747]
[0748]
[0749]
[0750]
[0751]
[0752]
[0753]
[0754]
[0755]
[0756]
[0757]
[0758]
[0759]
[0760]
[0761]
[0762]
[0763]
[0764]
[0765]
[0766]
[0767]
[0768]
[0769]
[0770]
[0771]
[0772]
[0773]
[0774]
[0775]
[0776]
[0777]
[0778]
[0779]
[0780]
[0781]
[0782]
[0783]
[0784]
[0785]
[0786]
[0787]
[0788]
[0789]
[0790]
[0791]
[0792]
[0793]
[0794]
[0795]
[0796]
[0797]
[0798]
[0799]
[0800]
[0801]
[0802]
[0803]
[0804]
[0805]
[0806]
[0807]
[0808]
[0809]
[0810]
[0811]
[0812]
[0813]
[0814]
[0815]
[0816]
[0817]
[0818]
[0819]
[0820]
[0821]
[0822]
[0823]
[0824]
[0825]
[0826]
[0827]
[0828]
[0829]
[0830]
[0831]
[0832]
[0833]
[0834]
[0835]
[0836]
[0837]
[0838]
[0839]
[0840]
[0841]
[0842]
[0843]
[0844]
[0845]
[0846]
[0847]
[0848]
[0849]
[0850]
[0851]
[0852]
[0853]
[0854]
[0855]
[0856]
[0857]
[0858]
[0859]
[0860]
[0861]
[0862]
[0863]
[0864]
[0865]
[0866]
[0867]
[0868]
[0869]
[0870]
[0871]
[0872]
[0873]
[0874]
[0875]
[0876]
[0877]
[0878]
[0879]
[0880]
[0881]
[0882]
[0883]
[0884]
[0885]
[0886]
[0887]
[0888]
[0889]
[0890]
[0891]
[0892]
[0893]
[0894]
[0895]
[0896]
[0897]
[0898]
[0899]
[0900]
[0901]
[0902]
[0903]
[0904]
[0905]
[0906]
[0907]
[0908]
[0909]
[0910]
[0911]
[0912]
[0913]
[0914]
[0915]
[0916]
[0917]
[0918]
[0919]
[0920]
[0921]
[0922]
[0923]
[0924]
[0925]
[0926]
[0927]
[0928]
[0929]
[0930]
[0931]
[0932]
[0933]
[0934]
[0935]
[0936]
[0937]
[0938]
[0939]
[0940]
[0941]
[0942]
[0943]
[0944]
[0945]
[0946]
[0947]
[0948]
[0949]
[0950]
[0951]
[0952]
[0953]
[0954]
[0955]
[0956]
[0957]
[0958]
[0959]
[0960]
[0961]
[0962]
[0963]
[0964]
[0965]
[0966]
[0967]
[0968]
[0969]
[0970]
[0971]
[0972]
[0973]
[0974]
[0975]
[0976]
[0977]
[0978]
[0979]
[0980]
[0981]
[0982]
[0983]
[0984]
[0985]
[0986]
[0987]
[0988]
[0989]
[0990]
[0991]
[0992]
[0993]
[0994]
[0995]
[0996]
[0997]
[0998]
[0999]
[1000]
[1001]
[1002]
[1003]
[1004]
[1005]
[1006]
[1007]
[1008]
[1009]
[1010]
[1011]
[1012]
[1013]
[1014]
[1015]
[1016]
[1017]
[1018]
[1019]
[1020]
[1021]
[1022]
[1023]
[1024]
[1025]
[1026]
[1027]
[1028]
[1029]
[1030]
[1031]
[1032]
[1033]
[1034]
[1035]
[1036]
[1037]
[1038]
[1039]
[1040]
[1041]
[1042]
[1043]
[1044]
[1045]
[1046]
[1047]
[1048]
[1049]
[1050]
[1051]
[1052]
[1053]
[1054]
[1055]
[1056]
[1057]
[1058]
[1059]
[1060]
[1061]
[1062]
[1063]
[1064]
[1065]
[1066]
[1067]
[1068]
[1069]
[1070]
[1071]
[1072]
[1073]
[1074]
[1075]
[1076]
[1077]
[1078]
[1079]
[1080]
[1081]
[1082]
[1083]
[1084]
[1085]
[1086]
[1087]
[1088]
[1089]
[1090]
[1091]
[1092]
[1093]
[1094]
[1095]
[1096]
[1097]
[1098]
[1099]
[1100]
[1101]
[1102]
[1103]
[1104]
[1105]
[1106]
[1107]
[1108]
[1109]
[1110]
[1111]
[1112]
[1113]
[1114]
[1115]
[1116]
[1117]
[1118]
[1119]
[1120]
[1121]
[1122]
[1123]
[1124]
[1125]
[1126]
[1127]
[1128]
[1129]
[1130]
[1131]
[1132]
[1133]
[1134]
[1135]
[1136]
[1137]
[1138]
[1139]
[1140]
[1141]
[1142]
[1143]
[1144]
[1145]
[1146]
[1147]
[1148]
[1149]
[1150]
[1151]
[1152]
[1153]
[1154]
[1155]
[1156]
[1157]
[1158]
[1159]
[1160]
[1161]
[1162]
[1163]
[1164]
[1165]
[1166]
[1167]
[1168]
[1169]
[1170]
[1171]
[1172]
[1173]
[1174]
[1175]
[1176]
[1177]
[1178]
[1179]
[1180]
[1181]
[1182]
[1183]
[1184]
[1185]
[1186]
[1187]
[1188]
[1189]
[1190]
[1191]
[1192]
[1193]
[1194]
[1195]
[1196]
[1197]
[1198]
[1199]
[1200]
[1201]
[1202]
[1203]
[1204]
[1205]
[1206]
[1207]
[1208]
[1209]
[1210]
[1211]
[1212]
[1213]
[1214]
[1215]
[1216]
[1217]
[1218]
[1219]
[1220]
[1221]
[1222]
[1223]
[1224]
[1225]
[1226]
[1227]
[1228]
[1229]
[1230]
[1231]
[1232]
[1233]
[1234]
[1235]
[1236]
[1237]
[1238]
[1239]
[1240]
[1241]
[1242]
[1243]
[1244]
[1245]
[1246]
[1247]
[1248]
[1249]
[1250]
[1251]
[1252]
[1253]
[1254]
[1255]
[1256]
[1257]
[1258]
[1259]
[1260]
[1261]
[1262]
[1263]
[1264]
[1265]
[1266]
[1267]
[1268]
[1269]
[1270]
[1271]
[1272]
[1273]
[1274]
[1275]
[1276]
[1277]
[1278]
[1279]
[1280]
[1281]
[1282]
[1283]
[1284]
[1285]
[1286]
[1287]
[1288]
[1289]
[1290]
[1291]
[1292]
[1293]
[1294]
[1295]
[1296]
[1297]
[1298]
[1299]
[1300]
[1301]
[1302]
[1303]
[1304]
[1305]
[1306]
[1307]
[1308]
[1309]
[1310]
[1311]
[1312]
[1313]
[1314]
[1315]
[1316]
[1317]
[1318]
[1319]
[1320]
[1321]
[1322]
[1323]
[1324]
[1325]
[1326]
[1327]
[1328]
[1329]
[1330]
[1331]
[1332]
[1333]
[1334]
[1335]
[1336]
[1337]
[1338]
[1339]
[1340]
[1341]
[1342]
[1343]
[1344]
[1345]
[1346]
[1347]
[1348]
[1349]
[1350]
[1351]
[1352]
[1353]
[1354]
[1355]
[1356]
[1357]
[1358]
[1359]
[1360]
[1361]
[1362]
[1363]
[1364]
[1365]
[1366]
[1367]
[1368]
[1369]
[1370]
[1371]
[1372]
[1373]
[1374]
[1375]
[1376]
[1377]
[1378]
[1379]
[1380]
[1381]
[1382]
[1383]
[1384]
[1385]
[1386]
[1387]
[1388]
[1389]
[1390]
[1391]
[1392]
[1393]
[1394]
[1395]
[1396]
[1397]
[1398]
[1399]
[1400]
[1401]
[1402]
[1403]
[1404]
[1405]
[1406]
[1407]
[1408]
[1409]
[1410]
[1411]
[1412]
[1413]
[1414]
[1415]
[1416]
[1417]
[1418]
[1419]
[1420]
[1421]
[1422]
[1423]
[1424]
[1425]
[1426]
[1427]
[1428]
[1429]
[1430]
[1431]
[1432]
[1433]
[1434]
[1435]
[1436]
[1437]
[1438]
[1439]
[1440]
[1441]
[1442]
[1443]
[1444]
[1445]
[1446]
[1447]
[1448]
[1449]
[1450]
[1451]
[1452]
[1453]
[1454]
[1455]
[1456]
[1457]
[1458]
[1459]
[1460]
[1461]
[1462]
[1463]
[1464]
[1465]
[1466]
[1467]
[1468]
[1469]
[1470]
[1471]
[1472]
[1473]
[1474]
[1475]
[1476]
[1477]
[1478]
[1479]
[1480]
[1481]
[1482]
[1483]
[1484]
[1485]
[1486]
[1487]
[1488]
[1489]
[1490]
[1491]
[1492]
[1493]
[1494]
[1495]
[1496]
[1497]
[1498]
[1499]
[1500]
[1501]
[1502]
[1503]
[1504]
[1505]
[1506]
[1507]
[1508]
[1509]
[1510]
[1511]
[1512]
[1513]
[1514]
[1515]
[1516]
[1517]
[1518]
[1519]
[1520]
[1521]
[1522]
[1523]
[1524]
[1525]
[1526]
[1527]
[1528]
[1529]
[1530]
[1531]
[1532]
[1533]
[1534]
[1535]
[1536]
[1537]
[1538]
[1539]
[1540]
[1541]
[1542]
[1543]
[1544]
[1545]
[1546]
[1547]
[1548]
[1549]
[1550]
[1551]
[1552]
[1553]
[1554]
[1555]
[1556]
[1557]
[1558]
[1559]
[1560]
[1561]
[1562]
[1563]
[1564]
[1565]
[1566]
[1567]
[1568]
[1569]
[1570]
[1571]
[1572]
[1573]
[1574]
[1575]
[1576]
[1577]
[1578]
[1579]
[1580]
[1581]
[1582]
[1583]
[1584]
[1585]
[1586]
[1587]
[1588]
[1589]
[1590]
[1591]
[1592]
[1593]
[1594]
[1595]
[1596]
[1597]
[1598]
[1599]
[1600]
[1601]
[1602]
[1603]
[1604]
[1605]
[1606]
[1607]
[1608]
[1609]
[1610]
[1611]
[1612]
[1613]
[1614]
[1615]
[1616]
[1617]
[1618]
[1619]
[1620]
[1621]
[1622]
[1623]
[1624]
[1625]
[1626]
[1627]
[1628]
[1629]
[1630]
[1631]
[1632]
[1633]
[1634]
[1635]
[1636]
[1637]
[1638]
[1639]
[1640]
[1641]
[1642]
[1643]
[1644]
[1645]
[1646]
[1647]
[1648]
[1649]
[1650]
[1651]
[1652]
[1653]
[1654]
[1655]
[1656]
[1657]
[1658]
[1659]
[1660]
[1661]
[1662]
[1663]
[1664]
[1665]
[1666]
[1667]
[1668]
[1669]
[1670]
[1671]
[1672]
[1673]
[1674]
[1675]
[1676]
[1677]
[1678]
[1679]
[1680]
[1681]
[1682]
[1683]
[1684]
[1685]
[1686]
[1687]
[1688]
[1689]
[1690]
[1691]
[1692]
[1693]
[1694]
[1695]
[1696]
[1697]
[1698]
[1699]
[1700]
[1701]
[1702]
[1703]
[1704]
[1705]
[1706]
[1707]
[1708]
[1709]
[1710]
[1711]
[1712]
[1713]
[1714]
[1715]
[1716]
[1717]
[1718]
[1719]
[1720]
[1721]
[1722]
[1723]
[1724]
[1725]
[1726]
[1727]
[1728]
[1729]
[1730]
[1731]
[1732]
[1733]
[1734]
[1735]
[1736]
[1737]
[1738]
[1739]
[1740]
[1741]
[1742]
[1743]
[1744]
[1745]
[1746]
[1747]
[1748]
[1749]
[1750]
[1751]
[1752]
[1753]
[1754]
[1755]
[1756]
[1757]
[1758]
[1759]
[1760]
[1761]
[1762]
[1763]
[1764]
[1765]
[1766]
[1767]
[1768]
[1769]
[1770]
[1771]
[1772]
[1773]
[1774]
[1775]
[1776]
[1777]
[1778]
[1779]
[1780]
[1781]
[1782]
[1783]
[1784]
[1785]
[1786]
[1787]
[1788]
[1789]
[1790]
[1791]
[1792]
[1793]
[1794]
[1795]
[1796]
[1797]
[1798]
[1799]
[1800]
[1801]
[1802]
[1803]
[1804]
[1805]
[1806]
[1807]
[1808]
[1809]
[1810]
[1811]
[1812]
[1813]
[1814]
[1815]
[1816]
[1817]
[1818]
[1819]
[1820]
[1821]
[1822]
[1823]
[1824]
[1825]
[1826]
[1827]
[1828]
[1829]
[1830]
[1831]
[1832]
[1833]
[1834]
[1835]
[1836]
[1837]
[1838]
[1839]
[1840]
[1841]
[1842]
[1843]
[1844]
[1845]
[1846]
[1847]
[1848]
[1849]
[1850]
[1851]
[1852]
[1853]
[1854]
[1855]
[1856]
[1857]
[1858]
[1859]
[1860]
[1861]
[1862]
[1863]
[1864]
[1865]
[1866]
[1867]
[1868]
[1869]
[1870]
[1871]
[1872]
[1873]
[1874]
[1875]
[1876]
[1877]
[1878]
[1879]
[1880]
[1881]
[1882]
[1883]
[1884]
[1885]
[1886]
[1887]
[1888]
[1889]
[1890]
[1891]
[1892]
[1893]
[1894]
[1895]
[1896]
[1897]
[1898]
[1899]
[1900]
[1901]
[1902]
[1903]
[1904]
[1905]
[1906]
[1907]
[1908]
[1909]
[1910]
[1911]
[1912]
[1913]
[1914]
[1915]
[1916]
[1917]
[1918]
[1919]
[1920]
[1921]
[1922]
[1923]
[1924]
[1925]
[1926]
[1927]
[1928]
[1929]
[1930]
[1931]
[1932]
[1933]
[1934]
[1935]
[1936]
[1937]
[1938]
[1939]
[1940]
[1941]
[1942]
[1943]
[1944]
[1945]
[1946]
[1947]
[1948]
[1949]
[1950]
[1951]
[1952]
[1953]
[1954]
[1955]
[1956]
[1957]
[1958]
[1959]
[1960]
[1961]
[1962]
[1963]
[1964]
[1965]
[1966]
[1967]
[1968]
[1969]
[1970]
[1971]
[1972]
[1973]
[1974]
[1975]
[1976]
[1977]
[1978]
[1979]
[1980]
[1981]
[1982]
[1983]
[1984]
[1985]
[1986]
[1987]
[1988]
[1989]
[1990]
[1991]
[1992]
[1993]
[1994]
[1995]
[1996]
[1997]
[1998]
[1999]
[2000]
[2001]
[2002]
[2003]
[2004]
[2005]
[2006]
[2007]
[2008]
[2009]
[2010]
[2011]
[2012]
[2013]
[2014]
[2015]
[2016]
[2017]
[2018]
[2019]
[2020]
[2021]
[2022]
[2023]
[2024]
[2025]
[2026]
[2027]
[2028]
[2029]
[2030]
[2031]
[2032]
[2033]
[2034]
[2035]
[2036]
[2037]
[2038]
[2039]
[2040]
[2041]
[2042]
[2043]
[2044]
[2045]
[2046]
[2047]
[2048]
[2049]
[2050]
[2051]
[2052]
[2053]
[2054]
[2055]
[2056]
[2057]
[2058]
[2059]
[2060]
[2061]
[2062]
[2063]
[2064]
[2065]
[2066]
[2067]
[2068]
[2069]
[2070]
[2071]
[2072]
[2073]
[2074]
[2075]
[2076]
[2077]
[2078]
[2079]
[2080]
[2081]
[2082]
[2083]
[2084]
[2085]
[2086]
[2087]
[2088]
[2089]
[2090]
[2091]
[2092]
[2093]
[2094]
[2095]
[2096]
[2097]
[2098]
[2099]
[2100]
[2101]
[2102]
[2103]
[2104]
[2105]
[2106]
[2107]
[2108]
[2109]
[2110]
[2111]
[2112]
[2113]
[2114]
[2115]
[2116]
[2117]
[2118]
[2119]
[2120]
[2121]
[2122]
[2123]
[2124]
[2125]
[2126]
[2127]
[2128]
[2129]
[2130]
[2131]
[2132]
[2133]
[2134]
[2135]
[2136]
[2137]
[2138]
[2139]
[2140]
[2141]
[2142]
[2143]
[2144]
[2145]
[2146]
[2147]
[2148]
[2149]
[2150]
[2151]
[2152]
[2153]
[2154]
[2155]
[2156]
[2157]
[2158]
[2159]
[2160]
[2161]
[2162]
[2163]
[2164]
[2165]
[2166]
[2167]
[2168]
[2169]
[2170]
[2171]
[2172]
[2173]
[2174]
[2175]
[2176]
[2177]
[2178]
[2179]
[2180]
[2181]
[2182]
[2183]
[2184]
[2185]
[2186]
[2187]
[2188]
[2189]
[2190]
[2191]
[2192]
[2193]
[2194]
[2195]
[2196]
[2197]
[2198]
[2199]
[2200]
[2201]
[2202]
[2203]
[2204]
[2205]
[2206]
[2207]
[2208]
[2209]
[2210]
[2211]
[2212]
[2213]
[2214]
[2215]
[2216]
[2217]
[2218]
[2219]
[2220]
[2221]
[2222]
[2223]
[2224]
[2225]
[2226]
[2227]
[2228]
[2229]
[2230]
[2231]
[2232]
[2233]
[2234]
[2235]
[2236]
[2237]
[2238]
[2239]
[2240]
[2241]
[2242]
[2243]
[2244]
[2245]
[2246]
[2247]
[2248]
[2249]
[2250]
[2251]
[2252]
[2253]
[2254]
[2255]
[2256]
[2257]
[2258]
[2259]
[2260]
[2261]
[2262]
[2263]
[2264]
[2265]
[2266]
[2267]
[2268]
[2269]
[2270]
[2271]
[2272]
[2273]
[2274]
[2275]
[2276]
[2277]
[2278]
[2279]
[2280]
[2281]
[2282]
[2283]
[2284]
[2285]
[2286]
[2287]
[2288]
[2289]
[2290]
[2291]
[2292]
[2293]
[2294]
[2295]
[2296]
[2297]
[2298]
[2299]
[2300]
[2301]
[2302]
[2303]
[2304]
[2305]
[2306]
[2307]
[2308]
[2309]
[2310]
[2311]
[2312]
[2313]
[2314]
[2315]
[2316]
[2317]
[2318]
[2319]
[2320]
[2321]
[2322]
[2323]
[2324]
[2325]
[2326]
[2327]
[2328]
[2329]
[2330]
[2331]
[2332]
[2333]
[2334]
[2335]
[2336]
[2337]
[2338]
[2339]
[2340]
[2341]
[2342]
[2343]
[2344]
[2345]
[2346]
[2347]
[2348]
[2349]
[2350]
[2351]
[2352]
[2353]
[2354]
[2355]
[2356]
[2357]
[2358]
[2359]
[2360]
[2361]
[2362]
[2363]
[2364]
[2365]
[2366]
[2367]
[2368]
[2369]
[2370]
[2371]
[2372]
[2373]
[2374]
[2375]
[2376]
[2377]
[2378]
[2379]
[2380]
[2381]
[2382]
[2383]
[2384]
[2385]
[2386]
[2387]
[2388]
[2389]
[2390]
[2391]
[2392]
[2393]
[2394]
[2395]
[2396]
[2397]
[2398]
[2399]
[2400]
[2401]
[2402]
[2403]
[2404]
[2405]
[2406]
[2407]
[2408]
[2409]
[2410]
[2411]
[2412]
[2413]
[2414]
[2415]
[2416]
[2417]
[2418]
[2419]
[2420]
[2421]
[2422]
[2423]
[2424]
[2425]
[2426]
[2427]
[2428]
[2429]
[2430]
[2431]
[2432]
[2433]
[2434]
[2435]
[2436]
[2437]
[2438]
[2439]
[2440]
[2441]
[2442]
[2443]
[2444]
[2445]
[2446]
[2447]
[2448]
[2449]
[2450]
[2451]
[2452]
[2453]
[2454]
[2455]
[2456]
[2457]
[2458]
[2459]
[2460]
[2461]
[2462]
[2463]
[2464]
[2465]
[2466]
[2467]
[2468]
[2469]
[2470]
[2471]
[2472]
[2473]
[2474]
[2475]
[2476]
[2477]
[2478]
[2479]
[2480]
[2481]
[2482]
[2483]
[2484]
[2485]
[2486]
[2487]
[2488]
[2489]
[2490]
[2491]
[2492]
[2493]
[2494]
[2495]
[2496]
[2497]
[2498]
[2499]
[2500]
[2501]
[2502]
[2503]
[2504]
[2505]
[2506]
[2507]
[2508]
[2509]
[2510]
[2511]
[2512]
[2513]
[2514]
[2515]
[2516]
[2517]
[2518]
[2519]
[2520]
[2521]
[2522]
[2523]
[2524]
[2525]
[2526]
[2527]
[2528]
[2529]
[2530]
[2531]
[2532]
[2533]
[2534]
[2535]
[2536]
[2537]
[2538]
[2539]
[2540]
[2541]
[2542]
[2543]
[2544]
[2545]
[2546]
[2547]
[2548]
[2549]
[2550]
[2551]
[2552]
[2553]
[2554]
[2555]
[2556]
[2557]
[2558]
[2559]
[2560]
[2561]
[2562]
[2563]
[2564]
[2565]
[2566]
[2567]
[2568]
[2569]
[2570]
[2571]
[2572]
[2573]
[2574]
[2575]
[2576]
[2577]
[2578]
[2579]
[2580]
[2581]
[2582]
[2583]
[2584]
[2585]
[2586]
[2587]
[2588]
[2589]
[2590]
[2591]
[2592]
[2593]
[2594]
[2595]
[2596]
[2597]
[2598]
[2599]
[2600]
[2601]
[2602]
[2603]
[2604]
[2605]
[2606]
[2607]
[2608]
[2609]
[2610]
[2611]
[2612]
[2613]
[2614]
[2615]
[2616]
[2617]
[2618]
[2619]
[2620]
[2621]
[2622]
[2623]
[2624]
[2625]
[2626]
[2627]
[2628]
[2629]
[2630]
[2631]
[2632]
[2633]
[2634]
[2635]
[2636]
[2637]
[2638]
[2639]
[2640]
[2641]
[2642]
[2643]
[2644]
[2645]
[2646]
[2647]
[2648]
[2649]
[2650]
[2651]
[2652]
[2653]
[2654]
[2655]
[2656]
[2657]
[2658]
[2659]
[2660]
[2661]
[2662]
[2663]
[2664]
[2665]
[2666]
[2667]
[2668]
[2669]
[2670]
[2671]
[2672]
[2673]
[2674]
[2675]
[2676]
[2677]
[2678]
[2679]
[2680]
[2681]
[2682]
[2683]
[2684]
[2685]
[2686]
[2687]
[2688]
[2689]
[2690]
[2691]
[2692]
[2693]
[2694]
[2695]
[2696]
[2697]
[2698]
[2699]
[2700]
[2701]
[2702]
[2703]
[2704]
[2705]
[2706]
[2707]
[2708]
[2709]
[2710]
[2711]
[2712]
[2713]
[2714]
[2715]
[2716]
[2717]
[2718]
[2719]
[2720]
[2721]
[2722]
[2723]
[2724]
[2725]
[2726]
[2727]
[2728]
[2729]
[2730]
[2731]
[2732]
[2733]
[2734]
[2735]
[2736]
[2737]
[2738]
[2739]
[2740]
[2741]
[2742]
[2743]
[2744]
[2745]
[2746]
[2747]
[2748]
[2749]
[2750]
[2751]
[2752]
[2753]
[2754]
[2755]
[2756]
[2757]
[2758]
[2759]
[2760]
[2761]
[2762]
[2763]
[2764]
[2765]
[2766]
[2767]
[2768]
[2769]
[2770]
[2771]
[2772]
[2773]
[2774]
[2775]
[2776]
[2777]
[2778]
[2779]
[2780]
[2781]
[2782]
[2783]
[2784]
[2785]
[2786]
[2787]
[2788]
[2789]
[2790]
[2791]
[2792]
[2793]
[2794]
[2795]
[2796]
[2797]
[2798]
[2799]
[2800]
[2801]
[2802]
[2803]
[2804]
[2805]
[2806]
[2807]
[2808]
[2809]
[2810]
[2811]
[2812]
[2813]
[2814]
[2815]
[2816]
[2817]
[2818]
[2819]
[2820]
[2821]
[2822]
[2823]
[2824]
[2825]
[2826]
[2827]
[2828]
[2829]
[2830]
[2831]
[2832]
[2833]
[2834]
[2835]
[2836]
[2837]
[2838]
[2839]
[2840]
[2841]
[2842]
[2843]
[2844]
[2845]
[2846]
[2847]
[2848]
[2849]
[2850]
[2851]
[2852]
[2853]
[2854]
[2855]
[2856]
[2857]
[2858]
[2859]
[2860]
[2861]
[2862]
[2863]
[2864]
[2865]
[2866]
[2867]
[2868]
[2869]
[2870]
[2871]
[2872]
[2873]
[2874]
[2875]
[2876]
[2877]
[2878]
[2879]
[2880]
[2881]
[2882]
[2883]
[2884]
[2885]
[2886]
[2887]
[2888]
[2889]
[2890]
[2891]
[2892]
[2893]
[2894]
[2895]
[2896]
[2897]
[2898]
[2899]
[2900]
[2901]
[2902]
[2903]
[2904]
[2905]
[2906]
[2907]
[2908]
[2909]
[2910]
[2911]
[2912]
[2913]
[2914]
[2915]
[2916]
[2917]
[2918]
[2919]
[2920]
[2921]
[2922]
[2923]
[2924]
[2925]
[2926]
[2927]
[2928]
[2929]
[2930]
[2931]
[2932]
[2933]
[2934]
[2935]
[2936]
[2937]
[2938]
[2939]
[2940]
[2941]
[2942]
[2943]
[2944]
[2945]
[2946]
[2947]
[2948]
[2949]
[2950]
[2951]
[2952]
[2953]
[2954]
[2955]
[2956]
[2957]
[2958]
[2959]
[2960]
[2961]
[2962]
[2963]
[2964]
[2965]
[2966]
[2967]
[2968]
[2969]
[2970]
[2971]
[2972]
[2973]
[2974]
[2975]
[2976]
[2977]
[2978]
[2979]
[2980]
[2981]
[2982]
[2983]
[2984]
[2985]
[2986]
[2987]
[2988]
[2989]
[2990]
[2991]
[2992]
[2993]
[2994]
[2995]
[2996]
[2997]
[2998]
[2999]
[3000]
[3001]
[3002]
[3003]
[3004]
[3005]
[3006]
[3007]
[3008]
[3009]
[3010]
[3011]
[3012]
[3013]
[3014]
[3015]
[3016]
[3017]
[3018]
[3019]
[3020]
[3021]
[3022]
[3023]
[3024]
[3025]
[3026]
[3027]
[3028]
[3029]
[3030]
[3031]
[3032]
[3033]
[3034]
[3035]
[3036]
[3037]
[3038]
[3039]
[3040]
[3041]
[3042]
[3043]
[3044]
[3045]
[3046]
[3047]
[3048]
[3049]
[3050]
[3051]
[3052]
[3053]
[3054]
[3055]
[3056]
[3057]
[3058]
[3059]
[3060]
[3061]
[3062]
[3063]
[3064]
[3065]
[3066]
[3067]
[3068]
[3069]
[3070]
[3071]
[3072]
[3073]
[3074]
[3075]
[3076]
[3077]
[3078]
[3079]
[3080]
[3081]
[3082]
[3083]
[3084]
[3085]
[3086]
[3087]
[3088]
[3089]
[3090]
[3091]
[3092]
[3093]
[3094]
[3095]
[3096]
[3097]
[3098]
[3099]
[3100]
[3101]
[3102]
[3103]
[3104]
[3105]
[3106]
[3107]
[3108]
[3109]
[3110]
[3111]
[3112]
[3113]
[3114]
[3115]
[3116]
[3117]
[3118]
[3119]
[3120]
[3121]
[3122]
[3123]
[3124]
[3125]
[3126]
[3127]
[3128]
[3129]
[3130]
[3131]
[3132]
[3133]
[3134]
[3135]
[3136]
[3137]
[3138]
[3139]
[3140]
[3141]
[3142]
[3143]
[3144]
[3145]
[3146]
[3147]
[3148]
[3149]
[3150]
[3151]
[3152]
[3153]
[3154]
[3155]
[3156]
[3157]
[3158]
[3159]
[3160]
[3161]
[3162]
[3163]
[3164]
[3165]
[3166]
[3167]
[3168]
[3169]
[3170]
[3171]
[3172]
[3173]
[3174]
[3175]
[3176]
[3177]
[3178]
[3179]
[3180]
[3181]
[3182]
[3183]
[3184]
[3185]
[3186]
[3187]
[3188]
[3189]
[3190]
[3191]
[3192]
[3193]
[3194]
[3195]
[3196]
[3197]
[3198]
[3199]
[3200]
[3201]
[3202]
[3203]
[3204]
[3205]
[3206]
[3207]
[3208]
[3209]
[3210]
[3211]
[3212]
[3213]
[3214]
[3215]
[3216]
[3217]
[3218]
[3219]
[3220]
[3221]
[3222]
[3223]
[3224]
[3225]
[3226]
[3227]
[3228]
[3229]
[3230]
[3231]
[3232]
[3233]
[3234]
[3235]
[3236]
[3237]
[3238]
[3239]
[3240]
[3241]
[3242]
[3243]
[3244]
[3245]
[3246]
[3247]
[3248]
[3249]
[3250]
[3251]
[3252]
[3253]
[3254]
[3255]
[3256]
[3257]
[3258]
[3259]
[3260]
[3261]
[3262]
[3263]
[3264]
[3265]
[3266]
[3267]
[3268]
[3269]
[3270]
[3271]
[3272]
[3273]
[3274]
[3275]
[3276]
[3277]
[3278]
[3279]
[3280]
[3281]
[3282]
[3283]
[3284]
[3285]
[3286]
[3287]
[3288]
[3289]
[3290]
[3291]
[3292]
[3293]
[3294]
[3295]
[3296]
[3297]
[3298]
[3299]
[3300]
[3301]
[3302]
[3303]
[3304]
[3305]
[3306]
[3307]
[3308]
[3309]
[3310]
[3311]
[3312]
[3313]
[3314]
[3315]
[3316]
[3317]
[3318]
[3319]
[3320]
[3321]
[3322]
[3323]
[3324]
[3325]
[3326]
[3327]
[3328]
[3329]
[3330]
[3331]
[3332]
[3333]
[3334]
[3335]
[3336]
[3337]
[3338]
[3339]
[3340]
[3341]
[3342]
[3343]
[3344]
[3345]
[3346]
[3347]
[3348]
[3349]
[3350]
[3351]
[3352]
[3353]
[3354]
[3355]
[3356]
[3357]
[3358]
[3359]
[3360]
[3361]
[3362]
[3363]
[3364]
[3365]
[3366]
[3367]
[3368]
[3369]
[3370]
[3371]
[3372]
[3373]
[3374]
[3375]
[3376]
[3377]
[3378]
[3379]
[3380]
[3381]
[3382]
[3383]
[3384]
[3385]
[3386]
[3387]
[3388]
[3389]
[3390]
[3391]
[3392]
[3393]
[3394]
[3395]
[3396]
[3397]
[3398]
[3399]
[3400]
[3401]
[3402]
[3403]
[3404]
[3405]
[3406]
[3407]
[3408]
[3409]
[3410]
[3411]
[3412]
[3413]
[3414]
[3415]
[3416]
[3417]
[3418]
[3419]
[3420]
[3421]
[3422]
[3423]
[3424]
[3425]
[3426]
[3427]
[3428]
[3429]
[3430]
[3431]
[3432]
[3433]
[3434]
[3435]
[3436]
[3437]
[3438]
[3439]
[3440]
[3441]
[3442]
[3443]
[3444]
[3445]
[3446]
[3447]
[3448]
[3449]
[3450]
[3451]
[3452]
[3453]
[3454]
[3455]
[3456]
[3457]
[3458]
[3459]
[3460]
[3461]
[3462]
[3463]
[3464]
[3465]
[3466]
[3467]
[3468]
[3469]
[3470]
[3471]
[3472]
[3473]
[3474]
[3475]
[3476]
[3477]
[3478]
[3479]
[3480]
[3481]
[3482]
[3483]
[3484]
[3485]
[3486]
[3487]
[3488]
[3489]
[3490]
[3491]
[3492]
[3493]
[3494]
[3495]
[3496]
[3497]
[3498]
[3499]
[3500]
[3501]
[3502]
[3503]
[3504]
[3505]
[3506]
[3507]
[3508]
[3509]
[3510]
[3511]
[3512]
[3513]
[3514]
[3515]
[3516]
[3517]
[3518]
[3519]
[3520]
[3521]
[3522]
[3523]
[3524]
[3525]
[3526]
[3527]
[3528]
[3529]
[3530]
[3531]
[3532]
[3533]
[3534]
[3535]
[3536]
[3537]
[3538]
[3539]
[3540]
[3541]
[3542]
[3543]
[3544]
[3545]
[3546]
[3547]
[3548]
[3549]
[3550]
[3551]
[3552]
[3553]
[3554]
[3555]
[3556]
[3557]
[3558]
[3559]
[3560]
[3561]
[3562]
[3563]
[3564]
[3565]
[3566]
[3567]
[3568]
[3569]
[3570]
[3571]
[3572]
[3573]
[3574]
[3575]
[3576]
[3577]
[3578]
[3579]
[3580]
[3581]
[3582]
[3583]
[3584]
[3585]
[3586]
[3587]
[3588]
[3589]
[3590]
[3591]
[3592]
[3593]
[3594]
[3595]
[3596]
[3597]
[3598]
[3599]
[3600]
[3601]
[3602]
[3603]
[3604]
[3605]
[3606]
[3607]
[3608]
[3609]
[3610]
[3611]
[3612]
[3613]
[3614]
[3615]
[3616]
[3617]
[3618]
[3619]
[3620]
[3621]
[3622]
[3623]
[3624]
[3625]
[3626]
[3627]
[3628]
[3629]
[3630]
[3631]
[3632]
[3633]
[3634]
[3635]
[3636]
[3637]
[3638]
[3639]
[3640]
[3641]
[3642]
[3643]
[3644]
[3645]
[3646]
[3647]
[3648]
[3649]
[3650]
[3651]
[3652]
[3653]
[3654]
[3655]
[3656]
[3657]
[3658]
[3659]
[3660]
[3661]
[3662]
[3663]
[3664]
[3665]
[3666]
[3667]
[3668]
[3669]
[3670]
[3671]
[3672]
[3673]
[3674]
[3675]
[3676]
[3677]
[3678]
[3679]
[3680]
[3681]
[3682]
[3683]
[3684]
[3685]
[3686]
[3687]
[3688]
[3689]
[3690]
[3691]
[3692]
[3693]
[3694]
[3695]
[3696]
[3697]
[3698]
[3699]
[3700]
[3701]
[3702]
[3703]
[3704]
[3705]
[3706]
[3707]
[3708]
[3709]
[3710]
[3711]
[3712]
[3713]
[3714]
[3715]
[3716]
[3717]
[3718]
[3719]
[3720]
[3721]
[3722]
[3723]
[3724]
[3725]
[3726]
[3727]
[3728]
[3729]
[3730]
[3731]
[3732]
[3733]
[3734]
[3735]
[3736]
[3737]
[3738]
[3739]
[3740]
[3741]
[3742]
[3743]
[3744]
[3745]
[3746]
[3747]
[3748]
[3749]
[3750]
[3751]
[3752]
[3753]
[3754]
[3755]
[3756]
[3757]
[3758]
[3759]
[3760]
[3761]
[3762]
[3763]
[3764]
[3765]
[3766]
[3767]
[3768]
[3769]
[3770]
[3771]
[3772]
[3773]
[3774]
[3775]
[3776]
[3777]
[3778]
[3779]
[3780]
[3781]
[3782]
[3783]
[3784]
[3785]
[3786]
[3787]
[3788]
[3789]
[3790]
[3791]
[3792]
[3793]
[3794]
[3795]
[3796]
[3797]
[3798]
[3799]
[3800]
[3801]
[3802]
[3803]
[3804]
[3805]
[3806]
[3807]
[3808]
[3809]
[3810]
[3811]
[3812]
[3813]
[3814]
[3815]
[3816]
[3817]
[3818]
[3819]
[3820]
[3821]
[3822]
[3823]
[3824]
[3825]
[3826]
[3827]
[3828]
[3829]
[3830]
[3831]
[3832]
[3833]
[3834]
[3835]
[3836]
[3837]
[3838]
[3839]
[3840]
[3841]
[3842]
[3843]
[3844]
[3845]
[3846]
[3847]
[3848]
[3849]
[3850]
[3851]
[3852]
[3853]
[3854]
[3855]
[3856]
[3857]
[3858]
[3859]
[3860]
[3861]
[3862]
[3863]
[3864]
[3865]
[3866]
[3867]
[3868]
[3869]
[3870]
[3871]
[3872]
[3873]
[3874]
[3875]
[3876]
[3877]
[3878]
[3879]
[3880]
[3881]
[3882]
[3883]
[3884]
[3885]
[3886]
[3887]
[3888]
[3889]
[3890]
[3891]
[3892]
[3893]
[3894]
[3895]
[3896]
[3897]
[3898]
[3899]
[3900]
[3901]
[3902]
[3903]
[3904]
[3905]
[3906]
[3907]
[3908]
[3909]
[3910]
[3911]
[3912]
[3913]
[3914]
[3915]
[3916]
[3917]
[3918]
[3919]
[3920]
[3921]
[3922]
[3923]
[3924]
[3925]
[3926]
[3927]
[3928]
[3929]
[3930]
[3931]
[3932]
[3933]
[3934]
[3935]
[3936]
[3937]
[3938]
[3939]
[3940]
[3941]
[3942]
[3943]
[3944]
[3945]
[3946]
[3947]
[3948]
[3949]
[3950]
[3951]
[3952]
[3953]
[3954]
[3955]
[3956]
[3957]
[3958]
[3959]
[3960]
[3961]
[3962]
[3963]
[3964]
[3965]
[3966]
[3967]
[3968]
[3969]
[3970]
[3971]
[3972]
[3973]
[3974]
[3975]
[3976]
[3977]
[3978]
[3979]
[3980]
[3981]
[3982]
[3983]
[3984]
[3985]
[3986]
[3987]
[3988]
[3989]
[3990]
[3991]
[3992]
[3993]
[3994]
[3995]
[3996]
[3997]
[3998]
[3999]
[4000]
[4001]
[4002]
[4003]
[4004]
[4005]
[4006]
[4007]
[4008]
[4009]
[4010]
[4011]
[4012]
[4013]
[4014]
[4015]
[4016]
[4017]
[4018]
[4019]
[4020]
[4021]
[4022]
[4023]
[4024]
[4025]
[4026]
[4027]
[4028]
[4029]
[4030]
[4031]
[4032]
[4033]
[4034]
[4035]
[4036]
[4037]
[4038]
[4039]
[4040]
[4041]
[4042]
[4043]
[4044]
[4045]
[4046]
[4047]
[4048]
[4049]
[4050]
[4051]
[4052]
[4053]
[4054]
[4055]
[4056]
[4057]
[4058]
[4059]
[4060]
[4061]
[4062]
[4063]
[4064]
[4065]
[4066]
[4067]
[4068]
[4069]
[4070]
[4071]
[4072]
[4073]
[4074]
[4075]
[4076]
[4077]
[4078]
[4079]
[4080]
[4081]
[4082]
[4083]
[4084]
[4085]
[4086]
[4087]
[4088]
[4089]
[4090]
[4091]
[4092]
[4093]
[4094]
[4095]
[4096]
[4097]
[4098]
[4099]
[4100]
[4101]
[4102]
[4103]
[4104]
[4105]
[4106]
[4107]
[4108]
[4109]
[4110]
[4111]
[4112]
[4113]
[4114]
[4115]
[4116]
[4117]
[4118]
[4119]
[4120]
[4121]
[4122]
[4123]
[4124]
[4125]
[4126]
[4127]
[4128]
[4129]
[4130]
[4131]
[4132]
[4133]
[4134]
[4135]
[4136]
[4137]
[4138]
[4139]
[4140]
[4141]
[4142]
[4143]
[4144]
[4145]
[4146]
[4147]
[4148]
[4149]
[4150]
[4151]
[4152]
[4153]
[4154]
[4155]
[4156]
[4157]
[4158]
[4159]
[4160]
[4161]
[4162]
[4163]
[4164]
[4165]
[4166]
[4167]
[4168]
[4169]
[4170]
[4171]
[4172]
[4173]
[4174]
[4175]
[4176]
[4177]
[4178]
[4179]
[4180]
[4181]
[4182]
[4183]
[4184]
[4185]
[4186]
[4187]
[4188]
[4189]
[4190]
[4191]
[4192]
[4193]
[4194]
[4195]
[4196]
[4197]
[4198]
[4199]
[4200]
[4201]
[4202]
[4203]
[4204]
[4205]
[4206]
[4207]
[4208]
[4209]
[4210]
[4211]
[4212]
[4213]
[4214]
[4215]
[4216]
[4217]
[4218]
[4219]
[4220]
[4221]
[4222]
[4223]
[4224]
[4225]
[4226]
[4227]
[4228]
[4229]
[4230]
[4231]
[4232]
[4233]
[4234]
[4235]
[4236]
[4237]
[4238]
[4239]
[4240]
[4241]
[4242]
[4243]
[4244]
[4245]
[4246]
[4247]
[4248]
[4249]
[4250]
[4251]
[4252]
[4253]
[4254]
[4255]
[4256]
[4257]
[4258]
[4259]
[4260]
[4261]
[4262]
[4263]
[4264]
[4265]
[4266]
[4267]
[4268]
[4269]
[4270]
[4271]
[4272]
[4273]
[4274]
[4275]
[4276]
[4277]
[4278]
[4279]
[4280]
[4281]
[4282]
[4283]
[4284]
[4285]
[4286]
[4287]
[4288]
[4289]
[4290]
[4291]
[4292]
[4293]
[4294]
[4295]
[4296]
[4297]
[4298]
[4299]
[4300]
[4301]
[4302]
[4303]
[4304]
[4305]
[4306]
[4307]
[4308]
[4309]
[4310]
[4311]
[4312]
[4313]
[4314]
[4315]
[4316]
[4317]
[4318]
[4319]
[4320]
[4321]
[4322]
[4323]
[4324]
[4325]
[4326]
[4327]
[4328]
[4329]
[4330]
[4331]
[4332]
[4333]
[4334]
[4335]
[4336]
[4337]
[4338]
[4339]
[4340]
[4341]
[4342]
[4343]
[4344]
[4345]
[4346]
[4347]
[4348]
[4349]
[4350]
[4351]
[4352]
[4353]
[4354]
[4355]
[4356]
[4357]
[4358]
[4359]
[4360]
[4361]
[4362]
[4363]
[4364]
[4365]
[4366]
[4367]
[4368]
[4369]
[4370]
[4371]
[4372]
[4373]
[4374]
[4375]
[4376]
[4377]
[4378]
[4379]
[4380]
[4381]
[4382]
[4383]
[4384]
[4385]
[4386]
[4387]
[4388]
[4389]
[4390]
[4391]
[4392]
[4393]
[4394]
[4395]
[4396]
[4397]
[4398]
[4399]
[4400]
[4401]
[4402]
[4403]
[4404]
[4405]
[4406]
[4407]
[4408]
[4409]
[4410]
[4411]
[4412]
[4413]
[4414]
[4415]
[4416]
[4417]
[4418]
[4419]
[4420]
[4421]
[4422]
[4423]
[4424]
[4425]
[4426]
[4427]
[4428]
[4429]
[4430]
[4431]
[4432]
[4433]
[4434]
[4435]
[4436]
[4437]
[4438]
[4439]
[4440]
[4441]
[4442]
[4443]
[4444]
[4445]
[4446]
[4447]
[4448]
[4449]
[4450]
[4451]
[4452]
[4453]
[4454]
[4455]
[4456]
[4457]
[4458]
[4459]
[4460]
[4461]
[4462]
[4463]
[4464]
[4465]
[4466]
[4467]
[4468]
[4469]
[4470]
[4471]
[4472]
[4473]
[4474]
[4475]
[4476]
[4477]
[4478]
[4479]
[4480]
[4481]
[4482]
[4483]
[4484]
[4485]
[4486]
[4487]
[4488]
[4489]
[4490]
[4491]
[4492]
[4493]
[4494]
[4495]
[4496]
[4497]
[4498]
[4499]
[4500]
[4501]
[4502]
[4503]
[4504]
[4505]
[4506]
[4507]
[4508]
[4509]
[4510]
[4511]
[4512]
[4513]
[4514]
[4515]
[4516]
[4517]
[4518]
[4519]
[4520]
[4521]
[4522]
[4523]
[4524]
[4525]
[4526]
[4527]
[4528]
[4529]
[4530]
[4531]
[4532]
[4533]
[4534]
[4535]
[4536]
[4537]
[4538]
[4539]
[4540]
[4541]
[4542]
[4543]
[4544]
[4545]
[4546]
[4547]
[4548]
[4549]
[4550]
[4551]
[4552]
[4553]
[4554]
[4555]
[4556]
/*****************************************************************************/
#ifdef COMMENTS_WITH_COMMENTS
/*
MapSet.c
The SET rule allows characteristics to be set against a particular path. They
are then transfered to any request matching the path and applied to the
request. This applies to FILES, not necessarily to scripts that supply a full
HTTP response. These need to check and act on information provided by relevant
CGI variables. Note that as of V8.0 path SETings can be applied with any rule
that has a result string (i.e. the setting must follow both a template and a
result and preceded any conditional).
[NO]ACCEPT=LANG=([DEFAULT=<language>][,CHAR=<char>][,VARIANT=NAME|TYPE])
path will attempt to resolve a language-specific document,
with default language (optional), 'char' is a character
(optional) separating language from file type (default '_'),
if the path template has a file type wildcard included the
file content-type does not need to be "text/.."
ACCESS=[NO]SERVER access as server account (best effort)
ACCESS=[NO]PROFILE access according to SYSUAF profile
ACCESS=[NO]READ allowed to read this path
ACCESS=[NO]WRITE allowed to write to this path (implied read)
[NO]ALERT indicate that a request with this path has been detected,
HTTPDMON and OPCOM alert, and the process log gets a record
ALERT=MAP alert provided immediately after mapping,
ALERT=AUTH or immediately after authorization,
ALERT=END or provided at request rundown (the default)
ALERT=<integer> the integer can be a specific HTTP status value (e.g. 501)
or the category (range of values, e.g. 599) alert if match
[NO]AUTH=ALL all access must be subject to authorization (or fail)
[NO]AUTH=ONCE authorize only the script portion of the request,
do not repeat authorization on any path component
[NO]AUTH=MAPPED authorize against the mapped path
AUTH=REVALIDATE=<hh:mm:ss> revalidate authentication for this path
at the specified interval
AUTH=SYSUAF=PWDEXPURL=<string> redirection URL if s SYSUAF-authenticated
user's primary password has expired
[NO]CACHE cache files (not any other output)
CACHE=NONE do not cache
CACHE=[NO]CGI cache CGI-compliant script output
CACHE=[NO]COOKIE cache including requests with cookies
CACHE=EXPIRES=0 cancels path cache entry expiry
CACHE=EXPIRES=DAY entry expires on change of day
CACHE=EXPIRES=HOUR entry expires on change of hour
CACHE=EXPIRES=MINUTE entry expires on change of minute
CACHE=EXPIRES=<hh:mm:ss> specify the exact period before expiry
CACHE=[NO]FILE cache files
CACHE=GUARD=<hh:mm:ss> prevent (Pragma:) reloads during these seconds
CACHE=MAX=<integer> up to kBytes in size (overrides [CacheFileKBytesMax])
CACHE=[NO]NET cache response network output of any kind
CACHE=[NO]NPH cache NPH-compliant script output
CACHE=[NO]PERMANENT cache this, do not allow it to be flushed
CACHE=[NO]QUERY cache including requests with query strings
CACHE=[NO]SCRIPT synonym for (both) 'cache=cgi cache=nph'
CACHE=[NO]SSI cache Server-Side Includes output
CGIPLUSIN=CC=NONE set explicit carriage-control to be added to each
CGIPLUSIN=CC=LF CGIPLUSIN record (esoteric? a bit; ask Alex Ivanov :^)
CGIPLUSIN=CC=CR
CGIPLUSIN=CC=CRLF
CGIPLUSIN=EOF terminate each request's CGIPLUSIN stream with an EOF
(same comment as immediately above)
CGI=PREFIX=<string> instead of the default "WWW_" specify what is needed,
to have no prefix at all specify CGI=PREFIX=
CGI=VAR=<string> (re)set a CGI variable (<name>=<value>)
CHARSET=<string> any "text/..." content-type files use the specified charset
CLIENT=FORWARDED replace client IP address with Forwarded: header
CLIENT=IF=FORWARDED replace client IP address IF a Forwarded: header
CLIENT=LITERAL=<string> really just for ease of testing
CLIENT=RESET revert to original (upstream) client data
CLIENT=XFORWARDEDFOR replace IP address with X-Forwarded-for: header
CLIENT=IF=XFORWARDEDFOR replace IP address IF an X-Forwarded-for: header
CORS=AGE= Access-Control-Max-Age: response header
CORS=CRED= Access-Control-Allow-Credentials: response header
CORS=EXPOSE= Access-Control-Expose-Headers: response header
CORS=HEADERS= Access-Control-Allow-Headers: response header
CORS=METHODS= Access-Control-Allow-Methods: response header
CORS=ORIGIN= Access-Control-Allow-Origin: response header
CONTENT= all files have the "Content-Type:" forced to that specified
(obvious use is to provide plain-text or binary versions of
files using perhaps "set /plain-text/* content=text/plain",
then mapping that generally back with "map /plain-text/* /*")
another: "set /bogus/* "content=text/html; charset=BLAH"
CSS=<url> style sheet to load to customise server-generated pages
DICT=[!][<key>[=<value]] manipulate the meta dictionary
DIR=ACCESS directory listing enabled (same as [DirAccess])
DIR=ACCESS=SELECTIVE allowed if directory contains .WWW_BROWSABLE
DIR=NOACCESS directory listing disabled
DIR=CHARSET=<string> directory listing page is given this charset
(this could be called the Alex Ivanov rule ;^)
DIR=DELIMIT[=BOTH] both top and bottom rule and any readme
DIR=DELIMIT=HEADER only top rule and any readme
DIR=DELIMIT=FOOTER only bottom rule and any readme
DIR=DELIMIT=NONE no top or bottom rule or readme
DIR=FONT=INHERIT listing font inherited from browser or document
DIR=FONT=MONOSPACE listing font monospace (default)
DIR=ILINK icon plain-text link (default)
DIR=NOILINK no icon plain-text link
DIR=IMPLIEDWILDCARD implied wildcard enabled
DIR=NOIMPLIEDWILDCARD implied wildcard disabled
DIR=LAYOUT= same as index=<string>
DIR=SORT=<char>[+|-] pre-sort directory listing
DIR=STYLE[=DEFAULT] current (post-10.4) style
DIR=STYLE=ORIGINAL[2] pre-v8.2 WASD style
DIR=STYLE=ANCHOR[2] post-v8.2 WASD style
DIR=STYLE=HTDIR[2] Alex Ivanov's listing style
DIR=STYLE=SORT[2] HTML table and sortable
DIR=STYLE=TABLE[2] post-v10.4 WASD style (current, default)
DIR=TARGET=<string> open a file in this window (e.g. "_blank")
DIR=TITLE=<integer> directory name (0 = none, 1 = top, 2, 3..99 = bottom)
DIR=TITLE=DEFAULT whatever the default is for the style
DIR=TITLE=OWNER the VMS owner
DIR=TITLE=REMOTE if authorised access just the remote user name
DIR=TITLE=THIS=".." literal string
DIR=THESE=<string>[,<string>] one of more wildcard file name selectors
DIR=VERSIONS=<integer>|* display a maximum of this many file versions
DIR=WILDCARD wildcard-forced listing enabled (same as [DirWildcard])
DIR=NOWILDCARD wildcard-forced listing disabled
[NO]EXPIRED files in the path are sent "pre-expired"
NOHTML cancel any/all previously set html=
HTML=BODYTAG= HTML <body..> tag
HTML=HEADER= HTML page header text (can include markup)
HTML=HEADERTAG= HTML header tag <td..> (usually colour)
HTML=FOOTER= HTML page footer text (can include markup)
HTML=FOOTERTAG= HTML footer tag <td..> (usually colour)
HTTP=ACCEPT-CHARSET=<string> explicitly set the request's accepted charset
HTTP=ACCEPT-LANGUAGE=<string> explicitly set the request's accepted language
HTTP2=PROTOCOL=1.1 downgrade HTTP/2 to HTTP/1.1 (immediately)
HTTP2=SEND=GOAWAY[=<integer>] send GOAWAY frame with optional error code
HTTP2=SEND=PING send PING frame
HTTP2=SEND=RESET[=<integer>] send RST_STREAM frame with optional error code
HTTP2=STREAMS=MAX=<integer> per-path maximum concurrent streams
HTTP2=WRITE=[low|normal|high] set response write priority
INDEX=<string> "Index of" format string (same as "?httpd=index&...")
[NO]LOG requests to this path are not to be access-logged
MAP=[NO]AFTER (re)map after authorization
MAP=[NO]ELLIPSIS allows mapping of the VMS '...' ellipsis wildcard that
provides for tree traversal
MAP=[NO]EMPTY traditionally a path must have contained at least one char
to be mapped, this allows "empty" paths to be mapped
MAP=[NO]METHOD set the path to process an HTTP (/1.1) extension-method
e.g. 'if (request-method:QUARK) \
script /quark* /cgi-bin/quark* map=method'
MAP=[NO]ONCE normally, when a script has been derived from a path, WASD
goes on to map the 'path' portion in a separate pass - this
SETing provides the derived path as-is
MAP=RESTART begin again at rule number one (limit on this action)
MAP=ROOT=<string> prefix all result paths with this string (path)
MAP=SET=[NO]REQUEST path SETings affect the request (or only the mapping)
MAP=SET=[NO]IGNORE all path SETings are ignored (except 'map=set=noignore')
MAP=URI begin to process against raw request URI (path plus query)
NOOP do nothing :-]
NOTEPAD=[+]<string> text (perhaps keywords) added to a request during mapping
that can be detected during subsequent metacon, mapping
and authorization rule processing (not externally visible)
NOTEPAD PERSISTS ACROSS INTERNALLY REDIRECTED REQUESTS!
ODS=2 path marked as ODS-2 (path default)
ODS=5 path marked as ODS-5, with EFS encoded file names
ODS=ADS path marked as having filenames Advanced Server (6) encoded
ODS=PWK path marked as having filenames PATHWORKS (4 & 5) encoded
ODS=SMB same as ODS=ADS (only for the comfort of Samba users)
ODS=SRI path marked as having filenames SRI (MultiNet NFS) encoded
NOODS reset the path's ODS file naming
ODS=NAME=8BIT file name uses native ODS 8 bit encoding (default)
ODS=NAME=UTF8 file name uses explicit UTF-8 encoding
ODS=NAME=DEFAULT return naming to the default encoding
[NO]PROFILE VMS SYSUAF-authenticated security profile applies/does not
apply to this path
PROXY=[NO]AFFINITY enable/disable affinity
PROXY=NOFORWARDED disable the "Forwarded: by" field
PROXY=FORWARDED[=BY] enable the field with "by" data
PROXY=FORWARDED=FOR enable the field with "by" and "for" data
PROXY=FORWARDED=ADDRESS enable the field with "by" and "for" address
PROXY=NOXFORWARDEDFOR disable "X-Forwarded-For:" field
PROXY=XFORWARDEDFOR[=ENABLED] add client host, propagate any existing
PROXY=XFORWARDEDFOR=ADDRESS add client address, propagate any existing
PROXY=XFORWARDEDFOR=UNKNOWN hide this host, propagate any existing
PROXY=BIND=<string> bind the outgoing proxy socket to this IP address
PROXY=CHAIN=<string> chain to this proxy server
PROXY=CHAIN=CRED=<string> <username>:<password> credentials for chain
PROXY=HEADER=<name>[=<string>] remove or modify this request header
PROXY=REVERSE=[NO]AUTH suppress propagation of any "Authorize:" header
PROXY=REVERSE=LOCATION rewrite a reverse proxy 302 "Location:" response to
contain the proxy server (can ONLY be used following
a 'redirect /foo/* /http://foo.bar/*' rule)
PROXY=REVERSE=[NO]VERIFY for a locally authorized, reverse proxied request
create a verifyable authorization header containing
the username and a unique identifier for 'callback'
PROXY=REWORK=<string> replacement strings when reworking proxy response
PROXY=TUNNEL=REQUEST=<string> make this the tunnelled request
PUT=MAX=<integer> maximum Kbytes allowed to be PUT/POSTed
is '*' is used instead it means no limit
PUT=RFM=[FIX512|STM|STMCR|STMLF|UDF] set the record format for binary PUT/POSTs
QUERY-STRING=<string> set the request's query-string (URL-encode if necessary)
REGEX=<keyword> AWK, DEFAULT, ED, EGREP, GREP, POSIX_AWK, POSIX_BASIC,
POSIX_EGREP, POSIX_EXTENDED, POSIX_MINIMAL_BASIC,
POSIX_MINIMAL_EXTENDED, SED, WASD
REPORT=400=<integer> bad request reported as (e.g. "report=400=403")
REPORT=403=<integer> forbidden reported as (e.g. "report=403=404")
REPORT=404=<integer> not found reported as (e.g. "report=404=403")
REPORT=BASIC supply basic error information for requests on this path
REPORT=DETAILED supply detailed error information for requests on this path
REPORT=TUNNEL supply error message suitable for firewall/raw tunnel
RESPONSE=200=203 modify a 200 response to 203 for log analysis
RESPONSE=203=200 undoes the above
RESPONSE=[NO]CSP=<string> add Content Security Policy to response header
RESPONSE=[NO]CSPRO=<string> add CSP Report Only to response header
RESPONSE=HEADER=ADD=<string> append this header field to the response header
RESPONSE=HEADER=NOADD cancel (potentially) additional header fields
RESPONSE=HEADER=FULL revert to normal response header transmission
RESPONSE=HEADER=NONE suppress response header transmission (i.e. the file
or content contains *full* HTTP response - NPH-like!)
RESPONSE=HEADER=BEGIN suppress the end-of-header blank line so that the file
or other content can provide additional header lines
RESPONSE=GZIP=ALL compress all responses (those possible anyway)
RESPONSE=GZIP=<integer> compress responses known to be larger than kBytes
RESPONSE=GZIP=NONE do not compress any responses
RESPONSE=HTTP=ORIGINAL respond with HTTP/1.0 if request was that version
RESPONSE=[NO]CHUNKED return applicable responses chunked
RESPONSE=STS=<value> Strict-Transport-Security: header
RESPONSE=VAR reset variable length record to default (<LF>)
RESPONSE=VAR=ASIS transfer file content EXACTLY as it is on disk
resulting in a binary image of the file downloaded
RESPONSE=VAR=CRLF variable length record file append <CR><LF>
RESPONSE=VAR=LF append <LF> (default)
RESPONSE=VAR=NONE append nothing
RMSCHAR=<char> provides the RMS-invalid substitution character, which unless
otherwise specified is the dollar symbol. Any general
RMS-valid character may be specified (e.g. alpha-numeric,
'$', '-' or '_', although the latter three are probably the
only REAL choices). When an RMS-invalid character (e.g. '+')
or syntax (e.g. multiple periods) is encountered this character
is substituted. NOTE: is not applied to ODS-5 volumes.
SCRIPT=AS=<user> the script process will be using this username/account
(only applies if detached script processes are enabled)
SCRIPT=BIT-BUCKET=<hh:mm:ss> per-path equivalent to config file setting
SCRIPT=BODY=[NO]DECODE decode any chunked or gzip encoded request body
before delivering the content to the script
SCRIPT=COMMAND=<string> provide the script activation command-line with
qualifiers, parameters, etc. (first character must
be an asterisk or it overrides the full verb)
SCRIPT=CONTROL=<string> equivalent of "Script-Control:" in CGI response
SCRIPT=CPU=<hh:mm:ss> CPU limit for each *script's* processing
(not a per-process limit like CPULM would be)
SCRIPT=DEFAULT=<string> default directory script process should be set to
before activation ('#" disables this, can be a U**x
style spec beginning '/' in which case it's ignored)
SCRIPT=LIFETIME=<hh:mm:ss> CGI or CGIplus lifetime for quiescent processes
(per-path equivalent of [DclZombieLifetime] and
DclCGIplusLifeTime] global directives)
SCRIPT=SYMBOLS=[NO]TRUNCATE truncate CGI symbols that would otherwise exceed
the maxima of this VMS versions CLI
SCRIPT=SYNTAX=[NO]UNIX script file name and path translated is passed in
U**x syntax
SCRIPT=FIND (default) search for the script file in any 'script' or 'exec'
SCRIPT=NOFIND do not search for the script file (for use with RTEs)
SCRIPT=PARAMS=[+](name=value) a list of additional (non-CGI) variables
assigned and passed to a script
[NO]SCRIPT=PATH=FIND check that the PATH_TRANSLATED exists and before
invoking the script report 404 if it doesn't
[NO]SCRIPT=QUERY=NONE do not parse query string into form or key elements
[NO]SCRIPT=QUERY=RELAXED don't error report form-url-encoding issues,
let the script deal with it if necessary
[NO]SEARCH=NONE do not activate (any) default search script
SERVICE=<string> move request to this service (when mapping finished)
SSI=PRIV mark a path as allowed to contain SSI documents that can
SSI=NOPRIV use privileged SSI statements (e.g. "#dcl")
SSI=<string> where string is a list of "#dcl" parameters allowed
(this is a finer-grained control that SSI=[NO]PRIV)
SSLCGI=NONE sets the style of SSL-related CGI variables
SSLCGI=APACHE_MOD_SSL
SSLCGI=APACHE_MOD_SSL_CLIENT
SSLCGI=APACHE_MOD_SSL_EXTENS
SSLCGI=APACHE_MOD_SSL_OID
SSLCGI=PURVEYOR
[NO]SSLCGI
[NO]STMLF files in this path can be converted from variable to stream-LF
THROTTLE=FROM= n1, requests after which queuing occurs
THROTTLE=TO= n2, requests after which the queue is FIFOed
THROTTLE=RESUME= n3, requests after which FIFOing stops
THROTTLE=BUSY= n4, requests after which an immediate 503 "busy"
THROTTLE=NONE resets previously mapped throttle
THROTTLE=TIMEOUT=QUEUE= t/o1, hh:mm:ss before a queued request processes
THROTTLE=TIMEOUT=BUSY= t/o2, hh:mm:ss before a queued request terminates
THROTTLE=USER= u1, per-user throttling
THROTTLE=n1[/u1][,n2,n3,n4,t/o1,t/o2]
n1 = 'from',
u1 = 'per-user',
n2 = 'to',
n3 = 'resume',
n4 = 'busy',
t/o1 = 'timeout-queue',
t/o2 = 'timeout-busy'
TIMEOUT=PERSISTENT= hh:mm:ss ("none" to disable, formerly 'KEEPALIVE=')
TIMEOUT=NOPROGRESS= hh:mm:ss
TIMEOUT=OUTPUT= hh:mm:ss
TIMEOUT=n,n,n hh:mm:ss; persistent, noprogress, output
NOTIMEOUT sets all three (n,n,n) timeouts to infinite (none)
WEBDAV=[NO]ALL process all requests as WebDAV
WEBDAV=[NO]AUTH determine authorisation access using WebDAV SETings
WEBDAV=[NO]HIDDEN display (default), do not display, hidden file names
WEBDAV=[NO]LOCK allow/apply WebDAV locking to this path
WEBDAV=META=DIR= string (subdirectory spec or full directory spec)
WEBDAV=[NO]PROFILE WebDAV access according to SYSUAF profile
WEBDAV=[NO]PROP allow/apply WebDAV 'dead' property(ies) to this path
WEBDAV=[NO]PUT=LOCK a resource must be locked before a PUT is allowed
WEBDAV=[NO]READ WebDAV methods allowed read this tree
WEBDAV=[NO]SERVER WebDAV access as server account (best effort)
WEBDAV=[NO]WINPROP when NOWINPROP windows properties are ignored and emulated
WEBDAV=[NO]WRITE WebDAV methods allowed write to this path (implied read)
WEBDAV=LOCK=TIMEOUT=DEFAULT= hh:mm:ss
WEBDAV=LOCK=TIMEOUT=MAX= hh:mm:ss
WEBSOCKET=INPUT=<integer> size of WEBSOCKET_INPUT mailbox
WEBSOCKET=OUTPUT=<integer> size of WEBSOCKET_OUTPUT mailbox
VERSION HISTORY
---------------
27-MAY-2021 MGD (finally) carved off from MAPURL.C into a module of its own
*/
#endif /* COMMENTS_WITH_COMMENTS */
/*****************************************************************************/
#ifdef WASD_VMS_V7
#undef _VMS__V6__SOURCE
#define _VMS__V6__SOURCE
#undef __VMS_VER
#undef __VMS_VER
#undef __CRTL_VER
#define __CRTL_VER 70000000
#endif
/* standard C header files */
#include <ctype.h>
#include <errno.h>
#include <stdio.h>
#include <string.h>
/* VMS related header files */
#include <ssdef.h>
#include <stsdef.h>
#include "wasd.h"
#define WASD_MODULE "MAPSET"
/* fundamental buffer size */
#ifdef __ALPHA
#define MAP_BUFFER_SIZE (8192 * 2)
#else
/* IA64 and whatever else may follow */
#define MAP_BUFFER_SIZE (8192 * 4)
#endif
/******************/
/* global storage */
/******************/
BOOL MapUrlPathOds5;
/********************/
/* external storage */
/********************/
extern int ToLowerCase[],
ToUpperCase[];
extern char ErrorSanityCheck[];
extern WATCH_STRUCT Watch;
/*****************************************************************************/
/*
The path has a setting. Map that onto the request path settings.
Return false if a problem, true if the SETing is OK.
*/
BOOL MapSetConfig
(
char *SetPathPtr,
char *TemplatePtr,
META_CONFIG *mcptr,
MAP_SET_META *mrpsptr,
BOOL *AllowedPtr
)
{
static char ProblemAcceptLang [] =
"Set path \'accept=lang\' parameter problem",
ProblemProxyHeader [] = "Proxy header exceeded maximum",
ProblemSetPath [] = "Set path problem";
char *cptr, *sptr;
/*********/
/* begin */
/*********/
if (WATCH_MODULE(WATCH_MOD_MAPURL))
WatchThis (WATCHALL, WATCH_MOD_MAPURL, "MapSetConfig()");
if (strsame (SetPathPtr, "ACCEPT=LANG", -1))
mrpsptr->AcceptLangChar = '_';
else
if (strsame (SetPathPtr, "NOACCEPT=LANG", -1) ||
strsame (SetPathPtr, "ACCEPT=NOLANG", -1))
mrpsptr->NoAcceptLang = true;
else
if (strsame (SetPathPtr, "ACCEPT=LANG=", 12))
{
mrpsptr->AcceptLangChar = '_';
sptr = SetPathPtr + 12;
if (*sptr == '(') sptr++;
while (*sptr)
{
if (strsame (sptr, "CHAR=", 5))
{
mrpsptr->AcceptLangChar = sptr[5];
sptr += 6;
}
else
if (strsame (sptr, "DEFAULT=", 8))
{
sptr += 8;
mrpsptr->AcceptLangPtr = sptr;
while (*sptr && *sptr != ',' && *sptr != ')') sptr++;
if (*sptr) *sptr++ = '\0';
mrpsptr->AcceptLangLength = strlen(mrpsptr->AcceptLangPtr);
}
else
if (strsame (sptr, "VARIANT=", 8))
{
sptr += 8;
if (strsame (sptr, "NAME", 4))
mrpsptr->AcceptLangTypeVariant = false;
else
if (strsame (sptr, "TYPE", 4))
mrpsptr->AcceptLangTypeVariant = true;
else
{
MetaConReport (mcptr, METACON_REPORT_ERROR,
ProblemAcceptLang);
return (false);
}
while (*sptr && *sptr != ',' && *sptr != ')') sptr++;
}
else
{
MetaConReport (mcptr, METACON_REPORT_ERROR,
ProblemAcceptLang);
return (false);
}
if (*sptr == ',' || *sptr == ')') sptr++;
}
if (mrpsptr->AcceptLangChar != '_' &&
mrpsptr->AcceptLangChar != '-' &&
mrpsptr->AcceptLangChar != '.' &&
mrpsptr->AcceptLangChar != '$')
{
MetaConReport (mcptr, METACON_REPORT_ERROR, ProblemAcceptLang);
return (false);
}
/* check if there is a wildcard file type */
for (sptr = TemplatePtr; *sptr; sptr++);
while (sptr > TemplatePtr && *sptr != '.' && *sptr != '/') sptr--;
if (*sptr == '.') mrpsptr->AcceptLangWildcard = true;
}
else
if (strsame (SetPathPtr, "ALERT", -1))
mrpsptr->Alert = MAPURL_PATH_ALERT_END;
else
if (strsame (SetPathPtr, "ALERT=END", -1))
mrpsptr->Alert = MAPURL_PATH_ALERT_END;
else
if (strsame (SetPathPtr, "ALERT=AUTH", -1))
mrpsptr->Alert = MAPURL_PATH_ALERT_AUTH;
else
if (strsame (SetPathPtr, "ALERT=MAP", -1))
mrpsptr->Alert = MAPURL_PATH_ALERT_MAP;
else
if (strsame (SetPathPtr, "ALERT=", 6) &&
isdigit(SetPathPtr[6]))
{
mrpsptr->Alert = atoi(SetPathPtr+6);
if (!mrpsptr->Alert) mrpsptr->NoAlert = true;
}
else
if (strsame (SetPathPtr, "NOALERT", -1))
mrpsptr->NoAlert = true;
else
if (strsame (SetPathPtr, "AUTH=ALL", -1))
mrpsptr->AuthAll = true;
else
if (strsame (SetPathPtr, "NOAUTH=ALL", -1))
mrpsptr->NoAuthAll = true;
else
if (strsame (SetPathPtr, "AUTH=MAPPED", -1))
mrpsptr->AuthMapped = true;
else
if (strsame (SetPathPtr, "NOAUTH=MAPPED", -1) ||
strsame (SetPathPtr, "AUTH=REQUEST", -1))
mrpsptr->NoAuthMapped = true;
else
if (strsame (SetPathPtr, "AUTH=ONCE", -1) ||
strsame (SetPathPtr, "AUTHONCE", -1))
mrpsptr->AuthOnce = true;
else
if (strsame (SetPathPtr, "AUTH=NOONCE", -1) ||
strsame (SetPathPtr, "NOAUTH=ONCE", -1) ||
strsame (SetPathPtr, "NOAUTHONCE", -1))
mrpsptr->NoAuthOnce = true;
else
if (strsame (SetPathPtr, "AUTH=REVALIDATE=", 16))
mrpsptr->AuthRevalidateTimeout =
MetaConSetSeconds (mcptr, SetPathPtr+16, 60);
else
if (strsame (SetPathPtr, "AUTH=SYSUAF=PWDEXPURL=", 22))
{
mrpsptr->AuthSysUafPwdExpUrlPtr = SetPathPtr + 22;
mrpsptr->AuthSysUafPwdExpUrlLength =
strlen(mrpsptr->AuthSysUafPwdExpUrlPtr);
}
else
if (strsame (SetPathPtr, "CACHE", -1))
mrpsptr->CacheSetting = mrpsptr->Cache = true;
else
if (strsame (SetPathPtr, "NOCACHE", -1) ||
strsame (SetPathPtr, "CACHE=NONE", -1))
mrpsptr->CacheSetting = mrpsptr->NoCache = true;
else
if (strsame (SetPathPtr, "CACHE=CGI", -1))
mrpsptr->CacheSetting = mrpsptr->CacheCGI = true;
else
if (strsame (SetPathPtr, "CACHE=NOCGI", -1))
mrpsptr->CacheSetting = mrpsptr->CacheNoCGI = true;
else
if (strsame (SetPathPtr, "CACHE=COOKIE", -1))
mrpsptr->CacheSetting = mrpsptr->CacheCookie = true;
else
if (strsame (SetPathPtr, "CACHE=NOCOOKIE", -1))
mrpsptr->CacheSetting = mrpsptr->CacheNoCookie = true;
else
if (strsame (SetPathPtr, "CACHE=FILE", -1))
mrpsptr->CacheSetting = mrpsptr->CacheFile = true;
else
if (strsame (SetPathPtr, "CACHE=NOFILE", -1))
mrpsptr->CacheSetting = mrpsptr->CacheNoFile = true;
else
if (strsame (SetPathPtr, "CACHE=NET", -1))
mrpsptr->CacheSetting = mrpsptr->CacheNet = true;
else
if (strsame (SetPathPtr, "CACHE=NONET", -1))
mrpsptr->CacheSetting = mrpsptr->CacheNoNet = true;
else
if (strsame (SetPathPtr, "CACHE=NPH", -1))
mrpsptr->CacheSetting = mrpsptr->CacheNPH = true;
else
if (strsame (SetPathPtr, "CACHE=NONPH", -1))
mrpsptr->CacheSetting = mrpsptr->CacheNoNPH = true;
else
if (strsame (SetPathPtr, "CACHE=PERM", 10))
mrpsptr->CacheSetting = mrpsptr->CachePermanent = true;
else
if (strsame (SetPathPtr, "CACHE=NOPERM", 12))
mrpsptr->CacheSetting = mrpsptr->CacheNoPermanent = true;
else
if (strsame (SetPathPtr, "CACHE=QUERY", -1))
mrpsptr->CacheSetting = mrpsptr->CacheQuery = true;
else
if (strsame (SetPathPtr, "CACHE=NOQUERY", -1))
mrpsptr->CacheSetting = mrpsptr->CacheNoQuery = true;
else
if (strsame (SetPathPtr, "CACHE=SCRIPT", -1))
mrpsptr->CacheSetting = mrpsptr->CacheScript = true;
else
if (strsame (SetPathPtr, "CACHE=NOSCRIPT", -1))
mrpsptr->CacheSetting = mrpsptr->CacheNoScript = true;
else
if (strsame (SetPathPtr, "CACHE=SSI", -1))
mrpsptr->CacheSetting = mrpsptr->CacheSSI = true;
else
if (strsame (SetPathPtr, "CACHE=NOSSI", -1))
mrpsptr->CacheSetting = mrpsptr->CacheNoSSI = true;
else
if (strsame (SetPathPtr, "CACHE=EXPIRES=", 14))
{
sptr = SetPathPtr + 14;
if (strsame (sptr, "DAY", -1))
mrpsptr->CacheExpiresAfter = CACHE_EXPIRES_DAY;
else
if (strsame (sptr, "HOUR", -1))
mrpsptr->CacheExpiresAfter = CACHE_EXPIRES_HOUR;
else
if (strsame (sptr, "MINUTE", -1))
mrpsptr->CacheExpiresAfter = CACHE_EXPIRES_MINUTE;
else
if (strsame (sptr, "0", -1))
mrpsptr->CacheExpiresAfter = CACHE_EXPIRES_NONE;
else
mrpsptr->CacheExpiresAfter =
MetaConSetSeconds (mcptr, sptr, 1);
mrpsptr->CacheSetting = true;
}
else
if (strsame (SetPathPtr, "CACHE=GUARD=", 12))
{
sptr = SetPathPtr + 12;
mrpsptr->CacheGuardSeconds = MetaConSetSeconds (mcptr, sptr, 1);
/* negative 1 indicates to revert to configuration maximum */
if (!mrpsptr->CacheGuardSeconds) mrpsptr->CacheGuardSeconds = -1;
mrpsptr->CacheSetting = true;
}
else
if (strsame (SetPathPtr, "CACHE=MAX=", 10))
{
sptr = SetPathPtr + 10;
mrpsptr->CacheMaxKBytes = atoi(sptr);
while (isdigit(*sptr)) sptr++;
if (strsame (sptr, "MB", 2))
mrpsptr->CacheMaxKBytes = mrpsptr->CacheMaxKBytes << 10;
/* negative 1 indicates to revert to configuration maximum */
if (!mrpsptr->CacheMaxKBytes) mrpsptr->CacheMaxKBytes = -1;
mrpsptr->CacheSetting = true;
}
else
if (strsame (SetPathPtr, "CGI=PREFIX=", 11) ||
strsame (SetPathPtr, "CGIPREFIX=", 10))
{
mrpsptr->CgiPrefixPtr = SetPathPtr + 10;
if (*mrpsptr->CgiPrefixPtr == '=') mrpsptr->CgiPrefixPtr++;
mrpsptr->CgiPrefixLength = strlen(mrpsptr->CgiPrefixPtr);
}
else
if (strsame (SetPathPtr, "CGIPLUSIN=EOF", -1))
mrpsptr->CgiPlusInWriteof = true;
else
if (strsame (SetPathPtr, "CGIPLUSIN=NOEOF", -1) ||
strsame (SetPathPtr, "NOCGIPLUSIN=EOF", -1))
mrpsptr->CgiPlusInNoWriteof = true;
else
if (strsame (SetPathPtr, "CGIPLUSIN=CC=NONE", -1))
strcpy (mrpsptr->CgiPlusInCC, "\0**");
else
if (strsame (SetPathPtr, "CGIPLUSIN=CC=LF", -1))
strcpy (mrpsptr->CgiPlusInCC, "\n\0*");
else
if (strsame (SetPathPtr, "CGIPLUSIN=CC=CR", -1))
strcpy (mrpsptr->CgiPlusInCC, "\r\0*");
else
if (strsame (SetPathPtr, "CGIPLUSIN=CC=CRLF", -1))
strcpy (mrpsptr->CgiPlusInCC, "\r\n\0");
else
if (strsame (SetPathPtr, "CGI=VAR=", 8))
{
mrpsptr->CgiVarPtr = SetPathPtr + 8;
mrpsptr->CgiVarLength = strlen(mrpsptr->CgiVarPtr);
}
else
if (strsame (SetPathPtr, "CHARSET=", 8))
{
mrpsptr->CharsetPtr = SetPathPtr + 8;
mrpsptr->CharsetLength = strlen(mrpsptr->CharsetPtr);
*AllowedPtr = true;
}
else
if (strsame (SetPathPtr, "CLIENT=FORWARDED", -1))
mrpsptr->ClientAddress = MAPURL_CLIENT_FORWARDED;
else
if (strsame (SetPathPtr, "CLIENT=IF=FORWARDED", -1))
mrpsptr->ClientAddress = MAPURL_CLIENT_IF_FORWARDED;
else
if (strsame (SetPathPtr, "CLIENT=LITERAL=", 15))
{
/* really just for ease of testing */
mrpsptr->ClientAddress = MAPURL_CLIENT_LITERAL;
mrpsptr->ClientAddressLiteralPtr = SetPathPtr + 15;
mrpsptr->ClientAddressLiteralLength =
strlen(mrpsptr->ClientAddressLiteralPtr);
}
else
if (strsame (SetPathPtr, "CLIENT=XFORWARDEDFOR", -1))
mrpsptr->ClientAddress = MAPURL_CLIENT_XFORWARDEDFOR;
else
if (strsame (SetPathPtr, "CLIENT=IF=XFORWARDEDFOR", -1))
mrpsptr->ClientAddress = MAPURL_CLIENT_IF_XFORWARDEDFOR;
else
if (strsame (SetPathPtr, "CLIENT=RESET", -1))
mrpsptr->ClientAddress = MAPURL_CLIENT_RESET;
else
if (strsame (SetPathPtr, "CONTENT=", 8))
{
mrpsptr->ContentTypePtr = SetPathPtr + 8;
mrpsptr->ContentTypeLength = strlen(mrpsptr->ContentTypePtr);
*AllowedPtr = true;
}
else
if (strsame (SetPathPtr, "CONTENT-TYPE=", 13))
{
/* just a synonym for "content=", bet someone uses it! */
mrpsptr->ContentTypePtr = SetPathPtr + 13;
mrpsptr->ContentTypeLength = strlen(mrpsptr->ContentTypePtr);
*AllowedPtr = true;
}
else
if (strsame (SetPathPtr, "CSS=", 4))
{
mrpsptr->StyleSheetPtr = SetPathPtr + 4;
mrpsptr->StyleSheetLength = strlen(mrpsptr->StyleSheetPtr);
}
else
if (strsame (SetPathPtr, "CORS=AGE=", 9))
{
sptr = SetPathPtr + 9;
mrpsptr->CorsMaxAge = MetaConSetSeconds (mcptr, sptr, 1);
/* negative 1 indicates to revert to configuration maximum */
if (!mrpsptr->CorsMaxAge) mrpsptr->CorsMaxAge = -1;
}
else
if (strsame (SetPathPtr, "CORS=CRED=TRUE", -1) ||
strsame (SetPathPtr, "CORS=CRED=YES", -1))
mrpsptr->CorsAllowCredentials = true;
else
if (strsame (SetPathPtr, "CORS=CRED=FALSE", -1) ||
strsame (SetPathPtr, "CORS=CRED=NO", -1))
mrpsptr->CorsNoAllowCredentials = true;
else
if (strsame (SetPathPtr, "CORS=EXPOSE=", 12))
{
mrpsptr->CorsExposeHeadersPtr = SetPathPtr + 12;
mrpsptr->CorsExposeHeadersLength =
strlen(mrpsptr->CorsExposeHeadersPtr);
}
else
if (strsame (SetPathPtr, "CORS=HEADERS=", 13))
{
mrpsptr->CorsAllowHeadersPtr = SetPathPtr + 13;
mrpsptr->CorsAllowHeadersLength =
strlen(mrpsptr->CorsAllowHeadersPtr);
}
else
if (strsame (SetPathPtr, "CORS=METHODS=", 13))
{
mrpsptr->CorsAllowMethodsPtr = SetPathPtr + 13;
mrpsptr->CorsAllowMethodsLength =
strlen(mrpsptr->CorsAllowMethodsPtr);
}
else
if (strsame (SetPathPtr, "CORS=ORIGIN=", 12))
{
mrpsptr->CorsAllowOriginPtr = SetPathPtr + 12;
mrpsptr->CorsAllowOriginLength =
strlen(mrpsptr->CorsAllowOriginPtr);
}
else
if (strsame (SetPathPtr, "DICT=", 5))
mrpsptr->DictionaryPtr = SetPathPtr + 5;
else
if (strsame (SetPathPtr, "DIR=ACCESS=SELECTIVE", -1))
mrpsptr->DirAccessSelective = true;
else
if (strsame (SetPathPtr, "DIR=ACCESS", -1))
mrpsptr->DirAccess = true;
else
if (strsame (SetPathPtr, "DIR=NOACCESS", -1))
mrpsptr->DirNoAccess = true;
else
if (strsame (SetPathPtr, "DIR=CHARSET=", 12))
{
mrpsptr->DirCharsetPtr = SetPathPtr + 12;
mrpsptr->DirCharsetLength = strlen(mrpsptr->DirCharsetPtr);
}
else
if (strsame (SetPathPtr, "DIR=DELIMIT", -1) ||
strsame (SetPathPtr, "DIR=DELIMIT=BOTH", -1))
mrpsptr->DirDelimit = MAPURL_DIR_DELIMIT_BOTH;
else
if (strsame (SetPathPtr, "DIR=DELIMIT=HEADER", -1))
mrpsptr->DirDelimit = MAPURL_DIR_DELIMIT_HEADER;
else
if (strsame (SetPathPtr, "DIR=DELIMIT=FOOTER", -1))
mrpsptr->DirDelimit = MAPURL_DIR_DELIMIT_FOOTER;
else
if (strsame (SetPathPtr, "DIR=DELIMIT=NONE", -1))
mrpsptr->DirDelimit = MAPURL_DIR_DELIMIT_NONE;
else
if (strsame (SetPathPtr, "DIR=FONT", -1) ||
strsame (SetPathPtr, "DIR=font=MONOSPACE", -1))
mrpsptr->DirFont = MAPURL_DIR_FONT_MONOSPACE;
else
if (strsame (SetPathPtr, "DIR=font=INHERIT", -1))
mrpsptr->DirFont = MAPURL_DIR_FONT_INHERIT;
else
if (strsame (SetPathPtr, "DIR=LAYOUT=", 11))
{
mrpsptr->IndexPtr = SetPathPtr + 11;
mrpsptr->IndexLength = strlen(mrpsptr->IndexPtr);
}
else
if (strsame (SetPathPtr, "DIR=ILINK", -1))
mrpsptr->DirIconLink = true;
else
if (strsame (SetPathPtr, "DIR=NOILINK", -1))
mrpsptr->DirNoIconLink = true;
else
if (strsame (SetPathPtr, "DIR=IMPLIEDWILDCARD", -1))
mrpsptr->DirImpliedWildcard = true;
else
if (strsame (SetPathPtr, "DIR=NOIMPLIEDWILDCARD", -1))
mrpsptr->DirNoImpliedWildcard = true;
else
if (strsame (SetPathPtr, "DIR=SORT=", 9))
{
mrpsptr->DirSort[0] = TOUP(SetPathPtr[9]);
mrpsptr->DirSort[1] = SetPathPtr[10];
}
else
if (strsame (SetPathPtr, "DIR=STYLE", -1) ||
strsame (SetPathPtr, "DIR=style=DEFAULT", -1))
mrpsptr->DirStyle = MAPURL_DIR_STYLE_DEFAULT;
else
if (strsame (SetPathPtr, "DIR=style=DEFAULT2", -1))
mrpsptr->DirStyle = MAPURL_DIR_STYLE_DEFAULT2;
else
if (strsame (SetPathPtr, "DIR=style=ANCHOR", -1))
mrpsptr->DirStyle = MAPURL_DIR_STYLE_ANCHOR;
else
if (strsame (SetPathPtr, "DIR=style=ANCHOR2", -1))
mrpsptr->DirStyle = MAPURL_DIR_STYLE_ANCHOR2;
else
if (strsame (SetPathPtr, "DIR=style=HTDIR", -1))
mrpsptr->DirStyle = MAPURL_DIR_STYLE_HTDIR;
else
if (strsame (SetPathPtr, "DIR=style=HTDIR2", -1))
mrpsptr->DirStyle = MAPURL_DIR_STYLE_HTDIR2;
else
if (strsame (SetPathPtr, "DIR=style=ORIGINAL", -1))
mrpsptr->DirStyle = MAPURL_DIR_STYLE_ORIGINAL;
else
if (strsame (SetPathPtr, "DIR=style=ORIGINAL2", -1))
mrpsptr->DirStyle = MAPURL_DIR_STYLE_ORIGINAL2;
else
if (strsame (SetPathPtr, "DIR=style=SORT", -1))
mrpsptr->DirStyle = MAPURL_DIR_STYLE_SORT;
else
if (strsame (SetPathPtr, "DIR=style=SORT2", -1))
mrpsptr->DirStyle = MAPURL_DIR_STYLE_SORT2;
else
if (strsame (SetPathPtr, "DIR=TARGET=", 11))
{
mrpsptr->DirTargetPtr = SetPathPtr + 11;
mrpsptr->DirTargetLength = strlen(mrpsptr->DirTargetPtr);
}
else
if (strsame (SetPathPtr, "DIR=title=THIS=", 15))
{
mrpsptr->DirTitle = MAPURL_DIR_TITLE_THIS;
mrpsptr->DirTitlePtr = SetPathPtr + 15;
mrpsptr->DirTitleLength = strlen(mrpsptr->DirTitlePtr);
}
else
if (strsame (SetPathPtr, "DIR=title=DEFAULT", -1))
mrpsptr->DirTitle = MAPURL_DIR_TITLE_DEFAULT;
else
if (strsame (SetPathPtr, "DIR=title=OWNER", -1))
mrpsptr->DirTitle = MAPURL_DIR_TITLE_OWNER;
else
if (strsame (SetPathPtr, "DIR=title=REMOTE",- 1))
mrpsptr->DirTitle = MAPURL_DIR_TITLE_REMOTE;
else
if (strsame (SetPathPtr, "DIR=title=0", -1))
mrpsptr->DirTitle = MAPURL_DIR_TITLE_NONE;
else
if (strsame (SetPathPtr, "DIR=title=", 10) &&
isdigit(*(SetPathPtr+10)))
mrpsptr->DirTitle = atol(SetPathPtr+10);
else
if (strsame (SetPathPtr, "DIR=THESE=", 10))
{
mrpsptr->DirThesePtr = SetPathPtr + 10;
mrpsptr->DirTheseLength = strlen(mrpsptr->DirThesePtr);
}
else
if (strsame (SetPathPtr, "DIR=VERSIONS=", 13))
{
sptr = SetPathPtr + 13;
if (*sptr == '*')
mrpsptr->DirVersionsOf = 65536;
else
if (*sptr == '0')
/* negative one means reset to zero */
mrpsptr->DirVersionsOf = -1;
else
mrpsptr->DirVersionsOf = atoi(sptr);
}
else
if (strsame (SetPathPtr, "DIR=WILDCARD", -1))
mrpsptr->DirWildcard = true;
else
if (strsame (SetPathPtr, "DIR=NOWILDCARD", -1))
mrpsptr->DirNoWildcard = true;
else
if (strsame (SetPathPtr, "NOHTML", 6))
{
mrpsptr->NoHtmlEquals = true;
*AllowedPtr = true;
}
else
if (strsame (SetPathPtr, "HTML=BODYTAG=", 13))
{
mrpsptr->HtmlBodyTagPtr = SetPathPtr + 13;
mrpsptr->HtmlBodyTagLength = strlen(mrpsptr->HtmlBodyTagPtr);
*AllowedPtr = true;
}
else
if (strsame (SetPathPtr, "HTML=FOOTER=", 12))
{
mrpsptr->HtmlFooterPtr = SetPathPtr + 12;
mrpsptr->HtmlFooterLength = strlen(mrpsptr->HtmlFooterPtr);
*AllowedPtr = true;
}
else
if (strsame (SetPathPtr, "HTML=FOOTERTAG=", 15))
{
mrpsptr->HtmlFooterTagPtr = SetPathPtr + 15;
mrpsptr->HtmlFooterTagLength = strlen(mrpsptr->HtmlFooterTagPtr);
*AllowedPtr = true;
}
else
if (strsame (SetPathPtr, "HTML=HEADER=", 12))
{
mrpsptr->HtmlHeaderPtr = SetPathPtr + 12;
mrpsptr->HtmlHeaderLength = strlen(mrpsptr->HtmlHeaderPtr);
*AllowedPtr = true;
}
else
if (strsame (SetPathPtr, "HTML=HEADERTAG=", 15))
{
mrpsptr->HtmlHeaderTagPtr = SetPathPtr + 15;
mrpsptr->HtmlHeaderTagLength = strlen(mrpsptr->HtmlHeaderTagPtr);
*AllowedPtr = true;
}
else
if (strsame (SetPathPtr, "HTTP2=PROTOCOL=1.1", -1))
mrpsptr->Http2ToHttp11 = true;
else
if (strsame (SetPathPtr, "HTTP2=STREAMS=MAX=", 18))
mrpsptr->Http2MaxStreams = atoi(SetPathPtr+18);
else
if (strsame (SetPathPtr, "HTTP2=WRITE=HIGH", -1))
mrpsptr->Http2WriteQueue = HTTP2_WRITE_QUEUE_HIGH;
else
if (strsame (SetPathPtr, "HTTP2=WRITE=NORMAL", -1))
mrpsptr->Http2WriteQueue = HTTP2_WRITE_QUEUE_NORMAL;
else
if (strsame (SetPathPtr, "HTTP2=WRITE=LOW", -1))
mrpsptr->Http2WriteQueue = HTTP2_WRITE_QUEUE_LOW;
else
if (strsame (SetPathPtr, "HTTP2=SEND=GOAWAY", 17))
{
/* the optional error code is incremented to allow for zero */
if (*(sptr = SetPathPtr + 17) == '=')
mrpsptr->Http2SendGoAway = atoi(sptr+1) + 1;
else
mrpsptr->Http2SendGoAway = 1;
}
else
if (strsame (SetPathPtr, "HTTP2=SEND=PING", -1))
mrpsptr->Http2SendPing = true;
else
if (strsame (SetPathPtr, "HTTP2=SEND=RESET", 16))
{
/* the optional error code is incremented to allow for zero */
if (*(sptr = SetPathPtr + 16) == '=')
mrpsptr->Http2SendReset = atoi(sptr+1) + 1;
else
mrpsptr->Http2SendReset = 1;
}
else
if (strsame (SetPathPtr, "HTTP=ACCEPT-CHARSET=", 20))
{
mrpsptr->HttpAcceptCharsetPtr = SetPathPtr + 20;
mrpsptr->HttpAcceptCharsetLength =
strlen(mrpsptr->HttpAcceptCharsetPtr);
*AllowedPtr = true;
}
else
if (strsame (SetPathPtr, "HTTP=ACCEPT-LANGUAGE=", 21))
{
mrpsptr->HttpAcceptLangPtr = SetPathPtr + 21;
mrpsptr->HttpAcceptLangLength = strlen(mrpsptr->HttpAcceptLangPtr);
*AllowedPtr = true;
}
else
if (strsame (SetPathPtr, "INDEX=", 6))
{
mrpsptr->IndexPtr = SetPathPtr + 6;
mrpsptr->IndexLength = strlen(mrpsptr->IndexPtr);
*AllowedPtr = true;
}
else
if (strsame (SetPathPtr, "EXPIRED", -1))
{
mrpsptr->Expired = true;
*AllowedPtr = true;
}
else
if (strsame (SetPathPtr, "NOEXPIRED", -1))
{
mrpsptr->NoExpired = true;
*AllowedPtr = true;
}
else
if (strsame (SetPathPtr, "LOG", -1))
mrpsptr->Log = true;
else
if (strsame (SetPathPtr, "NOLOG", -1))
mrpsptr->NoLog = true;
else
if (strsame (SetPathPtr, "MAP=ELLIPSIS", -1))
mrpsptr->MapEllipsis = true;
else
if (strsame (SetPathPtr, "NOMAP=ELLIPSIS", -1) ||
strsame (SetPathPtr, "MAP=NOELLIPSIS", -1))
mrpsptr->NoMapEllipsis = false;
else
if (strsame (SetPathPtr, "MAPEMPTY", -1) ||
strsame (SetPathPtr, "MAP=EMPTY", -1))
mrpsptr->MapEmpty = true;
else
if (strsame (SetPathPtr, "NOMAPEMPTY", -1) ||
strsame (SetPathPtr, "NOMAP=EMPTY", -1) ||
strsame (SetPathPtr, "MAP=NONEMPTY", -1))
mrpsptr->MapNonEmpty = true;
else
if (strsame (SetPathPtr, "MAP=METHOD", -1))
mrpsptr->MapExtensionMethod = true;
else
if (strsame (SetPathPtr, "MAP=NOMETHOD", -1) ||
strsame (SetPathPtr, "NOMAP=METHOD", -1))
mrpsptr->NoMapExtensionMethod = true;
else
if (strsame (SetPathPtr, "MAP=ONCE", -1) ||
strsame (SetPathPtr, "MAPONCE", -1))
mrpsptr->MapOnce = true;
else
if (strsame (SetPathPtr, "MAP=NOONCE", -1) ||
strsame (SetPathPtr, "NOMAP=ONCE", -1) ||
strsame (SetPathPtr, "NOMAPONCE", -1))
mrpsptr->NoMapOnce = true;
else
if (strsame (SetPathPtr, "MAP=RESTART", -1))
mrpsptr->MapRestart = true;
else
if (strsame (SetPathPtr, "MAP=ROOT=", 9))
{
mrpsptr->MapRootPtr = SetPathPtr + 9;
mrpsptr->MapRootLength = strlen(mrpsptr->MapRootPtr);
}
else
if (strsame (SetPathPtr, "MAP=SET=REQUEST", -1))
mrpsptr->MapSetRequest = true;
else
if (strsame (SetPathPtr, "NOMAP=SET=REQUEST", -1) ||
strsame (SetPathPtr, "MAP=SET=NOREQUEST", -1))
mrpsptr->MapSetNoRequest = true;
else
if (strsame (SetPathPtr, "MAP=SET=IGNORE", -1))
mrpsptr->MapSetIgnore = true;
else
if (strsame (SetPathPtr, "NOMAP=SET=IGNORE", -1) ||
strsame (SetPathPtr, "MAP=SET=NOIGNORE", -1))
mrpsptr->MapSetNoIgnore = true;
else
if (strsame (SetPathPtr, "MAP=URI", -1))
mrpsptr->MapUri = true;
else
if (strsame (SetPathPtr, "NOOP", 4))
mrpsptr->NoOp = true;
else
if (strsame (SetPathPtr, "NOTEPAD=", 8))
mrpsptr->NotePadPtr = SetPathPtr + 8;
else
if (strsame (SetPathPtr, "ODS=0", -1) ||
strsame (SetPathPtr, "NOODS", -1))
mrpsptr->PathOds = MAPURL_PATH_ODS_0;
else
if (strsame (SetPathPtr, "ODS=2", -1) ||
strsame (SetPathPtr, "ODS-2", -1))
mrpsptr->PathOds = MAPURL_PATH_ODS_2;
else
if (strsame (SetPathPtr, "ODS=5", -1) ||
strsame (SetPathPtr, "ODS-5", -1))
{
mrpsptr->PathOds = MAPURL_PATH_ODS_5;
#ifdef ODS_EXTENDED
/* indicate that at least one mapping is set ODS-5 */
MapUrlPathOds5 = true;
#endif /* ODS_EXTENDED */
}
else
if (strsame (SetPathPtr, "ODS=ADS", -1))
mrpsptr->PathOds = MAPURL_PATH_ODS_ADS;
else
if (strsame (SetPathPtr, "ODS=PWK", -1))
mrpsptr->PathOds = MAPURL_PATH_ODS_PWK;
else
if (strsame (SetPathPtr, "ODS=SMB", -1))
mrpsptr->PathOds = MAPURL_PATH_ODS_SMB;
else
if (strsame (SetPathPtr, "ODS=SRI", -1))
mrpsptr->PathOds = MAPURL_PATH_ODS_SRI;
else
if (strsame (SetPathPtr, "ODS=NAME=8BIT", -1))
mrpsptr->OdsName = MAPURL_ODS_8BIT;
else
if (strsame (SetPathPtr, "ODS=NAME=UTF8", -1))
mrpsptr->OdsName = MAPURL_ODS_UTF8;
else
if (strsame (SetPathPtr, "ODS=NAME=DEFAULT", -1))
mrpsptr->OdsName = MAPURL_ODS_DEFAULT;
else
if (strsame (SetPathPtr, "PROFILE", -1))
mrpsptr->Profile = true;
else
if (strsame (SetPathPtr, "NOPROFILE", -1))
mrpsptr->NoProfile = true;
else
if (strsame (SetPathPtr, "PROXY=AFFINITY", 14))
mrpsptr->ProxyAffinity = true;
else
if (strsame (SetPathPtr, "PROXY=NOAFFINITY", 16) ||
strsame (SetPathPtr, "NOPROXY=AFFINITY", 16))
mrpsptr->ProxyNoAffinity = true;
else
if (strsame (SetPathPtr, "PROXY=BIND=", 11))
{
mrpsptr->ProxyBindIpAddressPtr = SetPathPtr + 11;
mrpsptr->ProxyBindIpAddressLength =
strlen(mrpsptr->ProxyBindIpAddressPtr);
}
else
if (strsame (SetPathPtr, "PROXY=CHAIN=CRED=", 17))
{
mrpsptr->ProxyChainCredPtr = SetPathPtr + 17;
mrpsptr->ProxyChainCredLength =
strlen(mrpsptr->ProxyChainCredPtr);
}
else
if (strsame (SetPathPtr, "PROXY=CHAIN=", 12))
{
mrpsptr->ProxyChainHostPortPtr = SetPathPtr + 12;
mrpsptr->ProxyChainHostPortLength =
strlen(mrpsptr->ProxyChainHostPortPtr);
}
else
if (strsame (SetPathPtr, "PROXY=NOFORWARDED", -1))
mrpsptr->ProxyForwardedBy = PROXY_FORWARDED_NONE;
else
if (strsame (SetPathPtr, "PROXY=FORWARDED", -1) ||
strsame (SetPathPtr, "PROXY=FORWARDED=BY", -1))
mrpsptr->ProxyForwardedBy = PROXY_FORWARDED_BY;
else
if (strsame (SetPathPtr, "PROXY=FORWARDED=FOR", -1))
mrpsptr->ProxyForwardedBy = PROXY_FORWARDED_FOR;
else
if (strsame (SetPathPtr, "PROXY=FORWARDED=ADDRESS", -1))
mrpsptr->ProxyForwardedBy = PROXY_FORWARDED_ADDRESS;
else
if (strsame (SetPathPtr, "PROXY=NOXFORWARDEDFOR", -1))
mrpsptr->ProxyXForwardedFor = PROXY_XFORWARDEDFOR_NONE;
else
if (strsame (SetPathPtr, "PROXY=XFORWARDEDFOR", -1) ||
strsame (SetPathPtr, "PROXY=XFORWARDEDFOR=ENABLED", -1))
mrpsptr->ProxyXForwardedFor = PROXY_XFORWARDEDFOR_ENABLED;
else
if (strsame (SetPathPtr, "PROXY=XFORWARDEDFOR=ADDRESS", -1))
mrpsptr->ProxyXForwardedFor = PROXY_XFORWARDEDFOR_ADDRESS;
else
if (strsame (SetPathPtr, "PROXY=XFORWARDEDFOR=UNKNOWN", -1))
mrpsptr->ProxyXForwardedFor = PROXY_XFORWARDEDFOR_UNKNOWN;
else
if (strsame (SetPathPtr, "PROXY=HEADER=", 13))
{
if (mrpsptr->ProxyHeaderCount < MAPURL_PROXY_HEADER_MAX)
mrpsptr->ProxyHeader[mrpsptr->ProxyHeaderCount++] =
SetPathPtr + 13;
else
MetaConReport (mcptr, METACON_REPORT_ERROR,
ProblemProxyHeader);
}
else
if (strsame (SetPathPtr, "PROXY=REVERSE=LOCATION=", 23))
{
mrpsptr->ProxyReverseLocationPtr = SetPathPtr + 23;
mrpsptr->ProxyReverseLocationLength =
strlen(mrpsptr->ProxyReverseLocationPtr);
}
else
if (strsame (SetPathPtr, "PROXY=REWORK=", 13))
{
mrpsptr->ProxyReworkPtr = SetPathPtr + 13;
mrpsptr->ProxyReworkLength = strlen(mrpsptr->ProxyReworkPtr);
}
else
if (strsame (SetPathPtr, "PROXY=REVERSE=VERIFY", -1))
mrpsptr->ProxyReverseVerify = true;
else
if (strsame (SetPathPtr, "PROXY=REVERSE=NOVERIFY", -1) ||
strsame (SetPathPtr, "NOPROXY=REVERSE=VERIFY", -1))
mrpsptr->NoProxyReverseVerify = true;
else
if (strsame (SetPathPtr, "PROXY=REVERSE=AUTH", -1))
mrpsptr->ProxyReverseAuthHeader = true;
else
if (strsame (SetPathPtr, "PROXY=REVERSE=NOAUTH", -1) ||
strsame (SetPathPtr, "NOPROXY=REVERSE=AUTH", -1))
mrpsptr->NoProxyReverseAuthHeader = true;
else
if (strsame (SetPathPtr, "PROXY=TUNNEL=REQUEST=", 21))
{
mrpsptr->ProxyTunnelRequestPtr = SetPathPtr + 21;
mrpsptr->ProxyTunnelRequestLength =
strlen(mrpsptr->ProxyTunnelRequestPtr);
}
else
if (strsame (SetPathPtr, "PROXY=UNKNOWN", -1))
mrpsptr->ProxyUnknownRequestFields = true;
else
if (strsame (SetPathPtr, "PROXY=NOUNKNOWN", -1) ||
strsame (SetPathPtr, "NOPROXY=UNKNOWN", -1))
mrpsptr->NoProxyUnknownRequestFields = true;
else
if (strsame (SetPathPtr, "PUT=RFM=FIX512", -1))
mrpsptr->PutRFM = PUT_RFM_FIX512;
else
if (strsame (SetPathPtr, "PUT=RFM=STM", -1))
mrpsptr->PutRFM = PUT_RFM_STM;
else
if (strsame (SetPathPtr, "PUT=RFM=STMCR", -1))
mrpsptr->PutRFM = PUT_RFM_STMCR;
else
if (strsame (SetPathPtr, "PUT=RFM=STMLF", -1))
mrpsptr->PutRFM = PUT_RFM_STMLF;
else
if (strsame (SetPathPtr, "PUT=RFM=UDF", -1))
mrpsptr->PutRFM = PUT_RFM_UDF;
else
if (strsame (SetPathPtr, "PUT=MAX=", 8))
{
if (*(SetPathPtr+8) == '*')
/* no limit is actually 4GB - current HTTP atol() constraint */
mrpsptr->PutMaxKbytes = 999999999;
else
mrpsptr->PutMaxKbytes = atoi(SetPathPtr+8);
}
else
if (strsame (SetPathPtr, "QUERY-STRING=", 13))
{
mrpsptr->QueryStringPtr = SetPathPtr + 13;
mrpsptr->QueryStringLength = strlen(mrpsptr->QueryStringPtr);
}
else
if (strsame (SetPathPtr, "REGEX=AWK", 9))
mrpsptr->RegexSyntax = RE_SYNTAX_AWK;
else
if (strsame (SetPathPtr, "DEFAULT", 7))
mrpsptr->RegexSyntax = -1;
else
if (strsame (SetPathPtr, "REGEX=ED", 8))
mrpsptr->RegexSyntax = RE_SYNTAX_ED;
else
if (strsame (SetPathPtr, "REGEX=EGREP", 11))
mrpsptr->RegexSyntax = RE_SYNTAX_EGREP;
else
if (strsame (SetPathPtr, "REGEX=GREP", 10))
mrpsptr->RegexSyntax = RE_SYNTAX_GREP;
else
if (strsame (SetPathPtr, "REGEX=POSIX_AWK", 15))
mrpsptr->RegexSyntax = RE_SYNTAX_POSIX_AWK;
else
if (strsame (SetPathPtr, "REGEX=POSIX_BASIC", 17))
mrpsptr->RegexSyntax = RE_SYNTAX_POSIX_BASIC;
else
if (strsame (SetPathPtr, "REGEX=POSIX_EGREP", 17))
mrpsptr->RegexSyntax = RE_SYNTAX_POSIX_EGREP;
else
if (strsame (SetPathPtr, "REGEX=POSIX_EXTENDED", 20))
mrpsptr->RegexSyntax = RE_SYNTAX_POSIX_EXTENDED;
else
if (strsame (SetPathPtr, "REGEX=POSIX_MINIMAL_BASIC", 25))
mrpsptr->RegexSyntax = RE_SYNTAX_POSIX_MINIMAL_BASIC;
else
if (strsame (SetPathPtr, "REGEX=POSIX_MINIMAL_EXTENDED", 28))
mrpsptr->RegexSyntax = RE_SYNTAX_POSIX_MINIMAL_EXTENDED;
else
if (strsame (SetPathPtr, "REGEX=SED", 9))
mrpsptr->RegexSyntax = RE_SYNTAX_AWK;
else
if (strsame (SetPathPtr, "REGEX=WASD", 10))
mrpsptr->RegexSyntax = REGEX_C_FLAGS;
else
if (strsame (SetPathPtr, "REGEX=", 6) && isdigit(SetPathPtr[6]))
mrpsptr->RegexSyntax = atoi(SetPathPtr+6);
else
if (strsame (SetPathPtr, "REPORT=BASIC", 10))
mrpsptr->ReportType = ERROR_REPORT_BASIC;
else
if (strsame (SetPathPtr, "REPORT=DETAILED", 10))
mrpsptr->ReportType = ERROR_REPORT_DETAILED;
else
if (strsame (SetPathPtr, "REPORT=TUNNEL", 10))
mrpsptr->ReportType = ERROR_REPORT_TUNNEL;
else
if (strsame (SetPathPtr, "REPORT=400=", 11))
mrpsptr->Report400as = atoi(SetPathPtr+11);
else
if (strsame (SetPathPtr, "REPORT=403=", 11))
mrpsptr->Report403as = atoi(SetPathPtr+11);
else
if (strsame (SetPathPtr, "REPORT=404=", 11))
mrpsptr->Report404as = atoi(SetPathPtr+11);
else
if (strsame (SetPathPtr, "RMSCHAR=", 8))
mrpsptr->RmsSubChar = SetPathPtr[8];
else
if (strsame (SetPathPtr, "RESPONSE=200=203", -1))
mrpsptr->Response200is203 = 203;
else
if (strsame (SetPathPtr, "RESPONSE=203=200", -1))
mrpsptr->Response200is203 = 200;
else
if (strsame (SetPathPtr, "RESPONSE=CSP=", 13))
{
mrpsptr->ResponseCspPtr = SetPathPtr + 13;
if (!(mrpsptr->ResponseCspLength =
strlen(mrpsptr->ResponseCspPtr)))
{
mrpsptr->ResponseCspPtr = NULL;
mrpsptr->ResponseCspLength = -1;
}
}
else
if (strsame (SetPathPtr, "NORESPONSE=CSP", -1) ||
strsame (SetPathPtr, "RESPONSE=NOCSP", -1))
{
mrpsptr->ResponseCspPtr = NULL;
mrpsptr->ResponseCspLength = -1;
}
else
if (strsame (SetPathPtr, "RESPONSE=CSPRO=", 15))
{
mrpsptr->ResponseCsproPtr = SetPathPtr + 15;
if (!(mrpsptr->ResponseCsproLength =
strlen(mrpsptr->ResponseCsproPtr)))
{
mrpsptr->ResponseCspPtr = NULL;
mrpsptr->ResponseCspLength = -1;
}
}
else
if (strsame (SetPathPtr, "NORESPONSE=CSPRO", -1) ||
strsame (SetPathPtr, "RESPONSE=NOCSPRO", -1))
{
mrpsptr->ResponseCsproPtr = NULL;
mrpsptr->ResponseCsproLength = -1;
}
else
if (strsame (SetPathPtr, "RESPONSE=GZIP=ALL", -1) ||
strsame (SetPathPtr, "RESPONSE=GZIP=0", -1))
mrpsptr->ResponseGzip = MAPURL_RESPONSE_GZIP_ALL;
else
if (strsame (SetPathPtr, "RESPONSE=GZIP=NONE", -1))
mrpsptr->ResponseGzip = MAPURL_RESPONSE_GZIP_NONE;
else
if (strsame (SetPathPtr, "RESPONSE=GZIP=", 14))
mrpsptr->ResponseGzip = atoi(SetPathPtr+14);
else
if (strsame (SetPathPtr, "RESPONSE=CHUNKED", 14))
mrpsptr->ResponseChunked = true;
else
if (strsame (SetPathPtr, "NORESPONSE=CHUNKED", 16) ||
strsame (SetPathPtr, "RESPONSE=NOCHUNKED", 16))
mrpsptr->ResponseNoChunked = true;
else
if (strsame (SetPathPtr, "RESPONSE=HEADER=BEGIN", -1))
mrpsptr->ResponseHeaderBegin = true;
else
if (strsame (SetPathPtr, "RESPONSE=HEADER=FULL", -1))
mrpsptr->ResponseHeaderFull = true;
else
if (strsame (SetPathPtr, "RESPONSE=HEADER=NONE", -1))
mrpsptr->ResponseHeaderNone = true;
else
if (strsame (SetPathPtr, "NORESPONSE=HEADER=ADD", -1) ||
strsame (SetPathPtr, "RESPONSE=HEADER=NOADD", -1))
mrpsptr->ResponseHeaderNoAdd = true;
else
if (strsame (SetPathPtr, "RESPONSE=HEADER=ADD=", 20))
{
mrpsptr->ResponseHeaderAddPtr = SetPathPtr + 20;
mrpsptr->ResponseHeaderAddLength =
strlen(mrpsptr->ResponseHeaderAddPtr);
}
else
if (strsame (SetPathPtr, "RESPONSE=HTTP=ORIGINAL", -1))
mrpsptr->ResponseHttpOriginal = true;
else
if (strsame (SetPathPtr, "NORESPONSE=HTTP=ORIGINAL", -1) ||
strsame (SetPathPtr, "RESPONSE=HTTP=NOORIGINAL", -1))
mrpsptr->ResponseHttpNoOriginal = true;
else
if (strsame (SetPathPtr, "RESPONSE=STS=", 13))
{
mrpsptr->ResponseStrictTransSecPtr = SetPathPtr+13;
mrpsptr->ResponseStrictTransSecLength =
strlen(mrpsptr->ResponseStrictTransSecPtr);
}
else
if (strsame (SetPathPtr, "RESPONSE=VAR=ASIS", -1))
mrpsptr->ResponseVarRecord = FILE_VAR_ASIS;
else
if (strsame (SetPathPtr, "RESPONSE=VAR", -1))
mrpsptr->ResponseVarRecord = FILE_VAR_DEFAULT;
else
if (strsame (SetPathPtr, "RESPONSE=VAR=CRLF", -1))
mrpsptr->ResponseVarRecord = FILE_VAR_CRLF;
else
if (strsame (SetPathPtr, "RESPONSE=VAR=LF", -1))
mrpsptr->ResponseVarRecord = FILE_VAR_LF;
else
if (strsame (SetPathPtr, "RESPONSE=VAR=NONE", -1))
mrpsptr->ResponseVarRecord = FILE_VAR_NONE;
else
if (strsame (SetPathPtr, "SCRIPT=AGENT=AS=", 16))
{
/* while setting the required pointers force to upper-case */
for (sptr = mrpsptr->ScriptAgentAsPtr = SetPathPtr+16;
*sptr;
sptr++)
*sptr = TOUP(*sptr);
mrpsptr->ScriptAgentAsLength = strlen(mrpsptr->ScriptAgentAsPtr);
}
else
if (strsame (SetPathPtr, "SCRIPT=AS=", 10))
{
/* while setting the required pointers force to upper-case */
for (sptr = mrpsptr->ScriptAsPtr = SetPathPtr+10; *sptr; sptr++)
*sptr = TOUP(*sptr);
mrpsptr->ScriptAsLength = strlen(mrpsptr->ScriptAsPtr);
}
else
if (strsame (SetPathPtr, "SCRIPT=BIT-BUCKET=", 18))
mrpsptr->ScriptBitBucketTimeout =
MetaConSetSeconds (mcptr, SetPathPtr+18, 1);
else
if (strsame (SetPathPtr, "SCRIPT=BODY=DECODE", -1))
mrpsptr->ScriptBodyDecode = true;
else
if (strsame (SetPathPtr, "SCRIPT=BODY=NODECODE", -1) ||
strsame (SetPathPtr, "SCRIPT=NOBODY=DECODE", -1) ||
strsame (SetPathPtr, "NOSCRIPT=BODY=DECODE", -1))
mrpsptr->ScriptBodyNoDecode = true;
else
if (strsame (SetPathPtr, "SCRIPT=CPU=", 11))
mrpsptr->ScriptCpuMax = MetaConSetSeconds (mcptr, SetPathPtr+11, 1);
else
if (strsame (SetPathPtr, "SCRIPT=COMMAND=", 15))
{
mrpsptr->ScriptCommandPtr = SetPathPtr + 15;
mrpsptr->ScriptCommandLength = strlen(mrpsptr->ScriptCommandPtr);
}
else
if (strsame (SetPathPtr, "SCRIPT=CONTROL=", 15))
{
mrpsptr->ScriptControlPtr = SetPathPtr + 15;
mrpsptr->ScriptControlLength = strlen(mrpsptr->ScriptControlPtr);
}
else
if (strsame (SetPathPtr, "SCRIPT=DEFAULT=", 15))
{
mrpsptr->ScriptDefaultPtr = SetPathPtr + 15;
mrpsptr->ScriptDefaultLength = strlen(mrpsptr->ScriptDefaultPtr);
}
else
if (strsame (SetPathPtr, "SCRIPT=FIND", -1))
mrpsptr->ScriptFind = true;
else
if (strsame (SetPathPtr, "SCRIPT=NOFIND", -1) ||
strsame (SetPathPtr, "NOSCRIPT=FIND", -1))
mrpsptr->ScriptNoFind = true;
else
if (strsame (SetPathPtr, "SCRIPT=LIFETIME=", 16))
mrpsptr->ScriptLifeTime =
MetaConSetSeconds (mcptr, SetPathPtr+16, 1);
else
if (strsame (SetPathPtr, "SCRIPT=SYMBOL=TRUNCATE", -1))
mrpsptr->ScriptSymbolTruncate = true;
else
if (strsame (SetPathPtr, "SCRIPT=SYMBOL=NOTRUNCATE", -1) ||
strsame (SetPathPtr, "NOSCRIPT=SYMBOL=TRUNCATE", -1))
mrpsptr->ScriptSymbolNoTruncate = true;
else
if (strsame (SetPathPtr, "SCRIPT=SYNTAX=UNIX", -1))
mrpsptr->ScriptSyntaxUnix = true;
else
if (strsame (SetPathPtr, "SCRIPT=SYNTAX=NOUNIX", -1) ||
strsame (SetPathPtr, "NOSCRIPT=SYNTAX=UNIX", -1))
mrpsptr->ScriptSyntaxNoUnix = true;
else
if (strsame (SetPathPtr, "SCRIPT=PARAM=", 13))
{
mrpsptr->ScriptParamsPtr = SetPathPtr + 13;
mrpsptr->ScriptParamsLength =
strlen(mrpsptr->ScriptParamsPtr);
}
else
if (strsame (SetPathPtr, "SCRIPT=PARAMS=", 14))
{
mrpsptr->ScriptParamsPtr = SetPathPtr + 14;
mrpsptr->ScriptParamsLength =
strlen(mrpsptr->ScriptParamsPtr);
}
else
if (strsame (SetPathPtr, "SCRIPT=PATH=FIND", -1))
mrpsptr->ScriptPathFind = true;
else
if (strsame (SetPathPtr, "SCRIPT=NOPATH=FIND", -1) ||
strsame (SetPathPtr, "NOSCRIPT=PATH=FIND", -1))
mrpsptr->ScriptNoPathFind = true;
else
if (strsame (SetPathPtr, "SCRIPT=QUERY=NONE", -1))
mrpsptr->ScriptQueryNone = true;
else
if (strsame (SetPathPtr, "SCRIPT=NOQUERY=NONE", -1) ||
strsame (SetPathPtr, "NOSCRIPT=QUERY=NONE", -1))
mrpsptr->ScriptNoQueryNone = true;
else
if (strsame (SetPathPtr, "SCRIPT=QUERY=RELAXED", -1))
mrpsptr->ScriptQueryRelaxed = true;
else
if (strsame (SetPathPtr, "SCRIPT=NOQUERY=RELAXED", -1) ||
strsame (SetPathPtr, "NOSCRIPT=QUERY=RELAXED", -1))
mrpsptr->ScriptNoQueryRelaxed = true;
else
if (strsame (SetPathPtr, "SEARCH=NONE", -1))
mrpsptr->NoDefaultSearch = true;
else
if (strsame (SetPathPtr, "NOSEARCH=NONE", -1) ||
strsame (SetPathPtr, "SEARCH=NONONE", -1))
mrpsptr->DefaultSearch = true;
else
if (strsame (SetPathPtr, "SERVICE=", 8))
{
mrpsptr->ChangeServicePtr = SetPathPtr + 8;
mrpsptr->ChangeServiceLength =
strlen(mrpsptr->ChangeServicePtr);
}
else
if (strsame (SetPathPtr, "SSI=PRIV", 8))
mrpsptr->PrivSsi = true;
else
if (strsame (SetPathPtr, "SSI=NOPRIV", -1) ||
strsame (SetPathPtr, "NOSSI=PRIV", -1))
mrpsptr->NoPrivSsi = true;
else
if (strsame (SetPathPtr, "SSI=EXEC=", 9))
{
mrpsptr->SsiExecPtr = SetPathPtr + 9;
mrpsptr->SsiExecLength =
strlen(mrpsptr->SsiExecPtr);
}
else
if (strsame (SetPathPtr, "SSI=DCL=", 8))
{
/* synonym for 'ssi=exec=' */
mrpsptr->SsiExecPtr = SetPathPtr + 8;
mrpsptr->SsiExecLength =
strlen(mrpsptr->SsiExecPtr);
}
else
if (strsame (SetPathPtr, "NOSSLCGI", -1))
mrpsptr->SSLCGIvar = SESOLA_CGI_VAR_NONE;
else
if (strsame (SetPathPtr, "SSLCGI=NONE", -1))
mrpsptr->SSLCGIvar = SESOLA_CGI_VAR_NONE;
else
if (strsame (SetPathPtr, "SSLCGI=APACHE_MOD_SSL", -1))
mrpsptr->SSLCGIvar = SESOLA_CGI_VAR_APACHE_MOD_SSL;
else
if (strsame (SetPathPtr, "SSLCGI=APACHE_MOD_SSL_CLIENT", -1))
mrpsptr->SSLCGIvar = SESOLA_CGI_VAR_APACHE_MOD_SSL_CLIENT;
else
if (strsame (SetPathPtr, "SSLCGI=APACHE_MOD_SSL_EXTENS", -1))
mrpsptr->SSLCGIvar = SESOLA_CGI_VAR_APACHE_MOD_SSL_EXTENS;
else
if (strsame (SetPathPtr, "SSLCGI=APACHE_MOD_SSL_OID", -1))
mrpsptr->SSLCGIvar = SESOLA_CGI_VAR_APACHE_MOD_SSL_OID;
else
if (strsame (SetPathPtr, "SSLCGI=PURVEYOR", -1))
mrpsptr->SSLCGIvar = SESOLA_CGI_VAR_PURVEYOR;
else
if (strsame (SetPathPtr, "STMLF", -1))
mrpsptr->StmLF = true;
else
if (strsame (SetPathPtr, "NOSTMLF", -1))
mrpsptr->NoStmLF = true;
else
if (strsame (SetPathPtr, "THROTTLE=", 9))
{
mrpsptr->ThrottleSet = true;
SetPathPtr += 9;
if (strsame (SetPathPtr, "BUSY=", 5))
mrpsptr->ThrottleBusy = atoi(SetPathPtr+5);
else
if (strsame (SetPathPtr, "FROM=", 5))
{
sptr = SetPathPtr + 5;
mrpsptr->ThrottleFrom = atoi(sptr);
while (isdigit(*sptr)) sptr++;
if (*sptr == '$') mrpsptr->ThrottlePerUser = atoi(sptr+1);
}
else
if (strsame (SetPathPtr, "RESUME=", 7))
mrpsptr->ThrottleResume = atoi(SetPathPtr+7);
else
if (strsame (SetPathPtr, "TO=", 3))
mrpsptr->ThrottleTo = atoi(SetPathPtr+3);
else
if (strsame (SetPathPtr, "TIMEOUT=BUSY=", 13))
mrpsptr->ThrottleTimeoutBusy =
MetaConSetSeconds (mcptr, SetPathPtr+13, 1);
else
if (strsame (SetPathPtr, "TIMEOUT=QUEUE=", 14))
mrpsptr->ThrottleTimeoutQueue =
MetaConSetSeconds (mcptr, SetPathPtr+14, 1);
else
if (strsame (SetPathPtr, "USER=", 5))
mrpsptr->ThrottlePerUser = atoi(SetPathPtr+5);
else
if (strsame (SetPathPtr, "NONE", 4))
mrpsptr->ThrottleNoSet = true;
else
{
/* throttle=from[/user],to,resume,busy,t/o-queue,t/o-busy */
sptr = SetPathPtr;
if (*sptr == '(') sptr++;
if (isdigit(*sptr)) mrpsptr->ThrottleFrom = atoi(sptr);
while (isdigit(*sptr)) *sptr++;
if (*sptr == '/')
{
sptr++;
mrpsptr->ThrottlePerUser = atoi(sptr);
while (isdigit(*sptr)) *sptr++;
}
if (*sptr == ',') *sptr++;
if (isdigit(*sptr)) mrpsptr->ThrottleTo = atoi(sptr);
while (isdigit(*sptr)) *sptr++;
if (*sptr == ',') *sptr++;
if (isdigit(*sptr)) mrpsptr->ThrottleResume = atoi(sptr);
while (isdigit(*sptr)) *sptr++;
if (*sptr == ',') *sptr++;
if (isdigit(*sptr)) mrpsptr->ThrottleBusy = atoi(sptr);
while (isdigit(*sptr)) *sptr++;
if (*sptr == ',') *sptr++;
if (isdigit(*sptr))
mrpsptr->ThrottleTimeoutQueue =
MetaConSetSeconds (mcptr, sptr, 1);
while (*sptr && (isdigit(*sptr) || *sptr == ':')) *sptr++;
if (*sptr == ',') *sptr++;
if (isdigit(*sptr))
mrpsptr->ThrottleTimeoutBusy =
MetaConSetSeconds (mcptr, sptr, 1);
while (*sptr && (isdigit(*sptr) || *sptr == ':')) *sptr++;
}
}
else
if (strsame (SetPathPtr, "TIMEOUT=PERSISTENT=", 19))
mrpsptr->TimeoutPersistent =
MetaConSetSeconds (mcptr, SetPathPtr+19, 1);
else
/* for backward compatibility against the above */
if (strsame (SetPathPtr, "TIMEOUT=KEEPALIVE=", 18))
mrpsptr->TimeoutPersistent =
MetaConSetSeconds (mcptr, SetPathPtr+18, 1);
else
if (strsame (SetPathPtr, "TIMEOUT=NOPROGRESS=", 19))
mrpsptr->TimeoutNoProgress =
MetaConSetSeconds (mcptr, SetPathPtr+19, 1);
else
if (strsame (SetPathPtr, "TIMEOUT=OUTPUT=", 15))
mrpsptr->TimeoutOutput =
MetaConSetSeconds (mcptr, SetPathPtr+15, 1);
else
if (strsame (SetPathPtr, "TIMEOUT=", 8))
{
sptr = SetPathPtr+8;
mrpsptr->TimeoutPersistent = MetaConSetSeconds (mcptr, sptr, 1);
while (*sptr && !ISLWS(*sptr) && *sptr != ',') *sptr++;
if (*sptr == ',') *sptr++;
mrpsptr->TimeoutNoProgress = MetaConSetSeconds (mcptr, sptr, 1);
while (*sptr && !ISLWS(*sptr) && *sptr != ',') *sptr++;
if (*sptr == ',') *sptr++;
mrpsptr->TimeoutOutput = MetaConSetSeconds (mcptr, sptr, 1);
}
else
if (strsame (SetPathPtr, "NOTIMEOUT", -1))
mrpsptr->TimeoutNoProgress =
mrpsptr->TimeoutPersistent =
mrpsptr->TimeoutOutput = -1;
else
if (strsame (SetPathPtr, "ACCESS=PROFILE", -1))
mrpsptr->AccessProfile = true;
else
if (strsame (SetPathPtr, "ACCESS=NOPROFILE", -1) ||
strsame (SetPathPtr, "NOACCESS=PROFILE", -1))
mrpsptr->AccessNoProfile = true;
else
if (strsame (SetPathPtr, "ACCESS=READ", -1))
mrpsptr->AccessRead = true;
else
if (strsame (SetPathPtr, "ACCESS=NOREAD", -1) ||
strsame (SetPathPtr, "NOACCESS=READ", -1))
mrpsptr->AccessNoRead = true;
else
if (strsame (SetPathPtr, "ACCESS=SERVER", -1))
mrpsptr->AccessServer = true;
else
if (strsame (SetPathPtr, "ACCESS=NOSERVER", -1) ||
strsame (SetPathPtr, "NOACCESS=SERVER", -1))
mrpsptr->AccessNoServer = true;
else
if (strsame (SetPathPtr, "ACCESS=WRITE", -1))
mrpsptr->AccessWrite = true;
else
if (strsame (SetPathPtr, "ACCESS=NOWRITE", -1) ||
strsame (SetPathPtr, "NOACCESS=WRITE", -1))
mrpsptr->AccessNoWrite = true;
else
if (strsame (SetPathPtr, "WEBDAV=ALL", -1))
mrpsptr->WebDavAll = true;
else
if (strsame (SetPathPtr, "WEBDAV=NOALL", -1) ||
strsame (SetPathPtr, "NOWEBDAV=ALL", -1))
mrpsptr->WebDavNoAll = true;
else
if (strsame (SetPathPtr, "WEBDAV=AUTH", -1))
mrpsptr->WebDavAuth = true;
else
if (strsame (SetPathPtr, "WEBDAV=NOAUTH", -1) ||
strsame (SetPathPtr, "NOWEBDAV=AUTH", -1))
mrpsptr->WebDavNoAuth = true;
else
if (strsame (SetPathPtr, "WEBDAV=HIDDEN", -1))
mrpsptr->WebDavHidden = true;
else
if (strsame (SetPathPtr, "WEBDAV=NOHIDDEN", -1) ||
strsame (SetPathPtr, "NOWEBDAV=HIDDEN", -1))
mrpsptr->WebDavNoHidden = true;
else
if (strsame (SetPathPtr, "WEBDAV=LOCKING", 11))
mrpsptr->WebDavLock = true;
else
if (strsame (SetPathPtr, "WEBDAV=NOLOCKING", 13) ||
strsame (SetPathPtr, "NOWEBDAV=LOCKING", 13))
mrpsptr->WebDavNoLock = true;
else
if (strsame (SetPathPtr, "WEBDAV=META=DIR=", 16))
{
mrpsptr->WebDavMetaDirPtr = SetPathPtr + 16;
mrpsptr->WebDavMetaDirLength = strlen(mrpsptr->WebDavMetaDirPtr);
}
else
if (strsame (SetPathPtr, "WEBDAV=PROFILE", -1))
mrpsptr->WebDavProfile = true;
else
if (strsame (SetPathPtr, "WEBDAV=NOPROFILE", -1) ||
strsame (SetPathPtr, "NOWEBDAV=PROFILE", -1))
mrpsptr->WebDavNoProfile = true;
else
if (strsame (SetPathPtr, "WEBDAV=PROP", -1))
mrpsptr->WebDavProp = true;
else
if (strsame (SetPathPtr, "WEBDAV=NOPROP", -1) ||
strsame (SetPathPtr, "NOWEBDAV=PROP", -1))
mrpsptr->WebDavNoProp = true;
else
if (strsame (SetPathPtr, "WEBDAV=PUT=LOCK", -1))
mrpsptr->WebDavPutLock = true;
else
if (strsame (SetPathPtr, "WEBDAV=NOPUT=LOCK", -1) ||
strsame (SetPathPtr, "NOWEBDAV=PUT=LOCK", -1))
mrpsptr->WebDavNoPutLock = true;
else
if (strsame (SetPathPtr, "WEBDAV=READ", -1))
mrpsptr->WebDavRead = true;
else
if (strsame (SetPathPtr, "WEBDAV=NOREAD", -1) ||
strsame (SetPathPtr, "NOWEBDAV=READ", -1))
mrpsptr->WebDavNoRead = true;
else
if (strsame (SetPathPtr, "WEBDAV=SERVER", -1))
mrpsptr->WebDavServer = true;
else
if (strsame (SetPathPtr, "WEBDAV=NOSERVER", -1) ||
strsame (SetPathPtr, "NOWEBDAV=SERVER", -1))
mrpsptr->WebDavNoServer = true;
else
if (strsame (SetPathPtr, "WEBDAV=WINPROP", -1))
mrpsptr->WebDavWinProp = true;
else
if (strsame (SetPathPtr, "WEBDAV=NOWINPROP", -1) ||
strsame (SetPathPtr, "NOWEBDAV=WINPROP", -1))
mrpsptr->WebDavNoWinProp = true;
else
if (strsame (SetPathPtr, "WEBDAV=WRITE", -1))
mrpsptr->WebDavWrite = true;
else
if (strsame (SetPathPtr, "WEBDAV=NOWRITE", -1) ||
strsame (SetPathPtr, "NOWEBDAV=WRITE", -1))
mrpsptr->WebDavNoWrite = true;
else
if (strsame (SetPathPtr, "WEBDAV=LOCK=TIMEOUT=DEFAULT=", 28))
mrpsptr->WebDavLockTimeoutDefault =
MetaConSetSeconds (mcptr, SetPathPtr+28, 1);
else
if (strsame (SetPathPtr, "WEBDAV=LOCK=TIMEOUT=MAX=", 24))
mrpsptr->WebDavLockTimeoutMax =
MetaConSetSeconds (mcptr, SetPathPtr+24, 1);
else
if (strsame (SetPathPtr, "WEBSOCKET=INPUT=", 16))
mrpsptr->WebSocketInputSize = atoi(SetPathPtr+16);
else
if (strsame (SetPathPtr, "WEBSOCKET=OUTPUT=", 17))
mrpsptr->WebSocketOutputSize = atoi(SetPathPtr+17);
else
{
MetaConReport (mcptr, METACON_REPORT_ERROR, ProblemSetPath);
return (false);
}
return (true);
}
/*****************************************************************************/
/*
The path has a setting. Map that onto the request path settings.
*/
MapSetPath
(
REQUEST_STRUCT *rqptr,
REQUEST_PATHSET *rqpsptr,
MAP_SET_META *mrpsptr
)
{
int length;
char *cptr, *sptr;
/*********/
/* begin */
/*********/
if (WATCHMOD (rqptr, WATCH_MOD_MAPURL))
WatchThis (WATCHITM(rqptr), WATCH_MOD_MAPURL, "MapSetPath()");
if (mrpsptr->NoAcceptLang)
{
rqpsptr->AcceptLangChar = '\0';
rqpsptr->AcceptLangWildcard =
rqpsptr->AcceptLangTypeVariant = false;
rqpsptr->AcceptLangPtr = NULL;
}
else
if (mrpsptr->AcceptLangChar)
{
rqpsptr->AcceptLangChar = mrpsptr->AcceptLangChar;
rqpsptr->AcceptLangWildcard = mrpsptr->AcceptLangWildcard;
rqpsptr->AcceptLangTypeVariant = mrpsptr->AcceptLangTypeVariant;
if (mrpsptr->AcceptLangLength)
{
rqpsptr->AcceptLangPtr =
VmGetHeap (rqptr, mrpsptr->AcceptLangLength+1);
memcpy (rqpsptr->AcceptLangPtr,
mrpsptr->AcceptLangPtr,
mrpsptr->AcceptLangLength+1);
}
}
if (mrpsptr->NoAlert)
rqpsptr->Alert = 0;
else
if (mrpsptr->Alert)
rqpsptr->Alert = mrpsptr->Alert;
if (mrpsptr->NoAuthAll)
rqpsptr->AuthorizeAll = false;
else
if (mrpsptr->AuthAll)
rqpsptr->AuthorizeAll = true;
if (mrpsptr->NoAuthMapped)
rqpsptr->AuthorizeMapped = false;
else
if (mrpsptr->AuthMapped)
rqpsptr->AuthorizeMapped = true;
if (mrpsptr->NoAuthOnce)
rqpsptr->AuthorizeOnce = false;
else
if (mrpsptr->AuthOnce)
rqpsptr->AuthorizeOnce = true;
/* only if they haven't been set in any previous pass */
if (!rqpsptr->AuthRevalidateTimeout)
rqpsptr->AuthRevalidateTimeout = mrpsptr->AuthRevalidateTimeout;
if (mrpsptr->AuthSysUafPwdExpUrlLength)
{
rqpsptr->AuthSysUafPwdExpUrlPtr =
VmGetHeap (rqptr, mrpsptr->AuthSysUafPwdExpUrlLength+1);
memcpy (rqpsptr->AuthSysUafPwdExpUrlPtr,
mrpsptr->AuthSysUafPwdExpUrlPtr,
mrpsptr->AuthSysUafPwdExpUrlLength+1);
}
if (mrpsptr->NoCache)
{
rqpsptr->NoCache = true;
rqpsptr->CacheCGI =
rqpsptr->CacheCookie =
rqpsptr->CacheNoFile =
rqpsptr->CacheNet =
rqpsptr->CacheNPH =
rqpsptr->CachePermanent =
rqpsptr->CacheQuery = false;
rqpsptr->CacheExpiresAfter =
rqpsptr->CacheGuardSeconds =
rqpsptr->CacheMaxKBytes = 0;
}
else
if (mrpsptr->CacheSetting)
{
if (mrpsptr->Cache)
rqpsptr->NoCache = rqpsptr->CacheNoFile = false;
if (mrpsptr->CacheNoCGI)
rqpsptr->CacheCGI = false;
else
if (mrpsptr->CacheCGI)
rqpsptr->CacheCGI = true;
if (mrpsptr->CacheNoCookie)
rqpsptr->CacheCookie = false;
else
if (mrpsptr->CacheCookie)
rqpsptr->CacheCookie = true;
if (mrpsptr->CacheNoFile)
rqpsptr->CacheNoFile = true;
else
if (mrpsptr->CacheFile)
rqpsptr->CacheNoFile = false;
if (mrpsptr->CacheNoNet)
rqpsptr->CacheNet = false;
else
if (mrpsptr->CacheNet)
rqpsptr->CacheNet = true;
if (mrpsptr->CacheNoNPH)
rqpsptr->CacheNPH = false;
else
if (mrpsptr->CacheNPH)
rqpsptr->CacheNPH = true;
if (mrpsptr->CacheNoPermanent)
rqpsptr->CachePermanent = false;
else
if (mrpsptr->CachePermanent)
rqpsptr->CachePermanent = true;
if (mrpsptr->CacheNoQuery)
rqpsptr->CacheQuery = false;
else
if (mrpsptr->CacheQuery)
rqpsptr->CacheQuery = true;
if (mrpsptr->CacheNoScript)
rqpsptr->CacheCGI = rqpsptr->CacheNPH = false;
else
if (mrpsptr->CacheScript)
rqpsptr->CacheCGI = rqpsptr->CacheNPH = true;
if (mrpsptr->CacheNoSSI)
rqpsptr->CacheSSI = false;
else
if (mrpsptr->CacheSSI)
rqpsptr->CacheSSI = true;
if (mrpsptr->CacheExpiresAfter)
{
if (mrpsptr->CacheExpiresAfter == CACHE_EXPIRES_NONE)
rqpsptr->CacheExpiresAfter = 0;
else
rqpsptr->CacheExpiresAfter = mrpsptr->CacheExpiresAfter;
}
if (mrpsptr->CacheGuardSeconds)
{
/* negative 1 indicates to revert to configuration maximum */
if (mrpsptr->CacheGuardSeconds == -1)
rqpsptr->CacheGuardSeconds = 0;
else
rqpsptr->CacheGuardSeconds = mrpsptr->CacheGuardSeconds;
}
if (mrpsptr->CacheMaxKBytes)
{
/* negative 1 indicates to revert to configuration maximum */
if (mrpsptr->CacheMaxKBytes == -1)
rqpsptr->CacheMaxKBytes = 0;
else
rqpsptr->CacheMaxKBytes = mrpsptr->CacheMaxKBytes;
}
}
if (mrpsptr->CgiPlusInCC[0] || mrpsptr->CgiPlusInCC[1])
{
if (mrpsptr->CgiPlusInCC[0])
memcpy (rqpsptr->CgiPlusInCC, mrpsptr->CgiPlusInCC,
sizeof(rqpsptr->CgiPlusInCC));
else
memset (rqpsptr->CgiPlusInCC, 0,
sizeof(rqpsptr->CgiPlusInCC));
}
if (mrpsptr->CgiPlusInNoWriteof)
rqpsptr->CgiPlusInWriteof = false;
else
if (mrpsptr->CgiPlusInWriteof)
rqpsptr->CgiPlusInWriteof = true;
if (mrpsptr->NoDefaultSearch)
rqpsptr->NoDefaultSearch = true;
else
if (mrpsptr->DefaultSearch)
rqpsptr->NoDefaultSearch = false;
if (mrpsptr->ClientAddress)
{
rqpsptr->ClientAddress = mrpsptr->ClientAddress;
if (mrpsptr->ClientAddress == MAPURL_CLIENT_LITERAL)
{
rqpsptr->ClientAddressLiteralPtr =
VmGetHeap (rqptr, mrpsptr->ClientAddressLiteralLength+1);
memcpy (rqpsptr->ClientAddressLiteralPtr,
mrpsptr->ClientAddressLiteralPtr,
mrpsptr->ClientAddressLiteralLength+1);
}
}
if (mrpsptr->DirNoAccess)
{
rqpsptr->DirNoAccess = true;
rqpsptr->DirAccess = rqpsptr->DirAccessSelective = false;
}
else
if (mrpsptr->DirAccess)
{
rqpsptr->DirAccess = true;
rqpsptr->DirNoAccess = rqpsptr->DirAccessSelective = false;
}
else
if (mrpsptr->DirAccessSelective)
{
rqpsptr->DirAccessSelective = true;
rqpsptr->DirAccess = rqpsptr->DirNoAccess = false;
}
if (mrpsptr->DirFont == MAPURL_DIR_FONT_INHERIT)
rqpsptr->DirFont = MAPURL_DIR_FONT_INHERIT;
else
if (mrpsptr->DirFont == MAPURL_DIR_FONT_MONOSPACE)
rqpsptr->DirFont = 0;
if (mrpsptr->DirNoIconLink)
rqpsptr->DirNoIconLink = true;
else
if (mrpsptr->DirIconLink)
rqpsptr->DirNoIconLink = false;
if (mrpsptr->DirNoImpliedWildcard)
rqpsptr->DirNoImpliedWildcard = true;
else
if (mrpsptr->DirImpliedWildcard)
rqpsptr->DirNoImpliedWildcard = false;
if (mrpsptr->DirSort[0])
{
rqpsptr->DirSort[0] = mrpsptr->DirSort[0];
rqpsptr->DirSort[1] = mrpsptr->DirSort[1];
}
if (mrpsptr->DirStyle == MAPURL_DIR_STYLE_DEFAULT ||
mrpsptr->DirStyle == MAPURL_DIR_STYLE_ANCHOR)
rqpsptr->DirStyle = 0;
else
if (mrpsptr->DirStyle)
rqpsptr->DirStyle = mrpsptr->DirStyle;
if (mrpsptr->DirTargetPtr)
{
/* empty string resets */
if (mrpsptr->DirTargetLength)
{
rqpsptr->DirTargetPtr =
VmGetHeap (rqptr, mrpsptr->DirTargetLength+1);
memcpy (rqpsptr->DirTargetPtr,
mrpsptr->DirTargetPtr,
mrpsptr->DirTargetLength+1);
}
else
rqpsptr->DirTargetPtr = NULL;
}
if (mrpsptr->DirThesePtr)
{
/* empty string resets */
if (mrpsptr->DirTheseLength)
{
rqpsptr->DirThesePtr =
VmGetHeap (rqptr, mrpsptr->DirTheseLength+1);
memcpy (rqpsptr->DirThesePtr,
mrpsptr->DirThesePtr,
mrpsptr->DirTheseLength+1);
}
else
rqpsptr->DirThesePtr = NULL;
}
if (mrpsptr->DirTitle == MAPURL_DIR_TITLE_THIS)
{
/* empty string resets */
if (mrpsptr->DirTitleLength)
{
rqpsptr->DirTitle = mrpsptr->DirTitle;
rqpsptr->DirTitlePtr =
VmGetHeap (rqptr, mrpsptr->DirTitleLength+1);
memcpy (rqpsptr->DirTitlePtr,
mrpsptr->DirTitlePtr,
mrpsptr->DirTitleLength+1);
}
else
{
rqpsptr->DirTitle = 0;
rqpsptr->DirTitlePtr = NULL;
}
}
else
if (mrpsptr->DirTitle)
rqpsptr->DirTitle = mrpsptr->DirTitle;
if (mrpsptr->DirNoWildcard)
{
rqpsptr->DirNoWildcard = true;
rqpsptr->DirWildcard = false;
}
else
if (mrpsptr->DirWildcard)
{
rqpsptr->DirNoWildcard = false;
rqpsptr->DirWildcard = true;
}
/* negative 1 indicates to revert to zero */
if (mrpsptr->DirVersionsOf)
rqpsptr->DirVersionsOf = mrpsptr->DirVersionsOf;
if (mrpsptr->DirNoWildcard)
{
rqpsptr->DirNoWildcard = true;
rqpsptr->DirWildcard = false;
}
else
if (mrpsptr->DirWildcard)
{
rqpsptr->DirNoWildcard = false;
rqpsptr->DirWildcard = true;
}
if (mrpsptr->NoExpired)
rqpsptr->Expired = false;
else
if (mrpsptr->Expired)
rqpsptr->Expired = true;
if (mrpsptr->NoHtmlEquals)
{
rqpsptr->HtmlBodyTagPtr =
rqpsptr->HtmlFooterPtr =
rqpsptr->HtmlFooterTagPtr =
rqpsptr->HtmlHeaderPtr =
rqpsptr->HtmlHeaderTagPtr = NULL;
}
if (mrpsptr->HtmlBodyTagPtr)
{
/* empty string resets */
if (mrpsptr->HtmlBodyTagLength)
{
rqpsptr->HtmlBodyTagPtr =
VmGetHeap (rqptr, mrpsptr->HtmlBodyTagLength+1);
memcpy (rqpsptr->HtmlBodyTagPtr,
mrpsptr->HtmlBodyTagPtr,
mrpsptr->HtmlBodyTagLength+1);
}
else
rqpsptr->HtmlBodyTagPtr = NULL;
}
if (mrpsptr->HtmlFooterPtr)
{
/* empty string resets */
if (mrpsptr->HtmlFooterLength)
{
rqpsptr->HtmlFooterPtr =
VmGetHeap (rqptr, mrpsptr->HtmlFooterLength+1);
memcpy (rqpsptr->HtmlFooterPtr,
mrpsptr->HtmlFooterPtr,
mrpsptr->HtmlFooterLength+1);
}
else
rqpsptr->HtmlFooterPtr = NULL;
}
if (mrpsptr->HtmlFooterTagPtr)
{
/* empty string resets */
if (mrpsptr->HtmlFooterTagLength)
{
rqpsptr->HtmlFooterTagPtr =
VmGetHeap (rqptr, mrpsptr->HtmlFooterTagLength+1);
memcpy (rqpsptr->HtmlFooterTagPtr,
mrpsptr->HtmlFooterTagPtr,
mrpsptr->HtmlFooterTagLength+1);
}
else
rqpsptr->HtmlFooterTagPtr = NULL;
}
if (mrpsptr->HtmlHeaderPtr)
{
/* empty string resets */
if (mrpsptr->HtmlHeaderLength)
{
rqpsptr->HtmlHeaderPtr =
VmGetHeap (rqptr, mrpsptr->HtmlHeaderLength+1);
memcpy (rqpsptr->HtmlHeaderPtr,
mrpsptr->HtmlHeaderPtr,
mrpsptr->HtmlHeaderLength+1);
}
else
rqpsptr->HtmlHeaderPtr = NULL;
}
if (mrpsptr->HtmlHeaderTagPtr)
{
/* empty string resets */
if (mrpsptr->HtmlHeaderTagLength)
{
rqpsptr->HtmlHeaderTagPtr =
VmGetHeap (rqptr, mrpsptr->HtmlHeaderTagLength+1);
memcpy (rqpsptr->HtmlHeaderTagPtr,
mrpsptr->HtmlHeaderTagPtr,
mrpsptr->HtmlHeaderTagLength+1);
}
else
rqpsptr->HtmlHeaderTagPtr = NULL;
}
if (HTTP2_REQUEST(rqptr))
{
/* if HTTP/2 request */
if (mrpsptr->Http2MaxStreams)
rqpsptr->Http2MaxStreams = mrpsptr->Http2MaxStreams;
if (mrpsptr->Http2SendGoAway)
rqpsptr->Http2SendGoAway = mrpsptr->Http2SendGoAway;
if (mrpsptr->Http2SendPing) rqpsptr->Http2SendPing = true;
if (mrpsptr->Http2SendReset)
rqpsptr->Http2SendReset = mrpsptr->Http2SendReset;
if (mrpsptr->Http2ToHttp11) rqpsptr->Http2ToHttp11 = true;
if (mrpsptr->Http2WriteQueue)
rqpsptr->Http2WriteQueue = mrpsptr->Http2WriteQueue;
}
if (mrpsptr->NoLog)
rqpsptr->NoLog = true;
else
if (mrpsptr->Log)
rqpsptr->NoLog = false;
if (mrpsptr->MapNonEmpty)
rqpsptr->MapEmpty = false;
else
if (mrpsptr->MapEmpty)
rqpsptr->MapEmpty = true;
if (mrpsptr->MapExtensionMethod)
rqpsptr->MapExtensionMethod = true;
else
if (mrpsptr->MapExtensionMethod)
rqpsptr->MapExtensionMethod = false;
if (mrpsptr->MapOnce)
rqpsptr->MapOnce = true;
else
if (mrpsptr->NoMapOnce)
rqpsptr->MapOnce = false;
if (mrpsptr->MapUri) rqpsptr->MapUri = true;
if (mrpsptr->PrivSsi)
rqpsptr->PrivSsi = true;
else
if (mrpsptr->NoPrivSsi)
rqpsptr->PrivSsi = false;
if (mrpsptr->NoProfile)
rqpsptr->NoProfile = true;
else
if (mrpsptr->Profile)
rqpsptr->NoProfile = false;
if (mrpsptr->ProxyNoAffinity)
rqpsptr->ProxyAffinity = false;
else
if (mrpsptr->ProxyAffinity)
rqpsptr->ProxyAffinity = true;
if (mrpsptr->ProxyForwardedBy)
rqpsptr->ProxyForwardedBy = mrpsptr->ProxyForwardedBy;
if (mrpsptr->ProxyXForwardedFor)
rqpsptr->ProxyXForwardedFor = mrpsptr->ProxyXForwardedFor;
if (mrpsptr->NoProxyReverseVerify)
rqpsptr->ProxyReverseVerify = false;
else
if (mrpsptr->ProxyReverseVerify)
rqpsptr->ProxyReverseVerify = true;
if (mrpsptr->NoProxyReverseAuthHeader)
rqpsptr->ProxyReverseNoAuthHeader = true;
else
if (mrpsptr->ProxyReverseAuthHeader)
rqpsptr->ProxyReverseNoAuthHeader = false;
if (mrpsptr->ProxyTunnelRequestLength)
{
rqpsptr->ProxyTunnelRequestPtr =
VmGetHeap (rqptr, mrpsptr->ProxyTunnelRequestLength);
memcpy (rqpsptr->ProxyTunnelRequestPtr,
mrpsptr->ProxyTunnelRequestPtr,
mrpsptr->ProxyTunnelRequestLength);
rqpsptr->ProxyTunnelRequestLength = mrpsptr->ProxyTunnelRequestLength;
}
if (mrpsptr->NoProxyUnknownRequestFields)
rqpsptr->ProxyUnknownRequestFields = false;
else
if (mrpsptr->ProxyUnknownRequestFields)
rqpsptr->ProxyUnknownRequestFields = true;
if (mrpsptr->ProxyHeaderCount)
{
rqpsptr->ProxyHeaderCount = mrpsptr->ProxyHeaderCount;
for (int idx = 0; idx < mrpsptr->ProxyHeaderCount; idx++)
{
rqpsptr->ProxyHeader[idx] =
VmGetHeap (rqptr, strlen(mrpsptr->ProxyHeader[idx]));
strcpy (rqpsptr->ProxyHeader[idx], mrpsptr->ProxyHeader[idx]);
}
}
if (mrpsptr->PutRFM) rqpsptr->PutRFM = mrpsptr->PutRFM;
if (mrpsptr->PutMaxKbytes) rqpsptr->PutMaxKbytes = mrpsptr->PutMaxKbytes;
if (mrpsptr->RegexSyntax)
if ((rqpsptr->RegexSyntax = mrpsptr->RegexSyntax) == -1)
rqpsptr->RegexSyntax = 0;
if (mrpsptr->ReportType) rqpsptr->ReportType = mrpsptr->ReportType;
if (mrpsptr->Report400as)
rqpsptr->Report400as = mrpsptr->Report400as;
if (mrpsptr->Report403as)
rqpsptr->Report403as = mrpsptr->Report403as;
if (mrpsptr->Report404as)
rqpsptr->Report404as = mrpsptr->Report404as;
if (mrpsptr->ResponseGzip)
rqpsptr->ResponseGzip = mrpsptr->ResponseGzip;
if (mrpsptr->Response200is203)
rqpsptr->Response200is203 = mrpsptr->Response200is203;
if (mrpsptr->ResponseNoChunked)
rqpsptr->ResponseNoChunked = true;
else
if (mrpsptr->ResponseChunked)
rqpsptr->ResponseNoChunked = false;
if (mrpsptr->ResponseHeaderNone)
rqpsptr->ResponseHeaderNone = true;
else
if (mrpsptr->ResponseHeaderBegin)
rqpsptr->ResponseHeaderBegin = true;
else
if (mrpsptr->ResponseHeaderFull)
rqpsptr->ResponseHeaderBegin =
rqpsptr->ResponseHeaderNone = false;
if (mrpsptr->ResponseHttpNoOriginal)
rqpsptr->ResponseHttpOriginal = false;
else
if (mrpsptr->ResponseHttpOriginal)
rqpsptr->ResponseHttpOriginal = true;
if (mrpsptr->ScriptBodyNoDecode)
rqpsptr->ScriptBodyDecode = false;
else
if (mrpsptr->ScriptBodyDecode)
rqpsptr->ScriptBodyDecode = true;
if (mrpsptr->ScriptSymbolNoTruncate)
rqpsptr->ScriptSymbolTruncate = false;
else
if (mrpsptr->ScriptSymbolTruncate)
rqpsptr->ScriptSymbolTruncate = true;
if (mrpsptr->ScriptSyntaxNoUnix)
rqpsptr->ScriptSyntaxUnix = false;
else
if (mrpsptr->ScriptSyntaxUnix)
rqpsptr->ScriptSyntaxUnix = true;
/* careful! this one's a little back-to-front */
if (mrpsptr->ScriptFind)
rqpsptr->ScriptNoFind = false;
else
if (mrpsptr->ScriptNoFind)
rqpsptr->ScriptNoFind = true;
if (mrpsptr->ScriptNoPathFind)
rqpsptr->ScriptPathFind = false;
else
if (mrpsptr->ScriptPathFind)
rqpsptr->ScriptPathFind = true;
if (mrpsptr->ScriptNoQueryNone)
rqpsptr->ScriptQueryNone = false;
else
if (mrpsptr->ScriptQueryNone)
rqpsptr->ScriptQueryNone = true;
if (mrpsptr->ScriptNoQueryRelaxed)
rqpsptr->ScriptQueryRelaxed = false;
else
if (mrpsptr->ScriptQueryRelaxed)
rqpsptr->ScriptQueryRelaxed = true;
if (mrpsptr->AccessNoProfile)
rqpsptr->AccessProfile = false;
else
if (mrpsptr->AccessProfile)
rqpsptr->AccessProfile = true;
if (mrpsptr->AccessNoRead)
rqpsptr->AccessRead = false;
else
if (mrpsptr->AccessRead)
rqpsptr->AccessRead = true;
if (mrpsptr->AccessNoServer)
rqpsptr->AccessServer = false;
else
if (mrpsptr->AccessServer)
rqpsptr->AccessServer = true;
if (mrpsptr->AccessNoWrite)
rqpsptr->AccessWrite = false;
else
if (mrpsptr->AccessWrite)
rqpsptr->AccessWrite = true;
if (mrpsptr->WebDavNoAll)
rqpsptr->WebDavAll = false;
else
if (mrpsptr->WebDavAll)
rqpsptr->WebDavAll = true;
if (mrpsptr->WebDavNoAuth)
rqpsptr->WebDavAuth = false;
else
if (mrpsptr->WebDavAuth)
rqpsptr->WebDavAuth = true;
if (mrpsptr->WebDavNoHidden)
rqpsptr->WebDavNoHidden = true;
else
if (mrpsptr->WebDavHidden)
rqpsptr->WebDavNoHidden = false;
if (mrpsptr->WebDavNoLock)
rqpsptr->WebDavNoLock = true;
else
if (mrpsptr->WebDavLock)
rqpsptr->WebDavNoLock = false;
/* allowed to be an empty string (suppresses directory) */
if (mrpsptr->WebDavMetaDirPtr)
{
rqpsptr->WebDavMetaDirPtr =
VmGetHeap (rqptr, mrpsptr->WebDavMetaDirLength+1);
memcpy (rqpsptr->WebDavMetaDirPtr,
mrpsptr->WebDavMetaDirPtr,
mrpsptr->WebDavMetaDirLength+1);
}
if (mrpsptr->WebDavNoProfile)
rqpsptr->WebDavProfile = false;
else
if (mrpsptr->WebDavProfile)
rqpsptr->WebDavProfile = true;
if (mrpsptr->WebDavNoProp)
rqpsptr->WebDavNoProp = true;
else
if (mrpsptr->WebDavProp)
rqpsptr->WebDavNoProp = false;
if (mrpsptr->WebDavNoPutLock)
rqpsptr->WebDavPutLock = false;
else
if (mrpsptr->WebDavPutLock)
rqpsptr->WebDavPutLock = true;
if (mrpsptr->WebDavNoRead)
rqpsptr->WebDavRead = false;
else
if (mrpsptr->WebDavRead)
rqpsptr->WebDavRead = true;
if (mrpsptr->WebDavNoServer)
rqpsptr->WebDavServer = false;
else
if (mrpsptr->WebDavServer)
rqpsptr->WebDavServer = true;
if (mrpsptr->WebDavNoWinProp)
rqpsptr->WebDavNoWinProp = true;
else
if (mrpsptr->WebDavWinProp)
rqpsptr->WebDavNoWinProp = false;
if (mrpsptr->WebDavNoWrite)
rqpsptr->WebDavWrite = false;
else
if (mrpsptr->WebDavWrite)
rqpsptr->WebDavWrite = true;
if (mrpsptr->WebDavLockTimeoutDefault)
rqpsptr->WebDavLockTimeoutDefault = mrpsptr->WebDavLockTimeoutDefault;
if (mrpsptr->WebDavLockTimeoutMax)
rqpsptr->WebDavLockTimeoutMax = mrpsptr->WebDavLockTimeoutMax;
if (mrpsptr->WebSocketInputSize)
rqpsptr->WebSocketInputSize = mrpsptr->WebSocketInputSize;
if (mrpsptr->WebSocketOutputSize)
rqpsptr->WebSocketOutputSize = mrpsptr->WebSocketOutputSize;
if (rqpsptr->ThrottleSet &&
mrpsptr->ThrottleNoSet)
{
/* reset a previously mapped throttle */
rqpsptr->ThrottleSet = false;
rqpsptr->ThrottleBusy =
rqpsptr->ThrottleFrom =
rqpsptr->ThrottleIndex =
rqpsptr->ThrottlePerUser =
rqpsptr->ThrottleResume =
rqpsptr->ThrottleTo =
rqpsptr->ThrottleTimeoutBusy =
rqpsptr->ThrottleTimeoutQueue = 0;
}
else
if (!rqpsptr->ThrottleSet &&
mrpsptr->ThrottleSet)
{
/* only if it hasn't been set in any previous pass */
rqpsptr->ThrottleSet = true;
rqpsptr->ThrottleBusy = mrpsptr->ThrottleBusy;
rqpsptr->ThrottleFrom = mrpsptr->ThrottleFrom;
rqpsptr->ThrottleIndex = mrpsptr->ThrottleIndex;
rqpsptr->ThrottlePerUser = mrpsptr->ThrottlePerUser;
rqpsptr->ThrottleResume = mrpsptr->ThrottleResume;
rqpsptr->ThrottleTo = mrpsptr->ThrottleTo;
rqpsptr->ThrottleTimeoutBusy = mrpsptr->ThrottleTimeoutBusy;
rqpsptr->ThrottleTimeoutQueue = mrpsptr->ThrottleTimeoutQueue;
}
/* only if they haven't been set in any previous pass */
if (!rqpsptr->ScriptBitBucketTimeout)
rqpsptr->ScriptBitBucketTimeout = mrpsptr->ScriptBitBucketTimeout;
if (!rqpsptr->ScriptCpuMax)
rqpsptr->ScriptCpuMax = mrpsptr->ScriptCpuMax;
if (!rqpsptr->ScriptLifeTime)
rqpsptr->ScriptLifeTime = mrpsptr->ScriptLifeTime;
/* hmmm, bit of a kludge (but easy) */
if (mrpsptr->TimeoutPersistent < 0)
rqptr->PersistentRequest = false;
else
rqpsptr->TimeoutPersistent = mrpsptr->TimeoutPersistent;
if (!rqpsptr->TimeoutNoProgress)
rqpsptr->TimeoutNoProgress = mrpsptr->TimeoutNoProgress;
if (!rqpsptr->TimeoutOutput)
rqpsptr->TimeoutOutput = mrpsptr->TimeoutOutput;
if (mrpsptr->NoStmLF)
rqpsptr->StmLF = false;
else
if (mrpsptr->StmLF)
rqpsptr->StmLF = true;
if (mrpsptr->SSLCGIvar)
{
if (rqpsptr->SSLCGIvar == SESOLA_CGI_VAR_NONE)
rqpsptr->SSLCGIvar = 0;
else
rqpsptr->SSLCGIvar = mrpsptr->SSLCGIvar;
}
if (mrpsptr->PathOds) rqpsptr->PathOds = mrpsptr->PathOds;
if (mrpsptr->OdsName)
if (mrpsptr->OdsName == MAPURL_ODS_DEFAULT)
rqpsptr->OdsName = 0;
else
rqpsptr->OdsName = mrpsptr->OdsName;
/* allowed to be an empty string */
if (mrpsptr->CgiPrefixPtr)
{
rqpsptr->CgiPrefixPtr =
VmGetHeap (rqptr, mrpsptr->CgiPrefixLength+1);
memcpy (rqpsptr->CgiPrefixPtr,
mrpsptr->CgiPrefixPtr,
mrpsptr->CgiPrefixLength+1);
}
/* allowed to be an empty string (suppresses charset) */
if (mrpsptr->CharsetPtr)
{
rqpsptr->CharsetPtr =
VmGetHeap (rqptr, mrpsptr->CharsetLength+1);
memcpy (rqpsptr->CharsetPtr,
mrpsptr->CharsetPtr,
mrpsptr->CharsetLength+1);
}
/* empty string resets (reverts type, must have a content type) */
if (mrpsptr->ContentTypePtr)
{
if (mrpsptr->ContentTypeLength)
{
rqpsptr->ContentTypePtr =
VmGetHeap (rqptr, mrpsptr->ContentTypeLength+1);
memcpy (rqpsptr->ContentTypePtr,
mrpsptr->ContentTypePtr,
mrpsptr->ContentTypeLength+1);
}
else
rqpsptr->ContentTypePtr = NULL;
}
/* allowed to be an empty string (suppresses charset) */
if (mrpsptr->DirCharsetPtr)
{
rqpsptr->DirCharsetPtr =
VmGetHeap (rqptr, mrpsptr->DirCharsetLength+1);
memcpy (rqpsptr->DirCharsetPtr,
mrpsptr->DirCharsetPtr,
mrpsptr->DirCharsetLength+1);
}
if (mrpsptr->CgiVarPtr)
{
MetaConDictionary (rqptr, mrpsptr->CgiVarPtr);
if (WATCHPNT(rqptr) && (WATCH_CATEGORY(WATCH_MAPPING) &&
WATCH_CATEGORY(WATCH_INTERNAL)))
DictWatch (rqptr->rqDictPtr, DICT_TYPE_CONFIG, "*");
}
/* allowed to be an empty string */
if (mrpsptr->HttpAcceptCharsetPtr)
{
if (mrpsptr->HttpAcceptCharsetPtr[0])
{
rqptr->rqHeader.AcceptCharsetPtr =
VmGetHeap (rqptr, mrpsptr->HttpAcceptCharsetLength+1);
memcpy (rqptr->rqHeader.AcceptCharsetPtr,
mrpsptr->HttpAcceptCharsetPtr,
mrpsptr->HttpAcceptCharsetLength+1);
}
else
{
/* empty, as if it had never been part of the request header */
rqptr->rqHeader.AcceptCharsetPtr = NULL;
}
}
/* allowed to be an empty string */
if (mrpsptr->HttpAcceptLangPtr)
{
if (mrpsptr->HttpAcceptLangPtr[0])
{
rqptr->rqHeader.AcceptLangPtr =
VmGetHeap (rqptr, mrpsptr->HttpAcceptLangLength+1);
memcpy (rqptr->rqHeader.AcceptLangPtr,
mrpsptr->HttpAcceptLangPtr,
mrpsptr->HttpAcceptLangLength+1);
}
else
{
/* empty, as if it had never been part of the request header */
rqptr->rqHeader.AcceptLangPtr = NULL;
}
}
if (mrpsptr->IndexPtr)
{
/* empty string resets */
if (mrpsptr->IndexLength)
{
rqpsptr->IndexPtr =
VmGetHeap (rqptr, mrpsptr->IndexLength+1);
memcpy (rqpsptr->IndexPtr,
mrpsptr->IndexPtr,
mrpsptr->IndexLength+1);
}
else
rqpsptr->IndexPtr = NULL;
}
if (mrpsptr->DictionaryPtr)
{
MetaConDictionary (rqptr, mrpsptr->DictionaryPtr);
if (WATCHPNT(rqptr) && (WATCH_CATEGORY(WATCH_MAPPING) &&
WATCH_CATEGORY(WATCH_INTERNAL)))
DictWatch (rqptr->rqDictPtr, DICT_TYPE_CONFIG, "*");
}
if (mrpsptr->NotePadPtr)
{
if (WATCHING (rqptr, WATCH_MAPPING))
{
MetaConNotePad (rqptr, mrpsptr->NotePadPtr, true);
WatchThis (WATCHITM(rqptr), WATCH_MAPPING, "NOTEPAD !AZ",
rqptr->NotePadPtr != NULL ? rqptr->NotePadPtr : "(empty)");
}
else
MetaConNotePad (rqptr, mrpsptr->NotePadPtr, false);
}
if (mrpsptr->ProxyReverseLocationPtr)
{
/* empty string resets */
if (mrpsptr->ProxyReverseLocationLength)
{
rqpsptr->ProxyReverseLocationPtr =
VmGetHeap (rqptr, mrpsptr->ProxyReverseLocationLength+1);
memcpy (rqpsptr->ProxyReverseLocationPtr,
mrpsptr->ProxyReverseLocationPtr,
mrpsptr->ProxyReverseLocationLength+1);
}
else
rqpsptr->ProxyReverseLocationPtr = NULL;
}
if (mrpsptr->ProxyReworkPtr)
{
/* empty string resets */
if (mrpsptr->ProxyReworkLength)
{
rqpsptr->ProxyReworkPtr =
VmGetHeap (rqptr, mrpsptr->ProxyReworkLength+1);
memcpy (rqpsptr->ProxyReworkPtr,
mrpsptr->ProxyReworkPtr,
mrpsptr->ProxyReworkLength+1);
}
else
rqpsptr->ProxyReworkPtr = NULL;
}
/* query string is allowed to be set empty */
if (mrpsptr->QueryStringPtr)
{
if (rqptr->rqHeader.QueryStringLength < mrpsptr->QueryStringLength)
rqptr->rqHeader.QueryStringPtr =
VmGetHeap (rqptr, mrpsptr->QueryStringLength+1);
memcpy (rqptr->rqHeader.QueryStringPtr,
mrpsptr->QueryStringPtr,
mrpsptr->QueryStringLength+1);
rqptr->rqHeader.QueryStringLength = mrpsptr->QueryStringLength;
}
/* also see DCL callout "CSP:" */
if (mrpsptr->ResponseCspLength < 0)
{
rqpsptr->ResponseCspPtr = NULL;
rqpsptr->ResponseCspLength = 0;
}
else
if (length = mrpsptr->ResponseCspLength)
{
cptr = mrpsptr->ResponseCspPtr;
rqpsptr->ResponseCspPtr = sptr =
VmReallocHeap (rqptr, rqpsptr->ResponseCspPtr,
rqpsptr->ResponseCspLength + length+2, FI_LI);
if (rqpsptr->ResponseCspLength)
{
sptr += rqpsptr->ResponseCspLength;
*sptr++ = ' ';
}
memcpy (sptr, cptr, length);
sptr += length;
rqpsptr->ResponseCspLength = sptr - rqpsptr->ResponseCspPtr;
}
/* also see DCL callout "CSPRO:" */
if (mrpsptr->ResponseCsproLength < 0)
{
rqpsptr->ResponseCsproPtr = NULL;
rqpsptr->ResponseCsproLength = 0;
}
else
if (length = mrpsptr->ResponseCsproLength)
{
cptr = mrpsptr->ResponseCsproPtr;
rqpsptr->ResponseCsproPtr = sptr =
VmReallocHeap (rqptr, rqpsptr->ResponseCsproPtr,
rqpsptr->ResponseCsproLength + length+2, FI_LI);
if (rqpsptr->ResponseCsproLength)
{
sptr += rqpsptr->ResponseCsproLength;
*sptr++ = ' ';
}
memcpy (sptr, cptr, length);
sptr += length;
rqpsptr->ResponseCsproLength = sptr - rqpsptr->ResponseCsproPtr;
}
/* leave this in for backward compatibility (but use empty string) */
if (mrpsptr->ResponseHeaderNoAdd)
{
rqpsptr->ResponseHeaderAddPtr = NULL;
rqpsptr->ResponseHeaderAddLength = 0;
}
if (mrpsptr->ResponseHeaderAddPtr &&
!mrpsptr->ResponseHeaderAddLength)
{
/* empty string resets */
rqpsptr->ResponseHeaderAddPtr = NULL;
rqpsptr->ResponseHeaderAddLength = 0;
}
else
if (length = mrpsptr->ResponseHeaderAddLength)
{
cptr = mrpsptr->ResponseHeaderAddPtr;
rqpsptr->ResponseHeaderAddPtr = sptr =
VmReallocHeap (rqptr, rqpsptr->ResponseHeaderAddPtr,
rqpsptr->ResponseHeaderAddLength +
mrpsptr->ResponseHeaderAddLength+2, FI_LI);
sptr += rqpsptr->ResponseHeaderAddLength;
memcpy (sptr, cptr, length);
sptr += length;
SET2(sptr,'\n\0');
sptr++;
rqpsptr->ResponseHeaderAddLength = sptr - rqpsptr->ResponseHeaderAddPtr;
}
if (mrpsptr->ResponseVarRecord)
{
if (mrpsptr->ResponseVarRecord == FILE_VAR_DEFAULT)
rqpsptr->ResponseVarRecord = 0;
else
rqpsptr->ResponseVarRecord = mrpsptr->ResponseVarRecord;
}
if (mrpsptr->ResponseStrictTransSecPtr)
{
/* must start with an integer or suppresses header */
if (mrpsptr->ResponseStrictTransSecLength)
{
rqpsptr->ResponseStrictTransSecPtr =
VmGetHeap (rqptr, mrpsptr->ResponseStrictTransSecLength+1);
memcpy (rqpsptr->ResponseStrictTransSecPtr,
mrpsptr->ResponseStrictTransSecPtr,
mrpsptr->ResponseStrictTransSecLength+1);
}
else
rqpsptr->ResponseStrictTransSecPtr = NULL;
}
if (mrpsptr->ScriptCommandPtr)
{
/* empty string resets */
if (mrpsptr->ScriptCommandLength)
{
rqpsptr->ScriptCommandPtr =
VmGetHeap (rqptr, mrpsptr->ScriptCommandLength+1);
memcpy (rqpsptr->ScriptCommandPtr,
mrpsptr->ScriptCommandPtr,
mrpsptr->ScriptCommandLength+1);
}
else
rqpsptr->ScriptCommandPtr = NULL;
}
if (mrpsptr->ScriptControlPtr)
{
/* empty string resets */
if (mrpsptr->ScriptControlLength)
{
rqpsptr->ScriptControlPtr =
VmGetHeap (rqptr, mrpsptr->ScriptControlLength+1);
memcpy (rqpsptr->ScriptControlPtr,
mrpsptr->ScriptControlPtr,
mrpsptr->ScriptControlLength+1);
}
else
rqpsptr->ScriptControlPtr = NULL;
}
if (mrpsptr->ScriptDefaultPtr)
{
/* empty string resets */
if (mrpsptr->ScriptDefaultLength)
{
rqpsptr->ScriptDefaultPtr =
VmGetHeap (rqptr, mrpsptr->ScriptDefaultLength+1);
memcpy (rqpsptr->ScriptDefaultPtr,
mrpsptr->ScriptDefaultPtr,
mrpsptr->ScriptDefaultLength+1);
}
else
rqpsptr->ScriptDefaultPtr = NULL;
}
if (mrpsptr->ScriptParamsPtr &&
!mrpsptr->ScriptParamsLength)
{
/* empty string resets */
mrpsptr->ScriptParamsPtr = NULL;
mrpsptr->ScriptParamsLength = 0;
}
else
if (mrpsptr->ScriptParamsPtr)
{
rqpsptr->ScriptParamsPtr = sptr =
VmReallocHeap (rqptr, rqpsptr->ScriptParamsPtr,
rqpsptr->ScriptParamsLength +
mrpsptr->ScriptParamsLength+1, FI_LI);
sptr += rqpsptr->ScriptParamsLength;
cptr = mrpsptr->ScriptParamsPtr;
length = mrpsptr->ScriptParamsLength;
if (*cptr == '+')
{
cptr++;
length--;
}
memcpy (sptr, cptr, length);
rqpsptr->ScriptParamsLength += length;
}
if (mrpsptr->ChangeServicePtr)
{
/* empty string resets */
if (mrpsptr->ChangeServiceLength)
{
rqpsptr->ChangeServicePtr =
VmGetHeap (rqptr, mrpsptr->ChangeServiceLength+1);
memcpy (rqpsptr->ChangeServicePtr,
mrpsptr->ChangeServicePtr,
mrpsptr->ChangeServiceLength+1);
}
else
rqpsptr->ChangeServicePtr = NULL;
}
if (mrpsptr->SsiExecPtr)
{
/* empty string resets */
if (mrpsptr->SsiExecLength)
{
rqpsptr->SsiExecPtr =
VmGetHeap (rqptr, mrpsptr->SsiExecLength+1);
memcpy (rqpsptr->SsiExecPtr,
mrpsptr->SsiExecPtr,
mrpsptr->SsiExecLength+1);
}
else
rqpsptr->SsiExecPtr = NULL;
}
if (mrpsptr->StyleSheetPtr)
{
/* empty string resets */
if (mrpsptr->StyleSheetLength)
{
rqpsptr->StyleSheetPtr =
VmGetHeap (rqptr, mrpsptr->StyleSheetLength+1);
memcpy (rqpsptr->StyleSheetPtr,
mrpsptr->StyleSheetPtr,
mrpsptr->StyleSheetLength+1);
}
else
rqpsptr->StyleSheetPtr = NULL;
}
if (mrpsptr->CorsNoAllowCredentials)
rqpsptr->CorsAllowCredentials = false;
else
if (mrpsptr->CorsAllowCredentials)
rqpsptr->CorsAllowCredentials = true;
if (mrpsptr->CorsAllowHeadersPtr)
{
/* empty string resets */
if (mrpsptr->CorsAllowHeadersLength)
{
rqpsptr->CorsAllowHeadersPtr =
VmGetHeap (rqptr, mrpsptr->CorsAllowHeadersLength+1);
memcpy (rqpsptr->CorsAllowHeadersPtr,
mrpsptr->CorsAllowHeadersPtr,
mrpsptr->CorsAllowHeadersLength+1);
}
else
rqpsptr->CorsAllowHeadersPtr = NULL;
}
if (mrpsptr->CorsAllowMethodsPtr)
{
/* empty string resets */
if (mrpsptr->CorsAllowMethodsLength)
{
rqpsptr->CorsAllowMethodsPtr =
VmGetHeap (rqptr, mrpsptr->CorsAllowMethodsLength+1);
memcpy (rqpsptr->CorsAllowMethodsPtr,
mrpsptr->CorsAllowMethodsPtr,
mrpsptr->CorsAllowMethodsLength+1);
}
else
rqpsptr->CorsAllowMethodsPtr = NULL;
}
if (mrpsptr->CorsAllowOriginPtr)
{
/* empty string resets */
if (mrpsptr->CorsAllowOriginLength)
{
rqpsptr->CorsAllowOriginPtr =
VmGetHeap (rqptr, mrpsptr->CorsAllowOriginLength+1);
memcpy (rqpsptr->CorsAllowOriginPtr,
mrpsptr->CorsAllowOriginPtr,
mrpsptr->CorsAllowOriginLength+1);
}
else
rqpsptr->CorsAllowOriginPtr = NULL;
}
if (mrpsptr->CorsExposeHeadersPtr)
{
/* empty string resets */
if (mrpsptr->CorsExposeHeadersLength)
{
rqpsptr->CorsExposeHeadersPtr =
VmGetHeap (rqptr, mrpsptr->CorsExposeHeadersLength+1);
memcpy (rqpsptr->CorsExposeHeadersPtr,
mrpsptr->CorsExposeHeadersPtr,
mrpsptr->CorsExposeHeadersLength+1);
}
else
rqpsptr->CorsExposeHeadersPtr = NULL;
}
if (mrpsptr->CorsMaxAge)
{
/* negative 1 indicates to revert to configuration maximum */
if (mrpsptr->CorsMaxAge == -1)
rqpsptr->CorsMaxAge = 0;
else
rqpsptr->CorsMaxAge = mrpsptr->CorsMaxAge;
}
if (IPADDRESS_IS_RESET(&rqpsptr->ProxyBindIpAddress) &&
IPADDRESS_IS_SET(&mrpsptr->ProxyBindIpAddress))
rqpsptr->ProxyBindIpAddress = mrpsptr->ProxyBindIpAddress;
if (IPADDRESS_IS_RESET(&rqpsptr->ProxyChainIpAddress) &&
IPADDRESS_IS_SET(&mrpsptr->ProxyChainIpAddress))
{
IPADDRESS_COPY (&rqpsptr->ProxyChainIpAddress,
&mrpsptr->ProxyChainIpAddress);
rqpsptr->ProxyChainPort = mrpsptr->ProxyChainPort;
if (mrpsptr->ProxyChainHostPortPtr &&
mrpsptr->ProxyChainHostPortPtr[0])
{
rqpsptr->ProxyChainHostPortPtr =
VmGetHeap (rqptr, mrpsptr->ProxyChainHostPortLength+1);
memcpy (rqpsptr->ProxyChainHostPortPtr,
mrpsptr->ProxyChainHostPortPtr,
mrpsptr->ProxyChainHostPortLength+1);
}
}
if (mrpsptr->ProxyChainCredPtr)
{
/* empty string resets */
if (mrpsptr->ProxyChainCredLength)
{
rqpsptr->ProxyChainCredPtr =
VmGetHeap (rqptr, mrpsptr->ProxyChainCredLength+1);
memcpy (rqpsptr->ProxyChainCredPtr,
mrpsptr->ProxyChainCredPtr,
mrpsptr->ProxyChainCredLength+1);
}
else
rqpsptr->ProxyChainCredPtr = NULL;
}
}
/*****************************************************************************/
/*
Display mapping rules used to resolve the path in the query string. Called
from the Request.c modules. For HTTP report, uses blocking network write.
There are a number of intermediate FaolToBuffer()s. This was done only to make
the format strings a bit easier to manage.
*/
char* MapSetExplain
(
REQUEST_STRUCT *rqptr,
MAP_RULE_META *mrptr
)
{
static char Buffer [MAP_BUFFER_SIZE];
int blen, status;
unsigned short slen;
unsigned long FaoVector [32];
unsigned long *vecptr;
char *bptr;
char FaoString [1024],
RegexNumString [32];
MAP_SET_META *mrpsptr;
/*********/
/* begin */
/*********/
if (WATCHMOD (rqptr, WATCH_MOD_MAPURL))
WatchThis (WATCHITM(rqptr), WATCH_MOD_MAPURL, "MapSetExplain()");
bptr = Buffer;
blen = sizeof(Buffer);
mrpsptr = &mrptr->mpPathSet;
vecptr = FaoVector;
FaoString[0] = 0;
if (mrpsptr->NoAcceptLang)
strcat (FaoString, " NOaccept=LANG");
else
if (mrpsptr->AcceptLangChar)
{
strcat (FaoString, " accept=LANG=(default=!AZ,char=!&C,!&?type\rname\r)");
if (mrpsptr->AcceptLangPtr)
*vecptr++ = mrpsptr->AcceptLangPtr;
else
*vecptr++ = "";
*vecptr++ = mrpsptr->AcceptLangChar;
*vecptr++ = mrpsptr->AcceptLangTypeVariant;
}
if (mrpsptr->NoAlert)
strcat (FaoString, " NOALERT");
else
if (mrpsptr->Alert == MAPURL_PATH_ALERT_END)
strcat (FaoString, " ALERT=end");
else
if (mrpsptr->Alert == MAPURL_PATH_ALERT_AUTH)
strcat (FaoString, " ALERT=auth");
else
if (mrpsptr->Alert == MAPURL_PATH_ALERT_MAP)
strcat (FaoString, " ALERT=map");
else
if (mrpsptr->Alert)
{
strcat (FaoString, " ALERT=!UL");
*vecptr++ = mrpsptr->Alert;
}
if (mrpsptr->NoAuthAll)
strcat (FaoString, " NOauth=ALL");
else
if (mrpsptr->AuthAll)
strcat (FaoString, " auth=ALL");
if (mrpsptr->NoAuthMapped)
strcat (FaoString, " NOauth=MAPPED");
else
if (mrpsptr->AuthMapped)
strcat (FaoString, " auth=MAPPED");
if (mrpsptr->NoAuthOnce)
strcat (FaoString, " NOauth=ONCE");
else
if (mrpsptr->AuthOnce)
strcat (FaoString, " auth=ONCE");
if (mrpsptr->AuthSysUafPwdExpUrlPtr)
{
strcat (FaoString, " auth=SYSUAF=pwdexpURL=!&\"AZ");
*vecptr++ = mrpsptr->AuthSysUafPwdExpUrlPtr;
}
if (mrpsptr->AuthRevalidateTimeout)
{
strcat (FaoString, " auth=REVALIDATE=!AZ");
*vecptr++ = MetaConShowSeconds (rqptr, mrpsptr->AuthRevalidateTimeout);
}
if (FaoString[0])
{
status = FaolToBuffer (bptr, blen, &slen, FaoString, &FaoVector);
if (VMSnok (status) || status == SS$_BUFFEROVF)
{
ErrorNoticed (rqptr, status, NULL, FI_LI);
return ("*ERROR*");
}
bptr += slen;
blen -= slen;
vecptr = FaoVector;
FaoString[0] = 0;
}
if (mrpsptr->NoCache)
strcat (FaoString, " NOcache");
else
if (mrpsptr->Cache)
strcat (FaoString, " cache");
if (mrpsptr->CacheNoCGI)
strcat (FaoString, " cache=noCGI");
else
if (mrpsptr->CacheCGI)
strcat (FaoString, " cache=CGI");
if (mrpsptr->CacheNoCookie)
strcat (FaoString, " cache=nocookie");
else
if (mrpsptr->CacheCookie)
strcat (FaoString, " cache=cookie");
if (mrpsptr->CacheNoFile)
strcat (FaoString, " cache=NOfile");
else
if (mrpsptr->CacheFile)
strcat (FaoString, " cache=file");
if (mrpsptr->CacheNoNet)
strcat (FaoString, " cache=NOnet");
else
if (mrpsptr->CacheNet)
strcat (FaoString, " cache=net");
if (mrpsptr->CacheNoNPH)
strcat (FaoString, " cache=noNPH");
else
if (mrpsptr->CacheNPH)
strcat (FaoString, " cache=NPH");
if (mrpsptr->CacheNoPermanent)
strcat (FaoString, " cache=NOpermanent");
else
if (mrpsptr->CachePermanent)
strcat (FaoString, " cache=permanent");
if (mrpsptr->CacheNoQuery)
strcat (FaoString, " cache=NOquery");
else
if (mrpsptr->CacheQuery)
strcat (FaoString, " cache=query");
if (mrpsptr->CacheNoScript)
strcat (FaoString, " cache=NOscript");
else
if (mrpsptr->CacheScript)
strcat (FaoString, " cache=script");
if (mrpsptr->CacheNoSSI)
strcat (FaoString, " cache=noSSI");
else
if (mrpsptr->CacheSSI)
strcat (FaoString, " cache=SSI");
if (mrpsptr->CacheExpiresAfter == CACHE_EXPIRES_NONE)
strcat (FaoString, " cache=expires=none");
else
if (mrpsptr->CacheExpiresAfter == CACHE_EXPIRES_DAY)
strcat (FaoString, " cache=expires=day");
else
if (mrpsptr->CacheExpiresAfter == CACHE_EXPIRES_HOUR)
strcat (FaoString, " cache=expires=hour");
else
if (mrpsptr->CacheExpiresAfter == CACHE_EXPIRES_MINUTE)
strcat (FaoString, " cache=expires=minute");
else
if (mrpsptr->CacheExpiresAfter)
{
strcat (FaoString, " cache=expires=!AZ");
*vecptr++ = MetaConShowSeconds (rqptr, mrpsptr->CacheExpiresAfter);
}
if (mrpsptr->CacheGuardSeconds)
{
strcat (FaoString, " cache=guard=!UL");
if (mrpsptr->CacheGuardSeconds == -1)
*vecptr++ = 0;
else
*vecptr++ = mrpsptr->CacheGuardSeconds;
}
if (mrpsptr->CacheMaxKBytes)
{
strcat (FaoString, " cache=max=!UL");
if (mrpsptr->CacheMaxKBytes == -1)
*vecptr++ = 0;
else
*vecptr++ = mrpsptr->CacheMaxKBytes;
}
if (mrpsptr->CgiPlusInNoWriteof)
strcat (FaoString, " cgiplusin=NOeof");
else
if (mrpsptr->CgiPlusInWriteof)
strcat (FaoString, " cgiplusin=EOF");
if (mrpsptr->CgiPlusInCC[0] || mrpsptr->CgiPlusInCC[1])
{
if (mrpsptr->CgiPlusInCC[0] == '\r' &&
mrpsptr->CgiPlusInCC[1] == '\n')
strcat (FaoString, " cgiplusin=cc=CRLF");
else
if (mrpsptr->CgiPlusInCC[0] == '\n')
strcat (FaoString, " cgiplusin=cc=LF");
else
if (mrpsptr->CgiPlusInCC[0] == '\r')
strcat (FaoString, " cgiplusin=cc=CR");
else
strcat (FaoString, " cgiplusin=cc=NONE");
}
if (mrpsptr->CgiPrefixPtr)
{
strcat (FaoString, " CGI=prefix=!AZ");
*vecptr++ = mrpsptr->CgiPrefixPtr;
}
if (mrpsptr->CgiVarPtr)
{
strcat (FaoString, " CGI=var=!AZ");
*vecptr++ = mrpsptr->CgiVarPtr;
}
if (mrpsptr->CharsetPtr)
{
strcat (FaoString, " charset=!&\"AZ");
*vecptr++ = mrpsptr->CharsetPtr;
}
if (mrpsptr->ClientAddress == MAPURL_CLIENT_FORWARDED)
strcat (FaoString, " client=FORWARDED");
else
if (mrpsptr->ClientAddress == MAPURL_CLIENT_IF_FORWARDED)
strcat (FaoString, " client=IF=FORWARDED");
else
if (mrpsptr->ClientAddress == MAPURL_CLIENT_IF_XFORWARDEDFOR)
strcat (FaoString, " client=IF=XFORWARDEDFOR");
else
if (mrpsptr->ClientAddress == MAPURL_CLIENT_LITERAL)
{
strcat (FaoString, " client=LITERAL=\"!AZ\"");
*vecptr++ = mrpsptr->ClientAddressLiteralPtr;
}
else
if (mrpsptr->ClientAddress == MAPURL_CLIENT_RESET)
strcat (FaoString, " client=RESET");
else
if (mrpsptr->ClientAddress == MAPURL_CLIENT_XFORWARDEDFOR)
strcat (FaoString, " client=XFORWARDEDFOR");
if (mrpsptr->ContentTypePtr)
{
strcat (FaoString, " content=!&\"AZ");
*vecptr++ = mrpsptr->ContentTypePtr;
}
if (mrpsptr->CorsMaxAge)
{
strcat (FaoString, " cors=AGE=!UL");
*vecptr++ = mrpsptr->CorsMaxAge;
}
if (mrpsptr->CorsAllowCredentials)
strcat (FaoString, " cors=CRED=true");
else
if (mrpsptr->CorsNoAllowCredentials)
strcat (FaoString, " cors=CRED=false");
if (mrpsptr->CorsExposeHeadersPtr)
{
strcat (FaoString, " cors=EXPOSE=!&\"AZ");
*vecptr++ = mrpsptr->CorsExposeHeadersPtr;
}
if (mrpsptr->CorsAllowHeadersPtr)
{
strcat (FaoString, " cors=HEADERS=!&\"AZ");
*vecptr++ = mrpsptr->CorsAllowHeadersPtr;
}
if (mrpsptr->CorsAllowMethodsPtr)
{
strcat (FaoString, " cors=METHODS=!&\"AZ");
*vecptr++ = mrpsptr->CorsAllowMethodsPtr;
}
if (mrpsptr->CorsAllowOriginPtr)
{
strcat (FaoString, " cors=ORIGIN=!&\"AZ");
*vecptr++ = mrpsptr->CorsAllowOriginPtr;
}
if (FaoString[0])
{
status = FaolToBuffer (bptr, blen, &slen, FaoString, &FaoVector);
if (VMSnok (status) || status == SS$_BUFFEROVF)
{
ErrorNoticed (rqptr, status, NULL, FI_LI);
return ("*ERROR*");
}
bptr += slen;
blen -= slen;
vecptr = FaoVector;
FaoString[0] = 0;
}
if (mrpsptr->DictionaryPtr)
{
strcat (FaoString, " dict=!&\"AZ");
*vecptr++ = mrpsptr->DictionaryPtr;
}
if (mrpsptr->DirNoAccess)
strcat (FaoString, " dir=NOaccess");
else
if (mrpsptr->DirAccess)
strcat (FaoString, " dir=access");
else
if (mrpsptr->DirAccessSelective)
strcat (FaoString, " dir=access=selective");
if (mrpsptr->DirCharsetPtr)
{
strcat (FaoString, " dir=charset=!&\"AZ");
*vecptr++ = mrpsptr->DirCharsetPtr;
}
if (mrpsptr->DirDelimit == MAPURL_DIR_DELIMIT_BOTH)
strcat (FaoString, " dir=DELIMIT=both");
else
if (mrpsptr->DirDelimit == MAPURL_DIR_DELIMIT_HEADER)
strcat (FaoString, " dir=DELIMIT=header");
else
if (mrpsptr->DirDelimit == MAPURL_DIR_DELIMIT_FOOTER)
strcat (FaoString, " dir=DELIMIT=footer");
else
if (mrpsptr->DirDelimit == MAPURL_DIR_DELIMIT_NONE)
strcat (FaoString, " dir=DELIMIT=none");
if (mrpsptr->DirFont == MAPURL_DIR_FONT_INHERIT)
strcat (FaoString, " dir=FONT=inherit");
else
if (mrpsptr->DirFont == MAPURL_DIR_FONT_MONOSPACE)
strcat (FaoString, " dir=FONT=monospace");
if (mrpsptr->DirNoIconLink)
strcat (FaoString, " dir=NOilink");
else
if (mrpsptr->DirIconLink)
strcat (FaoString, " dir=ilink");
if (mrpsptr->DirNoImpliedWildcard)
strcat (FaoString, " dir=NOimpliedwildcard");
else
if (mrpsptr->DirImpliedWildcard)
strcat (FaoString, " dir=impliedwildcard");
if (mrpsptr->DirSort[0])
{
strcat (FaoString, " dir=SORT=!AZ");
*vecptr++ = mrpsptr->DirSort;
}
if (mrpsptr->DirStyle == MAPURL_DIR_STYLE_DEFAULT)
strcat (FaoString, " dir=style=default");
else
if (mrpsptr->DirStyle == MAPURL_DIR_STYLE_DEFAULT2)
strcat (FaoString, " dir=style=default2");
else
if (mrpsptr->DirStyle == MAPURL_DIR_STYLE_ANCHOR)
strcat (FaoString, " dir=style=anchor");
else
if (mrpsptr->DirStyle == MAPURL_DIR_STYLE_ANCHOR2)
strcat (FaoString, " dir=style=anchor2");
else
if (mrpsptr->DirStyle == MAPURL_DIR_STYLE_HTDIR)
strcat (FaoString, " dir=style=htdir");
else
if (mrpsptr->DirStyle == MAPURL_DIR_STYLE_HTDIR2)
strcat (FaoString, " dir=style=htdir2");
else
if (mrpsptr->DirStyle == MAPURL_DIR_STYLE_ORIGINAL)
strcat (FaoString, " dir=style=original");
else
if (mrpsptr->DirStyle == MAPURL_DIR_STYLE_ORIGINAL2)
strcat (FaoString, " dir=style=original2");
else
if (mrpsptr->DirStyle == MAPURL_DIR_STYLE_SORT)
strcat (FaoString, " dir=style=sort");
else
if (mrpsptr->DirStyle == MAPURL_DIR_STYLE_SORT2)
strcat (FaoString, " dir=style=sort2");
if (mrpsptr->DirTargetPtr)
{
strcat (FaoString, " dir=TARGET=\"!AZ\"");
*vecptr++ = mrpsptr->DirTargetPtr;
}
if (mrpsptr->DirThesePtr)
{
strcat (FaoString, " dir=THESE=\"!AZ\"");
*vecptr++ = mrpsptr->DirThesePtr;
}
if (mrpsptr->DirTitle == MAPURL_DIR_TITLE_THIS)
{
strcat (FaoString, " dir=TITLE=this=\"!AZ\"");
*vecptr++ = mrpsptr->DirTitlePtr;
}
else
if (mrpsptr->DirTitle == MAPURL_DIR_TITLE_DEFAULT)
strcat (FaoString, " dir=TITLE=default");
else
if (mrpsptr->DirTitle == MAPURL_DIR_TITLE_OWNER)
strcat (FaoString, " dir=TITLE=owner");
else
if (mrpsptr->DirTitle == MAPURL_DIR_TITLE_REMOTE)
strcat (FaoString, " dir=TITLE=remote");
else
if (mrpsptr->DirTitle == MAPURL_DIR_TITLE_NONE)
strcat (FaoString, " dir=TITLE=0");
else
if (mrpsptr->DirTitle)
{
strcat (FaoString, " dir=TITLE=!UL");
*vecptr++ = mrpsptr->DirTitle;
}
if (mrpsptr->DirVersionsOf)
{
if (mrpsptr->DirVersionsOf == 65536)
strcat (FaoString, " dir=VERSIONS=*");
else
if (mrpsptr->DirVersionsOf == -1)
strcat (FaoString, " dir=VERSIONS=0");
else
{
strcat (FaoString, " dir=VERSIONS=!UL");
*vecptr++ = mrpsptr->DirVersionsOf;
}
}
if (mrpsptr->DirNoWildcard)
strcat (FaoString, " dir=NOwildcard");
else
if (mrpsptr->DirWildcard)
strcat (FaoString, " dir=wildcard");
if (mrpsptr->NoExpired)
strcat (FaoString, " NOexpired");
else
if (mrpsptr->Expired)
strcat (FaoString, " expired");
if (mrpsptr->Http2ToHttp11)
strcat (FaoString, " HTTP2=protocol=1.1");
if (mrpsptr->Http2MaxStreams)
{
strcat (FaoString, " HTTP2=streams=max=!UL");
*vecptr++ = mrpsptr->Http2MaxStreams;
}
if (mrpsptr->Http2WriteQueue == HTTP2_WRITE_QUEUE_HIGH)
strcat (FaoString, " HTTP2=write=high");
else
if (mrpsptr->Http2WriteQueue == HTTP2_WRITE_QUEUE_NORMAL)
strcat (FaoString, " HTTP2=write=normal");
else
if (mrpsptr->Http2WriteQueue == HTTP2_WRITE_QUEUE_LOW)
strcat (FaoString, " HTTP2=write=low");
if (mrpsptr->Http2SendGoAway)
{
strcat (FaoString, " HTTP2=send=goaway=!UL");
*vecptr++ = mrpsptr->Http2SendGoAway - 1;
}
if (mrpsptr->Http2SendPing)
strcat (FaoString, " HTTP2=send=ping");
if (mrpsptr->Http2SendReset)
{
strcat (FaoString, " HTTP2=send=reset=!UL");
*vecptr++ = mrpsptr->Http2SendReset - 1;
}
if (mrpsptr->HttpAcceptCharsetPtr)
{
strcat (FaoString, " http=Accept-Charset=!&\"AZ");
*vecptr++ = mrpsptr->HttpAcceptCharsetPtr;
}
if (mrpsptr->HtmlBodyTagPtr)
{
strcat (FaoString, " html=bodytag=!&\"AZ");
*vecptr++ = mrpsptr->HtmlBodyTagPtr;
}
if (mrpsptr->HtmlHeaderTagPtr)
{
strcat (FaoString, " html=headertag=!&\"AZ");
*vecptr++ = mrpsptr->HtmlHeaderTagPtr;
}
if (mrpsptr->HtmlHeaderPtr)
{
strcat (FaoString, " html=header=!&\"AZ");
*vecptr++ = mrpsptr->HtmlHeaderPtr;
}
if (mrpsptr->HtmlFooterTagPtr)
{
strcat (FaoString, " html=footertag=!&\"AZ");
*vecptr++ = mrpsptr->HtmlFooterTagPtr;
}
if (mrpsptr->HtmlFooterPtr)
{
strcat (FaoString, " html=footer=!&\"AZ");
*vecptr++ = mrpsptr->HtmlFooterPtr;
}
if (mrpsptr->HttpAcceptLangPtr)
{
strcat (FaoString, " http=Accept-Language=!&\"AZ");
*vecptr++ = mrpsptr->HttpAcceptLangPtr;
}
if (mrpsptr->IndexPtr)
{
strcat (FaoString, " index=!AZ");
*vecptr++ = mrpsptr->IndexPtr;
}
if (mrpsptr->NoLog)
strcat (FaoString, " NOlog");
else
if (mrpsptr->Log)
strcat (FaoString, " log");
if (FaoString[0])
{
status = FaolToBuffer (bptr, blen, &slen, FaoString, &FaoVector);
if (VMSnok (status) || status == SS$_BUFFEROVF)
{
ErrorNoticed (rqptr, status, NULL, FI_LI);
return ("*ERROR*");
}
bptr += slen;
blen -= slen;
vecptr = FaoVector;
FaoString[0] = '\0';
}
if (mrpsptr->NoMapEllipsis)
strcat (FaoString, " map=NOELLIPSIS");
else
if (mrpsptr->MapEllipsis)
strcat (FaoString, " map=ELLIPSIS");
if (mrpsptr->MapNonEmpty)
strcat (FaoString, " map=NOEMPTY");
else
if (mrpsptr->MapEmpty)
strcat (FaoString, " map=EMPTY");
if (mrpsptr->NoMapExtensionMethod)
strcat (FaoString, " map=NOMETHOD");
else
if (mrpsptr->MapExtensionMethod)
strcat (FaoString, " map=METHOD");
if (mrpsptr->NoMapOnce)
strcat (FaoString, " map=NOONCE");
else
if (mrpsptr->MapOnce)
strcat (FaoString, " map=ONCE");
if (mrpsptr->MapRestart)
strcat (FaoString, " map=RESTART");
if (mrpsptr->MapSetNoIgnore)
strcat (FaoString, " map=SET=noignore");
else
if (mrpsptr->MapSetIgnore)
strcat (FaoString, " map=SET=ignore");
if (mrpsptr->MapSetNoRequest)
strcat (FaoString, " map=SET=norequest");
else
if (mrpsptr->MapSetRequest)
strcat (FaoString, " map=SET=request");
if (mrpsptr->MapUri)
strcat (FaoString, " map=URI");
if (mrpsptr->MapRootPtr)
{
strcat (FaoString, " map=ROOT=!AZ");
*vecptr++ = mrpsptr->MapRootPtr;
}
if (mrpsptr->NoOp)
strcat (FaoString, " NOOP");
if (mrpsptr->NotePadPtr)
{
strcat (FaoString, " notepad=!&\"AZ");
*vecptr++ = mrpsptr->NotePadPtr;
}
if (mrpsptr->PathOds == MAPURL_PATH_ODS_0)
strcat (FaoString, " NOods");
else
if (mrpsptr->PathOds == MAPURL_PATH_ODS_2)
strcat (FaoString, " ods=2");
else
if (mrpsptr->PathOds == MAPURL_PATH_ODS_5)
strcat (FaoString, " ods=5");
else
if (mrpsptr->PathOds == MAPURL_PATH_ODS_ADS)
strcat (FaoString, " ods=ADS");
else
if (mrpsptr->PathOds == MAPURL_PATH_ODS_PWK)
strcat (FaoString, " ods=PWK");
else
if (mrpsptr->PathOds == MAPURL_PATH_ODS_SMB)
strcat (FaoString, " ods=SMB");
else
if (mrpsptr->PathOds == MAPURL_PATH_ODS_SRI)
strcat (FaoString, " ods=SRI");
if (mrpsptr->OdsName == MAPURL_ODS_8BIT)
strcat (FaoString, " ods=name=8BIT");
else
if (mrpsptr->OdsName == MAPURL_ODS_UTF8)
strcat (FaoString, " ods=name=UTF8");
else
if (mrpsptr->OdsName == MAPURL_ODS_DEFAULT)
strcat (FaoString, " ods=name=DEFAULT");
if (mrpsptr->NoProfile)
strcat (FaoString, " NOprofile");
else
if (mrpsptr->Profile)
strcat (FaoString, " profile");
if (mrpsptr->ProxyNoAffinity)
strcat (FaoString, " proxy=NOAFFINITY");
else
if (mrpsptr->ProxyAffinity)
strcat (FaoString, " proxy=AFFINITY");
if (mrpsptr->ProxyBindIpAddressPtr)
{
strcat (FaoString, " proxy=BIND=!AZ");
*vecptr++ = mrpsptr->ProxyBindIpAddressPtr;
}
if (mrpsptr->ProxyChainHostPortPtr)
{
strcat (FaoString, " proxy=CHAIN=!AZ");
*vecptr++ = mrpsptr->ProxyChainHostPortPtr;
}
if (mrpsptr->ProxyChainCredPtr)
{
strcat (FaoString, " proxy=CHAIN=CRED=!AZ");
*vecptr++ = mrpsptr->ProxyChainCredPtr;
}
if (mrpsptr->ProxyForwardedBy == PROXY_FORWARDED_NONE)
strcat (FaoString, " proxy=NOforwarded");
else
if (mrpsptr->ProxyForwardedBy == PROXY_FORWARDED_BY)
strcat (FaoString, " proxy=FORWARDED=by");
else
if (mrpsptr->ProxyForwardedBy == PROXY_FORWARDED_FOR)
strcat (FaoString, " proxy=FORWARDED=for");
else
if (mrpsptr->ProxyForwardedBy == PROXY_FORWARDED_ADDRESS)
strcat (FaoString, " proxy=FORWARDED=address");
if (mrpsptr->ProxyReverseLocationLength)
{
strcat (FaoString, " proxy=REVERSE=location=!AZ");
*vecptr++ = mrpsptr->ProxyReverseLocationPtr;
}
if (mrpsptr->ProxyReworkLength)
{
strcat (FaoString, " proxy=REWORK=!AZ");
*vecptr++ = mrpsptr->ProxyReworkPtr;
}
if (mrpsptr->ProxyXForwardedFor == PROXY_XFORWARDEDFOR_NONE)
strcat (FaoString, " proxy=NOxforwardedfor");
else
if (mrpsptr->ProxyXForwardedFor == PROXY_XFORWARDEDFOR_ENABLED)
strcat (FaoString, " proxy=XFORWARDEDFOR=enabled");
else
if (mrpsptr->ProxyXForwardedFor == PROXY_XFORWARDEDFOR_ADDRESS)
strcat (FaoString, " proxy=XFORWARDEDFOR=address");
else
if (mrpsptr->ProxyXForwardedFor == PROXY_XFORWARDEDFOR_UNKNOWN)
strcat (FaoString, " proxy=XFORWARDEDFOR=unknown");
if (mrpsptr->NoProxyReverseVerify)
strcat (FaoString, " proxy=REVERSE=NOverify");
else
if (mrpsptr->ProxyReverseVerify)
strcat (FaoString, " proxy=REVERSE=verify");
if (mrpsptr->NoProxyReverseAuthHeader)
strcat (FaoString, " proxy=REVERSE=NOauth");
else
if (mrpsptr->ProxyReverseAuthHeader)
strcat (FaoString, " proxy=REVERSE=auth");
if (mrpsptr->ProxyTunnelRequestPtr)
{
strcat (FaoString, " proxy=tunnel=request=!&\\&\"AZ");
*vecptr++ = mrpsptr->ProxyTunnelRequestPtr;
}
if (mrpsptr->NoProxyUnknownRequestFields)
strcat (FaoString, " proxy=NOUNKNOWN");
else
if (mrpsptr->ProxyUnknownRequestFields)
strcat (FaoString, " proxy=UNKNOWN");
if (FaoString[0])
{
status = FaolToBuffer (bptr, blen, &slen, FaoString, &FaoVector);
if (VMSnok (status) || status == SS$_BUFFEROVF)
{
ErrorNoticed (rqptr, status, NULL, FI_LI);
return ("*ERROR*");
}
bptr += slen;
blen -= slen;
vecptr = FaoVector;
FaoString[0] = '\0';
}
if (mrpsptr->ProxyHeaderCount)
{
for (int idx = 0; idx < mrpsptr->ProxyHeaderCount; idx++)
{
*vecptr++ = mrpsptr->ProxyHeader[idx];
status = FaolToBuffer (bptr, blen, &slen, " proxy=HEADER=!AZ",
&FaoVector);
if (VMSnok (status) || status == SS$_BUFFEROVF)
{
ErrorNoticed (rqptr, status, NULL, FI_LI);
return ("*ERROR*");
}
bptr += slen;
blen -= slen;
vecptr = FaoVector;
FaoString[0] = '\0';
}
}
if (mrpsptr->PutRFM == PUT_RFM_FIX512)
strcat (FaoString, " put=FIX512");
else
if (mrpsptr->PutRFM == PUT_RFM_STM)
strcat (FaoString, " put=STM");
else
if (mrpsptr->PutRFM == PUT_RFM_STMCR)
strcat (FaoString, " put=STMCR");
else
if (mrpsptr->PutRFM == PUT_RFM_STMLF)
strcat (FaoString, " put=STMLF");
else
if (mrpsptr->PutRFM == PUT_RFM_UDF)
strcat (FaoString, " put=UDF");
if (mrpsptr->PutMaxKbytes)
{
strcat (FaoString, " put=MAX=!UL");
*vecptr++ = mrpsptr->PutMaxKbytes;
}
if (mrpsptr->RegexSyntax)
{
strcat (FaoString, " regex=!AZ");
switch (mrpsptr->RegexSyntax)
{
case RE_SYNTAX_AWK :
*vecptr++ = "AWK";
break;
case RE_SYNTAX_EGREP :
*vecptr++ = "EGREP";
break;
case RE_SYNTAX_GREP :
*vecptr++ = "GREP";
break;
case RE_SYNTAX_POSIX_AWK :
*vecptr++ = "POSIX_AWK";
break;
case RE_SYNTAX_POSIX_BASIC :
*vecptr++ = "POSIX_BASIC/ED/SED";
break;
case RE_SYNTAX_POSIX_EGREP :
*vecptr++ = "POSIX_EGREP";
break;
case RE_SYNTAX_POSIX_EXTENDED :
*vecptr++ = "POSIX_EXTENDED";
break;
case RE_SYNTAX_POSIX_MINIMAL_BASIC :
*vecptr++ = "POSIX_MINIMAL_BASIC";
break;
case RE_SYNTAX_POSIX_MINIMAL_EXTENDED :
*vecptr++ = "POSIX_MINIMAL_EXTENDED";
break;
case REGEX_C_FLAGS :
*vecptr++ = "WASD";
break;
case -1 :
*vecptr++ = "default";
break;
default :
vecptr--; /** jump back one! **/
*vecptr++ = " regex=!8XL";
*vecptr = mrpsptr->RegexSyntax;
}
}
if (mrpsptr->ReportType == ERROR_REPORT_BASIC)
strcat (FaoString, " report=BASIC");
else
if (mrpsptr->ReportType == ERROR_REPORT_DETAILED)
strcat (FaoString, " report=DETAILED");
else
if (mrpsptr->ReportType == ERROR_REPORT_TUNNEL)
strcat (FaoString, " report=TUNNEL");
if (mrpsptr->Report400as)
{
strcat (FaoString, " report=400=!UL");
*vecptr++ = mrpsptr->Report400as;
}
if (mrpsptr->Report403as)
{
strcat (FaoString, " report=403=!UL");
*vecptr++ = mrpsptr->Report403as;
}
if (mrpsptr->Report404as)
{
strcat (FaoString, " report=404=!UL");
*vecptr++ = mrpsptr->Report404as;
}
if (mrpsptr->Response200is203 == 203)
strcat (FaoString, " response=200=203");
else
if (mrpsptr->Response200is203 == 200)
strcat (FaoString, " response=203=200");
if (mrpsptr->ResponseGzip == MAPURL_RESPONSE_GZIP_ALL)
strcat (FaoString, " response=GZIP=all");
else
if (mrpsptr->ResponseGzip == MAPURL_RESPONSE_GZIP_NONE)
strcat (FaoString, " response=GZIP=none");
else
if (mrpsptr->ResponseGzip)
{
strcat (FaoString, " response=GZIP=!UL");
*vecptr++ = mrpsptr->ResponseGzip;
}
if (mrpsptr->ResponseNoChunked)
strcat (FaoString, " response=NOchunked");
else
if (mrpsptr->ResponseChunked)
strcat (FaoString, " response=chunked");
if (mrpsptr->ResponseCspLength)
{
if (mrpsptr->ResponseCspLength < 0)
strcat (FaoString, " response=NOcsp");
else
{
strcat (FaoString, " response=csp=!&\"AZ");
*vecptr++ = mrpsptr->ResponseCspPtr;
}
}
if (mrpsptr->ResponseCsproLength)
{
if (mrpsptr->ResponseCsproLength < 0)
strcat (FaoString, " response=NOcspro");
else
{
strcat (FaoString, " response=cspro=!&\"AZ");
*vecptr++ = mrpsptr->ResponseCsproPtr;
}
}
if (mrpsptr->ResponseHeaderNone)
strcat (FaoString, " response=header=none");
else
if (mrpsptr->ResponseHeaderBegin)
strcat (FaoString, " response=header=begin");
else
if (mrpsptr->ResponseHeaderFull)
strcat (FaoString, " response=header=full");
if (mrpsptr->ResponseHeaderNoAdd)
strcat (FaoString, " response=header=NOadd");
if (mrpsptr->ResponseHeaderAddLength)
{
strcat (FaoString, " response=header=add=!&\"AZ");
*vecptr++ = mrpsptr->ResponseHeaderAddPtr;
}
if (mrpsptr->ResponseHttpNoOriginal)
strcat (FaoString, " response=HTTP=NOoriginal");
else
if (mrpsptr->ResponseHttpOriginal)
strcat (FaoString, " response=HTTP=original");
if (mrpsptr->ResponseStrictTransSecPtr)
{
strcat (FaoString, " response=STS=\"!AZ\"");
*vecptr++ = mrpsptr->ResponseStrictTransSecPtr;
}
if (mrpsptr->ResponseVarRecord == FILE_VAR_ASIS)
strcat (FaoString, " response=VAR=ASIS");
else
if (mrpsptr->ResponseVarRecord == FILE_VAR_CRLF)
strcat (FaoString, " response=VAR=CRLF");
else
if (mrpsptr->ResponseVarRecord == FILE_VAR_LF)
strcat (FaoString, " response=VAR=LF");
else
if (mrpsptr->ResponseVarRecord == FILE_VAR_NONE)
strcat (FaoString, " response=VAR=NONE");
if (FaoString[0])
{
status = FaolToBuffer (bptr, blen, &slen, FaoString, &FaoVector);
if (VMSnok (status) || status == SS$_BUFFEROVF)
{
ErrorNoticed (rqptr, status, NULL, FI_LI);
return ("*ERROR*");
}
bptr += slen;
blen -= slen;
vecptr = FaoVector;
FaoString[0] = '\0';
}
if (mrpsptr->ScriptBodyNoDecode)
strcat (FaoString, " script=BODY=NOdecode");
else
if (mrpsptr->ScriptBodyDecode)
strcat (FaoString, " script=BODY=decode");
if (mrpsptr->ScriptSymbolNoTruncate)
strcat (FaoString, " script=SYMBOL=NOtruncate");
else
if (mrpsptr->ScriptSymbolTruncate)
strcat (FaoString, " script=SYMBOL=truncate");
if (mrpsptr->ScriptSyntaxNoUnix)
strcat (FaoString, " script=SYNTAX=NOunix");
else
if (mrpsptr->ScriptSyntaxUnix)
strcat (FaoString, " script=SYNTAX=unix");
if (mrpsptr->ScriptNoFind)
strcat (FaoString, " script=NOfind");
else
if (mrpsptr->ScriptFind)
strcat (FaoString, " script=FIND");
if (mrpsptr->ScriptNoPathFind)
strcat (FaoString, " NOscript=PATH=find");
else
if (mrpsptr->ScriptPathFind)
strcat (FaoString, " script=PATH=find");
if (mrpsptr->ScriptNoQueryNone)
strcat (FaoString, " NOscript=QUERY=none");
else
if (mrpsptr->ScriptQueryNone)
strcat (FaoString, " script=QUERY=none");
if (mrpsptr->ScriptNoQueryRelaxed)
strcat (FaoString, " NOscript=QUERY=relaxed");
else
if (mrpsptr->ScriptQueryRelaxed)
strcat (FaoString, " script=QUERY=relaxed");
if (mrpsptr->NoDefaultSearch)
strcat (FaoString, " search=none");
else
if (mrpsptr->DefaultSearch)
strcat (FaoString, " NOsearch=none");
if (mrpsptr->ChangeServicePtr)
{
strcat (FaoString, " service=!AZ");
*vecptr++ = mrpsptr->ChangeServicePtr;
}
if (mrpsptr->NoPrivSsi)
strcat (FaoString, " NOssi=PRIV");
else
if (mrpsptr->PrivSsi)
strcat (FaoString, " ssi=PRIV");
if (mrpsptr->SsiExecPtr)
{
strcat (FaoString, " ssi=EXEC=!AZ");
*vecptr++ = mrpsptr->SsiExecPtr;
}
if (mrpsptr->StyleSheetPtr)
{
strcat (FaoString, " css=!AZ");
*vecptr++ = mrpsptr->StyleSheetPtr;
}
if (mrpsptr->SSLCGIvar == SESOLA_CGI_VAR_APACHE_MOD_SSL)
strcat (FaoString, " SSLCGI=Apache_mod_SSL");
else
if (mrpsptr->SSLCGIvar == SESOLA_CGI_VAR_APACHE_MOD_SSL_CLIENT)
strcat (FaoString, " SSLCGI=Apache_mod_SSL_client");
else
if (mrpsptr->SSLCGIvar == SESOLA_CGI_VAR_APACHE_MOD_SSL_EXTENS)
strcat (FaoString, " SSLCGI=Apache_mod_SSL_extens");
else
if (mrpsptr->SSLCGIvar == SESOLA_CGI_VAR_APACHE_MOD_SSL_OID)
strcat (FaoString, " SSLCGI=Apache_mod_SSL_OID");
else
if (mrpsptr->SSLCGIvar == SESOLA_CGI_VAR_PURVEYOR)
strcat (FaoString, " SSLCGI=Purveyor");
if (mrpsptr->NoStmLF)
strcat (FaoString, " NOstmLF");
else
if (mrpsptr->StmLF)
strcat (FaoString, " stmLF");
if (FaoString[0])
{
status = FaolToBuffer (bptr, blen, &slen, FaoString, &FaoVector);
if (VMSnok (status) || status == SS$_BUFFEROVF)
{
ErrorNoticed (rqptr, status, NULL, FI_LI);
return ("*ERROR*");
}
bptr += slen;
blen -= slen;
vecptr = FaoVector;
FaoString[0] = '\0';
}
if (mrpsptr->QueryStringPtr)
{
strcat (FaoString, " query-string=!&\"AZ");
*vecptr++ = mrpsptr->QueryStringPtr;
}
if (mrpsptr->RmsSubChar)
{
strcat (FaoString, " RMSchar=!&C");
*vecptr++ = mrpsptr->RmsSubChar;
}
if (mrpsptr->ScriptAgentAsPtr)
{
strcat (FaoString, " script=AGENT=AS=!AZ");
*vecptr++ = mrpsptr->ScriptAgentAsPtr;
}
if (mrpsptr->ScriptAsPtr)
{
strcat (FaoString, " script=AS=!AZ");
*vecptr++ = mrpsptr->ScriptAsPtr;
}
if (mrpsptr->ScriptCommandPtr)
{
strcat (FaoString, " script=COMMAND=!&\"AZ");
*vecptr++ = mrpsptr->ScriptCommandPtr;
}
if (mrpsptr->ScriptControlPtr)
{
strcat (FaoString, " script=CONTROL=!&\"AZ");
*vecptr++ = mrpsptr->ScriptControlPtr;
}
if (mrpsptr->ScriptDefaultPtr)
{
strcat (FaoString, " script=DEFAULT=!AZ");
*vecptr++ = mrpsptr->ScriptDefaultPtr;
}
if (mrpsptr->ScriptBitBucketTimeout)
{
strcat (FaoString, " script=BIT-BUCKET=!AZ");
*vecptr++ = MetaConShowSeconds (rqptr, mrpsptr->ScriptBitBucketTimeout);
}
if (mrpsptr->ScriptCpuMax)
{
strcat (FaoString, " script=CPU=!UL");
*vecptr++ = mrpsptr->ScriptCpuMax;
}
if (mrpsptr->ScriptLifeTime)
{
strcat (FaoString, " script=lifetime=!AZ");
*vecptr++ = MetaConShowSeconds (rqptr, mrpsptr->ScriptLifeTime);
}
if (mrpsptr->ScriptParamsPtr)
{
strcat (FaoString, " script=PARAMS=!&\"AZ");
*vecptr++ = mrpsptr->ScriptParamsPtr;
}
if (mrpsptr->TimeoutPersistent > 0 ||
mrpsptr->TimeoutNoProgress > 0 ||
mrpsptr->TimeoutOutput > 0)
{
strcat (FaoString, " timeout=!AZ(p),!AZ(np),!AZ(o)");
*vecptr++ = MetaConShowSeconds (rqptr, mrpsptr->TimeoutPersistent);
*vecptr++ = MetaConShowSeconds (rqptr, mrpsptr->TimeoutNoProgress);
*vecptr++ = MetaConShowSeconds (rqptr, mrpsptr->TimeoutOutput);
}
else
if (mrpsptr->TimeoutPersistent < 0 &&
mrpsptr->TimeoutNoProgress < 0 &&
mrpsptr->TimeoutOutput < 0)
strcat (FaoString, " notimeout");
if (mrpsptr->ThrottleNoSet)
strcat (FaoString, " throttle=NONE");
else
if (mrpsptr->ThrottleSet)
{
if (mrpsptr->ThrottlePerUser)
{
strcat (FaoString, " throttle=!UL$!UL,!UL,!UL,!UL,!AZ,!AZ");
*vecptr++ = mrpsptr->ThrottleFrom;
*vecptr++ = mrpsptr->ThrottlePerUser;
}
else
{
strcat (FaoString, " throttle=!UL,!UL,!UL,!UL,!AZ,!AZ");
*vecptr++ = mrpsptr->ThrottleFrom;
}
*vecptr++ = mrpsptr->ThrottleTo;
*vecptr++ = mrpsptr->ThrottleResume;
*vecptr++ = mrpsptr->ThrottleBusy;
*vecptr++ = MetaConShowSeconds (rqptr, mrpsptr->ThrottleTimeoutQueue);
*vecptr++ = MetaConShowSeconds (rqptr, mrpsptr->ThrottleTimeoutBusy);
}
if (mrpsptr->AccessNoProfile)
strcat (FaoString, " access=NOprofile");
else
if (mrpsptr->AccessProfile)
strcat (FaoString, " access=profile");
if (mrpsptr->AccessNoRead)
strcat (FaoString, " access=NOread");
else
if (mrpsptr->AccessRead)
strcat (FaoString, " access=read");
if (mrpsptr->AccessNoServer)
strcat (FaoString, " access=NOserver");
else
if (mrpsptr->AccessServer)
strcat (FaoString, " access=server");
if (mrpsptr->AccessNoWrite)
strcat (FaoString, " access=NOwrite");
else
if (mrpsptr->AccessWrite)
strcat (FaoString, " access=write");
if (FaoString[0])
{
status = FaolToBuffer (bptr, blen, &slen, FaoString, &FaoVector);
if (VMSnok (status) || status == SS$_BUFFEROVF)
{
ErrorNoticed (rqptr, status, NULL, FI_LI);
return ("*ERROR*");
}
bptr += slen;
blen -= slen;
vecptr = FaoVector;
FaoString[0] = '\0';
}
if (mrpsptr->WebDavNoAll)
strcat (FaoString, " WebDAV=NOall");
else
if (mrpsptr->WebDavAll)
strcat (FaoString, " WebDAV=all");
if (mrpsptr->WebDavNoAuth)
strcat (FaoString, " WebDAV=NOauth");
else
if (mrpsptr->WebDavAuth)
strcat (FaoString, " WebDAV=auth");
if (mrpsptr->WebDavNoServer)
strcat (FaoString, " WebDAV=NOserver");
else
if (mrpsptr->WebDavServer)
strcat (FaoString, " WebDAV=server");
if (mrpsptr->WebDavNoHidden)
strcat (FaoString, " WebDAV=NOhidden");
else
if (mrpsptr->WebDavHidden)
strcat (FaoString, " WebDAV=hidden");
if (mrpsptr->WebDavNoLock)
strcat (FaoString, " WebDAV=NOlock");
else
if (mrpsptr->WebDavLock)
strcat (FaoString, " WebDAV=lock");
if (mrpsptr->WebDavMetaDirPtr)
{
strcat (FaoString, " webdav=META=dir=!&\"AZ");
*vecptr++ = mrpsptr->WebDavMetaDirPtr;
}
if (mrpsptr->WebDavNoProfile)
strcat (FaoString, " WebDAV=NOprofile");
else
if (mrpsptr->WebDavProfile)
strcat (FaoString, " WebDAV=profile");
if (mrpsptr->WebDavNoProp)
strcat (FaoString, " WebDAV=NOprop");
else
if (mrpsptr->WebDavProp)
strcat (FaoString, " WebDAV=prop");
if (mrpsptr->WebDavNoPutLock)
strcat (FaoString, " WebDAV=NOPUT=lock");
else
if (mrpsptr->WebDavPutLock)
strcat (FaoString, " WebDAV=PUT=lock");
if (mrpsptr->WebDavNoRead)
strcat (FaoString, " WebDAV=NOread");
else
if (mrpsptr->WebDavRead)
strcat (FaoString, " WebDAV=read");
if (mrpsptr->WebDavNoWinProp)
strcat (FaoString, " WebDAV=NOwinprop");
else
if (mrpsptr->WebDavWinProp)
strcat (FaoString, " WebDAV=winprop");
if (mrpsptr->WebDavNoWrite)
strcat (FaoString, " WebDAV=NOwrite");
else
if (mrpsptr->WebDavWrite)
strcat (FaoString, " WebDAV=write");
if (mrpsptr->WebDavLockTimeoutDefault)
{
strcat (FaoString, " WebDAV=lock=timeout=default=!AZ");
*vecptr++ = MetaConShowSeconds (rqptr, mrpsptr->WebDavLockTimeoutDefault);
}
if (mrpsptr->WebDavLockTimeoutMax)
{
strcat (FaoString, " WebDAV=lock=timeout=max=!AZ");
*vecptr++ = MetaConShowSeconds (rqptr, mrpsptr->WebDavLockTimeoutMax);
}
if (mrpsptr->WebSocketInputSize)
{
strcat (FaoString, " WebSocket=input=!UL");
*vecptr++ = mrpsptr->WebSocketInputSize;
}
if (mrpsptr->WebSocketOutputSize)
{
strcat (FaoString, " WebSocket=output=!UL");
*vecptr++ = mrpsptr->WebSocketOutputSize;
}
if (FaoString[0])
{
status = FaolToBuffer (bptr, blen, &slen, FaoString, &FaoVector);
if (VMSnok (status) || status == SS$_BUFFEROVF)
{
ErrorNoticed (rqptr, status, NULL, FI_LI);
return ("*ERROR*");
}
}
return (Buffer);
}
/*****************************************************************************/