# include <stdio.h>
# include <hstio.h>
# include <c_iraf.h>
# include "../stiserr.h"

/* This routine prints the status value and message for HSTIO errors,
   IRAF error, or it prints a generic message depending on the value of
   status.

   Phil Hodge, 1997 Nov 7:
	Include INTERNAL_ERROR, and print status number if no other error.

   Phil Hodge, 1998 Oct 5:
	Don't print status number if no other error.
*/

void WhichError (int status) {

	if (status == 0)
	    return;

	if (hstio_err())
	    printf ("         HSTIO error %d:  %s\n", status, hstio_errmsg());
	else if (c_iraferr())
	    printf (
	"         IRAF error %d:  %s\n", c_iraferr(), c_iraferrmsg());

	if (status == OUT_OF_MEMORY) {
	    printf ("         Out of memory.\n");

	} else if (status == OPEN_FAILED) {
	    printf ("         Open failed.\n");

	} else if (status == CAL_FILE_MISSING) {
	    printf ("         Calibration file(s) missing.\n");

	} else if (status == NOTHING_TO_DO) {
	    printf ("         No output from current processing step.\n");

	} else if (status == KEYWORD_MISSING) {
	    printf ("         Required keyword missing.\n");

	} else if (status == ALLOCATION_PROBLEM) {
	    printf ("         Allocation problem.\n");

	} else if (status == HEADER_PROBLEM) {
	    printf ("         Header problem.\n");

	} else if (status == SIZE_MISMATCH) {
	    printf ("         Size mismatch.\n");

	} else if (status == TABLE_ERROR) {
	    printf ("         Table error.\n");

	} else if (status == COLUMN_NOT_FOUND) {
	    printf ("         Column not found.\n");

	} else if (status == NO_GOOD_DATA) {
	    printf ("         All data were flagged as bad.\n");

	} else if (status == REF_TOO_SMALL) {
	    printf (
	"         Reference image is binned more than science image.\n");

	} else if (status == INTERNAL_ERROR) {
	    printf ("         Internal error.\n");

	} else if (status < 0) {
	    printf ("         Internal error; status = %d.\n", status);
	}
}