JasonWoof Got questions, comments, patches, etc.? Contact Jason Woofenden
client sync working (and spitting out debug cruft)
[peach-cgt.git] / client.coffee
index 774e29e..fbe2815 100644 (file)
@@ -1,16 +1,13 @@
+# globals
 $table = null
+state = null
+server_url = null
 
-state = {
-       card_types: [
-               {text: "Rusty Camel"}
-               {text: "Angry Ocelot"}
-               {text: "Unruly Parsnip"}
-       ],
-       # values are indexes into card_types array
-       my_cards: [0, 0, 0, 1, 1, 2],
-       your_cards: [0, 1, 1, 2, 2, 2],
-       auto_shuffle: true
-}
+message = (txt) ->
+       # FIXME implement chat box or something
+
+# timeout function with args in convenient order
+timeout = (ms, func) -> setTimeout func, ms
 
 unless Array::shuffle?
        Array::shuffle = ->
@@ -26,17 +23,18 @@ unless Array::shuffle?
 
 new_button = (text) -> $ $ "<div class=\"button\">#{text}</div>"
 
-add_card = (text, x, y) ->
+instantiate_card = (model) ->
+       text = model.text
+       x = model.x
+       y = model.y
        card = $ $ "<div class=\"card\" style=\"left: #{x}px; top: #{y}px\"><span class=\"cardtext\">#{text}</span></div>"
        button_box = $ $ '<div/>'
        flip_button = new_button "flip over"
        mark_button = new_button "mark"
        flip_button.bind 'click', ->
-               card.toggleClass 'flipped'
-               # FIXME tell server
+               state.flip state.agent, model.number, ! card.hasClass 'flipped'
        mark_button.bind 'click', ->
-               card.toggleClass 'marked'
-               # FIXME tell server
+               state.mark state.agent, model.number, ! card.hasClass 'marked'
        button_box.append flip_button
        button_box.append mark_button
        card.append button_box
@@ -44,26 +42,93 @@ add_card = (text, x, y) ->
        card.draggable stack: '.card'
        card.bind 'dragstop', (event, ui) ->
                p = card.position()
-               # FIXME tell server (p.left, p.top)
+               state.move state.agent, model.number, p.left, p.top
+       model.view = card
+
+error_lag = 3
+
+outgoing_messages = []
+# message should be [agent, method, args...]
+# don't forget the agent (state.agent)
+tell_server = (message) ->
+       outgoing_messages.push message
+       send_updates()
+
+send_updates = ->
+       return if outgoing_messages.length is 0
+
+       messages = outgoing_messages
+       outgoing_messages = []
+
+       $.ajax "#{server_url}/set", {
+               cache: false
+               data: {
+                       agent: state.agent
+                       game: 'test' # FIXME, and it the /get call too
+                       messages: JSON.stringify(messages)
+               }
+               type: 'POST'
+               dataType: 'json'
+               error: (xhr, status, error) ->
+                       message "Network error while sending, you might want to refresh. Trying again in #{error_lag} seconds. (Status: #{status}, Error: #{error})"
+                       for message in messages
+                               outgoing_messages.unshift message
+                       timeout error_lag * 1000, send_updates
+                       error_lag *= 2
+               success: (data, status, xhr) ->
+                       message "update sent"
+                       error_lag = 3
+       }
+
+error_lag = 3
+poll_for_updates = ->
+       $.ajax "#{server_url}/get?agent=#{state.agent}&game=test", {
+               cache: false
+               type: 'GET'
+               dataType: 'json'
+               error: (xhr, status, error) ->
+                       message "Network error, you might want to refresh. Trying again in #{error_lag} seconds. (Status: #{status}, Error: #{error})"
+                       timeout error_lag * 1000, poll_for_updates
+                       error_lag *= 2
+               success: (data, status, xhr) ->
+                       state.process_messages data
+                       timeout 100, poll_for_updates
+                       error_lag = 3
+       }
 
 init = ->
-       if state.auto_shuffle
-               state.my_cards.shuffle()
-               state.your_cards.shuffle() # FIXME have the server or other player do this
-               state.auto_shuffle = false
-               # FIXME tell server
-       left = 15
-       top = 450
-       for card in state.my_cards
-               add_card state.card_types[card].text, left, top
-               left += 120
-       left = 15
-       top = 250
-       for card in state.your_cards
-               add_card state.card_types[card].text, left, top
-               left += 120
+       if window.location.hash? and window.location.hash.length > 0
+               me = window.location.hash.substr 1
+               winloc = "#{window.location}"
+               server_url = winloc.substr 0, winloc.length - window.location.hash.length
+       else
+               me = 'p1'
+               server_url = window.location
+
+       state = window.game_model.new me
+       state.on 'move', (agent, card, x, y) ->
+               # FIXME add/handle pile argument
+               if agent is me
+                       tell_server ['move', agent, card, x, y]
+               else
+                       state.cards[card].view.animate { left: "#{x}px", top: "#{y}px"}, 800
+       state.on 'mark', (agent, card, state) ->
+               @cards[card].view.toggleClass 'marked', state
+               if agent is me
+                       tell_server ['mark', agent, card, state]
+       state.on 'flip', (agent, card, state) ->
+               @cards[card].view.toggleClass 'flipped', state
+               if agent is me
+                       tell_server ['flip', agent, card, state]
+       state.on 'set_cards', (cards) ->
+               # FIXME add agent arg and tell server if it's not us
+               $('.card').remove()
+               for card in cards
+                       instantiate_card card
+
+       # timeout so browser will stop showing that we're loading
+       timeout 1, poll_for_updates
 
 $ ->
        $table = $ '#table'
        init()
-