QIO_Reader *open_test_input(char *filename, int volfmt, int serpar,
char *myname){
QIO_String *xml_file_in;
QIO_Reader *infile;
QIO_Iflag iflag;
iflag.serpar = serpar;
iflag.volfmt = volfmt;
/* Create the file XML */
xml_file_in = QIO_string_create();
/* Open the file for reading */
infile = QIO_open_read(xml_file_in, filename, &layout, NULL, &iflag);
if(infile == NULL){
printf("%s(%d): QIO_open_read returns NULL.\n",myname,this_node);
return NULL;
}
printf("%s(%d): QIO_open_read done.\n",myname,this_node);
printf("%s(%d): User file info is \"%s\"\n",myname,this_node,
QIO_string_ptr(xml_file_in));
QIO_string_destroy(xml_file_in);
return infile;
}
QIO_Reader *open_scidac_input_xml(char *filename, QIO_Layout *layout,
QIO_Filesystem *fs, int serpar,
QIO_String *xml_file_in){
QIO_Reader *infile;
QIO_Iflag iflag;
char myname[] = "open_scidac_input_xml";
/* Create the iflag structure */
iflag.serpar = serpar;
iflag.volfmt = QIO_UNKNOWN; /* Just discover the format */
/* Open the file for reading */
#ifdef QIO_TRELEASE
QIO_set_trelease(0,QIO_TRELEASE);
#endif
node0_printf("%s: Opening file %s for reading\n", myname, filename);
infile = QIO_open_read(xml_file_in, filename, layout, fs, &iflag);
if(infile == NULL){
printf("%s(%d): QIO_open_read returns NULL.\n",myname,this_node);
return NULL;
}
return infile;
}
