// $Id: TGHtmlTable.cxx,v 1.1 2007/05/04 17:07:01 brun Exp $
// Author:  Valeriy Onuchin   03/05/2007

/**************************************************************************

    HTML widget for xclass. Based on tkhtml 1.28
    Copyright (C) 1997-2000 D. Richard Hipp <drh@acm.org>
    Copyright (C) 2002-2003 Hector Peraza.

    This library is free software; you can redistribute it and/or
    modify it under the terms of the GNU Library General Public
    License as published by the Free Software Foundation; either
    version 2 of the License, or (at your option) any later version.

    This library is distributed in the hope that it will be useful,
    but WITHOUT ANY WARRANTY; without even the implied warranty of
    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
    Library General Public License for more details.

    You should have received a copy of the GNU Library General Public
    License along with this library; if not, write to the Free
    Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.

**************************************************************************/

// Routines for doing layout of HTML tables

#include <stdlib.h>
#include <string.h>
#include <ctype.h>
#include <math.h>

#include "TGHtml.h"


// Default values for various table style parameters

#define DFLT_BORDER             0
#define DFLT_CELLSPACING_3D     5
#define DFLT_CELLSPACING_FLAT   0
#define DFLT_CELLPADDING        2
#define DFLT_HSPACE             0
#define DFLT_VSPACE             0

// Set parameter A to the maximum of A and B.
#define SETMAX(A,B)  if ((A) < (B)) { (A) = (B); }
#define MAX(A,B)     ((A) < (B) ? (B) : (A))


//______________________________________________________________________________
int TGHtml::CellSpacing(TGHtmlElement *pTable)
{
   // Return the appropriate cell spacing for the given table.

   const char *z;
   int relief;
   int cellSpacing;

   z = pTable->MarkupArg("cellspacing", 0);
   if (z == 0) {
      relief = fTableRelief;
      if (relief == HTML_RELIEF_RAISED || relief == HTML_RELIEF_SUNKEN) {
         cellSpacing = DFLT_CELLSPACING_3D;
      } else {
         cellSpacing = DFLT_CELLSPACING_FLAT;
      }
   } else {
      cellSpacing = atoi(z);
   }

   return cellSpacing;
}

//______________________________________________________________________________
void TGHtml::StringHW(const char *str, int *h, int *w)
{
   // Return the height and width of string.

   const char *cp = str;
   int nw = 0, nh = 1, mw = 0;
   *h = 0; *w =0;

   if (!cp) return;

   while (*cp) {
      if (*cp != '\n') {
         nw++;
      } else {
         if (nw > mw) mw = nw;
         nw = 0;
         nh++;
      }
      cp++;
   }
   if (nw > mw) mw = nw;
   *w = mw;
   *h = nh;
}

//______________________________________________________________________________
TGString *TGHtml::TableText(TGHtmlTable *pTable, int flag)
{
   // Return text and images from a table as lists.
   // The first list is a list of rows (which is a list of cells).
   // An optional second list is a list of images: row col charoffset tokenid.
   // Note: weve added the option to store data/attrs in array var directly.
   //
   // flag - include images

   int j, h, w,
      nest = 0,
 //     intext = 0,
      rows = 0,
      cols = 0,
      numcols = 0,
      maxh = 1;
   int cspans = 0,
      rspanstart = 0,
      images = flag & 1,
      attrs = flag & 2;
   unsigned short maxw[HTML_MAX_COLUMNS];
   short rspans[HTML_MAX_COLUMNS];
   char buf[100];
   const char *cp;
   TGHtmlElement *p, *pEnd;
   TGString istr("");     // Information string
   TGString substr("");   // Temp to collect current cell string.
   TGString imgstr("");   // Image information
   TGString attrstr("");  // Attribue information

   TGString *str = new TGString("");  // The result

   if (pTable->fType != Html_TABLE) return str;
   if (!(pEnd = pTable->fPEnd)) {
      delete str;
      return 0;
   }

   str->Append("{ ");  // start sublist
   if (attrs) {
      attrstr.Append("{ ");  // start sublist
      AppendArglist(&attrstr, pTable);
      attrstr.Append("} ");  // end sublist
   }
   for (j = 0; j < HTML_MAX_COLUMNS; j++) {
      maxw[j] = 0;
      rspans[j] = 0;
   }
   nest = 1;
   istr.Append("{ ");
   p = pTable;
   while (p && (p = p->fPNext)) {
      if (attrs) {
         switch (p->fType) {
            case Html_EndTR:
               break;

            case Html_TR:
               break;
         }
      }

      switch (p->fType) {
         case Html_TABLE:
            if (!(p = FindEndNest(p, Html_EndTABLE, 0))) {
               delete str;
               return 0;
            }
            break;

         case Html_EndTABLE:
            p = 0;
            break;

         case Html_TR:
            if (cols > numcols) numcols = cols;
            maxh = 1;
            cols = 0;
            rows++;
            nest++;
            str->Append("{ ");
            if (attrs) {
               attrstr.Append("{ { ");
               AppendArglist(&attrstr, (TGHtmlMarkupElement *) p);
               attrstr.Append("} ");
            }
            break;

         case Html_EndTR:
            snprintf(buf, 100, "%d ", maxh);
            istr.Append(buf);
            if (attrs) {
               attrstr.Append("} ");
            }
            while (nest > 1) {
               nest--;
               str->Append("} ");
            }
            break;

         case Html_TD:
         case Html_TH:
            if ((!(cp = p->MarkupArg("colspan", 0))) || (cspans = atoi(cp)) <= 0) {
               cspans = 1;
            }
            if ((cp = p->MarkupArg("rowspan", 0)) && (j = atoi(cp)) > 0 &&
                cols < HTML_MAX_COLUMNS) {
               rspans[cols] = j;
               rspanstart = 1;
            } else {
               rspanstart = 0;
            }
            if (attrs) {
               j = 0;
               while ((cspans - j) > 0) {
                  attrstr.Append("{ ");
                  if (!j) AppendArglist(&attrstr, (TGHtmlMarkupElement *) p);
                  attrstr.Append("} ");
                  j++;
               }
            }
            cols++;
            substr = "";
            break;

         case Html_EndTD:
         case Html_EndTH:
            if (!rspanstart) {
               while (cols <= HTML_MAX_COLUMNS && rspans[cols-1]-- > 1) {
                  str->Append(" ");  // (""); ??
                  cols++;
               }
            }
            cp = substr.GetString();

            j = 0;
            while ((cspans - j) > 0) {
               str->Append(cp);
               str->Append(" ");
               if (!j) {
                  StringHW(cp, &h, &w);
                  if (h > maxh) maxh = h;
                  if (cols > 0 && cols <= HTML_MAX_COLUMNS) {
                     if (w > maxw[cols-1]) {
                        maxw[cols-1] = w;
                     }
                  }
               }
               j++;
               cp = "";
            }
            cspans = 0;
            break;

         case Html_Text:
            substr.Append(((TGHtmlTextElement *)p)->fZText, -1);
            break;

         case Html_Space:
            for (j = 0; j < p->fCount; j++) {
               substr.Append(" ");
            }
//        if ((p->flag & HTML_NewLine) != 0)
//          substr.Append("\n");
            break;

         case Html_BR:
            substr.Append("\n");  // ("\\n"); ??
            break;

         case Html_CAPTION:  // Should do something with Caption?
            if (!(pEnd = FindEndNest(p, Html_EndCAPTION, 0))) {
               p = pEnd;
            }
            break;

         case Html_IMG:  // Images return: row col charoffset tokenid
            if (!images) break;
            snprintf(buf, sizeof(buf), "%d %d %d %d ", rows-1, cols-1,
                     substr.GetLength(), p->fElId);
            imgstr.Append(buf);
            break;
      }
   }

   while (nest--) str->Append("} ");
   istr.Append("} { ");
   for (j = 0; j < numcols && j < HTML_MAX_COLUMNS; j++) {
      snprintf(buf, sizeof(buf), "%d ", maxw[j]);
      istr.Append(buf);
   }
   istr.Append("} ");

   str->Append(istr.Data());
   str->Append(" ");
   if (attrs) {
      str->Append("{ ");
      str->Append(attrstr.Data());
      str->Append("} ");
   }
   if (images) {
      str->Append(imgstr.Data());
   }

   return str;
}

//______________________________________________________________________________
TGHtmlElement *TGHtml::FindEndNest(TGHtmlElement *sp, int en,
                                  TGHtmlElement *lp)
{
   // Find End tag en, but ignore intervening begin/end tag pairs.
   //
   // sp -- Pointer to start from
   // en -- End tag to search for
   // lp -- Last pointer to try

   TGHtmlElement *p;
   int lvl, n;

   p = sp->fPNext;
   lvl = 0;
   n = sp->fType;

   while (p) {
      if (p == lp) return 0;
      if (n == Html_LI) {
         if (p->fType == Html_LI || p->fType == Html_EndUL ||
             p->fType == Html_EndOL) {
            if (p->fPPrev) return p->fPPrev;
            return p;
         }
      } else if (p->fType == n) {
         if (n == Html_OPTION) {
            if (p->fPPrev) return p->fPPrev;
            return p;
         }
         lvl++;
      } else if (p->fType == en) {
         if (!lvl--) return p;
      }
      switch (p->fType) {
         case Html_TABLE: p = ((TGHtmlTable *)p)->fPEnd; break; // optimization
         case Html_FORM:  p = ((TGHtmlForm *)p)->fPEnd;  break;
         default: p = p->fPNext;
      }
   }

   return 0;
}

//______________________________________________________________________________
TGHtmlElement *TGHtml::TableDimensions(TGHtmlTable *pStart, int lineWidth)
{
   // pStart points to a <table>.  Compute the number of columns, the
   // minimum and maximum size for each column and the overall minimum
   // and maximum size for this table and store these value in the
   // pStart structure.  Return a pointer to the </table> element,
   // or to NULL if there is no </table>.
   //
   // The min and max size for column N (where the leftmost column has
   // N==1) is pStart->fMinW[1] and pStart->fMaxW[1].  The pStart->fMinW[0]
   // and pStart->fMaxW[0] entries contain the minimum and maximum widths
   // of the whole table, including any cell padding, cell spacing,
   // border width and "hspace".  The values of pStart->fMinW[I] for I>=1
   // do not contain any cell padding, cell spacing or border width.
   // Only pStart->fMinW[0] contains these extra spaces.
   //
   // The back references from </table>, </tr>, </td> and </th> back to
   // the <table> markup are also filled in.  And for each <td> and <th>
   // markup, the pTable and pEnd fields are set to their proper values.
   //
   // pStart    - The <table> markup
   // lineWidth - Total width available to the table

   TGHtmlElement *p;                  // Element being processed
   TGHtmlElement *fPNext;              // Next element to process
   int iCol1 = 0;                     // Current column number.  1..N
   int iRow = 0;                      // Current row number
   TGHtmlElement *inRow = 0;          // Pointer to <TR>
   TGHtmlElement *inCol = 0;          // Pointer to <TD>
   int i, j;                          // Loop counters
   int n;                             // Number of columns
   int minW, maxW, requestedW;        // min, max, requested width for a cell
   int noWrap;                        // true for NOWRAP cells
   int colspan;                       // Column span for the current cell
   int rowspan;                       // Row span for the current cell
   const char *z;                     // Value of a <table> parameter
   int cellSpacing;                   // Value of CELLSPACING parameter
   int cellPadding;                   // Value of CELLPADDING parameter
   int tbw;                           // Width of border around whole table
   int cbw;                           // Width of border around one cell
   int hspace;                        // Value of HSPACE parameter
   int separation;                    // Space between columns
   int margin;                        // Space between left margin and 1st col
   int availWidth=0;                  // Part of lineWidth still available
   int maxTableWidth;                 // Amount of lineWidth available to table
   int fromAbove[HTML_MAX_COLUMNS+1]; // Cell above extends thru this row
   int min0span[HTML_MAX_COLUMNS+1];  // Min for colspan=0 cells
   int max0span[HTML_MAX_COLUMNS+1];  // Max for colspan=0 cells
   int reqW[HTML_MAX_COLUMNS+1];      // Requested width for each column
   int hasbg;

   // colMin[A][B] is the absolute minimum width of all columns between
   // A+1 and B+1.  colMin[B][A] is the requested width of columns between
   // A+1 and B+1.  This information is used to add in the constraints imposed
   // by <TD COLSPAN=N> markup where N>=2.

   int colMin[HTML_MAX_COLUMNS+1][HTML_MAX_COLUMNS+1];
# define ColMin(A,B) colMin[(A)-1][(B)-1]
# define ColReq(A,B) colMin[(B)-1][(A)-1]

   if (pStart == 0 || pStart->fType != Html_TABLE) return pStart;

   if (pStart->fBgImage) pStart->fHasbg = 1;

   TRACE_PUSH(HtmlTrace_Table1);
   TRACE(HtmlTrace_Table1, ("Starting TableDimensions... %s\n",
        pStart->MarkupArg("name", "")));

   pStart->fNCol = 0;
   pStart->fNRow = 0;

   z = pStart->MarkupArg("border", 0);
   if (z && *z == 0) z = "2";

   tbw = z ? atoi(z) : DFLT_BORDER;
   if (fTableBorderMin && tbw < fTableBorderMin) tbw = fTableBorderMin;
   pStart->fBorderWidth = tbw;

   cbw = (tbw > 0);

   z = pStart->MarkupArg("cellpadding", 0);
   cellPadding = z ? atoi(z) : DFLT_CELLPADDING;
   cellSpacing = CellSpacing(pStart);

#ifdef DEBUG
   // The HtmlTrace_Table4 flag causes tables to be draw with borders
   // of 2, cellPadding of 5 and cell spacing of 2.  This makes the
   // table clearly visible.  Useful for debugging. */
   if (HtmlTraceMask & HtmlTrace_Table4) {
      tbw = pStart->fBorderWidth = 2;
      cbw = 1;
      cellPadding = 5;
      cellSpacing = 2;
      pStart->fStyle.fBgcolor = COLOR_Background;
   }
#endif

   separation = cellSpacing + 2 * (cellPadding + cbw);
   margin = tbw + cellSpacing + cbw + cellPadding;

   z = pStart->MarkupArg("hspace", 0);
   hspace = z ? atoi(z) : DFLT_HSPACE;

   // Figure out the maximum space available
   z = pStart->MarkupArg("width", 0);
   if (z) {
      int len = strlen(z);
      if (len > 0 && z[len-1] == '%') {
         maxTableWidth = (atoi(z) * lineWidth) / 100;
      } else {
         maxTableWidth = atoi(z);
      }
   } else {
      maxTableWidth = lineWidth;
   }
   maxTableWidth -= 2 * margin;
   SETMAX(maxTableWidth, 1);

   TRACE(HtmlTrace_Table1, ("lineWidth = %d, maxTableWidth = %d, margin = %d\n",
         lineWidth, maxTableWidth, margin));

   for (p = pStart->fPNext; p; p = fPNext) {
      if (p->fType == Html_EndTABLE) {
          ((TGHtmlRef *)p)->fPOther = pStart;
         pStart->fPEnd = p;
         break;
      }

      fPNext = p->fPNext;

      switch (p->fType) {
         case Html_EndTD:
         case Html_EndTH:
         case Html_EndTABLE:
            ((TGHtmlRef *)p)->fPOther = pStart;
            inCol = 0;
            break;

         case Html_EndTR:
            ((TGHtmlRef *)p)->fPOther = pStart;
            inRow = 0;
            break;

         case Html_TR:
            ((TGHtmlRef *)p)->fPOther = pStart;
            iRow++;
            pStart->fNRow++;
            iCol1 = 0;
            inRow = p;
            availWidth = maxTableWidth;
            break;

         case Html_CAPTION:
            while (p && p->fType != Html_EndTABLE
                   && p->fType != Html_EndCAPTION) p = p->fPNext;
            break;

         case Html_TD:
         case Html_TH: {
            TGHtmlCell *cell = (TGHtmlCell *) p;
            inCol = p;
            if (!inRow) {
               // If the <TR> markup is omitted, insert it.
               TGHtmlElement *pNew = new TGHtmlRef(Html_TR, 1, 0, 0);
               if (pNew == 0) break;
               //pNew->fType = Html_TR;
               pNew->fCount = 0;
               pNew->fStyle = p->fStyle;
               pNew->fFlags = p->fFlags;
               pNew->fPNext = p;
               p->fPPrev->fPNext = pNew;
               p->fPPrev = pNew;
               fPNext = pNew;
               break;
            }
            do {
               iCol1++;
            } while (iCol1 <= pStart->fNCol && fromAbove[iCol1] > iRow);
            cell->fPTable = pStart;
            cell->fPRow = inRow;
            colspan = cell->fColspan;
            if (colspan == 0) colspan = 1;
            if (iCol1 + colspan - 1 > pStart->fNCol) {
               int nCol = iCol1 + colspan - 1;
               if (nCol > HTML_MAX_COLUMNS) nCol = HTML_MAX_COLUMNS;
               for (i = pStart->fNCol + 1; i <= nCol; i++) {
                  fromAbove[i] = 0;
                  pStart->fMinW[i] = 0;
                  pStart->fMaxW[i] = 0;
                  min0span[i] = 0;
                  max0span[i] = 0;
                  reqW[i] = 0;
                  for (j = 1; j < i; j++) {
                     ColMin(j,i) = 0;
                     ColReq(j,i) = 0;
                  }
               }
               pStart->fNCol = nCol;
            }
            noWrap = (p->MarkupArg("nowrap", 0) != 0);
            hasbg = (pStart->fHasbg || ((TGHtmlRef *)cell->fPRow)->fBgImage ||
                     cell->fBgImage);
            fPNext = MinMax(p, &minW, &maxW, availWidth, hasbg);
            cell->fPEnd = fPNext;
            requestedW = 0;
            if ((z = p->MarkupArg("width", 0)) != 0) {
               for (i = 0; isdigit(z[i]) || z[i] == '.'; i++) {}
               if (strcmp(z, "*") == 0) {
                  requestedW = availWidth;
               } else if (z[i] == 0) {
                  requestedW = atoi(z);
               } else if (z[i] == '%') {
                  requestedW = (atoi(z) * maxTableWidth + 99) / 100;
               }
            }

            TRACE(HtmlTrace_Table1,
                  ("Row %d Column %d: min=%d max=%d req=%d stop at %s\n",
                  iRow, iCol1, minW, maxW, requestedW,
                  GetTokenName(((TGHtmlCell *)p)->fPEnd)));

            if (noWrap) {
               if ((z = p->MarkupArg("rowspan", 0)) == 0) { // Hack ???
               //minW = (requestedW > 0 ? requestedW : maxW);
               } else {
                  minW = maxW;
               }
            }
            if (iCol1 + cell->fColspan <= HTML_MAX_COLUMNS) {
               int min = 0;
               if (cell->fColspan == 0) {
                  SETMAX(min0span[iCol1], minW);
                  SETMAX(max0span[iCol1], maxW);
                  min = min0span[iCol1] + separation;
               } else if (colspan == 1) {
                  SETMAX(pStart->fMinW[iCol1], minW);
                  SETMAX(pStart->fMaxW[iCol1], maxW);
                  SETMAX(reqW[iCol1], requestedW);
                  min = pStart->fMinW[iCol1] + separation;
               } else {
                  int n2 = cell->fColspan;
                  int per = maxW / n2;
                  int ix;
                  SETMAX(ColMin(iCol1, iCol1+n2-1), minW);
                  SETMAX(ColReq(iCol1, iCol1+n2-1), requestedW);
                  min = minW + separation;
                  for (ix = iCol1; ix < iCol1 + n2; ix++) {
                     if (minW != maxW) {  //-- without this some tables are not displayed properly
                        SETMAX(pStart->fMaxW[ix], per);
                     }
                  }
               }
               availWidth -= min;
            }
            rowspan = cell->fRowspan;
            if (rowspan == 0) rowspan = LARGE_NUMBER;
            if (rowspan > 1) {
               for (i = iCol1; i < iCol1 + cell->fColspan && i < HTML_MAX_COLUMNS; i++) {
                  fromAbove[i] = iRow + rowspan;
               }
            }
            if (cell->fColspan > 1) {
               iCol1 += cell->fColspan - 1;
            } else if (cell->fColspan == 0) {
               iCol1 = HTML_MAX_COLUMNS + 1;
            }
            break;
         }
      }
   }

#ifdef DEBUG
   if (HtmlTraceMask & HtmlTrace_Table6) {
      const char *zSpace = "";
      TRACE_INDENT;
      for (i = 1; i <= pStart->fNCol; i++) {
         printf("%s%d:%d..%d", zSpace, i, pStart->fMinW[i], pStart->fMaxW[i]);
         if (reqW[i] > 0) {
            printf("(w=%d)", reqW[i]);
         }
         zSpace = "  ";
      }
      printf("\n");
      for (i = 1; i < pStart->fNCol; i++) {
         for (j = i+1; j <= pStart->fNCol; j++) {
            if (ColMin(i, j) > 0) {
               TRACE_INDENT;
               printf("ColMin(%d,%d) = %d\n", i, j, ColMin(i, j));
            }
            if (ColReq(i, j) > 0) {
               TRACE_INDENT;
               printf("ColReq(%d,%d) = %d\n", i, j, ColReq(i, j));
            }
         }
      }
   }
#endif

   // Compute the min and max width of each column

   for (i = 1; i <= pStart->fNCol; i++) {
      int sumMin, sumReq, sumMax;

      // Reduce the max[] field to N for columns that have "width=N"
      if (reqW[i] > 0) {
         pStart->fMaxW[i] = MAX(pStart->fMinW[i], reqW[i]);
      }

      // Expand the width of columns marked with "colspan=0".

      if (min0span[i] > 0 || max0span[i] > 0) {
         int n2 = pStart->fNCol - i + 1;
         minW = (min0span[i] + (n2 - 1) * (1 - separation)) / n2;
         maxW = (max0span[i] + (n2 - 1) * (1 - separation)) / n2;
         for (j = i; j <= pStart->fNCol; j++) {
            SETMAX(pStart->fMinW[j], minW);
            SETMAX(pStart->fMaxW[j], maxW);
         }
      }

      // Expand the minW[] of columns to accomodate "colspan=N" constraints.
      // The minW[] is expanded up to the maxW[] first.  Then all the maxW[]s
      // are expanded in proportion to their sizes.  The same thing occurs
      // for reqW[]s.

      sumReq = reqW[i];
      sumMin = pStart->fMinW[i];
      sumMax = pStart->fMaxW[i];
      for (j = i-1; j >= 1; j--) {
         int cmin, creq;

         sumMin += pStart->fMinW[j];
         sumMax += pStart->fMaxW[j];
         sumReq += reqW[i];
         cmin = ColMin(j, i);

         if (cmin > sumMin) {
            int k;
            double scale;

            int *tminW = pStart->fMinW;
            int *tmaxW = pStart->fMaxW;
            if (sumMin < sumMax) {
               scale = (double) (cmin - sumMin) / (double) (sumMax - sumMin);
               for (k = j; k <= i; k++) {
                  sumMin -= tminW[k];
                  tminW[k] = (int) ((tmaxW[k] - tminW[k]) * scale + tminW[k]);
                  sumMin += tminW[k];
               }
            } else if (sumMin > 0) {
               scale = (double) cmin / (double) sumMin;
               for (k = j; k <= i; k++) {
                  sumMin -= tminW[k];
                  tminW[k] = tmaxW[k] = (int) (tminW[k] * scale);
                  sumMin += tminW[k];
               }
            } else {
               int unit = cmin / (i - j + 1);
               for (k = j; k <= i; k++) {
                  tminW[k] = tmaxW[k] = unit;
                  sumMin += tminW[k];
               }
            }
         }

         creq = ColReq(j, i);
         if (creq > sumReq) {
            int k;
            double scale;

            int *tmaxW = pStart->fMaxW;
            if (sumReq < sumMax) {
               scale = (double) (creq - sumReq) / (double) (sumMax - sumReq);
               for (k = j; k <= i; k++) {
                  sumReq -= reqW[k];
                  reqW[k] = (int) ((tmaxW[k] - reqW[k]) * scale + reqW[k]);
                  sumReq += reqW[k];
               }
            } else if (sumReq > 0) {
               scale = (double) creq / (double) sumReq;
               for (k = j; k <= i; k++) {
                  sumReq -= reqW[k];
                  reqW[k] = (int) (reqW[k] * scale);
                  sumReq += reqW[k];
               }
            } else {
               int unit = creq / (i - j + 1);
               for (k = j; k <= i; k++) {
                  reqW[k] = unit;
                  sumReq += reqW[k];
               }
            }
         }
      }
   }

#ifdef DEBUG
   if (HtmlTraceMask & HtmlTrace_Table6) {
      const char *zSpace = "";
      TRACE_INDENT;
      for (i = 1; i <= pStart->fNCol; i++) {
         printf("%s%d:%d..%d", zSpace, i, pStart->fMinW[i], pStart->fMaxW[i]);
         if (reqW[i] > 0) {
            printf("(w=%d)", reqW[i]);
         }
         zSpace = "  ";
      }
      printf("\n");
   }
#endif

   // Compute the min and max width of the whole table

   n = pStart->fNCol;
   requestedW = tbw * 2 + (n + 1) * cellSpacing + n * 2 * (cellPadding + cbw);
   pStart->fMinW[0] = requestedW;
   pStart->fMaxW[0] = requestedW;
   for (i = 1; i <= pStart->fNCol; i++) {
      pStart->fMinW[0] += pStart->fMinW[i];
      pStart->fMaxW[0] += pStart->fMaxW[i];
      requestedW += MAX(reqW[i], pStart->fMinW[i]);
   }

   // Possibly widen or narrow the table to accomodate a "width=" attribute
   z = pStart->MarkupArg("width", 0);
   if (z) {
      int len = strlen(z);
      int totalWidth;
      if (len > 0 && z[len-1] == '%') {
         totalWidth = (atoi(z) * lineWidth) / 100;
      } else {
         totalWidth = atoi(z);
      }
      SETMAX(totalWidth, pStart->fMinW[0]);
#if 1
      requestedW = totalWidth;
#else
      SETMAX(requestedW, totalWidth); //-- makes it too narrow
#endif
   }
   SETMAX(maxTableWidth, pStart->fMinW[0]);
   if (lineWidth && (requestedW > lineWidth)) {

      TRACE(HtmlTrace_Table5, ("RequestedW reduced to lineWidth: %d -> %d\n",
            requestedW, lineWidth));

      requestedW = lineWidth;
   }
   if (requestedW > pStart->fMinW[0]) {
      float scale;
      int *tminW = pStart->fMinW;
      int *tmaxW = pStart->fMaxW;

      TRACE(HtmlTrace_Table5,
            ("Expanding table minW from %d to %d.  (reqW=%d width=%s)\n",
             tminW[0], requestedW, requestedW, z));

      if (tmaxW[0] > tminW[0]) {
         scale = (double) (requestedW - tminW[0]) / (double) (tmaxW[0] - tminW[0]);
         for (i = 1; i <= pStart->fNCol; i++) {
            tminW[i] += (int) ((tmaxW[i] - tminW[i]) * scale);
            SETMAX(tmaxW[i], tminW[i]);
         }
      } else if (tminW[0] > 0) {
         scale = requestedW / (double) tminW[0];
         for (i = 1; i <= pStart->fNCol; i++) {
            tminW[i] = (int) (tminW[i] * scale);
            tmaxW[i] = (int) (tmaxW[i] * scale);
         }
      } else if (pStart->fNCol > 0) {
         int unit = (requestedW - margin) / pStart->fNCol - separation;
         if (unit < 0) unit = 0;
         for (i = 1; i <= pStart->fNCol; i++) {
            tminW[i] = tmaxW[i] = unit;
         }
      } else {
         tminW[0] = tmaxW[0] = requestedW;
      }
      pStart->fMinW[0] = requestedW;
      SETMAX(pStart->fMaxW[0], requestedW);
   }

#ifdef DEBUG
   if (HtmlTraceMask & HtmlTrace_Table5) {
      TRACE_INDENT;
      printf("Start with %s and ", GetTokenName(pStart));
      printf("end with %s\n", GetTokenName(p));
      TRACE_INDENT;
      printf("nCol=%d minWidth=%d maxWidth=%d\n",
      pStart->fNCol, pStart->fMinW[0], pStart->fMaxW[0]);
      for (i = 1; i <= pStart->fNCol; i++) {
         TRACE_INDENT;
         printf("Column %d minWidth=%d maxWidth=%d\n",
                i, pStart->fMinW[i], pStart->fMaxW[i]);
      }
   }
#endif

   TRACE(HtmlTrace_Table1,
         ("Result of TableDimensions: min=%d max=%d nCol=%d\n",
          pStart->fMinW[0], pStart->fMaxW[0], pStart->fNCol));
   TRACE_POP(HtmlTrace_Table1);

   return p;
}

//______________________________________________________________________________
TGHtmlElement *TGHtml::MinMax(TGHtmlElement *p, int *pMin, int *pMax,
                             int /*lineWidth*/, int hasbg)
{
   // Given a list of elements, compute the minimum and maximum width needed
   // to render the list.  Stop the search at the first element seen that is
   // in the following set:
   //
   //       <tr>  <td>  <th>  </tr>  </td>  </th>  </table>
   //
   // Return a pointer to the element that stopped the search, or to NULL
   // if we ran out of data.
   //
   // Sometimes the value returned for both min and max will be larger than
   // the true minimum and maximum.  This is rare, and only occurs if the
   // element string contains figures with flow-around text.
   //
   //  p         - Start the search here
   //  pMin      - Return the minimum width here
   //  pMax      - Return the maximum width here
   //  lineWidth - Total width available

   int min = 0;             // Minimum width so far
   int max = 0;             // Maximum width so far
   int indent = 0;          // Amount of indentation (minimum)
   int obstacle = 0;        // Possible obstacles in the margin
   int x1 = 0;              // Length of current line assuming maximum length
   int x2 = 0;              // Length of current line assuming minimum length
   int x3 = 0;              // Like x1, but only within <PRE> tag
   int go = 1;              // Change to 0 to stop the loop
   int inpre = 0;           // Are we in <PRE>
   TGHtmlElement *fPNext;     // Next element in the list
   int wstyle = 0;          // Current style for nowrap

   if (p->MarkupArg("nowrap", 0) != 0) {
      wstyle |= STY_NoBreak;
   }

   for (p = p->fPNext; go && p; p = fPNext) {
      fPNext = p->fPNext;
      if (!inpre) x3 = 0;
      switch (p->fType) {
         case Html_PRE:
            inpre = 1;
            break;

         case Html_EndPRE:
            inpre = 0;
            break;

         case Html_Text: {
            TGHtmlTextElement *text = (TGHtmlTextElement *) p;
            x1 += text->fW;
            x2 += text->fW;
            SETMAX(max, x1);
            if (p->fStyle.fFlags & STY_Preformatted) {
               x3 += text->fW;
               SETMAX(min, x3);
            } else {
               SETMAX(min, x2);
            }
            break;
         }

         case Html_Space: {
            TGHtmlSpaceElement *space = (TGHtmlSpaceElement *) p;
            p->fStyle.fFlags |= wstyle;
            if (p->fStyle.fFlags & STY_Preformatted) {
               if (p->fFlags & HTML_NewLine) {
                  x1 = x2 = x3 = indent;
               } else {
                  x1 += space->fW * p->fCount;
                  x2 += space->fW * p->fCount;
                  x3 += space->fW * p->fCount;
               }
            } else if (p->fStyle.fFlags & STY_NoBreak) {
               if (x1 > indent) x1 += space->fW;
               if (x2 > indent) x2 += space->fW;
            } else {
               if (x1 > indent) x1 += space->fW;
               x2 = indent;
            }
            break;
         }

         case Html_IMG: {
            TGHtmlImageMarkup *image = (TGHtmlImageMarkup *) p;
            switch (image->fAlign) {
               case IMAGE_ALIGN_Left:
               case IMAGE_ALIGN_Right:
                  obstacle += image->fW;
                  x1 = obstacle + indent;
                  x2 = indent;
                  SETMAX(min, x2);
                  SETMAX(min, image->fW);
                  SETMAX(max, x1);
                  break;

               default:
                  x1 += image->fW;
                  x2 += image->fW;
                  if (p->fStyle.fFlags & STY_Preformatted) {
                     SETMAX(min, x1);
                     SETMAX(max, x1);
                  } else {
                     SETMAX(min, x2);
                     SETMAX(max, x1);
                  }
                  break;
            }
            break;
         }

         case Html_TABLE: {
            TGHtmlTable *table = (TGHtmlTable *) p;
            /* fPNext = TableDimensions(table, lineWidth - indent); */
            table->fHasbg = hasbg;
            fPNext = TableDimensions(table, 0);
            x1 = table->fMaxW[0] + indent + obstacle;
            x2 = table->fMinW[0] + indent;
            SETMAX(max, x1);
            SETMAX(min, x2);
            x1 = indent + obstacle;
            x2 = indent;
            if (fPNext && fPNext->fType == Html_EndTABLE) fPNext = fPNext->fPNext;
            break;
         }

         case Html_UL:
         case Html_OL:
            indent += HTML_INDENT;
            x1 = indent + obstacle;
            x2 = indent;
            break;

         case Html_EndUL:
         case Html_EndOL:
            indent -= HTML_INDENT;
            if (indent < 0) indent = 0;
            x1 = indent + obstacle;
            x2 = indent;
            break;

         case Html_BLOCKQUOTE:
            indent += 2 * HTML_INDENT;
            x1 = indent + obstacle;
            x2 = indent;
            break;

         case Html_EndBLOCKQUOTE:
            indent -= 2 * HTML_INDENT;
            if (indent < 0) indent = 0;
            x1 = indent + obstacle;
            x2 = indent;
            break;

         case Html_APPLET:
         case Html_INPUT:
         case Html_SELECT:
         case Html_EMBED:
         case Html_TEXTAREA: {
            TGHtmlInput *input = (TGHtmlInput *) p;
            x1 += input->fW + input->fPadLeft;
            if (p->fStyle.fFlags & STY_Preformatted) {
               x3 += input->fW + input->fPadLeft;
               SETMAX(min, x3);
               SETMAX(max, x1);
               x2 += input->fW + input->fPadLeft;
            } else {
               SETMAX(min, indent + input->fW);
               SETMAX(max, x1);
               x2 = indent;
            }
            break;
         }

         case Html_BR:
         case Html_P:
         case Html_EndP:
         case Html_DIV:
         case Html_EndDIV:
         case Html_H1:
         case Html_EndH1:
         case Html_H2:
         case Html_EndH2:
         case Html_H3:
         case Html_EndH3:
         case Html_H4:
         case Html_EndH4:
         case Html_H5:
         case Html_H6:
            x1 = indent + obstacle;
            x2 = indent;
            break;

         case Html_EndTD:
         case Html_EndTH:
         case Html_CAPTION:
         case Html_EndTABLE:
         case Html_TD:
         case Html_TR:
         case Html_TH:
         case Html_EndTR:
            go = 0;
            break;

         default:
            break;
      }

      if (!go) break;
   }

   *pMin = min;
   *pMax = max;

   return p;
}


// Vertical alignments:

#define VAlign_Unknown    0
#define VAlign_Top        1
#define VAlign_Bottom     2
#define VAlign_Center     3
#define VAlign_Baseline   4


//______________________________________________________________________________
int TGHtmlMarkupElement::GetVerticalAlignment(int dflt)
{
   // Return the vertical alignment specified by the given element.

   const char *z;
   int rc;

   z = MarkupArg("valign", 0);
   if (z == 0) {
      rc = dflt;
   } else if (strcasecmp(z, "top") == 0) {
      rc = VAlign_Top;
   } else if (strcasecmp(z, "bottom") == 0) {
      rc = VAlign_Bottom;
   } else if (strcasecmp(z, "center") == 0) {
      rc = VAlign_Center;
   } else if (strcasecmp(z, "baseline") == 0) {
      rc = VAlign_Baseline;
   } else{
      rc = dflt;
   }

   return rc;
}

//______________________________________________________________________________
TGHtmlElement *TGHtmlLayoutContext::TableLayout(TGHtmlTable *pTable)
{
   // Do all layout for a single table.  Return the </table> element or
   // NULL if the table is unterminated.

   TGHtmlElement *pEnd1;       // The </table> element
   TGHtmlElement *p;           // For looping thru elements of the table
   TGHtmlElement *fPNext;       // Next element in the loop
   TGHtmlElement *pCaption;    // Start of the caption text.  The <caption>
   TGHtmlElement *pEndCaption; // End of the caption.  The </caption>
   int width;               // Width of the table as drawn
   int cellSpacing;         // Value of cellspacing= parameter to <table>
   int cellPadding;         // Value of cellpadding= parameter to <table>
   int tbw;                 // Width of the 3D border around the whole table
   int cbw;                 // Width of the 3D border around a cell
   int pad;                 // cellPadding + borderwidth
   const char *z;           // A string
   int left_margin;         // The left edge of space available for drawing
   int lineWidth;           // Total horizontal space available for drawing
   int specWidth;           // Total horizontal drawing width per width= attr
   int separation;          // Distance between content of columns (or rows)
   int i;                   // Loop counter
   int n;                   // Number of columns
   int btm;                 // Bottom edge of previous row
   int iRow;                // Current row number
   int iCol;                // Current column number
   int colspan;             // Number of columns spanned by current cell
   int vspace;              // Value of the vspace= parameter to <table>
   int hspace;              // Value of the hspace= parameter to <table>
   int rowBottom;           // Bottom edge of content in the current row
   int defaultVAlign;       // Default vertical alignment for the current row
   const char *zAlign;      // Value of the ALIGN= attribute of the <TABLE>
#define N (HTML_MAX_COLUMNS+1)
   int y[N];                // Top edge of each cell's content
   int x[N];                // Left edge of each cell's content
   int w[N];                // Width of each cell's content
   int ymax[N];             // Bottom edge of cell's content if valign=top
   TGHtmlElement *apElem[N]; // The <td> or <th> for each cell in a row
   int firstRow[N];         // First row on which a cell appears
   int lastRow[N];          // Row to which each cell span's
   int valign[N];           // Vertical alignment for each cell
   TGHtmlLayoutContext savedContext;  // Saved copy of the original pLC
   TGHtmlLayoutContext cellContext;   // Used to render a single cell
#ifdef TABLE_TRIM_BLANK
   extern int HtmlLineWasBlank;
#endif // TABLE_TRIM_BLANK

   if (pTable == 0 || pTable->fType != Html_TABLE) return pTable;

   TRACE_PUSH(HtmlTrace_Table2);
   TRACE(HtmlTrace_Table2, ("Starting TableLayout() at %s\n",
                            fHtml->GetTokenName(pTable)));

   // Figure how much horizontal space is available for rendering
   // this table.  Store the answer in lineWidth.  left_margin is
   // the left-most X coordinate of the table.  btm stores the top-most
   // Y coordinate.

   ComputeMargins(&left_margin, &btm, &lineWidth);

   TRACE(HtmlTrace_Table2, ("...btm=%d left=%d width=%d\n",
                           btm, left_margin, lineWidth));

   // figure out how much space the table wants for each column,
   // and in total..
   pEnd1 = fHtml->TableDimensions(pTable, lineWidth);

   // If we don't have enough horizontal space to accomodate the minimum table
   // width, then try to move down past some obstruction (such as an
   // <IMG ALIGN=LEFT>) to give us more room.

   if (lineWidth < pTable->fMinW[0]) {
      WidenLine(pTable->fMinW[0], &left_margin, &btm, &lineWidth);

      TRACE(HtmlTrace_Table2, ("Widen to btm=%d left=%d width=%d\n",
                             btm, left_margin, lineWidth));
   }
   savedContext = *this;

  // Figure out how wide to draw the table
   z = pTable->MarkupArg("width", 0);
   if (z) {
      int len = strlen(z);
      if (len > 0 && z[len-1] == '%') {
         specWidth = (atoi(z) * lineWidth) / 100;
      } else {
         specWidth = atoi(z);
      }
   } else {
      specWidth = lineWidth;
   }
   if (specWidth < pTable->fMinW[0]) {
      width = pTable->fMinW[0];
   } else if (specWidth <= pTable->fMaxW[0]) {
      width = specWidth;
   } else {
      width = pTable->fMaxW[0];
   }

   // Compute the width and left edge position of every column in
   // the table

   z = pTable->MarkupArg("cellpadding", 0);
   cellPadding = z ? atoi(z) : DFLT_CELLPADDING;
   cellSpacing = fHtml->CellSpacing(pTable);

   z = pTable->MarkupArg("vspace", 0);
   vspace = z ? atoi(z) : DFLT_VSPACE;

   z = pTable->MarkupArg("hspace", 0);
   hspace = z ? atoi(z) : DFLT_HSPACE;

#ifdef DEBUG
   if (HtmlTraceMask & HtmlTrace_Table4) {
      cellPadding = 5;
      cellSpacing = 2;
      if (vspace < 2) vspace = 2;
      if (hspace < 2) hspace = 2;
   }
#endif

   tbw = pTable->fBorderWidth;
   cbw = (tbw > 0);
   pad = cellPadding + cbw;
   separation = cellSpacing + 2 * pad;
   x[1] = left_margin + tbw + cellSpacing + pad;

   n = pTable->fNCol;
   if (n <= 0 || pTable->fMaxW[0] <= 0) {
      // Abort if the table has no columns at all or if the total width
      // of the table is zero or less.
      return pEnd1;
   }

   zAlign = pTable->MarkupArg("align", "");
   if (width <= lineWidth) {
      int align = pTable->fStyle.fAlign;
      if (align == ALIGN_Right || strcasecmp(zAlign, "right") == 0) {
         x[1] += lineWidth - width;
      } else if (align == ALIGN_Center && strcasecmp(zAlign, "left") != 0) {
         x[1] += (lineWidth - width) / 2;
      }
   }

   if (width == pTable->fMaxW[0]) {
      w[1] = pTable->fMaxW[1];
      for (i = 2; i <= n; i++) {
         w[i] = pTable->fMaxW[i];
         x[i] = x[i-1] + w[i-1] + separation;
      }
   } else if (width > pTable->fMaxW[0]) {
      int *tmaxW = pTable->fMaxW;
      double scale = ((double) width) / (double) tmaxW[0];
      w[1] = (int) (tmaxW[1] * scale);
      for (i = 2; i <= n; i++) {
         w[i] = (int) (tmaxW[i] * scale);
         x[i] = x[i-1] + w[i-1] + separation;
      }
   } else if (width > pTable->fMinW[0]) {
      float scale;
      int *tminW = pTable->fMinW;
      int *tmaxW = pTable->fMaxW;
      scale = (double) (width - tminW[0]) / (double) (tmaxW[0] - tminW[0]);
      w[1] = (int) (tminW[1] + (tmaxW[1] - tminW[1]) * scale);
      for (i = 2; i <= n; i++) {
         w[i] = (int) (tminW[i] + (tmaxW[i] - tminW[i]) * scale);
         x[i] = x[i-1] + w[i-1] + separation;
      }
   } else {
      w[1] = pTable->fMinW[1];
      for (i = 2; i <= n; i++) {
         w[i] = pTable->fMinW[i];
         x[i] = x[i-1] + w[i-1] + separation;
      }
   }
   w[n] = width - ((x[n] - x[1]) + 2 * (tbw + pad + cellSpacing));

   // Add notation to the pTable structure so that we will know where
   // to draw the outer box around the outside of the table.

   btm += vspace;
   pTable->fY = btm;
   pTable->fX = x[1] - (tbw + cellSpacing + pad);
   pTable->fW = width;
   SETMAX(fMaxX, pTable->fX + pTable->fW);
   btm += tbw + cellSpacing;

   // Begin rendering rows of the table
   for (i = 1; i <= n; i++) {
      firstRow[i] = 0;
      lastRow[i] = 0;
      apElem[i] = 0;
   }
   p = pTable->fPNext;
   rowBottom = btm;
   for (iRow = 1; iRow <= pTable->fNRow; iRow++) {

      TRACE(HtmlTrace_Table2, ("Row %d: btm=%d\n",iRow,btm));

      // Find the start of the next row. Keep an eye out for the caption
      // while we search
      while (p && p->fType != Html_TR) {
         if (p->fType == Html_CAPTION) {
            pCaption = p;
            while (p && p != pEnd1 && p->fType != Html_EndCAPTION) p = p->fPNext;
            pEndCaption = p;
         }

         TRACE(HtmlTrace_Table3, ("Skipping token %s\n", fHtml->GetTokenName(p)));

         if (p) p = p->fPNext;
      }
      if (p == 0) break;

      // Record default vertical alignment flag for this row
      defaultVAlign = p->GetVerticalAlignment(VAlign_Center);

      // Find every new cell on this row
      for (iCol = 1; iCol <= pTable->fNCol && iCol <= HTML_MAX_COLUMNS; iCol++) {
         if (lastRow[iCol] < iRow) ymax[iCol] = 0;
      }
      iCol = 0;
      for (p = p->fPNext; p && p->fType != Html_TR && p != pEnd1; p = fPNext) {
         fPNext = p->fPNext;

         TRACE(HtmlTrace_Table3, ("Processing token %s\n", fHtml->GetTokenName(p)));

         switch (p->fType) {
            case Html_TD:
            case Html_TH:
               // Find the column number for this cell. Be careful to skip
               // columns which extend down to this row from prior rows
               do {
                  iCol++;
               } while (iCol <= HTML_MAX_COLUMNS && lastRow[iCol] >= iRow);

               TRACE(HtmlTrace_Table2,
                     ("Column %d: x=%d w=%d\n",iCol,x[iCol],w[iCol]));

               // Process the new cell. (Cells beyond the maximum number of
               // cells are simply ignored.)
               if (iCol <= HTML_MAX_COLUMNS) {
                  TGHtmlCell *cell = (TGHtmlCell *) p;
                  apElem[iCol] = p;
                  fPNext = cell->fPEnd;
                  if (cell->fRowspan == 0) {
                     lastRow[iCol] = pTable->fNRow;
                  } else {
                     lastRow[iCol] = iRow + cell->fRowspan - 1;
                  }
                  firstRow[iCol] = iRow;

                  // Set vertical alignment flag for this cell
                  valign[iCol] = p->GetVerticalAlignment(defaultVAlign);

                  // Render cell contents and record the height
                  y[iCol] = btm + pad;
                  cellContext.fHtml     = fHtml;
                  cellContext.fPStart   = p->fPNext;
                  cellContext.fPEnd     = fPNext;
                  cellContext.fHeadRoom = 0;
                  cellContext.fTop      = y[iCol];
                  cellContext.fBottom   = y[iCol];
                  cellContext.fLeft     = x[iCol];
                  cellContext.fRight    = 0;
                  cellContext.fPageWidth = x[iCol] + w[iCol];
                  colspan = cell->fColspan;
                  if (colspan == 0) {
                     for (i = iCol + 1;
                          i <= pTable->fNCol && i <= HTML_MAX_COLUMNS; i++) {
                        cellContext.fPageWidth += w[i] + separation;
                        lastRow[i] = lastRow[iCol];
                     }
                  } else if (colspan > 1) {
                     for (i = iCol + 1;
                          i < iCol + colspan && i <= HTML_MAX_COLUMNS; i++) {
                        cellContext.fPageWidth += w[i] + separation;
                        lastRow[i] = lastRow[iCol];
                     }
                  }
                  cellContext.fMaxX = 0;
                  cellContext.fMaxY = 0;
                  cellContext.fLeftMargin = 0;
                  cellContext.fRightMargin = 0;
                  cellContext.LayoutBlock();
#ifdef TABLE_TRIM_BLANK
                  // Cancel any trailing vertical whitespace caused
                  // by break markup
                  if (HtmlLineWasBlank) {
                     cellContext.fMaxY -= cellContext.headRoom;
                  }
#endif // TABLE_TRIM_BLANK
                  ymax[iCol] = cellContext.fMaxY;
                  SETMAX(ymax[iCol], y[iCol]);
                  cellContext.ClearMarginStack(&cellContext.fLeftMargin);
                  cellContext.ClearMarginStack(&cellContext.fRightMargin);

                  // Set coordinates of the cell border
                  cell->fX = x[iCol] - pad;
                  cell->fY = btm;
                  cell->fW = cellContext.fPageWidth + 2 * pad - x[iCol];

                  TRACE(HtmlTrace_Table2,
                        ("Column %d top=%d bottom=%d h=%d left=%d w=%d\n",
                        iCol, y[iCol], ymax[iCol], ymax[iCol]-y[iCol],
                        cell->fX, cell->fW));

                  // Advance the column counter for cells spaning multiple columns
                  if (colspan > 1) {
                     iCol += colspan - 1;
                  } else if (colspan == 0) {
                     iCol = HTML_MAX_COLUMNS + 1;
                  }
               }
               break;

         case Html_CAPTION:
            // Gotta remember where the caption is so we can render it
            // at the end
            pCaption = p;
            while (fPNext && fPNext != pEnd1 && fPNext->fType != Html_EndCAPTION) {
               fPNext = fPNext->fPNext;
            }
            pEndCaption = fPNext;
            break;
         }
      }

      // Figure out how high to make this row.
      for (iCol = 1; iCol <= pTable->fNCol; iCol++) {
         if (lastRow[iCol] == iRow || iRow == pTable->fNRow) {
            SETMAX(rowBottom, ymax[iCol]);
         }
      }

      TRACE(HtmlTrace_Table2, ("Total row height: %d..%d -> %d\n",
                             btm,rowBottom,rowBottom-btm));

      // Position every cell whose bottom edge ends on this row
      for (iCol = 1; iCol <= pTable->fNCol; iCol++) {
         int dy = 0;    // Extra space at top of cell used for vertical alignment
         TGHtmlCell *apCell = (TGHtmlCell *) apElem[iCol];

         // Skip any unused cells or cells that extend down thru
         // subsequent rows
         if (apElem[iCol] == 0 ||
             (iRow != pTable->fNRow && lastRow[iCol] > iRow)) continue;

            // Align the contents of the cell vertically.
            switch (valign[iCol]) {
               case VAlign_Unknown:
               case VAlign_Center:
                  dy = (rowBottom - ymax[iCol])/2;
                  break;
            case VAlign_Top:
            case VAlign_Baseline:
                  dy = 0;
                  break;
            case VAlign_Bottom:
                  dy = rowBottom - ymax[iCol];
                  break;
            }
            if (dy) {
               TGHtmlElement *pLast = apCell->fPEnd;

               TRACE(HtmlTrace_Table3, ("Delta column %d by %d\n",iCol,dy));

               fHtml->MoveVertically(apElem[iCol]->fPNext, pLast, dy);
            }

            // Record the height of the cell so that the border can be drawn
            apCell->fH = rowBottom + pad - apCell->fY;
            apElem[iCol] = 0;
         }

         // Update btm to the height of the row we just finished setting
         btm = rowBottom + pad + cellSpacing;
      }

      btm += tbw;
      pTable->fH = btm - pTable->fY;
      SETMAX(fMaxY, btm);
      fBottom = btm + vspace;

      // Render the caption, if there is one
      if (pCaption) {
      }

      // Whenever we do any table layout, we need to recompute all the
      // TGHtmlBlocks. The following statement forces this.
      fHtml->ResetBlocks(); // fHtml->firstBlock = fHtml->lastBlock = 0;

      // Adjust the context for text that wraps around the table, if
      // requested by an ALIGN=RIGHT or ALIGN=LEFT attribute.

      if (strcasecmp(zAlign, "left") == 0) {
         savedContext.fMaxX = fMaxX;
         savedContext.fMaxY = fMaxY;
         *this = savedContext;
         PushMargin(&fLeftMargin, pTable->fW + 2, pTable->fY + pTable->fH + 2, 0);
      } else if (strcasecmp(zAlign, "right") == 0) {
         savedContext.fMaxX = fMaxX;
         savedContext.fMaxY = fMaxY;
         *this = savedContext;
         PushMargin(&fRightMargin, pTable->fW + 2, pTable->fY + pTable->fH + 2, 0);
      }

      // All done

      TRACE(HtmlTrace_Table2, (
            "Done with TableLayout().  x=%d y=%d w=%d h=%d Return %s\n",
            pTable->fX, pTable->fY, pTable->fW, pTable->fH,
            fHtml->GetTokenName(pEnd1)));
      TRACE_POP(HtmlTrace_Table2);

   return pEnd1;
}

//______________________________________________________________________________
void TGHtml::MoveVertically(TGHtmlElement *p, TGHtmlElement *pLast1, int dy)
{
   // Move all elements in the given list vertically by the amount dy
   //
   // p     - First element to move
   // pLast1 - Last element.  Do move this one
   // dy    - Amount by which to move

   if (dy == 0) return;

   while (p && p != pLast1) {
      switch (p->fType) {
         case Html_A:
            ((TGHtmlAnchor *)p)->fY += dy;
            break;

         case Html_Text:
            ((TGHtmlTextElement *)p)->fY += dy;
            break;

         case Html_LI:
            ((TGHtmlLi *)p)->fY += dy;
            break;

         case Html_TD:
         case Html_TH:
            ((TGHtmlCell *)p)->fY += dy;
            break;

         case Html_TABLE:
            ((TGHtmlTable *)p)->fY += dy;
            break;

         case Html_IMG:
            ((TGHtmlImageMarkup *)p)->fY += dy;
            break;

         case Html_INPUT:
         case Html_SELECT:
         case Html_APPLET:
         case Html_EMBED:
         case Html_TEXTAREA:
            ((TGHtmlInput *)p)->fY += dy;
            break;

         default:
            break;
      }
      p = p->fPNext;
   }
}
