#!/usr/bin/env python

#Copyright (c) 2009, Walter Bender

#Permission is hereby granted, free of charge, to any person obtaining a copy
#of this software and associated documentation files (the "Software"), to deal
#in the Software without restriction, including without limitation the rights
#to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
#copies of the Software, and to permit persons to whom the Software is
#furnished to do so, subject to the following conditions:

#The above copyright notice and this permission notice shall be included in
#all copies or substantial portions of the Software.

#THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
#IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
#FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
#AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
#LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
#OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
#THE SOFTWARE.

import pygtk
pygtk.require('2.0')
import gtk

from gettext import gettext as _
import os.path

import window
import grid
import card
import sprites
from orientation import get_rotation_sets

class CardSortMain:
    def __init__(self):
        self.r = 0
        self.tw = None
        # create a new window
        self.win = gtk.Window(gtk.WINDOW_TOPLEVEL)
        self.win.maximize()
        self.win.set_title(_("CardSort") + ": " + 
                           _("click to rotate; drag to swap"))
        self.win.connect("delete_event", lambda w,e: gtk.main_quit())

        menu = gtk.Menu()
        menu_items = gtk.MenuItem(_("Toggle blank card"))
        menu.append(menu_items)
        menu_items.connect("activate", self._toggle_card_cb)
        menu_items = gtk.MenuItem(_("Apply rotation sets"))
        menu.append(menu_items)
        menu_items.connect("activate", self._apply_rotation_sets_cb)
        menu_items = gtk.MenuItem(_("Solve it"))
        menu.append(menu_items)
        menu_items.connect("activate", self._solve_cb)
        menu_items.show()
        root_menu = gtk.MenuItem("Tools")
        root_menu.show()
        root_menu.set_submenu(menu)

        # A vbox to put a menu and the canvas in:
        vbox = gtk.VBox(False, 0)
        self.win.add(vbox)
        vbox.show()

        menu_bar = gtk.MenuBar()
        vbox.pack_start(menu_bar, False, False, 2)
        menu_bar.show()

        canvas = gtk.DrawingArea()
        vbox.pack_end(canvas, True, True)
        canvas.show()

        menu_bar.append (root_menu)
        self.win.show_all()

        # Join the activity
        self.tw = window.new_window(canvas, \
                               os.path.join(os.path.abspath('.'), \
                                            'images/card'))
        self.tw.win = self.win

    def set_title(self, title):
        self.win.set_title(title)

    # Print a string when a menu item is selected
    def _toggle_card_cb(self, widget):
        self.tw.grid.toggle_blank()
        sprites.redrawsprites(self.tw)

    def _apply_rotation_sets_cb(self, widget):
        self.rotation_sets = get_rotation_sets()
        i = self.r
        for j in range(9):
            # if the blank card (9) is in the grid,
            # then the index for the card it replaced will fail
            try: 
                self.tw.grid.card_table[self.tw.grid.grid.index(j)]\
                    .set_orientation(self.rotation_sets[i][j])
            except ValueError:
                pass
        sprites.redrawsprites(self.tw)
        self.r += 1
        if self.r == 64:
            self.r = 0

    def _solve_cb(self, widget):
        self.rotation_sets = get_rotation_sets()
        counter = 0
        for i in range(9):
            for j in range(9):
                if j in [i]: continue
                for k in range(9):
                    if k in [i,j]: continue
                    for x in range(9):
                        if x in [i,j,k]: continue
                        for y in range(9):
                            if y in [x,i,j,k]: continue
                            for z in range(9):
                                if z in [x,y,i,j,k]: continue
                                for a in range(9):
                                    if a in [x,y,z,i,j,k]: continue
                                    for b in range(9):
                                        if b in [a,x,y,z,i,j,k]: continue
                                        for c in range(9):
                                            if c in [a,b,x,y,z,i,j,k]: continue
                                            if self.test([i,j,k,x,y,z,a,b,c,9])\
                                                is True: return True
                                            counter += 1
                                            if (counter/1000)*1000 == counter:
                                                print str(counter) + ": " + \
                                                      str(self.tw.grid.grid)
        print "no solution found :("
        return True

    def test(self,g):
        self.tw.grid.grid = g
        for o in range(64):
            for r in range(9):
                self.tw.grid.card_table[self.tw.grid.grid.index(r)]\
                    .set_orientation(self.rotation_sets[o][r],False)
            if self.tw.grid.test() is True:
                print _("You solved the puzzle.")
                self.tw.grid.print_grid()
                self.tw.grid.print_orientations()
                self.tw.win.set_title(_("CardSort") + ": " + \
                                      _("You solved the puzzle."))
                for r in range(9):
                    # since we were not actually updating the graphics,
                    # we need to do it now
                    x = int((self.tw.width-\
                            (self.tw.card_dim*3*self.tw.scale))/2)
                    y = int((self.tw.height-\
                            (self.tw.card_dim*3*self.tw.scale))/2)
                    self.tw.grid.card_table[self.tw.grid.grid.index(r)].spr.x = x
                    self.tw.grid.card_table[self.tw.grid.grid.index(r)].spr.y = y
                    print str(r) + ": " + str(self.tw.grid.grid.index(r))
                    x += int(self.tw.card_dim*self.tw.scale)
                    if x > (self.tw.width+(self.tw.card_dim*2*self.tw.scale))/2:
                        x = int((self.tw.width-\
                                (self.tw.card_dim*3*self.tw.scale))/2)
                        y += int(self.tw.card_dim*self.tw.scale)

                    self.tw.grid.card_table[self.tw.grid.grid.index(r)]\
                        .set_orientation(self.rotation_sets[o][r],True)

                self.tw.grid.print_grid()
                self.tw.grid.print_orientations()
                sprites.redrawsprites(self.tw)
                return True
        return False

def main():
    gtk.main()
    return 0

if __name__ == "__main__":
    CardSortMain()
    main()