#include <sys/types.h>
#include "ti_dsp.h"

/* ----------------------------------------------------------------------
   Reads the histogram FIFO.
   This routine attempts to read nw words from the histogram FIFO
   into the buffer pointed to by buf. The routine stops reading when
   the FIFO is empty, and returns the number of words actually read.
   ---------------------------------------------------------------------- */
int ti_hread(ti_dsp_p dsp, unsigned int *buf, int nw)
{
  int i;
  for(i=0; i<nw && (vme_dsp_read(dsp, TI_STATUS) & TI_STATUS_BEF) == 0; i++)
    buf[i] = vme_dsp_read(dsp, TI_HIST_DATA);
  return i;
}


/* ----------------------------------------------------------------------
   Reads the histogram FIFO in block mode.
   This routine reads nw words from the histogram FIFO, or the number
   of words indicated by the PU Status Register, whichever is less.
   It returns the number of words actually read.
   ---------------------------------------------------------------------- */
int ti_hreadblk(ti_dsp_p dsp, unsigned int *buf, int nw)
{
  int ist = vme_dsp_read(dsp, TI_STATUS);
  int nw0 = ist & TI_STATUS_BWC;  
  if (nw0 < nw) nw = nw0;
  vme_dsp_readblk(dsp, TI_HIST_DATA, nw, buf);
  return nw;
}


/* ----------------------------------------------------------------------
   Reads the histogram FIFO and attempts to print as ASCII text.
   ---------------------------------------------------------------------- */
void ti_hprnt(ti_dsp_p dsp)
{
  unsigned int nw, buf[256];
  nw = ti_hread(dsp, buf, 256);
  write(1, buf, nw*sizeof(int));
}