summary refs log tree commit diff
path: root/sol.c
diff options
context:
space:
mode:
authorJune McEnroe <june@causal.agency>2019-08-22 15:43:24 -0400
committerJune McEnroe <june@causal.agency>2019-08-22 15:43:24 -0400
commitbeba76119fbc8e29bf22093bfa54316ad2591d30 (patch)
tree49a978628c83d61dffd55ded8580b35338db3a38 /sol.c
parentMark card functions inline (diff)
downloadwep-beba76119fbc8e29bf22093bfa54316ad2591d30.tar.gz
wep-beba76119fbc8e29bf22093bfa54316ad2591d30.zip
Remove games
Diffstat (limited to 'sol.c')
-rw-r--r--sol.c393
1 files changed, 0 insertions, 393 deletions
diff --git a/sol.c b/sol.c
deleted file mode 100644
index cf643f2..0000000
--- a/sol.c
+++ /dev/null
@@ -1,393 +0,0 @@
-/* Copyright (C) 2019  C. McEnroe <june@causal.agency>
- *
- * This program is free software: you can redistribute it and/or modify
- * it under the terms of the GNU Affero General Public License as published by
- * the Free Software Foundation, either version 3 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 Affero General Public License for more details.
- *
- * You should have received a copy of the GNU Affero General Public License
- * along with this program.  If not, see <http://www.gnu.org/licenses/>.
- */
-
-#include <SDL.h>
-#include <stdbool.h>
-#include <stdio.h>
-#include <stdlib.h>
-#include <time.h>
-
-#include "asset.h"
-#include "cards.h"
-#include "layout.h"
-#include "stack.h"
-
-#define ARRAY_LEN(a) (sizeof(a) / sizeof((a)[0]))
-
-enum {
-	Stock,
-	Waste1,
-	Waste3,
-	Foundation1,
-	Foundation2,
-	Foundation3,
-	Foundation4,
-	Tableau1,
-	Tableau2,
-	Tableau3,
-	Tableau4,
-	Tableau5,
-	Tableau6,
-	Tableau7,
-	StacksLen,
-};
-
-static struct Stack stacks[StacksLen];
-
-// TODO: Scoring method, score, time.
-static struct {
-	uint draw;
-} game = {
-	.draw = 3,
-};
-
-typedef void StackFn(struct Stack *dst, struct Stack *src, Uint8 len);
-
-static struct {
-	StackFn *fn;
-	uint dst;
-	uint src;
-	uint len;
-} undo;
-
-static void gameDo(StackFn *fn, uint dst, uint src, uint len) {
-	undo.fn = fn;
-	undo.dst = src;
-	undo.src = dst;
-	undo.len = len;
-	fn(&stacks[dst], &stacks[src], len);
-}
-
-static bool gameUndo(void) {
-	if (!undo.fn) return false;
-	undo.fn(&stacks[undo.dst], &stacks[undo.src], undo.len);
-	undo.fn = NULL;
-	return true;
-}
-
-static void gameDeal(void) {
-	undo.fn = NULL;
-	for (uint i = 0; i < StacksLen; ++i) {
-		stackClear(&stacks[i]);
-	}
-	for (Card i = 1; i <= 52; ++i) {
-		stackPush(&stacks[Stock], -i);
-	}
-	stackShuffle(&stacks[Stock]);
-	for (uint i = Tableau1; i <= Tableau7; ++i) {
-		stackMoveTo(&stacks[i], &stacks[Stock], i - Tableau1);
-		stackFlipTo(&stacks[i], &stacks[Stock], 1);
-	}
-}
-
-static void gameDraw(void) {
-	stackMoveTo(&stacks[Waste1], &stacks[Waste3], stacks[Waste3].len);
-	if (stacks[Stock].len) {
-		if (game.draw > 1) {
-			gameDo(stackFlipTo, Waste3, Stock, game.draw);
-		} else {
-			gameDo(stackFlipTo, Waste1, Stock, 1);
-		}
-	} else {
-		gameDo(stackFlipTo, Stock, Waste1, stacks[Waste1].len);
-	}
-}
-
-static bool gameFind(uint *stack, uint *index, Card card) {
-	for (*stack = 0; *stack < StacksLen; ++*stack) {
-		for (*index = 0; *index < stacks[*stack].len; ++*index) {
-			if (stacks[*stack].cards[*index] == card) return true;
-		}
-	}
-	return false;
-}
-
-static bool gameAvail(Card card) {
-	uint stack, index;
-	if (card < 0) return false;
-	if (!gameFind(&stack, &index, card)) return false;
-
-	bool top = (card == stackTop(&stacks[stack]));
-	if (stack == Waste1) {
-		return top && !stacks[Waste3].len;
-	} else if (stack == Waste3) {
-		return top;
-	} else if (stack >= Foundation1 && stack <= Foundation4) {
-		return top;
-	} else if (stack >= Tableau1 && stack <= Tableau7) {
-		return true;
-	} else {
-		return false;
-	}
-}
-
-static bool gameReveal(Card card) {
-	uint stack, index;
-	if (!gameFind(&stack, &index, card)) return false;
-	if (stack < Tableau1 || stack > Tableau7) return false;
-	if (card != stackTop(&stacks[stack])) return false;
-	if (card > 0) return false;
-	gameDo(stackFlipTo, stack, stack, 1);
-	return true;
-}
-
-static bool gameMove(uint dest, Card card) {
-	uint source, index;
-	if (!gameFind(&source, &index, card)) return false;
-	if (source == dest) return false;
-
-	uint count = stacks[source].len - index;
-	Card destTop = stackTop(&stacks[dest]);
-
-	if (dest >= Foundation1 && dest <= Foundation4) {
-		if (count > 1) return false;
-		if (!destTop && cardRank(card) != Cards_A) return false;
-		if (destTop && cardSuit(card) != cardSuit(destTop)) return false;
-		if (destTop && cardRank(card) != cardRank(destTop) + 1) return false;
-		gameDo(stackMoveTo, dest, source, 1);
-		return true;
-	}
-
-	if (dest >= Tableau1 && dest <= Tableau7) {
-		if (!destTop && cardRank(card) != Cards_K) return false;
-		if (destTop && cardColor(card) == cardColor(destTop)) return false;
-		if (destTop && cardRank(card) != cardRank(destTop) - 1) return false;
-		gameDo(stackMoveTo, dest, source, count);
-		return true;
-	}
-
-	return false;
-}
-
-enum {
-	CardWidth = Cards_CardWidth,
-	CardHeight = Cards_CardHeight,
-
-	StackMarginX = 11,
-	StackMarginY = 6,
-
-	StockX = StackMarginX,
-	StockY = StackMarginY,
-
-	WasteX = StockX + CardWidth + StackMarginX,
-	WasteY = StackMarginY,
-
-	FoundationX = WasteX + 2 * (CardWidth + StackMarginX),
-	FoundationY = StackMarginY,
-
-	TableauX = StackMarginX,
-	TableauY = StockY + CardHeight + StackMarginY,
-
-	FanRightDeltaX = 14,
-	FanDownDeltaYBack = 3,
-	FanDownDeltaYFront = 15,
-
-	WindowWidth = 7 * CardWidth + 8 * StackMarginX,
-	WindowHeight = 2 * (StackMarginY + CardHeight)
-		+ 6 * FanDownDeltaYBack
-		+ 12 * FanDownDeltaYFront
-		+ StackMarginY,
-};
-
-static const struct Style FanRight = {
-	1, 0, 0, FanRightDeltaX, SquareDeltaY
-};
-static const struct Style FanDown = {
-	1, 0, FanDownDeltaYBack, 0, FanDownDeltaYFront
-};
-
-static struct SDL_Rect stackRects[StacksLen];
-static struct Layout layout;
-static uint backTexture = Cards_Back1;
-
-static void updateLayout(void) {
-	layoutClear(&layout);
-
-	SDL_Rect stock = { StockX, StockY, CardWidth, CardHeight };
-	stackRects[Stock] = stock;
-	listPush(&layout.main, &stock, Cards_O);
-	layoutStack(&layout, &stock, &stacks[Stock], &Square);
-
-	SDL_Rect waste = { WasteX, WasteY, CardWidth, CardHeight };
-	layoutStack(&layout, &waste, &stacks[Waste1], &Square);
-	layoutStack(&layout, &waste, &stacks[Waste3], &FanRight);
-
-	SDL_Rect found = { FoundationX, FoundationY, CardWidth, CardHeight };
-	for (uint i = Foundation1; i <= Foundation4; ++i) {
-		stackRects[i] = found;
-		listPush(&layout.main, &found, Cards_Empty);
-		SDL_Rect rect = found;
-		layoutStack(&layout, &rect, &stacks[i], &Square);
-		found.x += CardWidth + StackMarginX;
-	}
-
-	SDL_Rect table = { TableauX, TableauY, CardWidth, CardHeight };
-	for (uint i = Tableau1; i <= Tableau7; ++i) {
-		stackRects[i] = table;
-		stackRects[i].h = WindowHeight;
-		SDL_Rect rect = table;
-		layoutStack(&layout, &rect, &stacks[i], &FanDown);
-		table.x += CardWidth + StackMarginX;
-	}
-}
-
-static bool keyDown(SDL_KeyboardEvent key) {
-	switch (key.keysym.sym) {
-		case SDLK_F2: gameDeal(); return true;
-		case SDLK_BACKSPACE: return gameUndo();
-		case SDLK_b: {
-			backTexture -= Cards_Back1;
-			backTexture += 1;
-			backTexture %= 12;
-			backTexture += Cards_Back1;
-			return true;
-		}
-		case SDLK_d: {
-			game.draw = (game.draw == 1 ? 3 : 1);
-			gameDeal();
-			return true;
-		}
-		default: return false;
-	}
-}
-
-static bool mouseButtonDown(SDL_MouseButtonEvent button) {
-	struct SDL_Point point = { button.x, button.y };
-	if (SDL_PointInRect(&point, &stackRects[Stock])) {
-		gameDraw();
-		return true;
-	}
-	struct Item *item = listFind(&layout.main, &point);
-	if (!item) return false;
-	if (!gameAvail(item->card)) return gameReveal(item->card);
-	if (button.clicks % 2 == 0) {
-		for (uint dest = Foundation1; dest <= Foundation4; ++dest) {
-			if (gameMove(dest, item->card)) return true;
-		}
-		return false;
-	}
-	layout.dragItem = *item;
-	return true;
-}
-
-static bool mouseButtonUp(SDL_MouseButtonEvent button) {
-	(void)button;
-	if (!layout.dragItem.card) return false;
-	for (uint dest = 0; dest < StacksLen; ++dest) {
-		if (SDL_HasIntersection(&layout.dragItem.rect, &stackRects[dest])) {
-			if (gameMove(dest, layout.dragItem.card)) break;
-		}
-	}
-	layout.dragItem.card = 0;
-	return true;
-}
-
-static bool mouseMotion(SDL_MouseMotionEvent motion) {
-	if (!motion.state) return false;
-	layout.dragItem.rect.x += motion.xrel;
-	layout.dragItem.rect.y += motion.yrel;
-	return true;
-}
-
-static SDL_Renderer *render;
-static SDL_Texture *textures[Cards_CardCount];
-
-static void renderList(const struct List *list) {
-	for (uint i = 0; i < list->len; ++i) {
-		int tex = list->items[i].card;
-		if (tex < 0) tex = backTexture;
-		SDL_RenderCopy(render, textures[tex], NULL, &list->items[i].rect);
-	}
-}
-
-static void err(const char *title) {
-	int error = SDL_ShowSimpleMessageBox(
-		SDL_MESSAGEBOX_ERROR, title, SDL_GetError(), NULL
-	);
-	if (error) fprintf(stderr, "%s\n", SDL_GetError());
-	exit(EXIT_FAILURE);
-}
-
-int main(void) {
-	if (SDL_Init(SDL_INIT_VIDEO) < 0) err("SDL_Init");
-	atexit(SDL_Quit);
-
-	struct Paths paths;
-	if (assetPaths(&paths) < 0) err("SDL_GetPrefPath");
-
-	SDL_RWops *rw = assetOpenCards(&paths);
-	if (!rw) return EXIT_FAILURE;
-
-	SDL_Surface *surfaces[Cards_CardCount];
-	int error = Cards_LoadCards(
-		surfaces, Cards_CardCount,
-		rw, Cards_ColorKey | Cards_AlphaCorners | Cards_BlackBorders
-	);
-	if (error) err("Cards_LoadCards");
-	SDL_RWclose(rw);
-
-	SDL_Window *window;
-	error = SDL_CreateWindowAndRenderer(
-		WindowWidth, WindowHeight, SDL_WINDOW_ALLOW_HIGHDPI,
-		&window, &render
-	);
-	if (error) err("SDL_CreateWindowAndRenderer");
-	SDL_SetWindowTitle(window, "Solitaire");
-
-	SDL_RenderSetIntegerScale(render, SDL_TRUE);
-	SDL_RenderSetLogicalSize(render, WindowWidth, WindowHeight);
-
-	for (uint i = 0; i < Cards_CardCount; ++i) {
-		textures[i] = NULL;
-		if (!surfaces[i]) continue;
-		textures[i] = SDL_CreateTextureFromSurface(render, surfaces[i]);
-		if (!textures[i]) err("SDL_CreateTextureFromSurface");
-		SDL_FreeSurface(surfaces[i]);
-	}
-
-	srand(time(NULL));
-	backTexture = Cards_Back1 + randUniform(12);
-	gameDeal();
-
-	for (;;) {
-		updateLayout();
-
-		SDL_SetRenderDrawColor(render, 0x00, 0xAA, 0x55, 0xFF);
-		SDL_RenderClear(render);
-		renderList(&layout.main);
-		renderList(&layout.drag);
-		SDL_RenderPresent(render);
-
-		SDL_Event event;
-		for (;;) {
-			SDL_WaitEvent(&event);
-			if (event.type == SDL_QUIT) {
-				goto quit;
-			} else if (event.type == SDL_KEYDOWN) {
-				if (keyDown(event.key)) break;
-			} else if (event.type == SDL_MOUSEBUTTONDOWN) {
-				if (mouseButtonDown(event.button)) break;
-			} else if (event.type == SDL_MOUSEBUTTONUP) {
-				if (mouseButtonUp(event.button)) break;
-			} else if (event.type == SDL_MOUSEMOTION) {
-				if (mouseMotion(event.motion)) break;
-			}
-		}
-	}
-
-quit:
-	SDL_Quit();
-}