cuikplay.c

Go to the documentation of this file.

#include "cuikplay.h"

#include "world.h"
#include "box_list.h"
#include "error.h"

#include "cuikplay_interface.h"
#include "cuikplay_support.h"
#include "cuikplay.h"

#include <gtk/gtk.h>

#include <unistd.h>
#include <time.h>

int main(int argc, char **arg)
{
  
  if (argc>2)
    {
      Tworld world;
      Tparameters parameters;
      Tfilename fsols;
      Tfilename fparam;
      Tfilename fworld;

      Tlist sol_box_list;
      Titerator it;

      Tplot3d pt;

      TCuikPlayControl status;
      double frameDelay,axesLength,t;

      GtkWidget *window1,*slider;
      
      CreateFileName(NULL,arg[1],NULL,PARAM_EXT,&fparam);
      InitParametersFromFile(GetFileFullName(&fparam),&parameters);

      CreateFileName(NULL,arg[1],NULL,WORLD_EXT,&fworld);
      InitWorldFromFile(&parameters,&fworld,&world);

      CreateFileName(NULL,arg[2],NULL,SOL_EXT,&fsols);
      if (!ReadListOfBoxes(GetFileFullName(&fsols),&sol_box_list))
        Error("Solution file can not be opened");

      InitIterator(&it,&sol_box_list);
      First(&it);

      if (argc>3)
        axesLength=atof(arg[3]);
      else
        axesLength=0;

      if (argc>4)
        frameDelay=atof(arg[4]);
      else
        frameDelay=0.1;

      InitPlot3d(NULL,FALSE,argc,arg,&pt);
     
      PlotWorld(&pt,axesLength,&world);

      MoveWorld(&pt,(Tbox *)GetCurrent(&it),&world);
      
      status.maxFrame=ListSize(&sol_box_list);
      if (status.maxFrame==0)
        Error("Empty list of solutions");

      status.end=FALSE;
      status.mode=0;/*PLAY*/
      status.time=(double)time(NULL)+frameDelay;
      status.currentFrame=0;
      status.nextFrame=0;

      gtk_set_locale();
      gtk_init(&argc,&arg);
      
      window1=create_window1((gpointer)(&status),status.maxFrame);
      slider=lookup_widget(window1,"hscale1");
      gtk_widget_show(window1);

      #if (_DEBUG>1)
        fprintf(stderr,"Max frame %u \n",status.maxFrame);
      #endif
      while(!status.end)
        {
          if (status.mode==0)
            {
              if (status.currentFrame<(status.maxFrame-1))
                {
                  t=(double)time(NULL);
                  if (t>status.time)
                    {
                      /* Move the slider to currentFrame+1 and this will trigger and
                         even that actually sets nextFrame to currentFrame+1 and
                         actually displays the frame */
                      double v;
                      
                      v=(double)(status.currentFrame+1);

                      #if (_DEBUG>1)
                        fprintf(stderr,"Moving Slider from %g to %g \n",
                                gtk_range_get_value(GTK_RANGE(slider)),v);
                      #endif

                      gtk_range_set_value(GTK_RANGE(slider),v);
                      status.time=t+frameDelay;
                    }
                }
              else
                status.mode=1; /*PAUSE*/
            }

          if (status.currentFrame!=status.nextFrame)
            {
              if (status.nextFrame<status.maxFrame)
                {
                  #if (_DEBUG>1)
                    fprintf(stderr,"Displaying: %u\n",status.nextFrame);
                  #endif
                  MoveTo(status.nextFrame,&it);
                  MoveWorld(&pt,(Tbox *)GetCurrent(&it),&world);
                  status.currentFrame=status.nextFrame;
                }
              else
                {
                  status.currentFrame=status.nextFrame=status.maxFrame;
                  status.mode=1; /*PAUSE*/
                }
            }
          gtk_main_iteration_do(FALSE);
        }

      ClosePlot3d(TRUE,0,0,0,&pt);

      DeleteListOfBoxes(&sol_box_list);

      DeleteFileName(&fsols);      
      DeleteFileName(&fworld);    
      DeleteFileName(&fparam);
    }
  else
    {
      fprintf(stdout,"  Wrong number of parameters.\n");
      fprintf(stdout,"  Use:\n");
      fprintf(stdout,"     cuikplay <world>.world <solutions>.sol [<axes> <delay>]\n");
      fprintf(stdout,"  Where:\n");
      fprintf(stdout,"     <world>:  File describing the problem\n");
      fprintf(stdout,"     <solutions>:  Is the path of solutions to be animated\n");
      fprintf(stdout,"     <axes>: Optional. Length for the axes for each link.\n");
      fprintf(stdout,"             The default value is 0, i.e., not to display them.\n");
      fprintf(stdout,"     <delay>: Optional. Delay (in seconds) between frames.\n");
      fprintf(stdout,"              The default delay is 0.1 seconds.\n");
      fprintf(stdout,"  File extensions are not required\n");
    }
    
  return(EXIT_SUCCESS);
}