/*--------------------------------------------------------------------*/
/* teststack.c                                                        */
/* Author: Bob Dondero                                                */
/* A client of a generic Stack ADT that uses function pointers        */
/*--------------------------------------------------------------------*/

#include <stdio.h>
#include <stdlib.h>
#include <assert.h>
#include "stack.h"

/*--------------------------------------------------------------------*/

static void printString(void *pvItem, void *pvExtra)

/* Print string *pvItem using format pvFormat. */

{
   char *pcItem = (char*)pvItem;
   char *pcFormat = (char*)pvExtra;
   printf(pcFormat, pcItem);
}

/*--------------------------------------------------------------------*/

static void sumDouble(void *pvItem, void *pvExtra)

/* Accumulate double *pvItem into *pvExtra. */

{
   double *pdItem = (double*)pvItem;
   double* pdSum = (double*)pvExtra;
   *pdSum += *pdItem;
}

/*--------------------------------------------------------------------*/

static void freeDouble(void *pvItem, void *pvExtra)

/* Free pvItem. */

{
   free(pvItem);
}

/*--------------------------------------------------------------------*/

int main(void)

/* Test the Stack ADT.  Return 0. */

{
   Stack_T oStack1;
   Stack_T oStack2;
   double *pd;
   double dSum = 0.0;

   /* Create and use a Stack of strings. */

   oStack1 = Stack_new();

   Stack_push(oStack1, "Ruth");
   Stack_push(oStack1, "Gehrig");
   Stack_push(oStack1, "Mantle");
   Stack_push(oStack1, "Jeter");

   Stack_map(oStack1, printString, "%s\n");

   Stack_free(oStack1);

   /* Create and use a Stack of doubles. */

   oStack2 = Stack_new();

   pd = (double*)malloc(sizeof(double));
   assert(pd != NULL);
   *pd = 1.1;
   Stack_push(oStack2, pd);

   pd = (double*)malloc(sizeof(double));
   assert(pd != NULL);
   *pd = 2.2;
   Stack_push(oStack2, pd);

   pd = (double*)malloc(sizeof(double));
   assert(pd != NULL);
   *pd = 3.3;
   Stack_push(oStack2, pd);

   Stack_map(oStack2, sumDouble, &dSum);

   printf("The sum is %g.\n", dSum);

   Stack_map(oStack2, freeDouble, NULL);

   Stack_free(oStack2);

   return 0;
}