# This file is part of lyx2lyx
# Copyright (C) 2002 José Matos <jamatos@lyx.org>
#
# This program is free software; you can redistribute it and/or
# modify it under the terms of the GNU General Public License
# as published by the Free Software Foundation; either version 2
# of the License, or (at your option) any later version.
#
# This program 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 General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program; if not, write to the Free Software
# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.

import re, string, sys
from parser_tools import *

lyxtable_re = re.compile(r".*\\LyXTable$")
def update_tabular(lines):
    i=0
    while 1:
        i = find_re(lines, lyxtable_re, i)
        if i == -1:
            break
        # remove \LyXTable
        lines[i] = lines[i][:-9]
        i = i + 1
        lines.insert(i,'')
        i = i + 1
        lines[i] = "\\begin_inset  Tabular"
        i = i + 1
        head = string.split(lines[i])
        rows = int(head[0])
        columns = int(head[1])

        lines[i] = '<LyXTabular version="1" rows="%s" columns="%s">' % (head[0],head[1])
        i = i +1
        lines.insert(i, '<Features rotate="%s" islongtable="%s" endhead="0" endfirsthead="0" endfoot="0" endlastfoot="0">' % (head[2], head[3]))

        i = i +1
        
        row_info = []
        for j in range(rows):
            row_info.append(string.split(lines[i]))
            del lines[i]
        column_info = []
        for j in range(columns):
            column_info.append(string.split(lines[i]))
            del lines[i]

        cell_info = []
        cell_location = []
        ncells = 0
        l = 0
        for j in range(rows):
            tmp = []
            for k in range(columns):
                cell_info.append(string.split(lines[i]))
                if lines[i][0] != "2":
                    tmp.append(l)
                    ncells = ncells + 1
                del lines[i]
                l = l + 1
            cell_location.append(tmp)

        for j in range(rows):
            for k in cell_location[j]:
                sys.stderr.write("%d\t" % (k))
            sys.stderr.write("\n")

        del lines[i]
        if not lines[i]:
            del lines[i]
        
        tmp = []
        tmp.append("")

        l = 0
        for j in range(rows):
            tmp.append('<Row topline="%s" bottomline="%s" newpage="%s">' % (row_info[j][0],row_info[j][1],row_info[j][2]))

            for k in range(columns):
                if j:
                    tmp.append('<Column>')
                else:
                    tmp.append('<Column alignment="%s" valignment="0" leftline="%s" rightline="%s" width=%s special=%s>' % (column_info[k][0],column_info[k][1], column_info[k][2], column_info[k][3], column_info[k][4]))
                m = j*columns + k
                sys.stderr.write("%d\t%d\t%d\n" % (j,k,m))
                tmp.append('<Cell multicolumn="%s" alignment="%s" valignment="0" topline="%s" bottomline="%s" leftline="%s" rightline="%s" rotate="%s" usebox="0" width=%s special=%s>' % (cell_info[m][0],cell_info[m][1],cell_info[m][2],cell_info[m][3],cell_info[m][4],cell_info[m][5],cell_info[m][6],cell_info[m][7],cell_info[m][8]))
                tmp.append('\\begin_inset Text')
                tmp.append('')
                tmp.append('\\layout Standard')
                tmp.append('')

                if m not in cell_location[j]:
                    tmp.append('\\end_inset ')
                    tmp.append('</Cell>')
                    tmp.append('</Column>')
                    continue

                if l == ncells -1:
                    end = find_tokens(lines, ['\\layout','\\the_end'], i)
                    if end == -1:
                        sys.stderr.write("Malformed lyx file\n")
                    else:
                        end = end - i
                        paragraph = []
                        while end > 0:
                            paragraph.append(lines[i])
                            del lines[i]
                            end = end -1
                        tmp.extend(set_paragraph_properties(paragraph))
                else:
                    paragraph = []
                    while lines[i] != '\\newline ':
                        paragraph.append(lines[i])
                        del lines[i]
                    del lines[i]
                    tmp.extend(set_paragraph_properties(paragraph))
                
                tmp.append('\\end_inset ')
                tmp.append('</Cell>')
                tmp.append('</Column>')
                l = l + 1
            tmp.append('</Row>')

        tmp.append('</LyXTabular>')
        tmp.append('')
        tmp.append('\\end_inset ')
        tail = lines[i:]
        lines[i:] = []
        lines.extend(tmp)
        lines.extend(tail)

        i = i + len(tmp)

prop_exp = re.compile(r"\\(\S*)\s*(\S*)")
def set_paragraph_properties(lines):
    # we need to preserve the order of options
    properties = ["family","series","shape","size",
                  "emph","bar","noun","latex","color"]
    prop_value = {"family":"roman", "series" : "medium",
                   "shape" : "up", "size" : "normal",
                   "emph" : "off", "bar" : "no",
                   "noun" : "off", "latex" : "no_latex", "color" : "none"}

    start = 0
    end = 0
    i = 0
    n = len(lines)
    
    while i<n and lines[i] == "":
        i = i + 1
    start = i

    while i<n and lines[i][:1] == "\\":
        result = prop_exp.match(lines[i])
        sys.stderr.write(lines[i]+"\n")
        prop = result.group(1)
        if prop not in properties:
            sys.stderr.write("Unknown property: %s\n" % (prop))
        else:
            prop_value[prop] = result.group(2)
        i = i + 1
    end = i

    aux = []
    for prop in properties:
        if prop == "color":
            aux.append("\\%s %s" % (prop, prop_value[prop]))
        elif prop == "family":
            if prop_value[prop] != "roman":
                aux.append("\\%s %s " % (prop, prop_value[prop]))
        else:
            aux.append("\\%s %s " % (prop, prop_value[prop]))
        

    return lines[:start] + aux[:] + lines[end:]

def convert(header,body):
    sys.stderr.write("%d\n" % len(body))
    update_tabular(body)
    sys.stderr.write("%d\n" % len(body))

if __name__ == "__main__":
    pass