Annotation of libwww/Library/src/HTAccess.c, revision 1.110
1.61 frystyk 1: /* HTAccess.c
2: ** ACCESS MANAGER
3: **
1.75 frystyk 4: ** (c) COPYRIGHT MIT 1995.
1.61 frystyk 5: ** Please first read the full copyright statement in the file COPYRIGH.
1.1 timbl 6: **
7: ** Authors
1.79 frystyk 8: ** TBL Tim Berners-Lee timbl@w3.org
1.4 timbl 9: ** JFG Jean-Francois Groff jfg@dxcern.cern.ch
1.1 timbl 10: ** DD Denis DeLaRoca (310) 825-4580 <CSP1DWD@mvs.oac.ucla.edu>
11: ** History
12: ** 8 Jun 92 Telnet hopping prohibited as telnet is not secure TBL
13: ** 26 Jun 92 When over DECnet, suppressed FTP, Gopher and News. JFG
1.42 frystyk 14: ** 6 Oct 92 Moved HTClientHost and HTlogfile into here. TBL
1.1 timbl 15: ** 17 Dec 92 Tn3270 added, bug fix. DD
1.2 timbl 16: ** 4 Feb 93 Access registration, Search escapes bad chars TBL
1.9 timbl 17: ** PARAMETERS TO HTSEARCH AND HTLOADRELATIVE CHANGED
18: ** 28 May 93 WAIS gateway explicit if no WAIS library linked in.
1.19 timbl 19: ** Dec 93 Bug change around, more reentrant, etc
1.42 frystyk 20: ** 09 May 94 logfile renamed to HTlogfile to avoid clash with WAIS
1.53 duns 21: ** 8 Jul 94 Insulate free() from _free structure element.
1.88 frystyk 22: ** Sep 95 Rewritten, HFN
1.1 timbl 23: */
24:
1.68 frystyk 25: #if !defined(HT_DIRECT_WAIS) && !defined(HT_DEFAULT_WAIS_GATEWAY)
26: #define HT_DEFAULT_WAIS_GATEWAY "http://www.w3.org:8001/"
1.54 frystyk 27: #endif
1.8 timbl 28:
1.67 frystyk 29: /* Library include files */
1.88 frystyk 30: #include "WWWLib.h"
1.93 frystyk 31: #include "HTReqMan.h"
32: #include "HTAccess.h" /* Implemented here */
1.88 frystyk 33:
1.99 frystyk 34: #ifndef VC
35: #define VC "unknown"
36: #endif
37:
1.93 frystyk 38: PRIVATE char * HTAppName = NULL; /* Application name: please supply */
39: PRIVATE char * HTAppVersion = NULL; /* Application version: please supply */
1.2 timbl 40:
1.99 frystyk 41: PRIVATE char * HTLibName = "libwww";
42: PRIVATE char * HTLibVersion = VC;
43:
44: PRIVATE BOOL HTSecure = NO; /* Can we access local file system? */
45:
1.59 frystyk 46: /* --------------------------------------------------------------------------*/
1.61 frystyk 47: /* Initialization and Termination of the Library */
48: /* --------------------------------------------------------------------------*/
49:
1.99 frystyk 50: /* Information about the Application
51: ** ---------------------------------
1.93 frystyk 52: */
53: PUBLIC CONST char * HTLib_appName (void)
54: {
1.99 frystyk 55: return HTAppName ? HTAppName : "UNKNOWN";
56: }
57:
58: PUBLIC CONST char * HTLib_appVersion (void)
59: {
60: return HTAppVersion ? HTAppVersion : "0.0";
1.93 frystyk 61: }
62:
1.99 frystyk 63: /* Information about libwww
64: ** ------------------------
65: */
66: PUBLIC CONST char * HTLib_name (void)
67: {
68: return HTLibName ? HTLibName : "UNKNOWN";
69: }
70:
71: PUBLIC CONST char * HTLib_version (void)
72: {
73: return HTLibVersion ? HTLibVersion : "0.0";
74: }
75:
76: /* Access Local File System
77: ** ------------------------
78: ** In this mode we do not tough the local file system at all
1.93 frystyk 79: */
1.99 frystyk 80: PUBLIC BOOL HTLib_secure (void)
81: {
82: return HTSecure;
83: }
84:
85: PUBLIC void HTLib_setSecure (BOOL mode)
1.93 frystyk 86: {
1.99 frystyk 87: HTSecure = mode;
1.93 frystyk 88: }
89:
1.61 frystyk 90: /* HTLibInit
91: **
92: ** This function initiates the Library and it MUST be called when
93: ** starting up an application. See also HTLibTerminate()
94: */
1.93 frystyk 95: PUBLIC BOOL HTLibInit (CONST char * AppName, CONST char * AppVersion)
1.61 frystyk 96: {
1.105 frystyk 97: #ifdef WWW_WIN_ASYNC
1.110 ! frystyk 98: /*
! 99: ** We are here starting a hidden window to take care of events from
! 100: ** the async select() call in the async version of the event loop in
! 101: ** the Internal event manager (HTEvntrg.c)
! 102: */
1.105 frystyk 103: HWND htSocketWin;
104: static char className[] = "AsyncWindowClass";
105: WNDCLASS wc;
106:
107: wc.style=0;
108: wc.lpfnWndProc=(WNDPROC)AsyncWindowProc;
109: wc.cbClsExtra=0;
110: wc.cbWndExtra=0;
111: wc.hInstance=GetCurrentProcess();
112: wc.hIcon=0;
113: wc.hCursor=0;
114: wc.hbrBackground=0;
115: wc.lpszMenuName=(LPSTR)0;
116: wc.lpszClassName=className;
117: #endif /* WWW_WIN_ASYNC */
118:
1.97 frystyk 119: #if WWWTRACE_MODE == WWWTRACE_FILE /* Open trace file */
1.102 frystyk 120: if ((TDEST = fopen(HT_TRACE_FILE, "a")) != NULL) {
1.67 frystyk 121: if (setvbuf(TDEST, NULL, _IOLBF, 0) < 0) { /* Change to line buffer */
1.97 frystyk 122: TTYPrint(TDEST, "WWWLibInit.. Can't initialize TRACE buffer - no TRACE\n");
1.67 frystyk 123: fclose(TDEST);
124: TDEST = NULL;
125: WWW_TraceFlag = 0;
126: }
127: } else
128: WWW_TraceFlag = 0;
1.97 frystyk 129: #endif /* WWWTRACE_FILE */
1.67 frystyk 130:
1.91 frystyk 131: if (WWWTRACE)
1.97 frystyk 132: TTYPrint(TDEST, "WWWLibInit.. INITIALIZING LIBRARY OF COMMON CODE\n");
1.63 frystyk 133:
1.93 frystyk 134: /* Set the application name and version */
135: if (AppName) {
136: char *ptr;
137: StrAllocCopy(HTAppName, AppName);
138: ptr = HTAppName;
139: while (*ptr) {
140: if (WHITE(*ptr)) *ptr = '_';
141: ptr++;
142: }
143: }
144: if (AppVersion) {
145: char *ptr;
146: StrAllocCopy(HTAppVersion, AppVersion);
147: ptr = HTAppVersion;
148: while (*ptr) {
149: if (WHITE(*ptr)) *ptr = '_';
150: ptr++;
151: }
152: }
153:
154: HTBind_init(); /* Initialize bindings */
1.61 frystyk 155:
1.62 frystyk 156: #ifdef WWWLIB_SIG
1.61 frystyk 157: /* On Solaris (and others?) we get a BROKEN PIPE signal when connecting
1.67 frystyk 158: ** to a port where we should get `connection refused'. We ignore this
1.61 frystyk 159: ** using the following function call
160: */
161: HTSetSignal(); /* Set signals in library */
1.1 timbl 162: #endif
163:
1.105 frystyk 164: #ifdef WWW_WIN_ASYNC
165: if (!RegisterClass(&wc)) {
166: TTYPrint(TDEST, "HTEvent_Loop.. Can't RegisterClass \"%s\"\n", className);
167: return NO;
168: }
169: if (!(htSocketWin = CreateWindow(className, "", WS_POPUP, CW_USEDEFAULT, CW_USEDEFAULT,
170: CW_USEDEFAULT, CW_USEDEFAULT, 0, 0, GetCurrentProcess(),0))) {
171: TTYPrint(TDEST, "HTEvent_Loop.. Can't CreateWindow \"%s\"\n", "");
172: return NO;
173: }
174: HTEvent_setWinHandle (htSocketWin, WM_USER); /* use first available message since app uses none */
175: #endif /* WWW_WIN_ASYNC */
176:
1.108 frystyk 177: #ifdef _WINSOCKAPI_
1.67 frystyk 178: /*
179: ** Initialise WinSock DLL. This must also be shut down! PMH
180: */
181: {
182: WSADATA wsadata;
183: if (WSAStartup(DESIRED_WINSOCK_VERSION, &wsadata)) {
1.91 frystyk 184: if (WWWTRACE)
1.97 frystyk 185: TTYPrint(TDEST, "WWWLibInit.. Can't initialize WinSoc\n");
1.67 frystyk 186: WSACleanup();
187: return NO;
188: }
189: if (wsadata.wVersion < MINIMUM_WINSOCK_VERSION) {
1.91 frystyk 190: if (WWWTRACE)
1.97 frystyk 191: TTYPrint(TDEST, "WWWLibInit.. Bad version of WinSoc\n");
1.67 frystyk 192: WSACleanup();
193: return NO;
194: }
195: }
1.108 frystyk 196: #endif /* _WINSOCKAPI_ */
1.67 frystyk 197:
1.71 frystyk 198: #ifndef NO_TIMEGM
199: HTGetTimeZoneOffset(); /* Find offset from GMT if using mktime() */
200: #endif
1.70 frystyk 201: HTTmp_setRoot(NULL); /* Set up default tmp directory */
1.61 frystyk 202: return YES;
203: }
204:
205:
1.90 frystyk 206: /* HTLibTerminate
207: ** --------------
1.61 frystyk 208: ** This function frees memory kept by the Library and should be called
1.63 frystyk 209: ** before exit of an application (if you are on a PC platform)
1.61 frystyk 210: */
1.101 frystyk 211: PUBLIC BOOL HTLibTerminate (void)
1.61 frystyk 212: {
1.91 frystyk 213: if (WWWTRACE)
1.97 frystyk 214: TTYPrint(TDEST, "WWWLibTerm.. Cleaning up LIBRARY OF COMMON CODE\n");
1.101 frystyk 215: HTAtom_deleteAll(); /* Remove the atoms */
216: HTDNS_deleteAll(); /* Remove the DNS host cache */
217: HTAnchor_deleteAll(NULL); /* Delete anchors and drop hyperdocs */
1.73 frystyk 218:
1.81 frystyk 219: HTProtocol_deleteAll(); /* Remove bindings between access and protocols */
1.73 frystyk 220: HTBind_deleteAll(); /* Remove bindings between suffixes, media types */
221:
1.77 frystyk 222: HTFreeHostName(); /* Free up some internal strings */
1.63 frystyk 223: HTFreeMailAddress();
1.70 frystyk 224: HTTmp_freeRoot();
1.67 frystyk 225:
1.108 frystyk 226: #ifdef _WINSOCKAPI_
1.67 frystyk 227: WSACleanup();
1.105 frystyk 228: #endif
229:
230: #ifdef WWW_WIN_ASYNC
231: DestroyWindow(HTEvent_getWinHandle(0));
1.67 frystyk 232: #endif
233:
1.97 frystyk 234: #if WWWTRACE_MODE == WWWTRACE_FILE /* Close trace file */
1.67 frystyk 235: if (TDEST) {
236: fclose(TDEST);
237: TDEST = NULL;
238: WWW_TraceFlag = 0;
239: }
1.97 frystyk 240: #endif /* WWWTRACE_FILE */
1.61 frystyk 241: return YES;
242: }
243:
1.59 frystyk 244: /* --------------------------------------------------------------------------*/
1.104 frystyk 245: /* Load Access functions */
1.59 frystyk 246: /* --------------------------------------------------------------------------*/
1.33 luotonen 247:
1.90 frystyk 248: /* Request a document
249: ** -----------------
250: ** Private version that requests a document from the request manager
251: ** Returns YES if request accepted, else NO
1.88 frystyk 252: */
1.101 frystyk 253: PRIVATE BOOL HTLoadDocument (HTRequest * request, BOOL recursive)
1.88 frystyk 254: {
255: if (PROT_TRACE) {
1.90 frystyk 256: HTParentAnchor *anchor = HTRequest_anchor(request);
257: char * full_address = HTAnchor_address((HTAnchor *) anchor);
1.97 frystyk 258: TTYPrint(TDEST, "HTAccess.... Accessing document %s\n", full_address);
1.88 frystyk 259: free(full_address);
260: }
1.96 frystyk 261: return HTLoad(request, recursive);
1.58 frystyk 262: }
1.1 timbl 263:
264:
1.90 frystyk 265: /* Request a document from absolute name
266: ** -------------------------------------
267: ** Request a document referencd by an absolute URL.
268: ** Returns YES if request accepted, else NO
269: */
270: PUBLIC BOOL HTLoadAbsolute (CONST char * url, HTRequest* request)
271: {
272: if (url && request) {
273: HTAnchor * anchor = HTAnchor_findAddress(url);
274: HTRequest_setAnchor(request, anchor);
275: return HTLoadDocument(request, NO);
276: }
277: return NO;
278: }
279:
280:
281: /* Request a document from absolute name to stream
282: ** -----------------------------------------------
283: ** Request a document referencd by an absolute URL and sending the data
284: ** down a stream. This is _excactly_ the same as HTLoadAbsolute as
285: ** the ourputstream is specified using the function
286: ** HTRequest_setOutputStream(). 'filter' is ignored!
287: ** Returns YES if request accepted, else NO
288: */
289: PUBLIC BOOL HTLoadToStream (CONST char * url, BOOL filter, HTRequest *request)
290: {
291: return HTLoadAbsolute(url, request);
292: }
293:
294:
295: /* Request a document from relative name
296: ** -------------------------------------
297: ** Request a document referenced by a relative URL. The relative URL is
298: ** made absolute by resolving it relative to the address of the 'base'
299: ** anchor.
300: ** Returns YES if request accepted, else NO
301: */
302: PUBLIC BOOL HTLoadRelative (CONST char * relative,
303: HTParentAnchor * base,
304: HTRequest * request)
305: {
306: BOOL status = NO;
307: if (relative && base && request) {
308: char * rel = NULL;
309: char * full_url = NULL;
310: char * base_url = HTAnchor_address((HTAnchor *) base);
311: StrAllocCopy(rel, relative);
312: full_url = HTParse(HTStrip(rel), base_url,
313: PARSE_ACCESS|PARSE_HOST|PARSE_PATH|PARSE_PUNCTUATION);
314: status = HTLoadAbsolute(full_url, request);
315: free(rel);
316: free(full_url);
317: free(base_url);
318: }
319: return status;
320: }
321:
322:
323: /* Request an anchor
324: ** -----------------
325: ** Request the document referenced by the anchor
326: ** Returns YES if request accepted, else NO
327: */
328: PUBLIC BOOL HTLoadAnchor (HTAnchor * anchor, HTRequest * request)
329: {
330: if (anchor && request) {
331: HTRequest_setAnchor(request, anchor);
332: return HTLoadDocument(request, NO);
333: }
334: return NO;
335: }
336:
337:
338: /* Request an anchor
339: ** -----------------
340: ** Same as HTLoadAnchor but any information in the Error Stack in the
341: ** request object is kept, so that any error messages in one
1.52 frystyk 342: ** This function is almost identical to HTLoadAnchor, but it doesn't
343: ** clear the error stack so that the information in there is kept.
1.90 frystyk 344: ** Returns YES if request accepted, else NO
345: */
346: PUBLIC BOOL HTLoadAnchorRecursive (HTAnchor * anchor, HTRequest * request)
347: {
348: if (anchor && request) {
349: HTRequest_setAnchor(request, anchor);
350: return HTLoadDocument(request, YES);
351: }
352: return NO;
353: }
354:
355:
356: /* Search an Anchor
357: ** ----------------
358: ** Performs a keyword search on word given by the user. Adds the keyword
359: ** to the end of the current address and attempts to open the new address.
360: ** The list of keywords must be a space-separated list and spaces will
361: ** be converted to '+' before the request is issued.
362: ** Search can also be performed by HTLoadAbsolute() etc.
363: ** Returns YES if request accepted, else NO
364: */
365: PUBLIC BOOL HTSearch (CONST char * keywords,
366: HTParentAnchor * base,
367: HTRequest * request)
368: {
1.99 frystyk 369: BOOL status = NO;
1.90 frystyk 370: if (keywords && base && request) {
371: char *base_url = HTAnchor_address((HTAnchor *) base);
372: if (*keywords) {
373: char *plus;
374: StrAllocCat(base_url, "?");
375: StrAllocCat(base_url, keywords);
376: plus = strchr(base_url, '?');
377: while (*plus) {
378: if (*plus == ' ') *plus = '+';
379: plus++;
380: }
1.2 timbl 381: }
1.99 frystyk 382: status = HTLoadAbsolute(base_url, request);
383: free(base_url);
1.90 frystyk 384: }
1.99 frystyk 385: return status;
1.2 timbl 386: }
387:
388:
1.90 frystyk 389: /* Search a document from absolute name
390: ** ------------------------------------
391: ** Request a document referencd by an absolute URL appended with the
392: ** keywords given. The URL can NOT contain any fragment identifier!
393: ** The list of keywords must be a space-separated list and spaces will
394: ** be converted to '+' before the request is issued.
395: ** Returns YES if request accepted, else NO
396: */
397: PUBLIC BOOL HTSearchAbsolute (CONST char * keywords,
398: CONST char * url,
399: HTRequest * request)
400: {
401: if (url && request) {
402: HTAnchor * anchor = HTAnchor_findAddress(url);
403: return HTSearch(keywords, HTAnchor_parent(anchor), request);
404: }
405: return NO;
1.57 howcome 406: }
407:
1.70 frystyk 408: /* --------------------------------------------------------------------------*/
1.104 frystyk 409: /* Post Access Functions */
1.70 frystyk 410: /* --------------------------------------------------------------------------*/
411:
1.90 frystyk 412: /* Copy an anchor
1.70 frystyk 413: ** --------------
1.90 frystyk 414: ** Fetch the URL (possibly local file URL) and send it using either PUT
415: ** or POST to the remote destination using HTTP. The caller can decide the
416: ** exact method used and which HTTP header fields to transmit by setting
417: ** the user fields in the request structure.
1.92 frystyk 418: ** If posting to NNTP then we can't dispatch at this level but must pass
419: ** the source anchor to the news module that then takes all the refs
420: ** to NNTP and puts into the "newsgroups" header
1.90 frystyk 421: ** Returns YES if request accepted, else NO
1.70 frystyk 422: */
1.109 frystyk 423: PUBLIC BOOL HTCopyAnchor (HTAnchor * src_anchor, HTRequest * main_dest)
1.80 frystyk 424: {
1.106 frystyk 425: HTRequest * src_req;
426: HTList * cur;
1.109 frystyk 427: if (!src_anchor || !main_dest) {
428: if (WWWTRACE) TTYPrint(TDEST, "Copy........ BAD ARGUMENT\n");
1.90 frystyk 429: return NO;
1.109 frystyk 430: }
1.70 frystyk 431:
1.80 frystyk 432: /* Build the POST web if not already there */
1.109 frystyk 433: if (!main_dest->source) {
434: src_req = HTRequest_dupInternal(main_dest); /* Get a duplicate */
1.80 frystyk 435: HTAnchor_clearHeader((HTParentAnchor *) src_anchor);
1.109 frystyk 436: src_req->method = METHOD_GET;
1.85 frystyk 437: src_req->reload = HT_MEM_REFRESH;
1.104 frystyk 438: src_req->output_stream = NULL;
1.80 frystyk 439: src_req->output_format = WWW_SOURCE; /* We want source (for now) */
440:
441: /* Set up the main link in the source anchor */
442: {
1.106 frystyk 443: HTLink * main_link = HTAnchor_mainLink((HTAnchor *) src_anchor);
444: HTAnchor *main_anchor = HTLink_destination(main_link);
445: HTMethod method = HTLink_method(main_link);
1.85 frystyk 446: if (!main_link || method==METHOD_INVALID) {
1.91 frystyk 447: if (WWWTRACE)
1.109 frystyk 448: TTYPrint(TDEST, "Copy Anchor. No destination found or unspecified method\n");
1.80 frystyk 449: HTRequest_delete(src_req);
1.90 frystyk 450: return NO;
1.80 frystyk 451: }
1.109 frystyk 452: main_dest->GenMask |= HT_G_DATE; /* Send date header */
453: main_dest->reload = HT_CACHE_REFRESH;
454: main_dest->method = method;
455: main_dest->input_format = WWW_SOURCE;
456: HTRequest_addDestination(src_req, main_dest);
457: if (HTLoadAnchor(main_anchor, main_dest) == NO)
458: return NO;
1.80 frystyk 459: }
1.78 frystyk 460:
1.80 frystyk 461: /* For all other links in the source anchor */
1.106 frystyk 462: if ((cur = HTAnchor_subLinks(src_anchor))) {
463: HTLink * pres;
1.109 frystyk 464: while ((pres = (HTLink *) HTList_nextObject(cur))) {
1.106 frystyk 465: HTAnchor *dest = HTLink_destination(pres);
466: HTMethod method = HTLink_method(pres);
1.80 frystyk 467: HTRequest *dest_req;
468: if (!dest || method==METHOD_INVALID) {
1.91 frystyk 469: if (WWWTRACE)
1.97 frystyk 470: TTYPrint(TDEST, "Copy Anchor. Bad anchor setup %p\n",
1.80 frystyk 471: dest);
1.90 frystyk 472: return NO;
1.80 frystyk 473: }
1.109 frystyk 474: dest_req = HTRequest_dupInternal(main_dest);
1.107 frystyk 475: dest_req->GenMask |= HT_G_DATE; /* Send date header */
1.85 frystyk 476: dest_req->reload = HT_CACHE_REFRESH;
1.80 frystyk 477: dest_req->method = method;
1.104 frystyk 478: dest_req->output_stream = NULL;
479: dest_req->output_format = WWW_SOURCE;
1.109 frystyk 480: HTRequest_addDestination(src_req, dest_req);
1.104 frystyk 481:
1.90 frystyk 482: if (HTLoadAnchor(dest, dest_req) == NO)
483: return NO;
1.80 frystyk 484: }
485: }
486: } else { /* Use the existing Post Web and restart it */
1.109 frystyk 487: src_req = main_dest->source;
1.80 frystyk 488: if (src_req->mainDestination)
1.109 frystyk 489: if (HTLoadDocument(main_dest, NO) == NO)
1.90 frystyk 490: return NO;
1.80 frystyk 491: if (src_req->destinations) {
1.106 frystyk 492: HTRequest * pres;
493: cur = HTAnchor_subLinks(src_anchor);
1.80 frystyk 494: while ((pres = (HTRequest *) HTList_nextObject(cur)) != NULL) {
1.90 frystyk 495: if (HTLoadDocument(pres, NO) == NO)
496: return NO;
1.80 frystyk 497: }
498: }
1.78 frystyk 499: }
500:
1.80 frystyk 501: /* Now open the source */
502: return HTLoadAnchor(src_anchor, src_req);
1.70 frystyk 503: }
504:
505:
1.90 frystyk 506: /* Upload an Anchor
1.70 frystyk 507: ** ----------------
1.90 frystyk 508: ** Send the contents (in hyperdoc) of the source anchor using either PUT
509: ** or POST to the remote destination using HTTP. The caller can decide the
510: ** exact method used and which HTTP header fields to transmit by setting
511: ** the user fields in the request structure.
512: ** Returns YES if request accepted, else NO
513: */
514: PUBLIC BOOL HTUploadAnchor (HTAnchor * src_anchor,
515: HTParentAnchor * dest_anchor,
516: HTRequest * dest_req)
1.70 frystyk 517: {
1.106 frystyk 518: HTMethod allowed = HTAnchor_methods(dest_anchor);
1.109 frystyk 519: if (!src_anchor || !dest_anchor || !dest_req) {
520: if (WWWTRACE) TTYPrint(TDEST, "Upload...... BAD ARGUMENT\n");
1.90 frystyk 521: return NO;
1.109 frystyk 522: }
1.106 frystyk 523: if (!(allowed & dest_req->method)) {
1.103 frystyk 524: BOOL confirm = NO;
525: HTAlertCallback *cbf = HTAlert_find(HT_A_CONFIRM);
1.106 frystyk 526: if (cbf) confirm=(*cbf)(dest_req, HT_A_CONFIRM, HT_MSG_METHOD, NULL,
527: (void *) HTMethod_name(dest_req->method),NULL);
1.103 frystyk 528: if (!confirm) return NO;
1.70 frystyk 529: }
1.77 frystyk 530:
531: /* @@@ NOT FINISHED @@@ */
1.70 frystyk 532:
1.90 frystyk 533: return NO;
1.1 timbl 534: }
1.97 frystyk 535:
Webmaster