HP VXI 75000 C Series, User'S And Scpi Programming Manual

Page: 391 / 438

Example Program Listings 391 Appendix G
if (!*command) {
break;
}
result[0] = 0;
cscpi_exe(e1415, command, strlen(command), result, sizeof(result));
INST_QUERY(e1415, "syst:err?", "%d,%s", &error, string);
while ( error ) {
(void) printf("syst:err %d,’%s’\n", error, string);
INST_QUERY(e1415,"syst:err?", "%d,%s", &error, string);
}
if (result[0]) {
(void) printf("result: %s\n", result);
}
}
}
#endif
/* Print usage information */
void usage(char *prog_name)
{
(void) fprintf(stderr, "usage: %s algorithm_file...\n", prog_name);
}
/* Get an algorithm from a filename */
static char *get_algorithm(char *file_name)
{
FILE *f; /* Algorithm file pointer */
int32 a_size; /* Algorithm size */
int c; /* Character read from input */
char *algorithm; /* Points to algorithm string */
f = fopen(file_name, "r");
if (! f) {
(void) fprintf(stderr, "Error: can’t open algorithm file ’%s’\n",
file_name);
exit(1);
}
a_size = 0; /* Count length of algorithm */
while (getc(f) != EOF) {
+;
}
rewind(f);
algorithm = malloc( 1); /* Storage for algorithm */
a_size = 0; /* Use as array index */
while ((c = getc(f)) != EOF) { /* Read the algorithm */
algorithm[a_size] = c;
+;
}
algorithm[a_size] = 0; /* Null terminate */
(void) fclose(f);
return algorithm; /* Return algorithm string */
}