Annotation of libwww/Library/src/HTUtils.html, revision 2.46
2.6 timbl 1: <HTML>
2: <HEAD>
2.35 frystyk 3: <TITLE>Utility macros</TITLE>
2.44 frystyk 4: <!-- Changed by: Henrik Frystyk Nielsen, 16-Nov-1995 -->
2.6 timbl 5: </HEAD>
2.3 timbl 6: <BODY>
2.24 frystyk 7:
2.20 frystyk 8: <H1>Macros for general use</H1>
9:
2.24 frystyk 10: <PRE>
11: /*
2.31 frystyk 12: ** (c) COPYRIGHT MIT 1995.
2.24 frystyk 13: ** Please first read the full copyright statement in the file COPYRIGH.
14: */
15: </PRE>
16:
17: This module is a part of the <A
2.44 frystyk 18: HREF="http://www.w3.org/pub/WWW/Library/"> W3C Reference Library</A>.
2.20 frystyk 19:
2.26 frystyk 20: See also the system dependent file <A HREF="tcp.html">tcp module</A>
21: for system specific information. <P>
22:
2.1 timbl 23: <PRE>
24: #ifndef HTUTILS_H
25: #define HTUTILS_H
26:
2.26 frystyk 27: #if defined(__STDC__) || defined(__cplusplus) || defined(_WINDOWS)
28: #define _STANDARD_CODE_
2.1 timbl 29: #endif
2.20 frystyk 30: </PRE>
31:
2.45 frystyk 32: <A NAME="debug"><H2>Debug message control</H2></A>
2.20 frystyk 33:
2.39 frystyk 34: This is the global flag for setting the WWWTRACE options.
2.20 frystyk 35:
36: <PRE>
2.26 frystyk 37: #ifndef DEBUG
38: #define DEBUG /* No one ever turns this off as trace is too important */
39: #endif /* Keep option for really small memory applications too */
40:
2.44 frystyk 41: #ifdef WWW_WIN_DLL
42: extern int * WWW_TraceFlag; /* Global flag for all W3 trace */
43: #else
2.20 frystyk 44: extern int WWW_TraceFlag; /* Global flag for all W3 trace */
2.44 frystyk 45: #endif
46:
2.20 frystyk 47: </PRE>
48:
2.39 frystyk 49: The verbose mode is no longer a simple boolean but a bit field so that
50: it is possible to see parts of the output messages. The
51: <EM>WWWTRACE</EM> define still outputs all messages if verbose mode is
52: active, but in addition the following WWWTRACE defines have been made:
2.1 timbl 53:
2.20 frystyk 54: <PRE>
2.40 frystyk 55: #define WWWTRACE_FILE 1
56: #define WWWTRACE_STDERR 2
57: #define WWWTRACE_TTY 3
58:
59: #ifndef WWWTRACE_MODE
2.42 frystyk 60: #if (defined _WINDOWS) && !defined(_CONSOLE)
61: #define WWWTRACE_MODE WWWTRACE_TTY
62: #else
2.40 frystyk 63: #define WWWTRACE_MODE WWWTRACE_STDERR
64: #endif
2.42 frystyk 65: #endif
2.40 frystyk 66:
67: #if WWWTRACE_MODE == WWWTRACE_FILE
2.26 frystyk 68: extern FILE *WWWTrace;
2.46 ! frystyk 69: #ifndef HT_TRACE_FILE
! 70: #define HT_TRACE_FILE "WWWTRACE.TXT"
2.26 frystyk 71: #endif
2.40 frystyk 72: #define TTYPrint fprintf
73: #define TDEST WWWTrace
74: #endif
75:
76: #if WWWTRACE_MODE == WWWTRACE_STDERR
77: #define TTYPrint fprintf
78: #define TDEST stderr
2.26 frystyk 79: #endif
2.40 frystyk 80:
81: #if WWWTRACE_MODE == WWWTRACE_TTY
82: #if defined(_WINDOWS) && !defined(_CONSOLE) /* EGP */
83: /* standard windows 3.x and non-console WIN32 programs */
2.43 frystyk 84: #define TDEST 0
2.44 frystyk 85: #ifdef WWW_WIN_DLL
2.43 frystyk 86: typedef int TTYPrint_t(unsigned int target, const char* fmt, ...);
87: extern TTYPrint_t** PTTYPrint;
88: #define TTYPrint (**PTTYPrint)
89: #else
2.40 frystyk 90: int TTYPrint(unsigned int target, const char* fmt, ...);
2.43 frystyk 91: #endif
2.40 frystyk 92: #else
93: /* if there is a real console, us it */
2.43 frystyk 94: #define TDEST stderr
2.40 frystyk 95: int TTYPrint(FILE* target, const char* fmt, ...);
96: #endif
97: #endif
2.26 frystyk 98:
2.20 frystyk 99: typedef enum _HTTraceFlags {
2.44 frystyk 100: SHOW_UTIL_TRACE = 0x1, /* 1 */
101: SHOW_APP_TRACE = 0x2, /* 10 */
102: SHOW_CACHE_TRACE = 0x4, /* 100 */
2.32 frystyk 103: SHOW_SGML_TRACE = 0x8, /* 1000 */
2.29 frystyk 104: SHOW_BIND_TRACE = 0x10, /* 1.0000 */
2.32 frystyk 105: SHOW_THREAD_TRACE = 0x20, /* 10.0000 */
2.27 frystyk 106: SHOW_STREAM_TRACE = 0x40, /* 100.0000 */
2.32 frystyk 107: SHOW_PROTOCOL_TRACE = 0x80, /* 1000.0000 */
108: SHOW_URI_TRACE = 0x200, /* 10.0000.0000 */
109: SHOW_ANCHOR_TRACE = 0x800, /* 10.00.0000.0000 */
2.20 frystyk 110: SHOW_ALL_TRACE = 0xFFF /* 11.11.1111.1111 */
111: } HTTraceFlags;
112: </PRE>
113:
114: The flags are made so that they can serve as a group flag for correlated
115: trace messages, e.g. showing messages for SGML and HTML at the same time.
116:
117: <PRE>
2.1 timbl 118: #ifdef DEBUG
2.44 frystyk 119: #ifdef WWW_WIN_DLL
120: #define WWWTRACE (*WWW_TraceFlag)
121: #define UTIL_TRACE (*WWW_TraceFlag & SHOW_UTIL_TRACE)
122: #define APP_TRACE (*WWW_TraceFlag & SHOW_APP_TRACE)
123: #define CACHE_TRACE (*WWW_TraceFlag & SHOW_CACHE_TRACE)
124: #define SGML_TRACE (*WWW_TraceFlag & SHOW_SGML_TRACE)
125: #define BIND_TRACE (*WWW_TraceFlag & SHOW_BIND_TRACE)
126: #define THD_TRACE (*WWW_TraceFlag & SHOW_THREAD_TRACE)
127: #define STREAM_TRACE (*WWW_TraceFlag & SHOW_STREAM_TRACE)
128: #define PROT_TRACE (*WWW_TraceFlag & SHOW_PROTOCOL_TRACE)
129: #define URI_TRACE (*WWW_TraceFlag & SHOW_URI_TRACE)
130: #define ANCH_TRACE (*WWW_TraceFlag & SHOW_ANCHOR_TRACE)
131: #else
2.39 frystyk 132: #define WWWTRACE (WWW_TraceFlag)
2.44 frystyk 133: #define UTIL_TRACE (WWW_TraceFlag & SHOW_UTIL_TRACE)
134: #define APP_TRACE (WWW_TraceFlag & SHOW_APP_TRACE)
2.27 frystyk 135: #define CACHE_TRACE (WWW_TraceFlag & SHOW_CACHE_TRACE)
2.20 frystyk 136: #define SGML_TRACE (WWW_TraceFlag & SHOW_SGML_TRACE)
2.29 frystyk 137: #define BIND_TRACE (WWW_TraceFlag & SHOW_BIND_TRACE)
2.23 frystyk 138: #define THD_TRACE (WWW_TraceFlag & SHOW_THREAD_TRACE)
2.27 frystyk 139: #define STREAM_TRACE (WWW_TraceFlag & SHOW_STREAM_TRACE)
2.20 frystyk 140: #define PROT_TRACE (WWW_TraceFlag & SHOW_PROTOCOL_TRACE)
141: #define URI_TRACE (WWW_TraceFlag & SHOW_URI_TRACE)
142: #define ANCH_TRACE (WWW_TraceFlag & SHOW_ANCHOR_TRACE)
2.44 frystyk 143: #endif
2.1 timbl 144: #else
2.39 frystyk 145: #define WWWTRACE 0
2.44 frystyk 146: #define UTIL_TRACE 0
147: #define APP_TRACE 0
2.29 frystyk 148: #define CACHE_TRACE 0
2.20 frystyk 149: #define SGML_TRACE 0
2.29 frystyk 150: #define BIND_TRACE 0
2.27 frystyk 151: #define THD_TRACE 0
152: #define STREAM_TRACE 0
2.20 frystyk 153: #define PROT_TRACE 0
154: #define URI_TRACE 0
155: #define ANCH_TRACE 0
2.1 timbl 156: #endif
2.3 timbl 157: </PRE>
2.26 frystyk 158:
159: <H2>Standard C library for malloc() etc</H2>
160:
161: Replace memory allocation and free C RTL functions with VAXC$xxx_OPT
162: altrenatives for VAXC (but not DECC) on VMS. This makes a big
163: performance difference. (Foteos Macrides).
164:
165: <PRE>
166: #ifdef vax
167: #ifdef unix
168: #define ultrix /* Assume vax+unix=ultrix */
169: #endif
170: #endif
171:
172: #ifndef VMS
173: #ifndef ultrix
174: #ifdef NeXT
175: #include <libc.h> /* NeXT */
176: #endif
177:
178: #ifndef Mips
179: #ifndef MACH /* Vincent.Cate@furmint.nectar.cs.cmu.edu */
180: #include <stdlib.h> /* ANSI */
181: #endif
182: #endif
183:
184: #else /* ultrix */
185: #include <malloc.h>
186: #include <memory.h>
187: #include <stdio.h>
188: #include <stdlib.h> /* ANSI */ /* BSN */
189: #endif
190:
191: #else /* VMS */
192: #include <stdio.h>
193: #include <stdlib.h>
194: #include <unixlib.h>
195: #include <ctype.h>
196: #if defined(VAXC) && !defined(__DECC)
197: #define malloc VAXC$MALLOC_OPT
198: #define calloc VAXC$CALLOC_OPT
199: #define free VAXC$FREE_OPT
200: #define cfree VAXC$CFREE_OPT
201: #define realloc VAXC$REALLOC_OPT
202: #endif /* VAXC but not DECC */
203: #define unlink remove
204: #define gmtime localtime
205: #include <stat.h>
206: #define S_ISDIR(m) (((m)&S_IFMT) == S_IFDIR)
207: #define S_ISREG(m) (((m)&S_IFMT) == S_IFREG)
208: #define putenv HTVMS_putenv
209: #endif
210: </PRE>
211:
2.29 frystyk 212: <H3>Safe Cleaning Memory</H3>
213:
214: <PRE>
215: #define FREE(x) if (x) {free(x); x=NULL;}
216: </PRE>
217:
218: <A NAME="declaration"><H2>Macros for declarations</H2></A>
2.26 frystyk 219:
220: <PRE>
221: #define PUBLIC /* Accessible outside this module */
2.1 timbl 222: #define PRIVATE static /* Accessible only within this module */
223:
2.26 frystyk 224: #ifdef _STANDARD_CODE_
225:
2.34 frystyk 226: /* The sco ODT 3.0 CC compiler has some trouble with const */
227: #if !defined(sco) || defined(sco_os5)
2.26 frystyk 228: #define CONST const /* "const" only exists in STDC */
229: #else
230: #define CONST
231: #endif
232:
2.1 timbl 233: #define NOPARAMS (void)
234: #define PARAMS(parameter_list) parameter_list
235: #define NOARGS (void)
236: #define ARGS1(t,a) \
237: (t a)
238: #define ARGS2(t,a,u,b) \
239: (t a, u b)
240: #define ARGS3(t,a,u,b,v,c) \
241: (t a, u b, v c)
242: #define ARGS4(t,a,u,b,v,c,w,d) \
243: (t a, u b, v c, w d)
244: #define ARGS5(t,a,u,b,v,c,w,d,x,e) \
245: (t a, u b, v c, w d, x e)
246: #define ARGS6(t,a,u,b,v,c,w,d,x,e,y,f) \
247: (t a, u b, v c, w d, x e, y f)
248: #define ARGS7(t,a,u,b,v,c,w,d,x,e,y,f,z,g) \
249: (t a, u b, v c, w d, x e, y f, z g)
250: #define ARGS8(t,a,u,b,v,c,w,d,x,e,y,f,z,g,s,h) \
251: (t a, u b, v c, w d, x e, y f, z g, s h)
252: #define ARGS9(t,a,u,b,v,c,w,d,x,e,y,f,z,g,s,h,r,i) \
253: (t a, u b, v c, w d, x e, y f, z g, s h, r i)
254: #define ARGS10(t,a,u,b,v,c,w,d,x,e,y,f,z,g,s,h,r,i,q,j) \
255: (t a, u b, v c, w d, x e, y f, z g, s h, r i, q j)
256:
257: #else /* not ANSI */
258:
2.26 frystyk 259: #define CONST
260:
2.1 timbl 261: #define NOPARAMS ()
262: #define PARAMS(parameter_list) ()
263: #define NOARGS ()
264: #define ARGS1(t,a) (a) \
265: t a;
266: #define ARGS2(t,a,u,b) (a,b) \
267: t a; u b;
268: #define ARGS3(t,a,u,b,v,c) (a,b,c) \
269: t a; u b; v c;
270: #define ARGS4(t,a,u,b,v,c,w,d) (a,b,c,d) \
271: t a; u b; v c; w d;
272: #define ARGS5(t,a,u,b,v,c,w,d,x,e) (a,b,c,d,e) \
273: t a; u b; v c; w d; x e;
274: #define ARGS6(t,a,u,b,v,c,w,d,x,e,y,f) (a,b,c,d,e,f) \
275: t a; u b; v c; w d; x e; y f;
276: #define ARGS7(t,a,u,b,v,c,w,d,x,e,y,f,z,g) (a,b,c,d,e,f,g) \
277: t a; u b; v c; w d; x e; y f; z g;
278: #define ARGS8(t,a,u,b,v,c,w,d,x,e,y,f,z,g,s,h) (a,b,c,d,e,f,g,h) \
279: t a; u b; v c; w d; x e; y f; z g; s h;
280: #define ARGS9(t,a,u,b,v,c,w,d,x,e,y,f,z,g,s,h,r,i) (a,b,c,d,e,f,g,h,i) \
281: t a; u b; v c; w d; x e; y f; z g; s h; r i;
282: #define ARGS10(t,a,u,b,v,c,w,d,x,e,y,f,z,g,s,h,r,i,q,j) (a,b,c,d,e,f,g,h,i,j) \
2.4 timbl 283: t a; u b; v c; w d; x e; y f; z g; s h; r i; q j;
2.1 timbl 284:
285:
2.21 frystyk 286: #endif /* _STANDARD_CODE_ (ANSI) */
2.1 timbl 287:
288: #ifndef NULL
289: #define NULL ((void *)0)
290: #endif
2.26 frystyk 291: </PRE>
2.1 timbl 292:
2.3 timbl 293: <H2>Booleans</H2>
2.26 frystyk 294:
295: <PRE>
2.30 frystyk 296: #ifndef BOOLEAN_DEFINED
2.26 frystyk 297: typedef char BOOLEAN; /* Logical value */
2.30 frystyk 298: #endif
2.1 timbl 299:
300: #ifndef CURSES
301: #ifndef TRUE
302: #define TRUE (BOOLEAN)1
303: #define FALSE (BOOLEAN)0
304: #endif
2.3 timbl 305: #endif /* CURSES */
2.1 timbl 306:
307: #ifndef BOOL
308: #define BOOL BOOLEAN
309: #endif
310: #ifndef YES
2.14 timbl 311: #define YES (BOOL)1
312: #define NO (BOOL)0
2.1 timbl 313: #endif
314:
2.11 timbl 315: #ifndef HTMIN
316: #define HTMIN(a,b) ((a) <= (b) ? (a) : (b))
317: #define HTMAX(a,b) ((a) >= (b) ? (a) : (b))
2.1 timbl 318: #endif
2.26 frystyk 319: </PRE>
2.1 timbl 320:
2.35 frystyk 321: <A NAME="ReturnCodes"><H2>Return Codes for Protocol Modules and Streams</H2></A>
322:
323: Theese are the codes returned from the protocol modules, and the
324: stream modules. Success are (>=0) and failure are (<0)
2.1 timbl 325:
2.3 timbl 326: <PRE>
2.23 frystyk 327: #define HT_OK 0 /* Generic success */
2.37 frystyk 328: #define HT_ALL 1 /* Used by Net Manager */
329:
2.38 frystyk 330: #define HT_PERSISTENT 29995 /* Wait for persistent connection */
2.37 frystyk 331: #define HT_IGNORE 29996 /* Ignore this in the Net manager */
2.35 frystyk 332: #define HT_NO_DATA 29997 /* OK but no data was loaded */
333: #define HT_REDIRECTION_ON_FLY 29998 /* Redo the retrieve with a new URL */
2.44 frystyk 334: #define HT_REDIRECT 29998 /* Redo the retrieve with a new URL */
2.23 frystyk 335: #define HT_LOADED 29999 /* Instead of a socket */
336:
337: #define HT_ERROR -1 /* Generic failure */
338: #define HT_NO_ACCESS -10 /* Access not available */
339: #define HT_FORBIDDEN -11 /* Access forbidden */
340: #define HT_INTERNAL -12 /* Weird -- should never happen. */
2.35 frystyk 341:
342: #define HT_RETRY -29996 /* If service isn't available */
2.23 frystyk 343: #define HT_WOULD_BLOCK -29997 /* If we are in a select */
2.15 frystyk 344: #define HT_INTERRUPTED -29998 /* Note the negative value! */
2.35 frystyk 345: </PRE>
346:
347: The following codes are positive values that will be parsed back
348: through streams. This can be used to introduce stream specific return
349: values
2.1 timbl 350:
2.35 frystyk 351: <PRE>
352: #define HT_RELOAD 29996 /* If we must reload the document */
353: </PRE>
354:
355: <H2>Other stuff</H2>
356:
357: <PRE>
2.26 frystyk 358: #ifdef _STANDARD_CODE_
359: #include <stdarg.h>
360: #else
361: #include <varargs.h>
362: #endif
2.1 timbl 363:
364: #ifdef CURSES
2.26 frystyk 365: /* htbrowse.c; */
366: #ifdef ULTRIX /* or DECSTATION */
367: #include <cursesX.h> /* Extended curses under X. Only decent one :lou. */
368: #else
369: #include <curses.h>
370: #endif /* ULTRIX */
2.1 timbl 371: extern WINDOW *w_top, *w_text, *w_prompt;
372: extern void user_message PARAMS((const char *fmt, ...));
373: extern void prompt_set PARAMS((CONST char * msg));
374: extern void prompt_count PARAMS((long kb));
375: #else
376: #define user_message printf
377: #endif
378:
2.3 timbl 379: </PRE>
2.26 frystyk 380:
381: <H2>Out Of Memory checking for malloc() return:</H2>
382:
383: <PRE>
384: #ifndef __FILE__
2.1 timbl 385: #define __FILE__ ""
386: #define __LINE__ ""
387: #endif
388:
389: #define outofmem(file, func) \
2.26 frystyk 390: { fprintf(TDEST, "%s %s: out of memory.\nProgram aborted.\n", file, func); \
2.1 timbl 391: exit(1);}
392:
2.26 frystyk 393: </PRE>
2.1 timbl 394:
2.26 frystyk 395: <H2>Upper- and Lowercase macros</H2>
396:
397: The problem here is that toupper(x) is not defined officially unless
398: isupper(x) is. These macros are CERTAINLY needed on #if defined(pyr)
399: || define(mips) or BDSI platforms. For safefy, we make them mandatory.
2.1 timbl 400:
2.25 roeber 401: <PRE>
2.26 frystyk 402: #include <ctype.h>
2.1 timbl 403:
404: #ifndef TOLOWER
2.27 frystyk 405: #define TOLOWER(c) tolower(c)
406: #define TOUPPER(c) toupper(c)
2.29 frystyk 407: #endif
408: </PRE>
409:
410: <H2>Max and Min values for Integers and Floating Point</H2>
411:
412: <PRE>
413: #ifdef FLT_EPSILON /* The ANSI C way define */
414: #define HT_EPSILON FLT_EPSILON
415: #else
416: #define HT_EPSILON 0.00000001
2.27 frystyk 417: #endif
418: </PRE>
419:
420: <H2>White Characters</H2>
421:
422: Is character <B>c</B> white space?
423:
424: <PRE>
425: #ifdef OLD_CODE
426: #define WHITE(c) (((unsigned char)(TOASCII(c))) <= 32)
427: #else
428: #define WHITE(c) isspace(c)
429: #endif
2.26 frystyk 430: </PRE>
431:
432: <H2>The local equivalents of CR and LF</H2>
2.1 timbl 433:
2.26 frystyk 434: We can check for these after net ascii text has been converted to the
435: local representation. Similarly, we include them in strings to be sent
436: as net ascii after translation.
437:
438: <PRE>
439: #define LF FROMASCII('\012') /* ASCII line feed LOCAL EQUIVALENT */
440: #define CR FROMASCII('\015') /* Will be converted to ^M for transmission */
2.6 timbl 441:
2.1 timbl 442: #endif /* HTUTILS_H */
2.26 frystyk 443: </PRE>
2.1 timbl 444:
2.26 frystyk 445: end of utilities
446: </BODY>
2.6 timbl 447: </HTML>
Webmaster