Export clues to Text file completed
[wordblah.git] / wordblox.h
index 50033bc..bd286e3 100644 (file)
@@ -1,6 +1,9 @@
 #ifndef __WORDBLOX_H
 #define __WORDBLOX_H
 
+#include <gd.h>
+#include <gdfontmb.h>
+#include <gdfontg.h>
 #include "constantstrings.h"
 
 #define MAX_PUZZLE_SIZE 20
@@ -18,6 +21,16 @@ enum COLOR {
        WHITE=7
 };
 
+enum ATTR {
+       NORMAL = 23,
+       BOLD=1
+};
+
+enum ORIENTATION {
+       ACROSS=1,
+       DOWN=2
+};
+
 typedef char String[MAX_CLUE_LENGTH];
 
 /* The main puzzle struct type */
@@ -31,9 +44,119 @@ typedef struct {
        bool grid_frozen;
 } Puzzle;
 
+/* get a number from the user */
+int get_num ()
+{
+       char s[5];
+       fgets (s, 5, stdin);
+       int n = atoi (s);
+       return n;
+}
+
+/* Output the clues to text file */
+void export_clues (Puzzle *p, const char *filename)
+{
+       FILE *outfile = fopen (filename, "w");
+       if (outfile == NULL)
+       {
+               fprintf (stderr, "%s\n", ERROR_WRITING_FILE);
+               exit (1);
+       }
+       /* first the across clues */
+       fprintf (outfile, "ACROSS CLUES\n");
+       for (int i = 0; i < p->grid_size; i ++)
+       {
+               for (int j = 0; j < p->grid_size; j ++)
+               {
+                       if (p->start_across_word[i][j] != -1)
+                               fprintf (outfile, "%d - %s\n", p->start_across_word[i][j],
+                                                       p->clue_across[i][j]);
+               }
+       }
+       /* now the down clues */
+       fprintf (outfile, "DOWN CLUES\n");
+       for (int i = 0; i < p->grid_size; i ++)
+       {
+               for (int j = 0; j < p->grid_size; j ++)
+               {
+                       if (p->start_down_word[i][j] != -1)
+                               fprintf (outfile, "%d - %s\n", p->start_down_word[i][j],
+                                                       p->clue_down[i][j]);
+               }
+       }
+       fclose (outfile);
+}
+
+/* Output the grid to image - if answerkey is true export filled grid */
+void export_grid_image  (Puzzle *p, const char *filename, bool answerkey) 
+{
+       int img_size = p->grid_size * 40;
+       FILE * outfile = fopen (filename, "wb");
+       if (outfile == NULL)
+       {
+               fprintf (stderr, "%s\n", ERROR_WRITING_FILE);
+               exit (1);
+       }
+       
+       gdImagePtr img = gdImageCreate (img_size, img_size);
+       int white = gdImageColorAllocate (img, 255,255,255);
+       int black = gdImageColorAllocate (img, 0, 0, 0);
+       int blue = gdImageColorAllocate (img, 0, 0, 216);
+       gdFontPtr sm_fnt = gdFontGetMediumBold ();
+       gdFontPtr lg_fnt = gdFontGetGiant ();
+       
+       for (int i = 0; i < p->grid_size; i ++)
+       {
+               for (int j = 0; j < p->grid_size; j++)
+               {
+                       /* if it is a block, draw the black square */
+                       if (p->chars[i][j] == '#')
+                               gdImageFilledRectangle (img, j*40, i*40, j*40+40, 
+                                                                                       i*40+40,black);
+                       else
+                       {
+                               /* draw a regular square */
+                               gdImageRectangle (img, j*40, i*40, j*40+40, 
+                                                                       i*40+40, black);
+                               
+                               /* print the numers, if it is either start across word or 
+                               a down word */
+                               if (p->start_across_word[i][j] != -1 || 
+                                               p->start_down_word[i][j] != -1)
+                               {
+                                       if (p->start_across_word[i][j] != -1)
+                                       {
+                                               char str[5];
+                                               sprintf (str, "%d", p->start_across_word[i][j]);
+                                               gdImageString (img,  sm_fnt, j*40+2, i*40+2,
+                                                                       (unsigned char *)str, blue);   
+                                       }
+                                       else 
+                                       {
+                                               char str[5];
+                                               sprintf (str, "%d", p->start_down_word[i][j]);
+                                               gdImageString (img,  sm_fnt, j*40+2, i*40+2,
+                                                                       (unsigned char *)str, blue);                                    
+                                       }
+                               }
+                               /* if answerkey is true, draw the character in the cell */
+                               if (answerkey)
+                               {
+                                       gdImageChar (img, lg_fnt, j*40+15, i*40+15, 
+                                               p->chars[i][j], black);
+                               }
+                       }
+               }
+       }
+       
+       gdImagePng (img, outfile);
+       gdImageDestroy (img);
+       fclose (outfile);
+}
+
 /* Set the terminal colour */
-void set_color (enum COLOR fg, enum COLOR bg) {
-       printf ("\x1B[%d;%dm", fg+30, bg+40);
+void set_color (enum COLOR fg, enum COLOR bg, enum ATTR at) {
+       printf ("\x1B[%d;%d;%dm", fg+30, bg+40, at);
 }
 
 /* Reset the terminal colour */
@@ -41,6 +164,95 @@ void reset_color () {
        printf ("\x1B[0m");
 }
 
+/* check if previous row is blank or not */
+bool prev_row_blank (Puzzle *p, int r, int c) 
+{
+       if (r == 0) return true;
+       if (p->chars[r-1][c] == ' ' || p->chars[r-1][c] == '#') return true;
+       return false;
+}
+/* check if next row is blank or not */
+bool next_row_blank (Puzzle *p, int r, int c)
+{
+       if (r == p->grid_size - 1) return true;
+       if (p->chars[r+1][c] == ' ' || p->chars[r+1][c] == '#') return true;
+       return false;
+}
+/* check if previous col is blank or not */
+bool prev_col_blank (Puzzle *p, int r, int c)
+{
+       if (c == 0) return true;
+       if (p->chars[r][c-1] == ' ' || p->chars[r][c-1] == '#') return true;
+       return false; 
+}
+/* check if the next col is blank or not */
+bool next_col_blank (Puzzle *p, int r, int c)
+{
+       if (c == p->grid_size -1) return true;
+       if (p->chars[r][c+1] == ' ' || p->chars[r][c+1] == '#') return true;
+       return false;
+}
+
+/* unfreeze the grid - mak editing possible to change words */
+void unfreeze_puzzle (Puzzle *p)
+{
+       for (int i = 0; i < p->grid_size; i ++)
+       {
+               for (int j = 0; j < p->grid_size; j ++)
+               {
+                       if (p->chars[i][j] == '#')
+                               p->chars[i][j] = ' ';
+                       
+                       p->start_across_word[i][j] = -1;
+                       p->start_down_word[i][j] = -1;
+               }
+       }
+       p->grid_frozen = false;
+}
+
+/* freeze the grid - make editing impossible because it finalizes the
+   across and down words in the grid */
+void freeze_puzzle (Puzzle *p)
+{
+       int word_num = 1;
+       bool across_word_start, down_word_start;
+       for (int i = 0; i < p->grid_size; i ++)
+       {
+               for (int j = 0; j < p->grid_size; j++)
+               {
+                       across_word_start = false; 
+                       down_word_start = false;
+                       /* if it is a blank cell - cover it with a block */
+                       if (p->chars[i][j] == ' ')
+                               p->chars[i][j] = '#';
+                       /* it is not a blank cell - check all possibilities */
+                       else 
+                       {
+                               bool prev_row = prev_row_blank (p, i, j);
+                               bool next_row = next_row_blank (p, i, j);
+                               bool prev_col = prev_col_blank (p, i, j);
+                               bool next_col = next_col_blank (p, i, j);
+                               if (prev_row && ! next_row)
+                                       down_word_start = true;
+                               if (prev_col && ! next_col)
+                                       across_word_start = true;
+                       }
+                       
+                       if (across_word_start == true)
+                               p->start_across_word[i][j] = word_num;
+                       else 
+                               p->start_across_word[i][j] = -1;
+                       if (down_word_start == true)
+                               p->start_down_word[i][j] = word_num;
+                       else
+                               p->start_down_word[i][j] = -1;
+                       if (across_word_start == true || down_word_start == true)
+                               word_num ++;
+               }
+       }
+       p->grid_frozen = true;
+}
+
 /* reset the entire grid */
 void init_puzzle (Puzzle *p, int grid_size) 
 {
@@ -90,7 +302,8 @@ Puzzle load_puzzle (const char* file) {
 /* display the puzzle */ 
 void print_puzzle (Puzzle *p) 
 {
-       set_color (WHITE, CYAN);
+       printf ("\n");
+       set_color (WHITE, CYAN, NORMAL);
        printf ("    ");
        for (int i = 0; i < p->grid_size; i ++)
                printf ("%3d", i);
@@ -98,44 +311,108 @@ void print_puzzle (Puzzle *p)
        printf("\n");
        for (int i = 0; i < p->grid_size; i ++)
        {
-               set_color (WHITE, CYAN);
+               set_color (WHITE, CYAN, NORMAL);
                printf ("%3d ", i);
                for (int j = 0; j < p->grid_size; j ++) 
                {
                        if (p->chars[i][j] == '#') {
-                               set_color (WHITE, BLACK);
+                               set_color (WHITE, BLACK, NORMAL);
                                printf ("   ");
                        }
                        else 
                        {
-                               if (p->start_across_word[i][j] != -1) 
+                               if (p->start_across_word[i][j] != -1 || 
+                                       p->start_down_word[i][j] != -1) 
                                {
-                                       set_color (BLUE, WHITE);
-                                       printf ("%2d", p->start_across_word[i][j]);     
+                                       set_color (BLUE, WHITE, NORMAL);
+                                       if (p->start_across_word[i][j] != -1)
+                                               printf ("%-2d", p->start_across_word[i][j]);
+                                       else 
+                                               printf ("%-2d", p->start_down_word[i][j]);
                                }
                                else
                                {
-                                       set_color (BLACK, WHITE);
+                                       set_color (BLACK, WHITE,NORMAL);
                                        printf ("  ");
                                }
                                        
-                               set_color (BLACK, WHITE);
+                               set_color (BLACK, WHITE, BOLD);
                                printf ("%c", p->chars[i][j]);
                        }
                        reset_color ();
                }
                printf ("\n");
        }
+       /* print the clues if set */
+       if (p->grid_frozen == true) 
+       {
+               printf ("\x1B[1mACROSS - CLUES\x1B[0m\n");
+               for (int i = 0; i < p->grid_size; i ++)
+               {
+                       for (int j = 0; j < p->grid_size; j ++)
+                       {
+                               if (p->start_across_word[i][j] != -1)
+                               {
+                                       printf ("%d - %s; ", p->start_across_word[i][j], 
+                                                               p->clue_across[i][j]);
+                               }
+                       }
+               }
+               printf ("\n\x1B[1mDOWN - CLUES\x1B[0m\n");
+               for (int i = 0; i < p->grid_size; i ++)
+               {
+                       for (int j = 0; j < p->grid_size; j ++)
+                       {
+                               if (p->start_down_word[i][j] != -1)
+                               {
+                                       printf ("%d - %s; ", p->start_down_word[i][j], 
+                                                               p->clue_down[i][j]);
+                               }
+                       }
+               }
+               printf ("\n");  
+       }
 }
 
 /* function to check if a word is valid or not */
-bool is_valid_word (const char *word) 
+char* is_valid_word (char *word) 
 {
-       for (int i = 0; i < strlen (word); i ++)
+       if (word == NULL || strlen(word) == 0)
+               return NULL;
+       for (int i = 0; i < strlen (word) - 1; i ++)
                if (! isalpha (word[i])) 
-                       return false;
+                       return NULL;
                        
-       return true;
+       return strtok (word, "\n");
+}
+
+
+/* function to set a clue for an across word */
+bool set_clue (Puzzle *p, String clue, int index, enum ORIENTATION order) 
+{
+       for (int i = 0; i < p->grid_size; i ++)
+       {
+               for (int j = 0; j < p->grid_size; j ++)
+               {
+                       if (order == ACROSS)
+                       {
+                               if (p->start_across_word[i][j] == index)
+                               {
+                                       strcpy (p->clue_across[i][j], clue);
+                                       return true;
+                               }
+                       }
+                       else if (order == DOWN)
+                       {
+                               if (p->start_down_word[i][j] == index)
+                               {
+                                       strcpy (p->clue_down[i][j], clue);
+                                       return true;
+                               }
+                       }               
+               }
+       }
+       return false;
 }
 
 /* function to print a menu */
@@ -144,16 +421,20 @@ void print_menu (enum COLOR fg, enum COLOR bg, const char* title,
 {
                /* clear screen */
                printf ("\e[1;1H\e[2J");
-               set_color (fg, bg);
+               set_color (fg, bg, NORMAL);
                printf ("\u2554");
                for (int i = 0; i < padding; i ++)
                        printf ("\u2550");
                printf ("\u2557"); 
                reset_color (); printf ("\n");
-               set_color (fg, bg);
-               printf ("\u2551%-*s\u2551", padding, title);
+               printf ("\u2551");
+               set_color (fg, bg, BOLD);
+               printf ("%-*s", padding, title);
+               reset_color ();
+               set_color (fg, bg, NORMAL);
+               printf ("\u2551");
                reset_color (); printf ("\n");
-               set_color (fg, bg);
+               set_color (fg, bg, NORMAL);
                printf ("\u2560");
                for (int i = 0; i < padding; i ++)
                        printf ("\u2550");
@@ -161,11 +442,11 @@ void print_menu (enum COLOR fg, enum COLOR bg, const char* title,
                reset_color (); printf ("\n");
                for (int i = 0; i < num_items; i ++) 
                {
-                       set_color (fg, bg);
+                       set_color (fg, bg, NORMAL);
                        printf ("\u2551%-*s\u2551", padding, items[i]);
                        reset_color (); printf ("\n");
                }
-               set_color (fg, bg);
+               set_color (fg, bg, NORMAL);
                printf ("\u255A");
                for (int i = 0; i < padding; i ++)
                        printf ("\u2550");