/* -*- Mode: C; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 2 -*-
 *
 * The contents of this file are subject to the Netscape Public License
 * Version 1.0 (the "NPL"); you may not use this file except in
 * compliance with the NPL.  You may obtain a copy of the NPL at
 * http://www.mozilla.org/NPL/
 *
 * Software distributed under the NPL is distributed on an "AS IS" basis,
 * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the NPL
 * for the specific language governing rights and limitations under the
 * NPL.
 *
 * The Initial Developer of this code under the NPL is Netscape
 * Communications Corporation.  Portions created by Netscape are
 * Copyright (C) 1998 Netscape Communications Corporation.  All Rights
 * Reserved.
 */

/* 
   This is some glue code for feeding data into the xml parser.
   It also has glue code for using CSS to specify display properties
   for an xml file.

   For more info on XML in navigator, look at the XML section
   of www.mozilla.org.

   If you have questions, send them to guha@netscape.com
*/

#include "xmlglue.h"
#include "xmlparse.h"
#include "xmlss.h"
#include "layers.h"



unsigned int
xml_write_ready(NET_StreamClass *stream)
{
   return XML_LINE_SIZE;

}


 
int xml_parse_abort (NET_StreamClass *stream) {
  XMLFile obj= (XMLFile) stream->data_object;
  NET_StreamClass *newstream;
  URL_Struct *urls = obj->urls;
  const char* error = XML_ErrorString(XML_GetErrorCode(obj->parser));
  char*  buff  = getMem(150);
  int n = XML_GetErrorLineNumber(obj->parser);
  URL_Struct *nurls =   NET_CreateURLStruct(copyString(urls->address), NET_DONT_RELOAD);
  StrAllocCopy(nurls->content_type, TEXT_HTML);
  newstream = NET_StreamBuilder(1,  nurls, (MWContext*)obj->mwcontext);
  sprintf(buff, "<B>Bad XML at line %i :</B><BR><P> ERROR = ", n);
  (*(newstream->put_block))(newstream, buff, strlen(buff)); 
  (*(newstream->put_block))(newstream, error, strlen(error)); 
  newstream->complete(newstream);
  freeMem(buff);
  NET_FreeURLStruct(nurls); 
  return -1;
}

void
xml_abort(NET_StreamClass *stream, int status)
{
	XMLFile obj= (XMLFile) stream->data_object;
	if (obj->status != 1) {
	   xml_parse_abort(stream);
	   } else {
    XML_Parse(obj->parser, NULL, 0, 1);
	   }
    XML_ParserFree(obj->parser);
}

 
int
xml_write(NET_StreamClass *stream, char* data, int32 len)
{
	XMLFile obj= (XMLFile) stream->data_object;
	char* ndata = getMem(len+1);
	memcpy(ndata, data, len);
    if (obj->status == 1) obj->status = XML_Parse(obj->parser,  ndata, len, 0);	
    return 0;
}


void
xml_complete (NET_StreamClass *stream)
{
  NET_StreamClass *newstream;
  XMLFile obj= (XMLFile) stream->data_object;
  URL_Struct *urls = obj->urls;
   if (obj->status != 1) {
	   xml_parse_abort(stream);
	   return;
  } 
  XML_Parse(obj->parser, NULL, 0, 1);
  XML_ParserFree(obj->parser); 
  obj->numOpenStreams--;
  
  if (obj->numOpenStreams < 1) {
  /* direct the stream to the html parser */
    URL_Struct *nurls =   NET_CreateURLStruct(copyString(urls->address), NET_DONT_RELOAD);
    StrAllocCopy(nurls->content_type, TEXT_HTML);

    newstream = NET_StreamBuilder(1,  nurls, (MWContext*)obj->mwcontext);
    obj->stream = newstream;
    convertToHTML(obj);
    outputToStream(obj, NULL);
    newstream->complete(newstream);
    NET_FreeURLStruct(nurls); 
  }
}

#define OUTPUT_BUFFER_SIZE (4096*16)

void
outputToStream (XMLFile f, char* s)
{
  int ans = 0;
  NET_StreamClass *stream = (NET_StreamClass*) f->stream;
  if (s == NULL) {
	  if (f->outputBuffer) {
        XP_Rect rect;
		CL_OffscreenMode save_offscreen_mode;
        CL_Compositor *comp = ((MWContext*)f->mwcontext)->compositor;
		rect.left = rect.top = 0;
		rect.right = 1600;
		rect.bottom = 16000;
        /*        CL_SetCompositorEnabled(comp, 0); */
		CL_SetCompositorOffscreenDrawing(comp, CL_OFFSCREEN_ENABLED);
        (*(stream->put_block))(stream, f->outputBuffer, strlen(f->outputBuffer));
        /*        CL_SetCompositorEnabled(comp, 1);
		CL_SetCompositorOffscreenDrawing(comp, CL_OFFSCREEN_ENABLED); */
        CL_UpdateDocumentRect(comp,&rect, 0);
        freeMem(f->outputBuffer);
        f->outputBuffer = NULL;
	  } 
     return;
  }
#ifdef DEBUG
  FE_Trace(s);
#endif
  if (f->outputBuffer == NULL) f->outputBuffer = getMem(OUTPUT_BUFFER_SIZE+1);
  if ((strlen(s) > OUTPUT_BUFFER_SIZE)) {
    char* buff = copyString(s);
    if (buff) (*(stream->put_block))(stream, buff, strlen(s)); 
    CL_CompositeNow(((MWContext*)f->mwcontext)->compositor);
    freeMem(buff);
  } else if (strlen(f->outputBuffer) + strlen(s) > OUTPUT_BUFFER_SIZE) {
     (*(stream->put_block))(stream, f->outputBuffer, strlen(f->outputBuffer));
     CL_CompositeNow(((MWContext*)f->mwcontext)->compositor);
     memset(f->outputBuffer, '\0', OUTPUT_BUFFER_SIZE);
     sprintf(f->outputBuffer, s);
  } else {
    strcat(f->outputBuffer, s);
  }
}



#ifdef	XP_MAC
PR_PUBLIC_API(NET_StreamClass *)
#else
PUBLIC NET_StreamClass *
#endif

XML_XMLConverter(FO_Present_Types  format_out, void *data_object, URL_Struct *URL_s, MWContext  *window_id)
{
    NET_StreamClass* stream;
    XMLFile  xmlf; 
    TRACEMSG(("Setting up display stream. Have URL: %s\n", URL_s->address));

    xmlf = (XMLFile) getMem(sizeof(XMLFileStruct));
    xmlf->urls = URL_s;
    xmlf->parser = XML_ParserCreate(NULL) ;
    XML_SetElementHandler(xmlf->parser, (void (*)(void*, const char*, const char**))XMLDOM_StartHandler, (void (*)(void*, const char*))XMLDOM_EndHandler);
    XML_SetCharacterDataHandler(xmlf->parser, (void (*)(void*, const char*, int))XMLDOM_CharHandler);
    XML_SetProcessingInstructionHandler(xmlf->parser, (void (*)(void*, const char*, const char*))XMLDOM_PIHandler);
    XML_SetUserData(xmlf->parser, xmlf);
    xmlf->status = 1;
    xmlf->address = copyString(URL_s->address);
    xmlf->mwcontext = window_id;
    window_id->xmlfile = xmlf;
    xmlf->numOpenStreams = 1;
	/*	URL_s->fedata = xmlf; */
    stream = NET_NewStream("XML", (MKStreamWriteFunc)xml_write, 
			   (MKStreamCompleteFunc)xml_complete,
			   (MKStreamAbortFunc)xml_abort, 
			   (MKStreamWriteReadyFunc)xml_write_ready, xmlf, window_id);
    if (stream == NULL) freeMem(xmlf);
	
    return(stream);
}



/* XML-CSS stuff */



unsigned int
xmlcss_write_ready(NET_StreamClass *stream)
{
   return XML_LINE_SIZE;

}



void
xmlcss_abort(NET_StreamClass *stream, int status)
{
  StyleSheet obj=stream->data_object;
  XMLFile xml = obj->xmlFile;
  xml->numOpenStreams--;
  freeMem(obj->holdOver);
  freeMem(obj->line);
  obj->line = obj->holdOver = NULL;
}



void
xmlcss_complete  (NET_StreamClass *stream)
{
  StyleSheet ss =stream->data_object;
  URL_Struct *urls = ss->urls;
  XMLFile xml = ss->xmlFile;
  freeMem(ss->holdOver);
  freeMem(ss->line);
  ss->line = ss->holdOver = NULL; 
  xml->numOpenStreams--;
  if (xml->numOpenStreams == 0) { 
  /* direct the stream to the html parser */
    NET_StreamClass *newstream;
    URL_Struct *nurls =   NET_CreateURLStruct(copyString(xml->address), NET_DONT_RELOAD);
    StrAllocCopy(nurls->content_type, TEXT_HTML);
    newstream = NET_StreamBuilder(1,  nurls, (MWContext*) xml->mwcontext);
    xml->stream = newstream;
    convertToHTML(xml);
    outputToStream(xml, NULL);
    newstream->complete(newstream);
    NET_FreeURLStruct(nurls); 
  }     
}



#ifdef	XP_MAC
PR_PUBLIC_API(NET_StreamClass *)
#else
PUBLIC NET_StreamClass *
#endif

XML_CSSConverter(FO_Present_Types  format_out, void *data_object, URL_Struct *URL_s, MWContext  *window_id)
{
    StyleSheet  ss = (StyleSheet) URL_s->fe_data;
    TRACEMSG(("Setting up style sheet stream. Have URL: %s\n", URL_s->address));

    return NET_NewStream("XML-CSS", (MKStreamWriteFunc)parseNextXMLCSSBlob, 
			   (MKStreamCompleteFunc)xmlcss_complete,
			   (MKStreamAbortFunc)xmlcss_abort, 
			   (MKStreamWriteReadyFunc)xmlcss_write_ready, ss, window_id);
}



void
xmlcss_GetUrlExitFunc (URL_Struct *urls, int status, MWContext *cx)
{

}



void
readCSS (StyleSheet ss)
{
  URL_Struct                      *urls;
  urls = NET_CreateURLStruct(ss->address, NET_DONT_RELOAD);
  if (urls == NULL)  {
    ss->xmlFile->numOpenStreams--;
    return;
  }
  urls->fe_data = ss;
  NET_GetURL(urls, FO_CACHE_AND_XMLCSS, ss->xmlFile->mwcontext, xmlcss_GetUrlExitFunc);
}



int
xmlhtml_write(NET_StreamClass *stream, const char *str, int32 len)
{
  XMLHTMLInclusion obj=stream->data_object;
  char* newStr;
  if (obj == NULL  || len < 0) {
      return MK_INTERRUPTED;
  }
 newStr = getMem(len+1);
 memcpy(newStr, str, len);
 *(obj->content + obj->n++) = newStr;
 return (len);
}



unsigned int
xmlhtml_write_ready(NET_StreamClass *stream)
{
   return XML_LINE_SIZE;

}



void
xmlhtml_abort(NET_StreamClass *stream, int status)
{
}




void xmlhtml_complete_int (XMLFile xml) {
  MWContext *cx = (MWContext *)xml->mwcontext;
  int16 save_offscreen_mode;

  xml->numOpenStreams--;
  if (xml->numOpenStreams < 1) { 
  /* direct the stream to the html parser */
    NET_StreamClass *newstream;
    URL_Struct *nurls =   NET_CreateURLStruct(copyString(xml->address), NET_DONT_RELOAD);
    StrAllocCopy(nurls->content_type, TEXT_HTML);
    newstream = NET_StreamBuilder(1,  nurls, (MWContext*) xml->mwcontext);
    xml->stream = newstream;
    if (cx->compositor)
      {
        /* Temporarily force drawing to use the offscreen buffering area to reduce
           flicker when outputing html. (If no offscreen store is allocated, this code will
		   have no effect, but it will do no harm.) */
		save_offscreen_mode = CL_GetCompositorOffscreenDrawing(cx->compositor);
		CL_SetCompositorOffscreenDrawing(cx->compositor, CL_OFFSCREEN_ENABLED);
      }
    convertToHTML(xml);
    outputToStream(xml, NULL);    
    if (cx->compositor)
      {
/*		CL_CompositeNow(cx->compositor);
		CL_SetCompositorOffscreenDrawing(cx->compositor, save_offscreen_mode); */
      }
    newstream->complete(newstream);
    NET_FreeURLStruct(nurls); 
  }     
}

void
xmlhtml_complete  (NET_StreamClass *stream)
{
  XMLHTMLInclusion ss =stream->data_object;
  XMLFile xml = ss->xml;
  xmlhtml_complete_int(xml);
}



#ifdef	XP_MAC
PR_PUBLIC_API(NET_StreamClass *)
#else
PUBLIC NET_StreamClass *
#endif

XML_HTMLConverter(FO_Present_Types  format_out, void *data_object, URL_Struct *URL_s, MWContext  *window_id)
{
    XMLHTMLInclusion  ss = (XMLHTMLInclusion) URL_s->fe_data;

    return NET_NewStream("XML-HTML", (MKStreamWriteFunc)xmlhtml_write, 
			   (MKStreamCompleteFunc)xmlhtml_complete,
			   (MKStreamAbortFunc)xmlhtml_abort, 
			   (MKStreamWriteReadyFunc)xmlhtml_write_ready, ss, window_id);
}



void
xmlhtml_GetUrlExitFunc (URL_Struct *urls, int status, MWContext *cx)
{
}


void setTransclusionProp (XMLFile f, int32 n, char* prop, char* value) {
}

void
readHTML (char* url, XMLHTMLInclusion ss)
{
  URL_Struct                      *urls;
  urls = NET_CreateURLStruct(url, NET_DONT_RELOAD);
  if (urls == NULL)  {
    ss->xml->numOpenStreams--;
    return;
  }
  urls->fe_data = ss;
  NET_GetURL(urls, FO_CACHE_AND_XMLHTML, ss->xml->mwcontext, xmlhtml_GetUrlExitFunc);
}