X-Git-Url: https://jasonwoof.com/gitweb/?a=blobdiff_plain;f=client.coffee;h=7f2267491f319c26559e7bd7aa8a8af24d4a9e78;hb=3f89f7dbaf990e3f219c1c782fe55455eaa68cbc;hp=8c1abd0c8c1b297683ec51c4f3612a2088b9513c;hpb=3a8a99fd78775bdd7f71470443858e19b09dc2ed;p=peach-cgt.git

diff --git a/client.coffee b/client.coffee
index 8c1abd0..7f22674 100644
--- a/client.coffee
+++ b/client.coffee
@@ -1,14 +1,153 @@
+# globals
 $table = null
+table_height = 0
+state = null
+server_url = null
+
+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 = ->
+		return if @length is 0
+		top = @length
+
+		while --top
+			current = Math.floor(Math.random() * (top + 1))
+			tmp = @[current]
+			@[current] = @[top]
+			@[top] = tmp
+		return
+
+new_button = (text) -> $ $ "<div class=\"button\">#{text}</div>"
+
+# transform coordinates from client-side coords to server-side coords (or back)
+# this makes it so p2 view everything upside down (mirrored), but still sends coords rightside up
+transform_coords = (coords) ->
+	ret = {left: coords.left, top: coords.top}
+	if state.agent is 'p2'
+		ret.top = table_height - ret.top
+	return ret
+
+instantiate_card = (card) ->
+	text = card.text
+	view_coords = transform_coords {left: card.x, top: card.y}
+	view = $ $ "<div class=\"card\" style=\"left: #{view_coords.left}px; top: #{view_coords.top}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', ->
+		state.flip state.agent, card.number, ! view.hasClass 'flipped'
+	mark_button.bind 'click', ->
+		state.mark state.agent, card.number, ! view.hasClass 'marked'
+	button_box.append flip_button
+	button_box.append mark_button
+	view.append button_box
+	if card.marked
+		view.addClass 'marked'
+	if card.flipped
+		view.addClass 'flipped'
+	$table.append view
+	view.draggable stack: '.card'
+	view.bind 'dragstop', (event, ui) ->
+		p = transform_coords view.position()
+		state.move state.agent, card.number, p.left, p.top
+	card.view = view
+
+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
+	}
 
-add_card = (text, x, y) ->
-	$table.append $ "<div class=\"card\" style=\"left: #{x}px; top: #{y}px\">#{text}</div>"
-	
 init = ->
-	$table = $ '#table'
-	add_card "card 1", 100, 20
-	add_card "two", 250, 20
-	add_card "third card", 290, 50
+	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
+			coords = transform_coords {left: x, top: y}
+			state.cards[card].view.animate { left: "#{coords.left}px", top: "#{coords.top}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', (agent, cards) ->
+		# FIXME add agent arg and tell server if it's not us
+		$('.card').remove()
+		for card in cards
+			instantiate_card card
+		if agent is me
+			tell_server ['set_cards', agent, cards]
+
+	# timeout so browser will stop showing that we're loading
+	timeout 1, poll_for_updates
+	timeout 2, ->
+		# ask for initial state
+		tell_server ['send_state', state.agent]
 
 $ ->
+	$table = $ '#table'
+	table_height = $table.height() - 148 # FIXME auto-detect card height
 	init()
-