home *** CD-ROM | disk | FTP | other *** search
/ Frozen Fish 1: Amiga / FrozenFish-Apr94.iso / bbs / alib / d1xx / d159 / free.lha / Free / Free.c < prev    next >
C/C++ Source or Header  |  1988-10-02  |  1KB  |  43 lines
  1. /*****************************************************************************
  2. **********                                **********
  3. **********       FREE - Displays a short memory & task report       **********
  4. **********                                **********
  5. ******************************************************************************
  6. **********                                **********
  7. **********         Designed by Magic Ceee 1987            **********
  8. **********                                **********
  9. *****************************************************************************/
  10.  
  11. #include "exec/types.h"
  12. #include "exec/tasks.h"
  13. #include "exec/execbase.h"
  14. #include "exec/memory.h"
  15.  
  16. extern struct ExecBase     *SysBase;
  17.  
  18. /*****************************************************************************/
  19.  
  20. main(argc,argv)
  21. int argc;
  22. char *argv[];
  23. {
  24.  struct Task *task;
  25.  long free,task_counter=0;
  26.  char name[200],msg[100];
  27.  
  28.  Disable();
  29.     
  30.  for(task=(struct Task *)SysBase->TaskWait.lh_Head;
  31.      task->tc_Node.ln_Succ;
  32.      task=(struct Task *)task->tc_Node.ln_Succ) task_counter++;
  33.  
  34.  free=AvailMem(MEMF_CHIP)+AvailMem(MEMF_FAST);
  35.  Enable();
  36.  
  37.  if(argc<2) strcpy(name,"Darling");
  38.  else strcpy(name,argv[1]);
  39.  
  40.  sprintf(msg,"\n\n%s, there are %ld bytes available today. Exec manages %ld tasks.\n\n",name,free,task_counter);
  41.  Write(Output(),msg,strlen(msg));
  42. }
  43.