]> git.cworth.org Git - mnemon/blobdiff - mnemon.c
Add support for sequential introduction of a category
[mnemon] / mnemon.c
index 72c5174cd7e1ba067b3dcabb79cd5397f35c5ab8..321ab1433a9dd235e738354ba36ecc5f2e029acf 100644 (file)
--- a/mnemon.c
+++ b/mnemon.c
@@ -22,6 +22,7 @@
 #include <stdlib.h>
 #include <stdarg.h>
 #include <stdint.h>
+#include <math.h>
 
 #include <sys/types.h>
 #include <dirent.h>
@@ -47,11 +48,20 @@ typedef struct _bin {
     item_t **items;
 } bin_t;
 
+typedef enum {
+    CATEGORY_ORDER_RANDOM,
+    CATEGORY_ORDER_SEQUENTIAL
+} category_order_t;
+
 typedef struct _category {
     char *name;
     int items_size;
     int num_items;
     item_t *items;
+
+    /* Support sequential introduction of items from bin 0 */
+    category_order_t order;
+    int bin_zero_head;
 } category_t;
 
 typedef struct _mnemon {
@@ -64,6 +74,11 @@ typedef struct _mnemon {
     int bins_size;
     int num_bins;
     bin_t *bins;
+
+    int to_introduce;
+    int to_master;
+    int unlearned;
+    int mastered;
 } mnemon_t;
 
 static void *
@@ -157,6 +172,8 @@ category_init (category_t *category,
     category->items_size = 0;
     category->num_items = 0;
     category->items = NULL;
+    category->order = CATEGORY_ORDER_RANDOM;
+    category->bin_zero_head = 0;
 }
 
 static void
@@ -202,6 +219,18 @@ category_add_item (category_t      *category,
     return item;
 }
 
+static item_t *
+category_next_bin_zero_item (category_t        *category)
+{
+    int *i = &category->bin_zero_head;
+
+    for ( ; *i < category->num_items; *i = *i + 1)
+       if (category->items[*i].score == 0)
+           return &category->items[*i];
+
+    return NULL;
+}
+
 static void
 category_print (category_t     *category,
                FILE            *file)
@@ -209,6 +238,9 @@ category_print (category_t  *category,
     int i;
     item_t *item;
 
+    fprintf (file, "order = %s\n\n",
+           category->order == CATEGORY_ORDER_RANDOM ? "random" : "sequential");
+
     for (i = 0; i < category->num_items; i++) {
        item = &category->items[i];
        if (i != 0)
@@ -273,6 +305,24 @@ bin_remove_item (bin_t     *bin,
        bin->items[item_index] = bin->items[bin->num_items];
 }
 
+/* Find the index for an item within a bin.
+ *
+ * XXX: This is currently a linear search, so is a potential
+ * performance problem.
+ */
+static int
+bin_item_index (bin_t  *bin,
+               item_t  *item)
+{
+    int i;
+
+    for (i = 0; i < bin->num_items; i++)
+       if (bin->items[i] == item)
+           return i;
+
+    assert (0);
+}
+
 static void
 mnemon_init (mnemon_t *mnemon)
 {
@@ -291,6 +341,11 @@ mnemon_init (mnemon_t *mnemon)
     mnemon->bins_size = 0;
     mnemon->num_bins = 0;
     mnemon->bins = NULL;
+
+    mnemon->to_introduce = 3;
+    mnemon->to_master = 0;
+    mnemon->unlearned = 0;
+    mnemon->mastered = -1;
 }
 
 static void
@@ -403,6 +458,26 @@ chomp (char *s)
        s[len - 1] = '\0';
 }
 
+static char *
+trim_space (char *string)
+{
+    char *s;
+
+    s = string;
+    while (*s && isspace (*s))
+       s++;
+
+    string = s;
+
+    s = string + strlen (string) - 1;
+    while (s > string && isspace (*s)) {
+       *s = '\0';
+       s--;
+    }
+
+    return string;
+}
+
 static void
 mnemon_load_category (mnemon_t         *mnemon,
                      const char        *name)
@@ -428,19 +503,71 @@ mnemon_load_category (mnemon_t            *mnemon,
 
     category = mnemon_get_category (mnemon, name);
 
+#define READ_LINE do {                                 \
+    bytes_read = getline (&line, &line_size, file);    \
+    if (bytes_read == -1)                              \
+       goto END_OF_FILE;                               \
+    line_count++;                                      \
+    chomp (line);                                      \
+} while (0)
+
+    /* Parse options */
+    while (1) {
+       char *name, *equal, *value;
+
+       /* Ignore blank lines */
+       READ_LINE;
+       if (*line == '\0')
+           continue;
+
+       /* An initial digit means we hit an item. Trigger the
+        * spaghetti machine. */
+       if (*line >= '0' && *line <= '9')
+           goto PARSE_BIN;
+
+       equal = strchr (line, '=');
+       if (equal == NULL) {
+           fprintf (stderr, "Malformed option, (expected name=value): \"%s\" at %s:%d\n",
+                    line, path, line_count);
+           exit (1);
+       }
+
+       value = equal + 1;
+       name = line;
+       *equal = '\0';
+
+       name = trim_space (name);
+       value = trim_space (value);
+
+       if (strcmp (name, "order") == 0) {
+           if (strcmp (value, "sequential") == 0) {
+               category->order = CATEGORY_ORDER_SEQUENTIAL;
+           } else if (strcmp (value, "random") == 0) {
+               category->order = CATEGORY_ORDER_RANDOM;
+           } else {
+               fprintf (stderr, "Unknown value for \"order\" option \"%s\" at %s:%d\n",
+                        value, path, line_count);
+               exit (1);
+           }
+       } else {
+           fprintf (stderr, "Unknown option %s at %s:%d\n",
+                    name, path, line_count);
+           exit (1);
+       }
+    }
+
+    /* Parse items */
     while (1) {
        int score;
        char *challenge, *response;
 
-       /* Read bin number (ignoring blank separator lines) */
-       do {
-           bytes_read = getline (&line, &line_size, file);
-           if (bytes_read == -1)
-               goto END_OF_FILE;
-           line_count++;
-           chomp (line);
-       } while (*line == '\0');
+       /* Ignore blank lines */
+       READ_LINE;
+       if (*line == '\0')
+           continue;
 
+       /* Read bin number */
+      PARSE_BIN:
        score = strtol (line, &end, 10);
        if (*end != '\0') {
            fprintf (stderr, "Failed to parse bin number from \"%s\" at %s:%d\n",
@@ -449,19 +576,11 @@ mnemon_load_category (mnemon_t            *mnemon,
        }
 
        /* Read challenge */
-       bytes_read = getline (&line, &line_size, file);
-       if (bytes_read == -1)
-           break;
-       line_count++;
-       chomp (line);
+       READ_LINE;
        challenge = strdup (line);
 
        /* Read response */
-       bytes_read = getline (&line, &line_size, file);
-       if (bytes_read == -1)
-           break;
-       line_count++;
-       chomp (line);
+       READ_LINE;
        response = line;
 
        category_add_item (category, score, challenge, response);
@@ -609,159 +728,293 @@ rand_within_exponential (int num_values)
     return ones;
 }
 
+/* Find the category to which an item belongs. */
+static category_t *
+mnemon_item_category (mnemon_t *mnemon,
+                     item_t    *item)
+{
+    category_t *category;
+    int i, item_index;
+
+    for (i = 0; i < mnemon->num_categories; i++) {
+       category = &mnemon->categories[i];
+       item_index = item - category->items;
+       if (item_index >= 0 && item_index < category->num_items)
+           return category;
+    }
+
+    assert (0);
+}
+
 static void
 mnemon_select_item (mnemon_t    *mnemon,
                    bin_t       **bin_ret,
                    int          *item_index_ret)
 {
-    int bin_index;
+    int bin_index, item_index;
     bin_t *bin;
 
     bin_index = rand_within_exponential (mnemon->num_bins);
 
     bin = &mnemon->bins[bin_index];
 
+    item_index = rand_within (bin->num_items);
+
+    if (bin->score == 0) {
+       category_t *category;
+       item_t *item;
+
+       item = bin->items[item_index];
+
+       category = mnemon_item_category (mnemon, item);
+
+       if (category->order == CATEGORY_ORDER_SEQUENTIAL) {
+           item = category_next_bin_zero_item (category);
+           if (item)
+               item_index = bin_item_index (bin, item);
+       }
+    }
+
     *bin_ret = bin;
-    *item_index_ret = rand_within (bin->num_items);
+    *item_index_ret = item_index;
+}
+
+
+#define HISTOGRAM_ROW_FORMAT "%3d: %3d"
+#define HISTOGRAM_BAR_WIDTH  63
+
+static void
+print_histogram_bar (double    size,
+                    double     max)
+{
+    int units_per_cell = (int) ceil (max / HISTOGRAM_BAR_WIDTH);
+    static char const *boxes[8] = {
+       "█", "▉", "▊", "▋",
+       "▌", "▍", "▎", "▏"
+    };
+
+    while (size > units_per_cell) {
+       printf(boxes[0]);
+       size -= units_per_cell;
+    }
+
+    size /= units_per_cell;
+
+    if (size > 7.5/8.0)
+       printf(boxes[0]);
+    else if (size > 6.5/8.0)
+       printf(boxes[1]);
+    else if (size > 5.5/8.0)
+       printf(boxes[2]);
+    else if (size > 4.5/8.0)
+       printf(boxes[3]);
+    else if (size > 3.5/8.0)
+       printf(boxes[4]);
+    else if (size > 2.5/8.0)
+       printf(boxes[5]);
+    else if (size > 1.5/8.0)
+       printf(boxes[6]);
+    else if (size > 0.5/8.0)
+       printf(boxes[7]);
+
+    printf ("\n");
 }
 
 static void
-mnemon_do_challenges (mnemon_t *mnemon,
-                     int       to_introduce,
-                     int       to_master)
+mnemon_print_histogram (mnemon_t *mnemon)
+{
+    int i, last_score, max;
+    bin_t *bin;
+
+    if (mnemon->num_bins == 0)
+       return;
+
+    max = mnemon->bins[0].num_items;
+    for (i = 1; i < mnemon->num_bins; i++)
+       if (mnemon->bins[i].num_items > max)
+           max = mnemon->bins[i].num_items;
+
+    for (i = 0; i < mnemon->num_bins; i++) {
+       bin = &mnemon->bins[i];
+       if (i != 0)
+           while (bin->score - last_score > 1)
+               printf (HISTOGRAM_ROW_FORMAT "\n", ++last_score, 0);
+       printf (HISTOGRAM_ROW_FORMAT " ", bin->score, bin->num_items);
+       print_histogram_bar (bin->num_items, max);
+       last_score = bin->score;
+    }
+}
+
+static void
+mnemon_handle_command (mnemon_t                *mnemon,
+                      const char       *command)
+{
+    switch (command[0]) {
+       case 'h':
+           mnemon_print_histogram (mnemon);
+           break;
+        default:
+           printf ("Unknown command: %s\n", command);
+           break;
+    }
+}
+
+static void
+mnemon_handle_response (mnemon_t       *mnemon,
+                       bin_t           *bin,
+                       int              item_index,
+                       item_t          *item,
+                       const char      *response)
+{
+    bool_t correct;
+
+    correct = (strcmp (response, item->response) == 0);
+
+    bin_remove_item (bin, item_index);
+
+    /* If the bin is now empty, we must remove it. Also if we just
+     * picked the last word we'll ever pick from the bin with
+     * score 0, then we can remove that as well. */
+    if (bin->num_items == 0 ||
+       (bin->score == 0 && mnemon->to_introduce == 0))
+    {
+       mnemon_remove_bin (mnemon, bin);
+    }
+
+    if (correct) {
+       item->score++;
+       /* We reserve an item score of 0 for an item that has
+        * never been asked. */
+       if (item->score == 0) {
+           item->score = 1;
+           mnemon->unlearned--;
+           printf ("You got it!");
+           if (mnemon->to_introduce == 0 &&
+               mnemon->unlearned == 0 &&
+               mnemon->to_master == 0)
+           {
+               mnemon->to_master = 10;
+               mnemon->mastered = 0;
+           }
+       } else if (item->score < 0) {
+           printf ("Yes---just give me %d more.",
+                   - item->score);
+       } else if (item->score == 1) {
+           printf ("On your first try, no less!");
+       } else {
+           printf ("Masterful (%dx).", item->score);
+           if (mnemon->to_master)
+               mnemon->mastered++;
+       }
+    } else {
+       printf ("  %s is the correct answer.",
+               item->response);
+       /* Penalize an incorrect response by forcing the score
+        * negative. */
+       if (item->score >= 0) {
+           if (item->score > 0)
+               printf ( " Oops, you knew that, right?\n ");
+           mnemon->unlearned++;
+           /* We go to -2 to force a little extra reinforcement
+            * when re-learning an item, (otherwise, it will often
+            * get asked again immediately where it is easy to get
+            * a correct response without any learning). */
+           item->score = -2;
+       } else {
+           item->score--;
+       }
+    }
+
+    printf (" ");
+    if (mnemon->to_introduce)
+       printf ("%d to come. ", mnemon->to_introduce);
+    if (mnemon->unlearned)
+       printf ("%d still unlearned. ", mnemon->unlearned);
+    if (mnemon->to_master) {
+       if (mnemon->mastered < mnemon->to_master)
+           printf ("%d items to master",
+                   mnemon->to_master - mnemon->mastered);
+       else
+           printf ("Great job!");
+    }
+    printf ("\n\n");
+
+    bin = mnemon_get_bin (mnemon, item->score);
+
+    bin_add_item (bin, item);
+}
+
+static void
+mnemon_do_challenges (mnemon_t *mnemon)
 {
     bin_t *bin;
     int item_index;
     item_t *item;
     char *response;
-    bool_t correct;
-    int unlearned, mastered = 0;
     int i;
 
     /* Count the number of items with negative scores. */
-    unlearned = 0;
+    mnemon->unlearned = 0;
     for (i = 0; i < mnemon->num_bins; i++) {
        bin = &mnemon->bins[i];
        if (bin->score >= 0)
            break;
-       unlearned += bin->num_items;
+       mnemon->unlearned += bin->num_items;
     }
 
-    to_introduce -= unlearned;
-    if (to_introduce < 0)
-       to_introduce = 0;
+    mnemon->to_introduce -= mnemon->unlearned;
+    if (mnemon->to_introduce < 0)
+       mnemon->to_introduce = 0;
 
     /* Get rid of bin with score of 0 if we aren't going to be
      * introducing anything from it. */
-    if (to_introduce == 0) {
+    if (mnemon->to_introduce == 0) {
        bin = mnemon_get_bin (mnemon, 0);
        mnemon_remove_bin (mnemon, bin);        
     }
 
-    if (unlearned) {
-       printf ("You've got %d items to learn already. ", unlearned);
-       if (to_introduce)
-           printf ("I'll introduce %d more as we go.", to_introduce);
+    if (mnemon->unlearned) {
+       printf ("You've got %d items to learn already. ", mnemon->unlearned);
+       if (mnemon->to_introduce)
+           printf ("I'll introduce %d more as we go.", mnemon->to_introduce);
        printf ("\n");
     } else {
-       printf ("Introducing %d new items.\n", to_introduce);
+       printf ("Introducing %d new items.\n", mnemon->to_introduce);
     }
     printf ("\n");
 
     do {
        mnemon_select_item (mnemon, &bin, &item_index);
-
-       if (bin->score == 0)
-           to_introduce--;
-
        item = bin->items[item_index];
 
-       printf ("%s\n", item->challenge);
-
-       response = readline ("> ");
-       if (response == NULL) {
-           printf ("\n");
-           break;
-       }
-
-       correct = (strcmp (response, item->response) == 0);
+       if (bin->score == 0)
+           mnemon->to_introduce--;
 
-       bin_remove_item (bin, item_index);
+       while (1) {
+           printf ("%s\n", item->challenge);
 
-       /* If the bin is now empty, we must remove it. Also if we just
-        * picked the last word we'll ever pick from the bin with
-        * score 0, then we can remove that as well. */
-       if (bin->num_items == 0 ||
-           (bin->score == 0 && to_introduce == 0))
-       {
-           mnemon_remove_bin (mnemon, bin);
-       }
-
-       if (correct) {
-           item->score++;
-           /* We reserve an item score of 0 for an item that has
-            * never been asked. */
-           if (item->score == 0) {
-               item->score = 1;
-               unlearned--;
-               printf ("You got it!");
-           } else if (item->score < 0) {
-               printf ("Yes---just give me %d more.",
-                       - item->score);
-           } else if (item->score == 1) {
-               printf ("On your first try, no less!");
-           } else {
-               printf ("Masterful (%dx).", item->score);
-           }
-       } else {
-           printf ("  %s is the correct answer.",
-                   item->response);
-           /* Penalize an incorrect response by forcing the score
-            * negative. */
-           if (item->score >= 0) {
-               if (item->score > 0)
-                   printf ( " Oops, you knew that, right?\n ");
-               unlearned++;
-               mastered = 0;
-               /* We go to -2 to force a little extra reinforcement
-                * when re-learning an item, (otherwise, it will often
-                * get asked again immediately where it is easy to get
-                * a correct response without any learning). */
-               item->score = -2;
-           } else {
-               item->score--;
+           response = readline ("> ");
+           /* Terminate on EOF */
+           if (response == NULL) {
+               printf ("\n");
+               return;
            }
-       }
 
-       printf (" (");
-       if (to_introduce)
-           printf ("%d to come.", to_introduce);
-       if (to_introduce && unlearned)
-           printf (" ");
-       if (unlearned)
-           printf ("%d still unlearned.", unlearned);
-       if (to_introduce == 0 && unlearned == 0) {
-           if (mastered < to_master)
-               printf ("%d items to master",
-                       to_master - mastered);
+           if (response[0] == '/')
+               mnemon_handle_command (mnemon, response + 1);
            else
-               printf ("Great job!");
-           mastered++;
+               break;
        }
-       printf (")\n\n");
 
-       bin = mnemon_get_bin (mnemon, item->score);
-
-       bin_add_item (bin, item);
-    } while (mastered <= to_master);
+       mnemon_handle_response (mnemon, bin, item_index,
+                               item, response);
+    } while (mnemon->mastered < mnemon->to_master);
 }
 
 int
 main (int argc, char *argv[])
 {
     mnemon_t mnemon;
-    int to_introduce   = 3;
-    int to_master      = 10;
 
     srand (time (NULL));
 
@@ -769,9 +1022,7 @@ main (int argc, char *argv[])
 
     mnemon_load (&mnemon);
 
-    mnemon_do_challenges (&mnemon,
-                         to_introduce,
-                         to_master);
+    mnemon_do_challenges (&mnemon);
 
     mnemon_save (&mnemon);