35#include <casu_utils.h>
44 cpl_propertylist *phu,*ehu;
45 cpl_size *labels,nlab;
48 const char *fname =
"testmask.fit";
52 cpl_test_init(PACKAGE_BUGREPORT,CPL_MSG_WARNING);
57 im = cpl_image_new(100,100,CPL_TYPE_INT);
58 cpl_image_fill_noise_uniform(im,95.0,105.0);
59 cpl_image_set(im,1,1,0.0);
60 cpl_image_set(im,2,1,0.0);
61 phu = cpl_propertylist_new();
62 ehu = cpl_propertylist_new();
63 if (access(fname,F_OK) == 0)
65 cpl_image_save(NULL,fname,CPL_TYPE_UCHAR,phu,CPL_IO_DEFAULT);
66 cpl_image_save(im,fname,CPL_TYPE_INT,ehu,CPL_IO_EXTEND);
67 cpl_propertylist_delete(phu);
68 cpl_propertylist_delete(ehu);
73 frms = cpl_frameset_new();
75 cpl_frame_set_filename(fr,fname);
76 cpl_frame_set_tag(fr,
"testconf");
77 cpl_frameset_insert(frms,fr);
91 cpl_test_eq(retval,CASU_FATAL);
93 cpl_test_eq(retval,CASU_OK);
102 cpl_test_nonnull(bpm);
104 for (i = 0; i < 10000; i++) {
105 if (i < 2 && bpm[i] != 1) {
108 }
else if (i >= 2 && bpm[i] != 0) {
119 cpl_frameset_delete(frms);
120 return(cpl_test_end(0));
void casu_mask_delete(casu_mask *m)
unsigned char * casu_mask_get_data(casu_mask *m)
int casu_mask_get_size_y(casu_mask *m)
int casu_mask_load(casu_mask *m, int nexten, int nx, int ny)
casu_fits * casu_mask_get_fits(casu_mask *m)
int casu_mask_get_type(casu_mask *m)
casu_mask * casu_mask_define(cpl_frameset *framelist, cpl_size *labels, cpl_size nlab, const char *conftag, const char *bpmtag)
const char * casu_mask_get_filename(casu_mask *m)
int casu_mask_get_size_x(casu_mask *m)
int casu_compare_tags(const cpl_frame *frame1, const cpl_frame *frame2)
Compare input tags.