cc65/test/ref/hanoi.c

/*
  !!DESCRIPTION!! solves the "towers of hanoi" problem
  !!ORIGIN!!      BYTE UNIX Benchmarks
  !!LICENCE!!     Public Domain
*/

/*******************************************************************************
 *  The BYTE UNIX Benchmarks - Release 3
 *          Module: hanoi.c   SID: 3.3 5/15/91 19:30:20
 *
 *******************************************************************************
 * Bug reports, patches, comments, suggestions should be sent to:
 *
 *      Ben Smith, Rick Grehan or Tom Yager
 *      ben@bytepb.byte.com   rick_g@bytepb.byte.com   tyager@bytepb.byte.com
 *
 *******************************************************************************
 *  Modification Log:
 *  $Header: hanoi.c,v 3.5 87/08/06 08:11:14 kenj Exp $
 *  August 28, 1990 - Modified timing routines (ty)
 *
 ******************************************************************************/

#define VERBOSE
/*#define USECMDLINE*/

#include <stdio.h>
#include <stdlib.h>

unsigned short iter = 0; /* number of iterations */
char num[4];
long cnt;

int disk=5,       /* default number of disks */
    duration=10;  /* default time to run test */

void mov(unsigned char n,unsigned char f,unsigned char t)
{
char o;

        if(n == 1)
        {
                num[f]--;
                num[t]++;
        }
        else
        {
                o = (6-(f+t));
                mov(n-1,f,o);
                mov(1,f,t);
                mov(n-1,o,t);
        }

        #ifdef VERBOSE
        printf("%2d: %2d %2d %2d %2d\n",
                (int)iter,(int)num[0],(int)num[1],(int)num[2],(int)num[3]);
        #endif
}

int main(int argc,char **argv)
{
        #ifdef USECMDLINE
        if (argc < 2) {
                printf("Usage: %s [duration] [disks]\n", argv[0]);
                exit(EXIT_FAILURE);
        }
        else
        {
                if(argc > 1) duration = atoi(argv[1]);
                if(argc > 2) disk = atoi(argv[2]);
        }
        #endif

        printf("towers of hanoi\ndisks: %d\n\n",disk);

        num[1] = disk;

        #ifdef VERBOSE
        printf("%2d: %2d %2d %2d %2d\n",
                (int)iter,(int)num[0],(int)num[1],(int)num[2],(int)num[3]);
        #endif

        while(num[3]<disk)
        {
                mov(disk,1,3);
                ++iter;
        }

        return 0;
}