home *** CD-ROM | disk | FTP | other *** search
/ Collection of Internet / Collection of Internet.iso / infosrvr / src / diffs / wwwlibr2.dif < prev   
Encoding:
Text File  |  1993-11-16  |  38.1 KB  |  1,348 lines
  1. *** ../../../../2.13/WWW/Library/Implementation/CommonMakefile    Mon Oct 11 14:46:29 1993
  2. --- CommonMakefile    Tue Nov 16 15:48:57 1993
  3. ***************
  4. *** 45,51 ****
  5.   
  6.   WC = $(WWW)/Library
  7.   CMN = $(WWW)/Library/Implementation/
  8. ! 
  9.   # Where shall we put the objects and built library?
  10.   
  11.   LOB = $(WTMP)/Library/$(WWW_MACH)
  12. --- 45,51 ----
  13.   
  14.   WC = $(WWW)/Library
  15.   CMN = $(WWW)/Library/Implementation/
  16. ! VMS = $(CMN)vms
  17.   # Where shall we put the objects and built library?
  18.   
  19.   LOB = $(WTMP)/Library/$(WWW_MACH)
  20. ***************
  21. *** 121,127 ****
  22.   SOURCES = $(CFILES) $(HFILES) $(CMN)Version.make \
  23.       $(CMN)CommonMakefile $(CMN)Makefile \
  24.       $(WWW)/README.txt $(WWW)/Copyright.txt $(WWW)/BUILD $(WWW)/Makefile
  25. ! SPECIFIC = $(WWW)/All/*/Makefile.include $(WWW)/All/Implementation/Makefile*
  26.   
  27.   
  28.   #    Library
  29. --- 121,133 ----
  30.   SOURCES = $(CFILES) $(HFILES) $(CMN)Version.make \
  31.       $(CMN)CommonMakefile $(CMN)Makefile \
  32.       $(WWW)/README.txt $(WWW)/Copyright.txt $(WWW)/BUILD $(WWW)/Makefile
  33. ! SPECIFIC = $(WWW)/All/*/Makefile.include $(WWW)/All/Implementation/Makefile* \
  34. !     $(VMS)/descrip.mms $(VMS)/build_multinet.com \
  35. !     $(VMS)/COPYING.LIB $(VMS)/setup.com $(VMS)/multinet.opt \
  36. !     $(VMS)/patchlevel.h $(VMS)/ufc-crypt.h \
  37. !     $(VMS)/crypt.c $(VMS)/crypt_util.c \
  38. !     $(VMS)/getline.c $(VMS)/getpass.c \
  39. !     $(VMS)/HTVMSUtils.h $(VMS)/HTVMSUtils.c
  40.   
  41.   
  42.   #    Library
  43. ***************
  44. *** 178,184 ****
  45.   
  46.   /pub/www/src/WWWLibrary_$(VC).tar.Z : $(SOURCES)
  47.       tar cf /pub/www/src/WWWLibrary_$(VC).tar \
  48. !         $(SOURCES)  $(SPECIFIC) $(WC)/*/Makefile $(WC)/vms/descrip.mms
  49.       compress /pub/www/src/WWWLibrary_$(VC).tar
  50.   
  51.   
  52. --- 184,190 ----
  53.   
  54.   /pub/www/src/WWWLibrary_$(VC).tar.Z : $(SOURCES)
  55.       tar cf /pub/www/src/WWWLibrary_$(VC).tar \
  56. !         $(SOURCES)  $(SPECIFIC) $(WC)/*/Makefile
  57.       compress /pub/www/src/WWWLibrary_$(VC).tar
  58.   
  59.   
  60. ***************
  61. *** 242,248 ****
  62.   $(LOB)/HTStyle.o : $(OE) $(CMN)HTStyle.c $(CMN)HTUtils.h
  63.       $(CC) -c -o $@ $(CFLAGS2) $(CMN)HTStyle.c
  64.   
  65. ! $(LOB)/HTAtom.o : $(OE) $(CMN)HTAtom.c $(CMN)HTUtils.h
  66.       $(CC) -c -o $@ $(CFLAGS2) $(CMN)HTAtom.c
  67.   
  68.   $(LOB)/HTChunk.o : $(OE) $(CMN)HTChunk.c $(CMN)HTUtils.h
  69. --- 248,254 ----
  70.   $(LOB)/HTStyle.o : $(OE) $(CMN)HTStyle.c $(CMN)HTUtils.h
  71.       $(CC) -c -o $@ $(CFLAGS2) $(CMN)HTStyle.c
  72.   
  73. ! $(LOB)/HTAtom.o : $(OE) $(CMN)HTAtom.c $(CMN)HTUtils.h $(CMN)HTList.h
  74.       $(CC) -c -o $@ $(CFLAGS2) $(CMN)HTAtom.c
  75.   
  76.   $(LOB)/HTChunk.o : $(OE) $(CMN)HTChunk.c $(CMN)HTUtils.h
  77. *** ../../../../2.13/WWW/Library/Implementation/HTAABrow.c    Wed Nov  3 16:20:18 1993
  78. --- HTAABrow.c    Mon Nov 15 16:11:29 1993
  79. ***************
  80. *** 622,628 ****
  81.           outofmem(__FILE__, "compose_auth_string");
  82.   #ifdef PUBKEY
  83.       HTPK_encrypt(cleartext, ciphertext, server->public_key);
  84. !     HTUU_encode(ciphertext, strlen(ciphertext), result);
  85.   #endif
  86.       free(cleartext);
  87.       free(ciphertext);
  88. --- 622,628 ----
  89.           outofmem(__FILE__, "compose_auth_string");
  90.   #ifdef PUBKEY
  91.       HTPK_encrypt(cleartext, ciphertext, server->public_key);
  92. !     HTUU_encode((unsigned char *)ciphertext, strlen(ciphertext), result);
  93.   #endif
  94.       free(cleartext);
  95.       free(ciphertext);
  96. ***************
  97. *** 630,636 ****
  98.       else { /* scheme == HTAA_BASIC */
  99.       if (!(result = (char*)malloc(4 * ((len+2)/3) + 1)))
  100.           outofmem(__FILE__, "compose_auth_string");
  101. !     HTUU_encode(cleartext, strlen(cleartext), result);
  102.       free(cleartext);
  103.       }
  104.       return result;
  105. --- 630,636 ----
  106.       else { /* scheme == HTAA_BASIC */
  107.       if (!(result = (char*)malloc(4 * ((len+2)/3) + 1)))
  108.           outofmem(__FILE__, "compose_auth_string");
  109. !     HTUU_encode((unsigned char *)cleartext, strlen(cleartext), result);
  110.       free(cleartext);
  111.       }
  112.       return result;
  113. *** ../../../../2.13/WWW/Library/Implementation/HTAAProt.c    Wed Nov  3 16:20:19 1993
  114. --- HTAAProt.c    Mon Nov 15 16:11:30 1993
  115. ***************
  116. *** 4,14 ****
  117. --- 4,17 ----
  118.   **
  119.   ** AUTHORS:
  120.   **    AL    Ari Luotonen    luotonen@dxcern.cern.ch
  121. + **    MD    Mark Donszelmann    duns@vxdeop.cern.ch
  122.   **
  123.   ** HISTORY:
  124.   **    20 Oct 93  AL    Now finds uid/gid for nobody/nogroup by name
  125.   **            (doesn't use default 65534 right away).
  126.   **            Also understands negative uids/gids.
  127. + **    14 Nov 93  MD    Added VMS compatibility
  128. + **
  129.   ** BUGS:
  130.   **
  131.   **
  132. ***************
  133. *** 15,22 ****
  134. --- 18,27 ----
  135.   */
  136.   
  137.   #include <string.h>
  138. + #ifndef VMS
  139.   #include <pwd.h>    /* Unix password file routine: getpwnam()    */
  140.   #include <grp.h>    /* Unix group file routine: getgrnam()        */
  141. + #endif /* not VMS */
  142.   
  143.   #include "HTUtils.h"
  144.   #include "HTAAUtil.h"
  145. ***************
  146. *** 64,69 ****
  147. --- 69,112 ----
  148.   }
  149.   
  150.   
  151. + #ifdef VMS
  152. + 
  153. + /* PUBLIC                            HTAA_getUidName()
  154. + **        GET THE USER ID NAME (VMS ONLY)
  155. + ** ON ENTRY:
  156. + **    No arguments.
  157. + **
  158. + ** ON EXIT:
  159. + **    returns    the user name 
  160. + **        Default is "" (nobody).
  161. + */
  162. + PUBLIC char * HTAA_getUidName NOARGS
  163. + {
  164. +     if (current_prot && current_prot->uid_name 
  165. +                   && (0 != strcmp(current_prot->uid_name,"nobody")) )
  166. +        return(current_prot->uid_name);
  167. +     else
  168. +        return("");
  169. + }
  170. + 
  171. + /* PUBLIC                            HTAA_getFileName
  172. + **        GET THE FILENAME (VMS ONLY)
  173. + ** ON ENTRY:
  174. + **    No arguments.
  175. + **
  176. + ** ON EXIT:
  177. + **    returns    the filename
  178. + */
  179. + PUBLIC char * HTAA_getFileName NOARGS
  180. + {
  181. +     if (current_prot && current_prot->filename)
  182. +        return(current_prot->filename);
  183. +     else
  184. +        return("");
  185. + }
  186. + 
  187. + #else /* not VMS */
  188. + 
  189.   /* PUBLIC                            HTAA_getUid()
  190.   **        GET THE USER ID TO CHANGE THE PROCESS UID TO
  191.   ** ON ENTRY:
  192. ***************
  193. *** 115,120 ****
  194. --- 158,164 ----
  195.   }
  196.   
  197.   
  198. + 
  199.   /* PUBLIC                            HTAA_getGid()
  200.   **        GET THE GROUP ID TO CHANGE THE PROCESS GID TO
  201.   ** ON ENTRY:
  202. ***************
  203. *** 163,168 ****
  204. --- 207,215 ----
  205.       */
  206.       return 65534;    /* nogroup */
  207.   }
  208. + 
  209. + #endif /* not VMS */
  210. + 
  211.   
  212.   
  213.   
  214. *** ../../../../2.13/WWW/Library/Implementation/HTAAProt.h    Tue Oct  5 11:04:40 1993
  215. --- HTAAProt.h    Mon Nov 15 16:17:38 1993
  216. ***************
  217. *** 167,172 ****
  218. --- 167,173 ----
  219.   
  220.    */
  221.   
  222. + #ifndef VMS
  223.   /* PUBLIC                                                       HTAA_getUid()
  224.   **              GET THE USER ID TO CHANGE THE PROCESS UID TO
  225.   ** ON ENTRY:
  226. ***************
  227. *** 189,194 ****
  228. --- 190,224 ----
  229.   **              Default is 65534 (nogroup).
  230.   */
  231.   PUBLIC int HTAA_getGid NOPARAMS;
  232. + #endif /* not VMS */
  233. + /*
  234. + 
  235. +    For VMS:
  236. +    
  237. +  */
  238. + 
  239. + #ifdef VMS
  240. + /* PUBLIC                                                       HTAA_getUidName()
  241. + **              GET THE USER ID NAME (VMS ONLY)
  242. + ** ON ENTRY:
  243. + **      No arguments.
  244. + **
  245. + ** ON EXIT:
  246. + **      returns the user name
  247. + **              Default is "" (nobody).
  248. + */
  249. + PUBLIC char * HTAA_getUidName NOPARAMS;
  250. + 
  251. + /* PUBLIC                                                       HTAA_getFileName
  252. + **              GET THE FILENAME (VMS ONLY)
  253. + ** ON ENTRY:
  254. + **      No arguments.
  255. + **
  256. + ** ON EXIT:
  257. + **      returns the filename
  258. + */
  259. + PUBLIC char * HTAA_getFileName NOPARAMS;
  260. + #endif /* VMS */
  261.   /*
  262.   
  263.    */
  264. *** ../../../../2.13/WWW/Library/Implementation/HTAAServ.c    Wed Nov  3 16:20:20 1993
  265. --- HTAAServ.c    Thu Nov 11 11:23:30 1993
  266. ***************
  267. *** 114,123 ****
  268.         case HTAA_DOTDOT:
  269.       return "Forbidden -- URL containing /../ disallowed";
  270.       break;
  271. !     /*
  272. !     ** It ought to, using an executable script (TBL)
  273. !     ** What do you mean, Tim?? (AL)
  274. !     */
  275.   
  276.       /* 404 cases */
  277.         case HTAA_NOT_FOUND:
  278. --- 114,122 ----
  279.         case HTAA_DOTDOT:
  280.       return "Forbidden -- URL containing /../ disallowed";
  281.       break;
  282. !       case HTAA_HTBIN:
  283. !     return "Forbidden -- /htbin feature not enabled on this server";
  284. !     break;
  285.   
  286.       /* 404 cases */
  287.         case HTAA_NOT_FOUND:
  288. ***************
  289. *** 173,178 ****
  290. --- 172,180 ----
  291.         case HTAA_DOTDOT:
  292.       return "SLASH-DOT-DOT";
  293.       break;
  294. +       case HTAA_HTBIN:
  295. +     return "HTBIN-OFF";
  296. +     break;
  297.   
  298.       /* 404 cases */
  299.         case HTAA_NOT_FOUND:
  300. ***************
  301. *** 432,438 ****
  302.       char *local_copy = NULL;
  303.       HTAAMethod method = HTAAMethod_enum(method_name);
  304.       HTAAScheme scheme = HTAAScheme_enum(scheme_name);
  305. !     
  306.       /*
  307.       ** Translate into absolute pathname, and
  308.       ** check for "protect" and "defprot" rules.
  309. --- 434,442 ----
  310.       char *local_copy = NULL;
  311.       HTAAMethod method = HTAAMethod_enum(method_name);
  312.       HTAAScheme scheme = HTAAScheme_enum(scheme_name);
  313. ! 
  314. !     HTAAFailReason = HTAA_OK;
  315. ! 
  316.       /*
  317.       ** Translate into absolute pathname, and
  318.       ** check for "protect" and "defprot" rules.
  319. ***************
  320. *** 458,472 ****
  321.                                           /* a /htbin call to set up */
  322.                                           /* protections.           */
  323.       if (0 == strncmp(local_copy, "/htbin/", 7)) {
  324. -         char *end = strchr(local_copy+7, '/');
  325. -         if (end)
  326. -         *end = (char)0;
  327.           if (!HTBinDir)
  328. !         StrAllocCopy(HTBinDir, HTBINDIR);
  329. !         FREE(pathname);
  330. !         pathname = (char*)malloc(strlen(HTBinDir)+strlen(local_copy)-4);
  331. !         strcpy(pathname, HTBinDir);
  332. !         strcat(pathname, local_copy+6);
  333.       }
  334.   
  335.       if (!pathname) {        /* Forbidden by rule */
  336. --- 462,478 ----
  337.                                           /* a /htbin call to set up */
  338.                                           /* protections.           */
  339.       if (0 == strncmp(local_copy, "/htbin/", 7)) {
  340.           if (!HTBinDir)
  341. !         HTAAFailReason = HTAA_HTBIN;
  342. !         else {
  343. !         char *end = strchr(local_copy+7, '/');
  344. !         if (end)
  345. !             *end = (char)0;
  346. !         FREE(pathname);
  347. !         pathname=(char*)malloc(strlen(HTBinDir)+strlen(local_copy)+1);
  348. !         strcpy(pathname, HTBinDir);
  349. !         strcat(pathname, local_copy+6);
  350. !         }
  351.       }
  352.   
  353.       if (!pathname) {        /* Forbidden by rule */
  354. ***************
  355. *** 474,482 ****
  356.                      "HTAA_checkAuthorization: Forbidden by rule\n");
  357.           HTAAFailReason = HTAA_BY_RULE;
  358.       }
  359. !     else {    /* pathname != NULL */
  360.           char *access = HTParse(pathname, "", PARSE_ACCESS);
  361. !         if (!*access  ||  0 == strcmp(access, "file")) { /*Local file, do AA*/
  362.           if (!HTSecure && 0 != strncmp(local_copy, "/htbin/", 7)) {
  363.               char *localname = HTLocalName(pathname);
  364.               free(pathname);
  365. --- 480,489 ----
  366.                      "HTAA_checkAuthorization: Forbidden by rule\n");
  367.           HTAAFailReason = HTAA_BY_RULE;
  368.       }
  369. !     else if (HTAAFailReason != HTAA_HTBIN) {
  370. !         /* pathname != NULL */
  371.           char *access = HTParse(pathname, "", PARSE_ACCESS);
  372. !         if (!*access || 0 == strcmp(access,"file")) { /*Local file, do AA*/
  373.           if (!HTSecure && 0 != strncmp(local_copy, "/htbin/", 7)) {
  374.               char *localname = HTLocalName(pathname);
  375.               free(pathname);
  376. ***************
  377. *** 529,534 ****
  378. --- 536,542 ----
  379.         case HTAA_NO_ENTRY:
  380.         case HTAA_SETUP_ERROR:
  381.         case HTAA_DOTDOT:
  382. +       case HTAA_HTBIN:
  383.       return 403;
  384.       break;
  385.   
  386. *** ../../../../2.13/WWW/Library/Implementation/HTAAUtil.c    Thu Oct  7 14:42:18 1993
  387. --- HTAAUtil.c    Thu Nov 11 11:23:30 1993
  388. ***************
  389. *** 33,40 ****
  390. --- 33,42 ----
  391.   **
  392.   ** AUTHORS:
  393.   **    AL    Ari Luotonen    luotonen@dxcern.cern.ch
  394. + **    MD     Mark Donszelmann    duns@vxdeop.cern.ch
  395.   **
  396.   ** HISTORY:
  397. + **     8 Nov 93  MD    (VMS only) Added case insensitive comparison in HTAA_templateCaseMatch
  398.   **
  399.   **
  400.   ** BUGS:
  401. ***************
  402. *** 224,230 ****
  403.   
  404.       for( ; *p  &&  *q  &&  *p == *q; p++, q++)    /* Find first mismatch */
  405.       ; /* do nothing else */
  406. !     
  407.       if (!*p && !*q)    return YES;    /* Equally long equal strings */
  408.       else if ('*' == *p) {        /* Wildcard */
  409.       p++;                /* Skip wildcard character */
  410. --- 226,232 ----
  411.   
  412.       for( ; *p  &&  *q  &&  *p == *q; p++, q++)    /* Find first mismatch */
  413.       ; /* do nothing else */
  414. ! 
  415.       if (!*p && !*q)    return YES;    /* Equally long equal strings */
  416.       else if ('*' == *p) {        /* Wildcard */
  417.       p++;                /* Skip wildcard character */
  418. ***************
  419. *** 236,242 ****
  420.       }
  421.       }    /* if wildcard */
  422.       else        return NO;    /* Length or character mismatch */
  423. ! }
  424.   
  425.   
  426.   /* PUBLIC                    HTAA_makeProtectionTemplate()
  427. --- 238,290 ----
  428.       }
  429.       }    /* if wildcard */
  430.       else        return NO;    /* Length or character mismatch */
  431. ! }    
  432. ! 
  433. ! 
  434. ! /* PUBLIC                        HTAA_templateCaseMatch()
  435. ! **        STRING COMPARISON FUNCTION FOR FILE NAMES
  436. ! **           WITH ONE WILDCARD * IN THE TEMPLATE (Case Insensitive)
  437. ! ** NOTE:
  438. ! **    This is essentially the same code as in HTAA_templateMatch, but
  439. ! **    it compares case insensitive (for VMS). Reason for this routine
  440. ! **    is that HTAA_templateMatch gets called from several places, also 
  441. ! **    there where a case sensitive match is needed, so one cannot just
  442. ! **    change the HTAA_templateMatch routine for VMS.
  443. ! **
  444. ! ** ON ENTRY:
  445. ! **    template    is a template string to match the file name
  446. ! **            agaist, may contain a single wildcard
  447. ! **            character * which matches zero or more
  448. ! **            arbitrary characters.
  449. ! **    filename    is the filename (or pathname) to be matched
  450. ! **            agaist the template.
  451. ! **
  452. ! ** ON EXIT:
  453. ! **    returns        YES, if filename matches the template.
  454. ! **            NO, otherwise.
  455. ! */
  456. ! PUBLIC BOOL HTAA_templateCaseMatch ARGS2(CONST char *, template, 
  457. !                          CONST char *, filename)
  458. ! {
  459. !     CONST char *p = template;
  460. !     CONST char *q = filename;
  461. !     int m;
  462. ! 
  463. !     for( ; *p  &&  *q  &&  toupper(*p) == toupper(*q); p++, q++) /* Find first mismatch */
  464. !     ; /* do nothing else */
  465. ! 
  466. !     if (!*p && !*q)    return YES;    /* Equally long equal strings */
  467. !     else if ('*' == *p) {        /* Wildcard */
  468. !     p++;                /* Skip wildcard character */
  469. !     m = strlen(q) - strlen(p);    /* Amount to match to wildcard */
  470. !     if (m < 0) return NO;        /* No match, filename too short */
  471. !     else {            /* Skip the matched characters and compare */
  472. !         if (strcasecomp(p, q+m))    return NO;    /* Tail mismatch */
  473. !         else                return YES;    /* Tail match */
  474. !     }
  475. !     }    /* if wildcard */
  476. !     else        return NO;    /* Length or character mismatch */
  477. ! }    
  478.   
  479.   
  480.   /* PUBLIC                    HTAA_makeProtectionTemplate()
  481. *** ../../../../2.13/WWW/Library/Implementation/HTAAUtil.h    Thu Oct  7 14:44:23 1993
  482. --- HTAAUtil.h    Mon Nov 15 16:17:37 1993
  483. ***************
  484. *** 218,223 ****
  485. --- 218,249 ----
  486.                                          CONST char * filename));
  487.   
  488.   
  489. + /* PUBLIC                                               HTAA_templateCaseMatch()
  490. + **              STRING COMPARISON FUNCTION FOR FILE NAMES
  491. + **                 WITH ONE WILDCARD * IN THE TEMPLATE (Case Insensitive)
  492. + ** NOTE:
  493. + **      This is essentially the same code as in HTAA_templateMatch, but
  494. + **      it compares case insensitive (for VMS). Reason for this routine
  495. + **      is that HTAA_templateMatch gets called from several places, also
  496. + **      there where a case sensitive match is needed, so one cannot just
  497. + **      change the HTAA_templateMatch routine for VMS.
  498. + **
  499. + ** ON ENTRY:
  500. + **      template        is a template string to match the file name
  501. + **                      agaist, may contain a single wildcard
  502. + **                      character * which matches zero or more
  503. + **                      arbitrary characters.
  504. + **      filename        is the filename (or pathname) to be matched
  505. + **                      agaist the template.
  506. + **
  507. + ** ON EXIT:
  508. + **      returns         YES, if filename matches the template.
  509. + **                      NO, otherwise.
  510. + */
  511. + PUBLIC BOOL HTAA_templateCaseMatch PARAMS((CONST char * template,
  512. +                                          CONST char * filename));
  513. + 
  514. + 
  515.   /* PUBLIC                                       HTAA_makeProtectionTemplate()
  516.   **              CREATE A PROTECTION TEMPLATE FOR THE FILES
  517.   **              IN THE SAME DIRECTORY AS THE GIVEN FILE
  518. *** ../../../../2.13/WWW/Library/Implementation/HTACL.c    Wed Oct 13 16:53:41 1993
  519. --- HTACL.c    Thu Nov 11 11:23:32 1993
  520. ***************
  521. *** 4,11 ****
  522. --- 4,13 ----
  523.   **
  524.   ** AUTHORS:
  525.   **    AL    Ari Luotonen    luotonen@dxcern.cern.ch
  526. + **    MD     Mark Donszelmann    duns@vxdeop.cern.ch
  527.   **
  528.   ** HISTORY:
  529. + **     8 Nov 93  MD    (VMS only) case insensitive compare reading acl entry, filename
  530.   **
  531.   **
  532.   ** BUGS:
  533. ***************
  534. *** 169,175 ****
  535. --- 171,181 ----
  536.       outofmem(__FILE__, "HTAA_getAuthorizedGroups");
  537.       
  538.       while (EOF != HTAAFile_readField(acl_file, buf, len+1)) {
  539. + #ifdef VMS
  540. +     if (HTAA_templateCaseMatch(buf, filename)) {
  541. + #else /* not VMS */
  542.       if (HTAA_templateMatch(buf, filename)) {
  543. + #endif /* not VMS */
  544.           HTList *methods = HTList_new();
  545.           HTAAFile_readList(acl_file, methods, MAX_METHODNAME_LEN);
  546.           if (TRACE) {
  547. *** ../../../../2.13/WWW/Library/Implementation/HTAtom.c    Tue Apr 27 12:38:01 1993
  548. --- HTAtom.c    Mon Nov 15 16:11:31 1993
  549. ***************
  550. *** 16,32 ****
  551.   #include "HTAtom.h"
  552.   
  553.   #include <stdio.h>                /* joe@athena, TBL 921019 */
  554.   #include "HTUtils.h"
  555.   
  556.   PRIVATE HTAtom * hash_table[HASH_SIZE];
  557.   PRIVATE BOOL initialised = NO;
  558.   
  559. ! #ifdef __STDC__
  560. ! PUBLIC HTAtom * HTAtom_for(const char * string)
  561. ! #else
  562. ! PUBLIC HTAtom * HTAtom_for(string)
  563. !     char * string;
  564. ! #endif
  565.   {
  566.       int hash;
  567.       CONST char * p;
  568. --- 16,30 ----
  569.   #include "HTAtom.h"
  570.   
  571.   #include <stdio.h>                /* joe@athena, TBL 921019 */
  572. + #include <string.h>
  573. + 
  574.   #include "HTUtils.h"
  575. + #include "HTList.h"
  576.   
  577.   PRIVATE HTAtom * hash_table[HASH_SIZE];
  578.   PRIVATE BOOL initialised = NO;
  579.   
  580. ! PUBLIC HTAtom * HTAtom_for ARGS1(CONST char *, string)
  581.   {
  582.       int hash;
  583.       CONST char * p;
  584. ***************
  585. *** 70,73 ****
  586. --- 68,115 ----
  587.       return a;
  588.   }
  589.   
  590. + 
  591. + PRIVATE BOOL mime_match ARGS2(CONST char *, name,
  592. +                   CONST char *, templ)
  593. + {
  594. +     if (name && templ) {
  595. +     static char *n1 = NULL;
  596. +     static char *t1 = NULL;
  597. +     char *n2;
  598. +     char *t2;
  599. + 
  600. +     StrAllocCopy(n1, name);        /* These also free the ones    */
  601. +     StrAllocCopy(t1, templ);    /* from previous call.        */
  602. + 
  603. +     if (!(n2 = strchr(n1, '/'))  ||  !(t2 = strchr(t1, '/')))
  604. +         return NO;
  605. + 
  606. +     *(n2++) = (char)0;
  607. +     *(t2++) = (char)0;
  608. + 
  609. +     if ((0==strcmp(t1, "*") || 0==strcmp(t1, n1)) &&
  610. +         (0==strcmp(t2, "*") || 0==strcmp(t2, n2)))
  611. +         return YES;
  612. +     }
  613. +     return NO;
  614. + }
  615. +     
  616. + 
  617. + PUBLIC HTList *HTAtom_templateMatches ARGS1(CONST char *, templ)
  618. + {
  619. +     HTList *matches = HTList_new();
  620. + 
  621. +     if (initialised && templ) {
  622. +     int i;
  623. +     HTAtom *cur;
  624. + 
  625. +     for (i=0; i<HASH_SIZE; i++) {
  626. +         for (cur = hash_table[i];  cur;  cur=cur->next) {
  627. +         if (mime_match(cur->name, templ))
  628. +             HTList_addObject(matches, (void*)cur);
  629. +         }
  630. +     }
  631. +     }
  632. +     return matches;
  633. + }
  634.   
  635. *** ../../../../2.13/WWW/Library/Implementation/HTAtom.h    Thu Jun 10 11:55:24 1993
  636. --- HTAtom.h    Mon Nov 15 16:17:32 1993
  637. ***************
  638. *** 21,26 ****
  639. --- 21,34 ----
  640.   #ifndef HTATOM_H
  641.   #define HTATOM_H
  642.   
  643. + #include "HTUtils.h"
  644. + #include "HTList.h"
  645. + 
  646. + #ifdef SHORT_NAMES
  647. + #define HTAt_for        HTAtom_for
  648. + #define HTAt_tMa        HTAtom_templateMatches
  649. + #endif /*SHORT_NAMES*/
  650. + 
  651.   typedef struct _HTAtom HTAtom;
  652.   struct _HTAtom {
  653.           HTAtom *        next;
  654. ***************
  655. *** 28,38 ****
  656.   }; /* struct _HTAtom */
  657.   
  658.   
  659. ! #ifdef __STDC__
  660. ! extern HTAtom * HTAtom_for(const char * string);
  661. ! #else
  662. ! extern HTAtom * HTAtom_for();
  663. ! #endif
  664.   
  665.   #define HTAtom_name(a) ((a)->name)
  666.   
  667. --- 36,43 ----
  668.   }; /* struct _HTAtom */
  669.   
  670.   
  671. ! PUBLIC HTAtom * HTAtom_for PARAMS((CONST char * string));
  672. ! PUBLIC HTList * HTAtom_templateMatches PARAMS((CONST char * templ));
  673.   
  674.   #define HTAtom_name(a) ((a)->name)
  675.   
  676. *** ../../../../2.13/WWW/Library/Implementation/HTFile.c    Thu Nov  4 10:54:15 1993
  677. --- HTFile.c    Mon Nov 15 16:11:33 1993
  678. ***************
  679. *** 9,15 ****
  680.   **       Apr 91    vms-vms access included using DECnet syntax
  681.   **    26 Jun 92 (JFG) When running over DECnet, suppressed FTP.
  682.   **            Fixed access bug for relative names on VMS.
  683. ! **       Sep 92 (MD)  Access to VMS files allows sharing.
  684.   **
  685.   ** Bugs:
  686.   **    FTP: Cannot access VMS files from a unix machine.
  687. --- 9,16 ----
  688.   **       Apr 91    vms-vms access included using DECnet syntax
  689.   **    26 Jun 92 (JFG) When running over DECnet, suppressed FTP.
  690.   **            Fixed access bug for relative names on VMS.
  691. ! **       Sep 93 (MD)  Access to VMS files allows sharing.
  692. ! **    15 Nov 93 (MD)    Moved HTVMSname to HTVMSUTILS.C
  693.   **
  694.   ** Bugs:
  695.   **    FTP: Cannot access VMS files from a unix machine.
  696. ***************
  697. *** 25,30 ****
  698. --- 26,35 ----
  699.   
  700.   #include "HTUtils.h"
  701.   
  702. + #ifdef VMS
  703. + #include "HTVMSUtils.h"
  704. + #endif /* VMS */
  705. + 
  706.   #include "HTParse.h"
  707.   #include "tcp.h"
  708.   #include "HTTCP.h"
  709. ***************
  710. *** 74,80 ****
  711.   
  712.   PRIVATE char *HTMountRoot = "/Net/";        /* Where to find mounts */
  713.   #ifdef VMS
  714. ! PRIVATE char *HTCacheRoot = "/WWW$SCRATCH/";   /* Where to cache things */
  715.   #else
  716.   PRIVATE char *HTCacheRoot = "/tmp/W3_Cache_";   /* Where to cache things */
  717.   #endif
  718. --- 79,85 ----
  719.   
  720.   PRIVATE char *HTMountRoot = "/Net/";        /* Where to find mounts */
  721.   #ifdef VMS
  722. ! PRIVATE char *HTCacheRoot = "/WWW$SCRATCH";   /* Where to cache things */
  723.   #else
  724.   PRIVATE char *HTCacheRoot = "/tmp/W3_Cache_";   /* Where to cache things */
  725.   #endif
  726. ***************
  727. *** 146,220 ****
  728.   
  729.   
  730.   
  731. - #ifdef VMS
  732. - /*    Convert unix-style name into VMS name
  733. - **    -------------------------------------
  734. - **
  735. - ** Bug:    Returns pointer to static -- non-reentrant
  736. - */
  737. - PRIVATE char * vms_name(CONST char * nn, CONST char * fn)
  738. - {
  739.   
  740. - /*    We try converting the filename into Files-11 syntax. That is, we assume
  741. - **    first that the file is, like us, on a VMS node. We try remote
  742. - **    (or local) DECnet access. Files-11, VMS, VAX and DECnet
  743. - **    are trademarks of Digital Equipment Corporation. 
  744. - **    The node is assumed to be local if the hostname WITHOUT DOMAIN
  745. - **    matches the local one. @@@
  746. - */
  747. -     static char vmsname[INFINITY];    /* returned */
  748. -     char * filename = (char*)malloc(strlen(fn)+1);
  749. -     char * nodename = (char*)malloc(strlen(nn)+2+1);    /* Copies to hack */
  750. -     char *second;        /* 2nd slash */
  751. -     char *last;            /* last slash */
  752. -     
  753. -     char * hostname = HTHostName();
  754.   
  755. -     if (!filename || !nodename) outofmem(__FILE__, "vms_name");
  756. -     strcpy(filename, fn);
  757. -     strcpy(nodename, "");    /* On same node? Yes if node names match */
  758. -     {
  759. -         char *p, *q;
  760. -         for (p=hostname, q=nn; *p && *p!='.' && *q && *q!='.'; p++, q++){
  761. -         if (TOUPPER(*p)!=TOUPPER(*q)) {
  762. -             strcpy(nodename, nn);
  763. -         q = strchr(nodename, '.');    /* Mismatch */
  764. -         if (q) *q=0;            /* Chop domain */
  765. -         strcat(nodename, "::");        /* Try decnet anyway */
  766. -         break;
  767. -         }
  768. -     }
  769. -     }
  770.   
  771. -     second = strchr(filename+1, '/');        /* 2nd slash */
  772. -     last = strrchr(filename, '/');    /* last slash */
  773. -         
  774. -     if (!second) {                /* Only one slash */
  775. -     sprintf(vmsname, "%s%s", nodename, filename + 1);
  776. -     } else if(second==last) {        /* Exactly two slashes */
  777. -     *second = 0;        /* Split filename from disk */
  778. -     sprintf(vmsname, "%s%s:%s", nodename, filename+1, second+1);
  779. -     *second = '/';    /* restore */
  780. -     } else {                 /* More than two slashes */
  781. -     char * p;
  782. -     *second = 0;        /* Split disk from directories */
  783. -     *last = 0;        /* Split dir from filename */
  784. -     sprintf(vmsname, "%s%s:[%s]%s",
  785. -         nodename, filename+1, second+1, last+1);
  786. -     *second = *last = '/';    /* restore filename */
  787. -     for (p=strchr(vmsname, '['); *p!=']'; p++)
  788. -         if (*p=='/') *p='.';    /* Convert dir sep.  to dots */
  789. -     }
  790. -     free(nodename);
  791. -     free(filename);
  792. -     return vmsname;
  793. - }
  794. - 
  795. - 
  796. - #endif /* VMS */
  797. - 
  798. - 
  799. - 
  800.   /*    Send README file
  801.   **
  802.   **  If a README file exists, then it is inserted into the document here.
  803. --- 151,159 ----
  804. ***************
  805. *** 321,327 ****
  806.       
  807.       HTUnEscape(path);    /* Interpret % signs */
  808.       
  809. !     if (0==strcmp(access, "file")) {
  810.           free(access);    
  811.       if ((0==strcasecomp(host, HTHostName())) ||
  812.           (0==strcasecomp(host, "localhost")) || !*host) {
  813. --- 260,266 ----
  814.       
  815.       HTUnEscape(path);    /* Interpret % signs */
  816.       
  817. !     if (0==strcmp(access, "file")) { /* local file */
  818.           free(access);    
  819.       if ((0==strcasecomp(host, HTHostName())) ||
  820.           (0==strcasecomp(host, "localhost")) || !*host) {
  821. ***************
  822. *** 341,347 ****
  823. --- 280,293 ----
  824.       } else {  /* other access */
  825.       char * result;
  826.           CONST char * home =  (CONST char*)getenv("HOME");
  827. + #ifdef VMS
  828. +     if (!home) 
  829. +         home = HTCacheRoot; 
  830. +     else
  831. +            home = HTVMS_wwwName(home);
  832. + #else /* not VMS */
  833.       if (!home) home = "/tmp"; 
  834. + #endif /* not VMS */
  835.       result = (char *)malloc(
  836.           strlen(home)+strlen(access)+strlen(host)+strlen(path)+6+1);
  837.         if (result == NULL) outofmem(__FILE__, "HTLocalName");
  838. ***************
  839. *** 722,729 ****
  840.       {
  841.           FILE * fp;
  842.       char * vmsname = strchr(filename + 1, '/') ?
  843. !       vms_name(nodename, filename) : filename + 1;
  844. ! /* MD SEP 93, open files can be read... */
  845.       fp = fopen(vmsname, "r", "shr=put", "shr=upd");
  846.       
  847.   /*    If the file wasn't VMS syntax, then perhaps it is ultrix
  848. --- 668,674 ----
  849.       {
  850.           FILE * fp;
  851.       char * vmsname = strchr(filename + 1, '/') ?
  852. !       HTVMS_name(nodename, filename) : filename + 1;
  853.       fp = fopen(vmsname, "r", "shr=put", "shr=upd");
  854.       
  855.   /*    If the file wasn't VMS syntax, then perhaps it is ultrix
  856. ***************
  857. *** 732,738 ****
  858.           char ultrixname[INFINITY];
  859.           if (TRACE) fprintf(stderr, "HTFile: Can't open as %s\n", vmsname);
  860.           sprintf(ultrixname, "%s::\"%s\"", nodename, filename);
  861. - /* MD SEP 93, open files can be read... */
  862.             fp = fopen(ultrixname, "r", "shr=put", "shr=upd");
  863.           if (!fp) {
  864.           if (TRACE) fprintf(stderr, 
  865. --- 677,682 ----
  866. *** ../../../../2.13/WWW/Library/Implementation/HTFormat.h    Thu Sep  2 18:02:28 1993
  867. --- HTFormat.h    Tue Nov 16 15:27:49 1993
  868. ***************
  869. *** 156,161 ****
  870. --- 156,168 ----
  871.   
  872.   /*
  873.   
  874. +    The default presentation is used when no other is appriporate
  875. +    
  876. +  */
  877. + extern  HTPresentation* default_presentation;
  878. + 
  879. + /*
  880. + 
  881.   HTSetPresentation: Register a system command to present a format
  882.   
  883.     ON ENTRY,
  884. *** ../../../../2.13/WWW/Library/Implementation/HTGroup.h    Thu Nov  4 10:07:16 1993
  885. --- HTGroup.h    Mon Nov 15 16:17:37 1993
  886. ***************
  887. *** 39,44 ****
  888. --- 39,45 ----
  889.       HTAA_NO_ENTRY,      /* 403 Forbidden, no ACL entry          */
  890.       HTAA_SETUP_ERROR,   /* 403 Forbidden, server setup error    */
  891.       HTAA_DOTDOT,        /* 403 Forbidden, URL with /../ illegal */
  892. +     HTAA_HTBIN,         /* 403 Forbidden, /htbin not enabled    */
  893.       HTAA_NOT_FOUND      /* 404 Not found, or read protected     */
  894.   } HTAAFailReasonType;
  895.   
  896. *** ../../../../2.13/WWW/Library/Implementation/HTInit.h    Thu Jun 10 11:55:29 1993
  897. --- HTInit.h    Mon Nov 15 16:17:35 1993
  898. ***************
  899. *** 1,18 ****
  900. ! /*  */
  901. ! 
  902. ! /*              Initialisation module                   HTInit.h
  903. ! **
  904. ! **      This module resisters all the plug&play software modules which
  905. ! **      will be used in the program.  This is for a browser.
  906. ! **
  907. ! **      To override this, just copy it and link in your version
  908. ! **      befoe you link with the library.
  909. ! */
  910. ! 
  911.   #include "HTUtils.h"
  912.   
  913.   extern void HTFormatInit NOPARAMS;
  914.   extern void HTFileInit NOPARAMS;
  915.   /*
  916.   
  917.       */
  918. --- 1,20 ----
  919. ! /*                   /Net/dxcern/userd/timbl/hypertext/WWW/Library/Implementation/HTInit.html
  920. !                                   INITIALISATION MODULE
  921. !                                              
  922. !    This module resisters all the plug & play software modules which will be used in the
  923. !    program.  This is for a browser.
  924. !    
  925. !    To override this, just copy it and link in your version befoe you link with the
  926. !    library.
  927. !    
  928. !    Implemented by HTInit.c by default.
  929. !    
  930. !  */
  931.   #include "HTUtils.h"
  932.   
  933.   extern void HTFormatInit NOPARAMS;
  934.   extern void HTFileInit NOPARAMS;
  935. + 
  936.   /*
  937.   
  938.       */
  939. *** ../../../../2.13/WWW/Library/Implementation/HTMLDTD.c    Thu Nov  4 15:35:11 1993
  940. --- HTMLDTD.c    Thu Nov 11 11:25:21 1993
  941. ***************
  942. *** 1,5 ****
  943. --- 1,8 ----
  944.   /*        Our Static DTD for HTML
  945.   **        -----------------------
  946. + **
  947. + **     6 Nov 93    MD    Increased size of img_attr array to make space
  948. + **                  for terminator.
  949.   */
  950.   
  951.   /* Implements:
  952. *** ../../../../2.13/WWW/Library/Implementation/HTMLDTD.h    Wed Nov  3 16:29:06 1993
  953. --- HTMLDTD.h    Mon Nov 15 16:17:32 1993
  954. ***************
  955. *** 49,55 ****
  956.           HTML_U,         HTML_UL,
  957.           HTML_VAR,       HTML_XMP } HTMLElement;
  958.   
  959. ! #define HTML_ELEMENTS 48
  960.   
  961.   /*
  962.   
  963. --- 49,55 ----
  964.           HTML_U,         HTML_UL,
  965.           HTML_VAR,       HTML_XMP } HTMLElement;
  966.   
  967. ! #define HTML_ELEMENTS 47
  968.   
  969.   /*
  970.   
  971. *** ../../../../2.13/WWW/Library/Implementation/HTMLGen.c    Wed Nov  3 16:21:46 1993
  972. --- HTMLGen.c    Tue Nov 16 15:48:59 1993
  973. ***************
  974. *** 23,28 ****
  975. --- 23,29 ----
  976.   #include "HTStream.h"
  977.   #include "SGML.h"
  978.   #include "HTFormat.h"
  979. + #include "tcp.h"
  980.   
  981.   #define PUTC(c) (*me->targetClass.put_character)(me->target, c)
  982.   /* #define PUTS(s) (*me->targetClass.put_string)(me->target, s) */
  983. ***************
  984. *** 43,52 ****
  985.       HTStream *             target;
  986.       HTStreamClass            targetClass;    /* COPY for speed */
  987.       
  988. !     char                buffer[BUFFER_SIZE];
  989.       char *                write_pointer;
  990.       char *                line_break;
  991.       int                cleanness;
  992.       BOOL                preformatted;
  993.   };
  994.   
  995. --- 44,54 ----
  996.       HTStream *             target;
  997.       HTStreamClass            targetClass;    /* COPY for speed */
  998.       
  999. !     char                buffer[BUFFER_SIZE+1]; /* 1for NL */
  1000.       char *                write_pointer;
  1001.       char *                line_break;
  1002.       int                cleanness;
  1003. +     BOOL                delete_line_break_char;
  1004.       BOOL                preformatted;
  1005.   };
  1006.   
  1007. ***************
  1008. *** 62,72 ****
  1009. --- 64,85 ----
  1010.       me->write_pointer = me->buffer;
  1011.       me->line_break = me->buffer;
  1012.       me->cleanness = 0;
  1013. +     me->delete_line_break_char = NO;
  1014.   }
  1015.   
  1016.   
  1017.   /*    Character handling
  1018.   **    ------------------
  1019. + **
  1020. + **    The tricky bits are the line break handling.  This attempts
  1021. + **    to synchrononise line breaks on sentence or phrase ends. This
  1022. + **    is important if one stores SGML files in a line-oriented code
  1023. + **    repository, so that if a small change is made, line ends don't
  1024. + **    shift in a ripple-through to apparently change a large part of the
  1025. + **    file. We give extra "cleanness" to spaces appearing directly
  1026. + **    after periods (full stops), [semi]colons and commas.
  1027. + **       This should make the source files easier to read and modify
  1028. + **    by hand, too, though this is not a primary design consideration.
  1029.   */
  1030.   PRIVATE void HTMLGen_put_character ARGS2(HTStructured *, me, char, c)
  1031.   {
  1032. ***************
  1033. *** 79,107 ****
  1034.       }
  1035.       
  1036.       if ((!me->preformatted  && c==' ')) {
  1037. !         me->line_break = me->write_pointer;
  1038. !     me->cleanness = 1;
  1039.       }
  1040.       
  1041.       /* Flush buffer out when full */
  1042.       if (me->write_pointer == me->buffer + BUFFER_SIZE) {
  1043.           if (me->cleanness) {
  1044. !         me->line_break[-1] = '\n';
  1045.           (*me->targetClass.put_block)(me->target,
  1046.                           me->buffer,
  1047. !                     me->line_break - me->buffer);
  1048.           {  /* move next line in */
  1049. !             char * p,*q;
  1050. !         for(q=me->buffer, p=me->line_break; p < me->write_pointer; )
  1051.               *q++ = *p++;
  1052.           }
  1053.           me->cleanness = 0;
  1054.       } else {
  1055.           (*me->targetClass.put_block)(me->target,
  1056.               me->buffer,
  1057.           BUFFER_SIZE);
  1058.       }
  1059. -     me->write_pointer = me->buffer;
  1060.       me->line_break = me->buffer;
  1061.       }
  1062.   }
  1063. --- 92,140 ----
  1064.       }
  1065.       
  1066.       if ((!me->preformatted  && c==' ')) {
  1067. !         int new_cleanness = 1;
  1068. !     if (me->write_pointer > (me->buffer + 1)) {
  1069. !         char delims[5];
  1070. !         char * p;
  1071. !         strcpy(delims, ",;:.");        /* @@ english bias */
  1072. !         p = strchr(delims, me->write_pointer[-2]);
  1073. !         if (p) new_cleanness = p - delims + 2;
  1074. !     }
  1075. !     if (new_cleanness >= me->cleanness) {
  1076. !         me->line_break = me->write_pointer - 1;  /* Point to space */
  1077. !         me->cleanness = new_cleanness;
  1078. !         me->delete_line_break_char = YES;
  1079. !     }
  1080.       }
  1081.       
  1082.       /* Flush buffer out when full */
  1083.       if (me->write_pointer == me->buffer + BUFFER_SIZE) {
  1084.           if (me->cleanness) {
  1085. !         char line_break_char = me->line_break[0];
  1086. !         char * saved = me->line_break;
  1087. !         
  1088. !         if (me->delete_line_break_char) saved++; 
  1089. !         me->line_break[0] = '\n';
  1090.           (*me->targetClass.put_block)(me->target,
  1091.                           me->buffer,
  1092. !                     me->line_break - me->buffer + 1);
  1093. !         me->line_break[0] = line_break_char;
  1094.           {  /* move next line in */
  1095. !             char * p=saved;
  1096. !         char *q;
  1097. !         for(q=me->buffer; p < me->write_pointer; )
  1098.               *q++ = *p++;
  1099.           }
  1100.           me->cleanness = 0;
  1101. +         me->delete_line_break_char = 0;
  1102. +         me->write_pointer = me->write_pointer - (saved-me->buffer);
  1103. + 
  1104.       } else {
  1105.           (*me->targetClass.put_block)(me->target,
  1106.               me->buffer,
  1107.           BUFFER_SIZE);
  1108. +         me->write_pointer = me->buffer;
  1109.       }
  1110.       me->line_break = me->buffer;
  1111.       }
  1112.   }
  1113. ***************
  1114. *** 141,147 ****
  1115.       BOOL was_preformatted = me->preformatted;
  1116.       HTTag * tag = &HTML_dtd.tags[element_number];
  1117.   
  1118. !     me->preformatted = NO;
  1119.       HTMLGen_put_character(me, '<');
  1120.       HTMLGen_put_string(me, tag->name);
  1121.       if (present) for (i=0; i< tag->number_of_attributes; i++) {
  1122. --- 174,180 ----
  1123.       BOOL was_preformatted = me->preformatted;
  1124.       HTTag * tag = &HTML_dtd.tags[element_number];
  1125.   
  1126. !     me->preformatted = NO;    /* free text within tags */
  1127.       HTMLGen_put_character(me, '<');
  1128.       HTMLGen_put_string(me, tag->name);
  1129.       if (present) for (i=0; i< tag->number_of_attributes; i++) {
  1130. ***************
  1131. *** 157,162 ****
  1132. --- 190,200 ----
  1133.       }
  1134.       HTMLGen_put_string(me, ">\n");
  1135.       
  1136. +     if (tag->contents != SGML_EMPTY) {  /* can break after element start */ 
  1137. +         me->line_break = me->write_pointer;    /* Don't you hate SGML?  */
  1138. +     me->cleanness = 1;
  1139. +     me->delete_line_break_char = NO;
  1140. +     }
  1141.       /* Make very specific HTML assumption that PRE can't be
  1142.          nested! */
  1143.          
  1144. ***************
  1145. *** 178,183 ****
  1146. --- 216,227 ----
  1147.   PRIVATE void HTMLGen_end_element ARGS2(HTStructured *, me,
  1148.               int , element_number)
  1149.   {
  1150. +     if (HTML_dtd.tags[element_number].contents != SGML_EMPTY) {
  1151. +                     /* can break before element end */ 
  1152. +         me->line_break = me->write_pointer;    /* Don't you hate SGML?  */
  1153. +     me->cleanness = 1;
  1154. +     me->delete_line_break_char = NO;
  1155. +     }
  1156.       HTMLGen_put_string(me, "</");
  1157.       HTMLGen_put_string(me, HTML_dtd.tags[element_number].name);
  1158.       HTMLGen_put_character(me, '>');
  1159. ***************
  1160. *** 265,270 ****
  1161. --- 309,315 ----
  1162.       me->write_pointer = me->buffer;
  1163.       me->line_break =     me->buffer;
  1164.       me->cleanness =     0;
  1165. +     me->delete_line_break_char = NO;
  1166.       me->preformatted =     NO;
  1167.       return me;
  1168.   }
  1169. *** ../../../../2.13/WWW/Library/Implementation/HTPasswd.c    Wed Nov  3 16:20:34 1993
  1170. --- HTPasswd.c    Thu Nov 11 11:23:42 1993
  1171. ***************
  1172. *** 4,11 ****
  1173. --- 4,13 ----
  1174.   **
  1175.   ** AUTHORS:
  1176.   **    AL    Ari Luotonen    luotonen@dxcern.cern.ch
  1177. + **    MD    Mark Donszelmann    duns@vxdeop.cern.ch
  1178.   **
  1179.   ** HISTORY:
  1180. + **     7 Nov 93     MD     free for crypt taken out (static data returned) 
  1181.   **
  1182.   **
  1183.   ** BUGS:
  1184. ***************
  1185. *** 101,107 ****
  1186.   
  1187.       tmp = crypt((char*)password, salt);  /*crypt() doesn't change its args*/
  1188.       strcat(result, tmp);
  1189. -     free(tmp);
  1190.   
  1191.       cur += 8;
  1192.       len -= 8;
  1193. --- 103,108 ----
  1194. ***************
  1195. *** 166,172 ****
  1196.   
  1197.       tmp = crypt((char*)password, salt);
  1198.       strcat(result, tmp);
  1199. -     free(tmp);
  1200.   
  1201.       cur1 += 8;
  1202.       cur2 += 13;
  1203. --- 167,172 ----
  1204. *** ../../../../2.13/WWW/Library/Implementation/HTRules.c    Wed Nov  3 16:20:34 1993
  1205. --- HTRules.c    Thu Nov 11 11:23:43 1993
  1206. ***************
  1207. *** 41,47 ****
  1208. --- 41,49 ----
  1209.   */
  1210.   PUBLIC char *HTBinDir = NULL;    /* Physical /htbin directory path.    */
  1211.                                   /* In future this should not be global.    */
  1212. + PUBLIC char *HTSearchScript = NULL;    /* Search script name.        */
  1213.   
  1214. + 
  1215.   /*    Module-wide variables
  1216.   **    ---------------------
  1217.   */
  1218. ***************
  1219. *** 349,356 ****
  1220.               status >= 2 ? secs             : 0.0,
  1221.               status >= 3 ? secs_per_byte     : 0.0 );
  1222.   
  1223. !     } else if (0==strcasecomp(word1, "htbin")) { /* Physical /htbin location */
  1224. !     StrAllocCopy(HTBinDir, word2);
  1225.   
  1226.       } else {
  1227.       op =    0==strcasecomp(word1, "map")  ?    HT_Map
  1228. --- 351,362 ----
  1229.               status >= 2 ? secs             : 0.0,
  1230.               status >= 3 ? secs_per_byte     : 0.0 );
  1231.   
  1232. !     } else if (0==strncasecomp(word1, "htbin", 5) ||
  1233. !            0==strncasecomp(word1, "bindir", 6)) {
  1234. !     StrAllocCopy(HTBinDir, word2);    /* Physical /htbin location */
  1235. ! 
  1236. !     } else if (0==strncasecomp(word1, "search", 6)) {
  1237. !     StrAllocCopy(HTSearchScript, word2);    /* Search script name */
  1238.   
  1239.       } else {
  1240.       op =    0==strcasecomp(word1, "map")  ?    HT_Map
  1241. *** ../../../../2.13/WWW/Library/Implementation/HTRules.h    Thu Nov  4 10:07:13 1993
  1242. --- HTRules.h    Mon Nov 15 16:17:33 1993
  1243. ***************
  1244. *** 27,36 ****
  1245.           HT_Protect
  1246.   } HTRuleOp;
  1247.   
  1248. ! #ifndef HTBINDIR
  1249. ! #define HTBINDIR "/htbin"       /* Default /htbin location */
  1250. ! #endif
  1251.   extern char * HTBinDir;         /* Physical /htbin location */
  1252.   
  1253.   /*
  1254.   
  1255. --- 27,50 ----
  1256.           HT_Protect
  1257.   } HTRuleOp;
  1258.   
  1259. ! #ifdef SHORT_NAMES
  1260. ! #define HTSearSc HTSearchScript
  1261. ! #endif /*SHORT_NAMES*/
  1262. ! 
  1263. ! /*
  1264. ! 
  1265. ! Server Side Script Execution
  1266. ! 
  1267. !    If a URL starts with /htbin/ it is understood to mean a script execution request on
  1268. !    server. This feature needs to be turned on by setting HTBinDir by the htbin rule.
  1269. !    Index searching is enabled by setting HTSearchScript into the name of script in BinDir
  1270. !    doing the actual search by search rule (BinDir must also be set in this case, of
  1271. !    course).
  1272. !    
  1273. !  */
  1274. ! 
  1275.   extern char * HTBinDir;         /* Physical /htbin location */
  1276. + extern char * HTSearchScript;   /* Search script name */
  1277.   
  1278.   /*
  1279.   
  1280. *** ../../../../2.13/WWW/Library/Implementation/HTTP.c    Wed Oct 13 16:53:44 1993
  1281. --- HTTP.c    Thu Nov 11 11:23:44 1993
  1282. ***************
  1283. *** 144,150 ****
  1284.       hostname = HTParse((gate ? gate : arg), "", PARSE_HOST);
  1285.       if (hostname &&
  1286.           NULL != (colon = strchr(hostname, ':'))) {
  1287. !         *(colon++) = NULL;    /* Chop off port number */
  1288.           portnumber = atoi(colon);
  1289.       }
  1290.       else portnumber = 80;
  1291. --- 144,150 ----
  1292.       hostname = HTParse((gate ? gate : arg), "", PARSE_HOST);
  1293.       if (hostname &&
  1294.           NULL != (colon = strchr(hostname, ':'))) {
  1295. !         *(colon++) = '\0';    /* Chop off port number */
  1296.           portnumber = atoi(colon);
  1297.       }
  1298.       else portnumber = 80;
  1299. *** ../../../../2.13/WWW/Library/Implementation/HTUtils.h    Mon Oct 18 16:34:34 1993
  1300. --- HTUtils.h    Mon Nov 15 16:17:35 1993
  1301. ***************
  1302. *** 183,195 ****
  1303.   #define BOOL BOOLEAN
  1304.   #endif
  1305.   #ifndef YES
  1306. ! #define YES (BOOL)1
  1307. ! #define NO (BOOL)0
  1308.   #endif
  1309.   
  1310. ! #ifndef min
  1311. ! #define min(a,b) ((a) <= (b) ? (a) : (b))
  1312. ! #define max(a,b) ((a) >= (b) ? (a) : (b))
  1313.   #endif
  1314.   
  1315.   #define TCP_PORT 80     /* Allocated to http by Jon Postel/ISI 24-Jan-92 */
  1316. --- 183,195 ----
  1317.   #define BOOL BOOLEAN
  1318.   #endif
  1319.   #ifndef YES
  1320. ! #define YES (BOOLEAN)1
  1321. ! #define NO (BOOLEAN)0
  1322.   #endif
  1323.   
  1324. ! #ifndef MIN
  1325. ! #define MIN(a,b) ((a) <= (b) ? (a) : (b))
  1326. ! #define MAX(a,b) ((a) >= (b) ? (a) : (b))
  1327.   #endif
  1328.   
  1329.   #define TCP_PORT 80     /* Allocated to http by Jon Postel/ISI 24-Jan-92 */
  1330. ***************
  1331. *** 210,215 ****
  1332. --- 210,217 ----
  1333.    */
  1334.   
  1335.   #define HT_LOADED 29999                 /* Instead of a socket */
  1336. + #define HT_REDIRECTION_ON_FLY 29998     /* Redo the retrieve with a new URL */
  1337. + 
  1338.   #define HT_OK           0               /* Generic success*/
  1339.   
  1340.   #define HT_NO_ACCESS    -10             /* Access not available */
  1341. *** ../../../../2.13/WWW/Library/Implementation/Version.make    Wed Nov  3 16:20:38 1993
  1342. --- Version.make    Thu Nov 11 11:23:48 1993
  1343. ***************
  1344. *** 1 ****
  1345. ! VC = 2.13
  1346. --- 1 ----
  1347. ! VC = 2.14
  1348.