import sys
import javax.swing as swing
import java.awt as awt
import java.lang as jlang
from calend2 import *
import string, re
from calnames import *

def exit(event):
    jlang.System.exit(0)

class WelcomeFrame(swing.JFrame):
    list_names={}
    list_names["mnths"]=["January", "February", "March", "April", "May", "June", "July", "August", "September",
        "October", "November", "December"]
    list_names["years"]=[2000+i for i in range(20)]
    list_names["lang"]=["English", "Spanish", "French", "German", "Italian", "Dutch"]
    list_names["fmtopt"]=["Plain", "Fancy"]
    list_names["sdpw"]=["Su,Mo,Tu,We,Th,Fr,Sa", "Mo,Tu,We,Th,Fr,Sa,Su", "Mo,Tu,We,Th,Fr,Sa", "Mo,Tu,We,Th,Fr"]
    list_names["alnopt"]=["Left", "Center"]
    list_names["cellopt"]=["Normal", "AlternateBold"]

    def __init__(self, title="Welcome to Jython", size=(200, 200)):
        "@sig public WelcomeFrame(String title, java.awt.Dimension size)"
        self.title = title
        self.windowClosing = exit
        self.contentPane.layout = awt.FlowLayout()  
        self.mnths=swing.JComboBox(self.list_names["mnths"])
        self.contentPane.add(self.mnths)
        self.years=swing.JComboBox(self.list_names["years"])
        self.contentPane.add(self.years)
        self.contentPane.layout.setHgap(600)
        self.contentPane.add(swing.JLabel("Message:"))
        self.msg=swing.JTextField(45)
        self.contentPane.add(self.msg)
        self.lang = swing.JComboBox(self.list_names["lang"])
        self.contentPane.layout.setHgap(5)
        self.contentPane.add(self.lang)

        self.fmtopt=1
        fmtopt_grp=swing.ButtonGroup()
        fmtopt_pnl=swing.JPanel(awt.GridLayout(0,1))
        fmtopt_pnl.border = swing.BorderFactory.createTitledBorder("Style")
        buttons = [self.createRadioButton(each, self.radioButtonPressed_fmtopt) for each in self.list_names["fmtopt"]]
        sel=1
        for eachButton in buttons:
            eachButton.setSelected(sel)
            fmtopt_grp.add(eachButton)
            fmtopt_pnl.add(eachButton)
            sel=0
        self.contentPane.add(fmtopt_pnl)

        self.sdpw=1
        sdpw_grp=swing.ButtonGroup()
        sdpw_pnl=swing.JPanel(awt.GridLayout(0,1))
        sdpw_pnl.border = swing.BorderFactory.createTitledBorder("Displayed Days")
        buttons = [self.createRadioButton(each, self.radioButtonPressed_sdpw) for each in self.list_names["sdpw"]]
        sel=1
        for eachButton in buttons:
            eachButton.setSelected(sel)
            sdpw_grp.add(eachButton)
            sdpw_pnl.add(eachButton)
            sel=0
        self.contentPane.add(sdpw_pnl)

        self.alnopt=1
        alnopt_grp=swing.ButtonGroup()
        alnopt_pnl=swing.JPanel(awt.GridLayout(0,1))
        alnopt_pnl.border = swing.BorderFactory.createTitledBorder("Alignment")
        buttons = [self.createRadioButton(each, self.radioButtonPressed_alnopt) for each in self.list_names["alnopt"]]
        sel=1
        for eachButton in buttons:
            eachButton.setSelected(sel)
            alnopt_grp.add(eachButton)
            alnopt_pnl.add(eachButton)
            sel=0
        self.contentPane.add(alnopt_pnl)

        self.cellopt=1
        cellopt_grp=swing.ButtonGroup()
        cellopt_pnl=swing.JPanel(awt.GridLayout(0,1))
        cellopt_pnl.border = swing.BorderFactory.createTitledBorder("Cell Format")
        buttons = [self.createRadioButton(each, self.radioButtonPressed_cellopt) for each in self.list_names["cellopt"]]
        sel=1
        for eachButton in buttons:
            eachButton.setSelected(sel)
            cellopt_grp.add(eachButton)
            cellopt_pnl.add(eachButton)
            sel=0
        self.contentPane.add(cellopt_pnl)
        self.contentPane.add(swing.JTextField('Events:: (eg., "1/31 .PURPLE 7:30pm ^ bingo ^ at church hall ^ free dinner")', editable=0))

        self.eventtxt=swing.JTextArea(16,50)
        self.eventpnl=swing.JPanel()
        self.eventpnl.add(swing.JScrollPane(self.eventtxt))
        self.contentPane.add(self.eventpnl)

        genButton=swing.JButton("Generate", actionPerformed=self.genButtonPressed)
        self.contentPane.add(genButton)

        self.pack()
        self.size=(640,600)
            
    def buttonPressed(self, event):
        self.field.text = self.quotes[event.source.text]

    def createButton(self, name):
        "@sig public javax.swing.JButton createButton(String name)"
        return swing.JButton(name, preferredSize=(100,20), 
                actionPerformed=self.buttonPressed)
                
    def createRadioButton(self, name, doRadioPressed):
        return swing.JRadioButton(name, actionPerformed=doRadioPressed)
                
    def addQuote(self, marxBrother, quote):
        "@sig public void addQuote(String marxBrother, String quote)"
        self.quotes[marxBrother] = quote       
                
    def radioButtonPressed_fmtopt(self, event):
        self.fmtopt=self.list_names["fmtopt"].index(event.source.text)+1

    def radioButtonPressed_sdpw(self, event):
        self.sdpw=self.list_names["sdpw"].index(event.source.text)+1

    def radioButtonPressed_alnopt(self, event):
        self.alnopt=self.list_names["alnopt"].index(event.source.text)+1

    def radioButtonPressed_cellopt(self, event):
        self.cellopt=self.list_names["cellopt"].index(event.source.text)+1

    def genButtonPressed(self, event):
        self.year =self.list_names["years"].index(self.years.getSelectedItem())+2000
        self.mth =self.list_names["mnths"].index(self.mnths.getSelectedItem())+1
        self.langsel =self.list_names["lang"].index(self.lang.getSelectedItem())+1
        BuildHTML(self.year, self.mth, self.langsel, self.sdpw, self.cellopt, self.fmtopt, self.alnopt, self.msg.text, self.eventtxt.text)
        ShowHTML("HTML")

class ShowHTML(swing.JFrame):
    def __init__(self,title):
        self.contentPane.layout = awt.FlowLayout()
        tabbedPane=swing.JTabbedPane()

        self.htmlTab=swing.JEditorPane("text/html", "", editable=0, hyperlinkUpdate=self.followHyperlink)
        self.f=open("htmlfile.dat","r")
        htmlstr=self.f.read()
        self.f.close()
        self.htmlTab.setText(htmlstr)
        tabbedPane.addTab("HTMLView",swing.JScrollPane(self.htmlTab, preferredSize=(720, 480)))

        textTab=swing.JTextArea(15,80)
        textTab.setText(htmlstr)
        tabbedPane.addTab("PlainText",swing.JScrollPane(textTab, preferredSize=(720, 480)))
        self.contentPane.add(tabbedPane)
        self.pack()
        self.show()

    def followHyperlink(self, event):
        if event.eventType == swing.event.HyperlinkEvent.EventType.ACTIVATED:
            self.statusLine = event.URL.toString()
            self.htmlTab.setPage(event.URL)
        elif event.eventType == swing.event.HyperlinkEvent.EventType.ENTERED:
            self.statusLine = event.URL.toString()
        elif event.eventType == swing.event.HyperlinkEvent.EventType.EXITED:
            self.statusLine = ""

class BuildHTML:
    def __init__(self, year, month, lang, sdpw, cellopt, fmtopt, alnopt, msg, eventtxt):
        # comment expression
        self.cmtpat = re.compile('^ *\#')
        # date mm/dd
        self.datepat = re.compile('^ *([0-9]*[0-9]?)/([0-9][0-9]?)')
        # any word
        self.wordpat = re.compile('^ *([^ *\t*]+)')
        # dot color (eg. ".blue")
        self.dotcpat = re.compile('^ *\.[a-zA-Z]+')

        events=string.split(eventtxt, "\n")
        self.evt,self.evtstore,self.maxdd,self.count = self.parse_events(year,month,events)
        self.f=open("htmlfile.dat","w")
        print >> self.f, "<HTML><TITLE>Event Calendar Generator</TITLE><BODY>"
        self.gen_cal(year,month,lang,sdpw,cellopt,fmtopt,alnopt,msg,self.maxdd,self.count,self.evt,self.evtstore)
        print >> self.f, '<HR>Event calendar automatically generated by Python script',
        print >> self.f, ' <b>evt1htm.cgi</b>',
        print >> self.f, " found at <a href=http://mannyjuan.com>manny juan's python page</a>"
        print >> self.f, '</BODY></HTML>'
        self.f.close

    def parse_events(self,year,month,events):
        maxdd=0
        evn=0
        evt={}
        evtstore={}
        count={}
        daysinmonth=mdays[month]
        if (isleap(year) & (month==2)):
            daysinmonth=daysinmonth+1
        for day in range(daysinmonth+1):
            count[day]=0
        for line in events:
            if string.strip(line) == '': #skip blank lines
                continue
            if self.cmtpat.search(line) > -1:
                continue

            # first token must be date eg. 12/31
            dpsch=self.datepat.search(line)
            if dpsch > -1:
                xmonth , xday  = dpsch.group(1,2)
                mth=string.atoi(xmonth)

                # select only the days for the month selected
                if mth==month:
                  day=string.atoi(xday)
                  line=line[dpsch.end():]

                  evn=evn+1
                  count[day]=count[day]+1

                  # keep track of cell height
                  if (count[day]>maxdd):
                    maxdd=count[day]

                  # store event number and text
                  evt[(day,count[day])]=evn
                  evtstore[evn]=line

        return (evt,evtstore,maxdd,count)

    def gen_cal(self,year,month,lang,sdpw,cellopt,fmtopt,alnopt,msg,maxdd,count,evt,evtstore):
      begweek=0
      if(sdpw==1):
        dayw=80
      elif(sdpw==2):
        dayw=93
      elif(sdpw==3):
        dayw=112
      else:
        dayw=80
        begweek=1

      weeks=monthcalendar(year,month,begweek)
      evseq=0
      print >> self.f, '<center>'
      month_name,week_name=month_lits[lang-1]
      print >> self.f, '<font size=+2><b>'+month_name[month-1],str(year)+'</b></font>'
      if len(msg)>0:
        print >> self.f, '<br>'+msg
      print >> self.f, '</center>'
      print >> self.f, '<center><table border=1><tr>'

      if (fmtopt==2):
        fmtspan='colspan=2'
        extracell='<td></td>'
      else:
        fmtspan=''
        extracell=''
      if((sdpw==1)|(sdpw==4)):
        print >> self.f, '<th width=%2d %s>%s</td>'%(dayw,fmtspan,week_name[(0+begweek)%7])
      print >> self.f, '<th width=%2d %s>%s</td>'%(dayw,fmtspan,week_name[(1+begweek)%7])
      print >> self.f, '<th width=%2d %s>%s</td>'%(dayw,fmtspan,week_name[(2+begweek)%7])
      print >> self.f, '<th width=%2d %s>%s</td>'%(dayw,fmtspan,week_name[(3+begweek)%7])
      print >> self.f, '<th width=%2d %s>%s</td>'%(dayw,fmtspan,week_name[(4+begweek)%7])
      print >> self.f, '<th width=%2d %s>%s</td>'%(dayw,fmtspan,week_name[(5+begweek)%7])
      if((sdpw==1)|(sdpw==2)|(sdpw==4)):
        print >> self.f, '<th width=%2d %s>%s</td>'%(dayw,fmtspan,week_name[(6+begweek)%7])
      print >> self.f, '</tr>'

      for week in weeks:
        if (fmtopt==2):
          print >> self.f, '<tr>'
          dow=0
          for day in week:
            if (((sdpw==1)|(sdpw==4))
            |((sdpw==2) & (dow>0))
            |((sdpw==3) & (dow>0) & (dow<6))):
              print >> self.f, '<td',
              if(day>0):
                print >> self.f, 'width=5>'+str(day),
              else:
                print >> self.f, '>',
              print >> self.f, '</td>%s' % extracell
            dow=dow+1
          print >> self.f, '</tr>'
        print >> self.f, '<tr>'
        dow=0
        for day in week:
          if (((sdpw==1)|(sdpw==4))
          |((sdpw==2) & (dow>0))
          |((sdpw==3) & (dow>0) & (dow<6))):
            print >> self.f, '<td align=left valign=top %s>' %fmtspan ,
            if(day>0):
              for i in range(maxdd):
                if ((fmtopt==1) & (i==0)):
                  print >> self.f, '<b>',day,'</b>','<br>'
                if (alnopt==2):
                  print >> self.f, '<center>'
                if i>count[day]-1:
                  print >> self.f, '&nbsp;<br>'
                else:
                  evn=evt[(day,i+1)]
                  event=evtstore[evn]

                  # convert caret's to <br>
                  event=re.sub(' *\^ *',' <br> ',event)

                  # convert vertical bars to <hr>
                  event=re.sub('\|','<hr>',event)

                  # convert beginning codes like '.red' to fontcolor tag
                  clrsch=self.dotcpat.search(event)
                  if clrsch > -1:
                    event=string.strip(event[clrsch.end():])
                    color=clrsch.group(0)
                    color=re.sub(' *\.','',color)
                    event='<font color="'+color+'">'+event+'</font>'

                  # this will also be the listing sequence (and link)
                  evseq=evseq+1
                  if (cellopt==2):
                    evtext=event
                    if (((day+i)%2)==1):
                      evtext=self.embolden(event)
                    print >> self.f, evtext,'<br>'
                  else:
                    print >> self.f, event,'<br>'

                if (alnopt==2):
                  print >> self.f, '</center>'

#              print >> self.f, '<br>'
          dow=dow+1
          print >> self.f, '</td>'
        print >> self.f, '</tr>'
      print >> self.f, '</table></center>'

    def embolden(self,s):
      return '<b>'+s+'</b>'

if __name__ == '__main__':
    WelcomeFrame().show()