#include<config.h>

//--------------------------------------------------------------------
//  CVS keywords
//
//  $Author: chulwoo $
//  $Date: 2008/02/08 18:35:09 $
//  $Header: /space/cvs/cps/cps++/tests/various/verbose/main.C,v 1.7 2008/02/08 18:35:09 chulwoo Exp $
//  $Id: main.C,v 1.7 2008/02/08 18:35:09 chulwoo Exp $
//  $Name: v5_0_16_hantao_io_test_v7 $
//  $Locker:  $
//  $RCSfile: main.C,v $
//  $Revision: 1.7 $
//  $Source: /space/cvs/cps/cps++/tests/various/verbose/main.C,v $
//  $State: Exp $
//
//--------------------------------------------------------------------

#include <util/qcdio.h>
#include<util/gjp.h>
#include<util/random.h>
#include<util/verbose.h>
#include<util/error.h>
#include<util/pmalloc.h>
#include<util/smalloc.h>
#ifdef PARALLEL
#include <comms/sysfunc_cps.h>
#endif

CPS_START_NAMESPACE
GlobalJobParameter GJP;
LatRanGen LRG;
Verbose VRB;
Error ERR;
CPS_END_NAMESPACE

USING_NAMESPACE_CPS

int main(int argc, char **argv){

    int size = 40;
    int *ptr;
    char *cname = "test";
    char *fname = "main";
  
  
    VRB.Level(20);
    printf("verbose level = %d\n",VRB.Level()  );
  

    VRB.Func(cname,fname);
    // Use when entering a function for flow control purposes.
    // It prints out   
    // class_name::func_name : Entered
    // If func_clock_active = 1 it also prints Clock = value
    // on the same line.


    VRB.Clock(cname,fname);
    // Use to print the clock value. It prints
    // class_name::func_name : Clock = value


    VRB.Clock(cname,fname,"This is the time at the beginning of main\n");
    // Use to print the clock value. It prints
    // class_name::func_name : Clock = value
    // The rest is as in printf.


    ptr = (int *) pmalloc(size * sizeof(int));
    if(ptr == 0)
	ERR.Pointer(cname,fname, "ptr");
    VRB.Pmalloc(cname,fname,
		"ptr",ptr, size * sizeof(int));
    // Use when initializing a pointer with pmalloc. It prints out   
    // func_name : pmalloc initialized pointer 
    //    "ptr_name" to ptr with size size


    VRB.Pfree(cname,fname, "ptr", ptr);
    pfree(ptr);
    // Use before freeing a pointer with pfree. It prints out   
    // func_name : pfree will free pointer "ptr_name" = ptr 


    VRB.Pclear(cname,fname);
    // Use after calling pclear(). It prints out   
    // func_name : pclear() called


    ptr = (int *) smalloc(size * sizeof(int));
    if(ptr == 0)
	ERR.Pointer(cname,fname, "ptr");
    VRB.Smalloc(cname,fname,
		"ptr",ptr, size * sizeof(int));
    // Use when initializing a pointer with smalloc. It prints out   
    // func_name : smalloc initialized pointer 
    //    "ptr_name" to ptr with size size


    VRB.Sfree(cname,fname, "ptr", ptr);
    sfree(ptr);
    // Use before freeing a pointer with sfree. It prints out   
    // func_name : sfree will free pointer "ptr_name" = ptr 


    VRB.Sclear(cname,fname);
    // Use after calling sclear(). It prints out   
    // func_name : sclear() called


    VRB.Flow(cname,fname, "This program is doing something that you must know.\n");
    // Use to print info in order follow the flow 
    // inside a function. Usage is as in printf.


    int par = 1997;
    VRB.Input(cname,fname, "The input parameters are = %d\n", par);
    // Use inside a function to print any relevant input 
    // values. Usage is as in printf.
        

    par = 1998;
    VRB.Result(cname,fname, "The result is = %d\n", par);
    // Use to print any results. Usage is as in printf.
        

    VRB.Warn(cname,fname, "Something may be wrong\n");
    // Use to print any Warnings. Usage is as 
    // in printf. It appends to the output WARNING.

  
    VRB.Debug(cname,fname, "Use some debugging\n");
    // Use to print debugging info. Usage is as 
    // in printf.

    VRB.Debug("Use some debugging just like printf.\n");
    // Use to print debugging info. Usage is as 
    // in printf.


    VRB.LedOn(cname,fname);
    // Use to turn on the LED and print 
    // class_name::func_name : LED on


    VRB.LedOff(cname,fname);
    // Use to turn off the LED and print 
    // class_name::func_name : LED off


    int number = 20;
    VRB.LedFlash(cname,fname, number);
    // Use to flash the LED and print 
    // class_name::func_name : LED flashing
    // "number" number of times.
    // It leaves the LED on.
  

    VRB.Clock(cname,fname);
    // Use to print the clock value. It prints
    // class_name::func_name : Clock = value


    VRB.Clock(cname,fname, "The program is almost done know and you may want to know the time\n");
    // Use to print the clock value. It prints
    // class_name::func_name : Clock = value
    // The rest is as in printf.


    VRB.FuncEnd(cname,fname);
    // Use when exiting a function for flow control purposes.
    // It prints out   
    // class_name::func_name : Exiting
    // If func_clock_active = 1 it also prints Clock = value
    // on the same line.

    return 0;

}