88#define PARAMETER_MODE 1
91static char *mode_name[MODES] = {
102#define SET_DESCRIPTION 5
105#define SET_EDIT_NAMES 7
106#define SET_LINES_PER_ROW 8
107#define SET_NOWARNINGS 9
108#define SET_RECOVER 10
110#define SET_FROMPAGE 12
112#define SET_ACCEPT_ALL_NAMES 14
113#define SET_REMOVEPAGES 15
114#define SET_KEEPPAGES 16
115#define SET_ROWLIMIT 17
116#define SET_MAJOR_ORDER 18
117#define SET_CONVERT_UNITS 19
118#define SET_XZLEVEL 20
121char *option[N_OPTIONS] = {
144char *USAGE =
"sddsconvert [<source-file>] [<target-file>]\n\
145[-pipe=[input][,output]]\n\
146[-binary] [-ascii] [-description=<text>,<contents>]\n\
147[-fromPage=<pageNumber>] [-toPage=<pageNumber>]\n\
148[-removePages=<listOfNumbers>] [-keepPages=<listOfNumbers>]\n\
149[-linesperrow=<integer>] [-nowarnings] [-recover[=clip]]\n\
150[-delete={column|parameter|array},<matching-string>[,...]]\n\
151[-retain={column|parameter|array},<matching-string>[,...]]\n\
152[-rename={column|parameter|array},<oldname>=<newname>[,...]]\n\
153[-editnames={column|parameter|array},<wildcard-string>,<edit-string>]\n\
154[-convertUnits={column|parameter|array},<name>,<new-units>,[<old-units>[,<factor>]]\n\
155[-acceptAllNames] [-rowlimit=<number>]\n\
156[-majorOrder=row|column]\n\
158sddsconvert converts SDDS files between ASCII and binary, and allows wildcard-based filtering.\n\
159Any element matched by a deletion string is deleted unless matched by a retention string.\n\
160The -acceptAllNames option may force the SDDS library to accept unusual names.\n\
161Program by Michael Borland. (" __DATE__
" " __TIME__
", SVN revision: " SVN_VERSION
")\n";
163typedef char *STRING_PAIR[2];
177static char **process_name_options(
char **orig_name,
long **orig_flag,
long orig_names,
178 char **
delete,
long deletes,
char **retain,
long retains,
179 STRING_PAIR *rename,
long renames,
183 long convert_units_arrays,
CONVERT_UNITS *convert_units_column,
184 long convert_units_columns,
CONVERT_UNITS *convert_units_parameter,
185 long convert_units_parameters) {
187 for (i = 0; i < convert_units_arrays; i++) {
189 convert_units_array[i].new_units,
190 convert_units_array[i].old_units,
191 convert_units_array[i].factor) == 0)
194 for (i = 0; i < convert_units_columns; i++) {
196 convert_units_column[i].new_units,
197 convert_units_column[i].old_units,
198 convert_units_column[i].factor) == 0)
201 for (i = 0; i < convert_units_parameters; i++) {
203 convert_units_parameter[i].new_units,
204 convert_units_parameter[i].old_units,
205 convert_units_parameter[i].factor) == 0)
211int main(
int argc,
char **argv) {
215 char *description_text, *description_contents;
216 long tmpfile_used, noWarnings;
217 char *input, *output, *ptr, *buffer;
218 long ascii_output, binary_output, recover, recovered;
219 unsigned long pipeFlags, majorOrderFlag;
221 char **retain_column, **delete_column;
222 long retain_columns, delete_columns, rename_columns, edit_column_requests;
224 STRING_PAIR *rename_column;
225 char **orig_column_name, **new_column_name;
226 long *orig_column_flag = NULL;
227 int32_t orig_column_names;
229 char **retain_parameter, **delete_parameter;
230 long retain_parameters, delete_parameters, rename_parameters, edit_parameter_requests;
232 STRING_PAIR *rename_parameter;
233 char **orig_parameter_name, **new_parameter_name;
234 long *orig_parameter_flag = NULL;
235 int32_t orig_parameter_names;
237 char **retain_array, **delete_array;
238 long retain_arrays, delete_arrays, rename_arrays, edit_array_requests;
240 STRING_PAIR *rename_array;
241 char **orig_array_name, **new_array_name;
242 long *orig_array_flag = NULL;
243 int32_t orig_array_names;
245 long lines_per_row, pageNumber = 0, fromPage, toPage;
249 long *removePage, *keepPage;
250 long removePages, keepPages, keep;
252 short column_major = -1;
253 long xzLevel = SDDS_GetLZMACompressionLevel();
255 long convert_units_arrays = 0, convert_units_columns = 0, convert_units_parameters = 0;
256 CONVERT_UNITS *convert_units_array = NULL, *convert_units_column = NULL, *convert_units_parameter = NULL;
258 new_column_name = new_parameter_name = new_array_name = NULL;
261 argc =
scanargs(&s_arg, argc, argv);
263 fprintf(stderr,
"%s\n", USAGE);
266 input = output = NULL;
267 ascii_output = binary_output = noWarnings = 0;
269 retain_column = delete_column = NULL;
270 retain_columns = delete_columns = rename_columns = edit_column_requests = 0;
271 rename_column = NULL;
272 edit_column_request = NULL;
274 retain_parameter = delete_parameter = NULL;
275 retain_parameters = delete_parameters = rename_parameters = edit_parameter_requests = 0;
276 rename_parameter = NULL;
277 edit_parameter_request = NULL;
279 retain_array = delete_array = NULL;
280 retain_arrays = delete_arrays = rename_arrays = edit_array_requests = 0;
282 edit_array_request = NULL;
285 description_text = description_contents = NULL;
286 fromPage = toPage = recover = 0;
287 removePage = keepPage = NULL;
288 removePages = keepPages = 0;
292 for (i_arg = 1; i_arg < argc; i_arg++) {
293 if (s_arg[i_arg].arg_type == OPTION) {
295 switch (
match_string(s_arg[i_arg].list[0], option, N_OPTIONS, 0)) {
296 case SET_MAJOR_ORDER:
298 s_arg[i_arg].n_items -= 1;
299 if (s_arg[i_arg].n_items > 0 &&
301 &s_arg[i_arg].n_items, 0,
302 "row", -1, NULL, 0, SDDS_ROW_MAJOR_ORDER,
303 "column", -1, NULL, 0, SDDS_COLUMN_MAJOR_ORDER,
305 SDDS_Bomb(
"invalid -majorOrder syntax/values");
306 if (majorOrderFlag & SDDS_COLUMN_MAJOR_ORDER)
308 if (majorOrderFlag & SDDS_ROW_MAJOR_ORDER)
312 if (s_arg[i_arg].n_items != 2 || sscanf(s_arg[i_arg].list[1],
"%ld", &xzLevel) != 1 || xzLevel < 0 || xzLevel > 9)
314 SDDS_SetLZMACompressionLevel(xzLevel);
324 case SET_CONVERT_UNITS:
325 if ((s_arg[i_arg].n_items != 4) && (s_arg[i_arg].n_items != 5) &&
326 (s_arg[i_arg].n_items != 6)) {
327 fprintf(stderr,
"Error (%s): invalid -convertUnits syntax\n", argv[0]);
330 switch (
match_string(s_arg[i_arg].list[1], mode_name, MODES, 0)) {
332 convert_units_array =
trealloc(convert_units_array,
333 sizeof(*convert_units_array) * (convert_units_arrays + 1));
334 convert_units_array[convert_units_arrays].name = s_arg[i_arg].list[2];
335 convert_units_array[convert_units_arrays].new_units = s_arg[i_arg].list[3];
336 if (s_arg[i_arg].n_items >= 5)
337 convert_units_array[convert_units_arrays].old_units = s_arg[i_arg].list[4];
339 convert_units_array[convert_units_arrays].old_units = NULL;
340 if (s_arg[i_arg].n_items == 6) {
341 if (sscanf(s_arg[i_arg].list[5],
"%lf",
342 &(convert_units_array[convert_units_arrays].factor)) != 1) {
343 fprintf(stderr,
"Error (%s): invalid -convertUnits syntax or value\n", argv[0]);
347 convert_units_array[convert_units_arrays].factor = 1.0;
348 convert_units_arrays++;
351 convert_units_column =
trealloc(convert_units_column,
352 sizeof(*convert_units_column) * (convert_units_columns + 1));
353 convert_units_column[convert_units_columns].name = s_arg[i_arg].list[2];
354 convert_units_column[convert_units_columns].new_units = s_arg[i_arg].list[3];
355 if (s_arg[i_arg].n_items >= 5)
356 convert_units_column[convert_units_columns].old_units = s_arg[i_arg].list[4];
358 convert_units_column[convert_units_columns].old_units = NULL;
359 if (s_arg[i_arg].n_items == 6) {
360 if (sscanf(s_arg[i_arg].list[5],
"%lf",
361 &(convert_units_column[convert_units_columns].factor)) != 1) {
362 fprintf(stderr,
"Error (%s): invalid -convertUnits syntax or value\n", argv[0]);
366 convert_units_column[convert_units_columns].factor = 1.0;
367 convert_units_columns++;
370 convert_units_parameter =
trealloc(convert_units_parameter,
371 sizeof(*convert_units_parameter) * (convert_units_parameters + 1));
372 convert_units_parameter[convert_units_parameters].name = s_arg[i_arg].list[2];
373 convert_units_parameter[convert_units_parameters].new_units = s_arg[i_arg].list[3];
374 if (s_arg[i_arg].n_items >= 5)
375 convert_units_parameter[convert_units_parameters].old_units = s_arg[i_arg].list[4];
377 convert_units_parameter[convert_units_parameters].old_units = NULL;
378 if (s_arg[i_arg].n_items == 6) {
379 if (sscanf(s_arg[i_arg].list[5],
"%lf",
380 &(convert_units_parameter[convert_units_parameters].factor)) != 1) {
381 fprintf(stderr,
"Error (%s): invalid -convertUnits syntax or value\n", argv[0]);
385 convert_units_parameter[convert_units_parameters].factor = 1.0;
386 convert_units_parameters++;
389 fprintf(stderr,
"Error (%s): invalid -convertUnits syntax: specify column, parameter or array\n", argv[0]);
394 if (s_arg[i_arg].n_items < 3) {
395 fprintf(stderr,
"Error (%s): invalid -delete syntax\n", argv[0]);
398 switch (
match_string(s_arg[i_arg].list[1], mode_name, MODES, 0)) {
400 delete_column =
trealloc(delete_column,
401 sizeof(*delete_column) * (delete_columns + s_arg[i_arg].n_items - 2));
402 for (i = 2; i < s_arg[i_arg].n_items; i++)
403 delete_column[i - 2 + delete_columns] = s_arg[i_arg].list[i];
404 delete_columns += s_arg[i_arg].n_items - 2;
407 delete_parameter =
trealloc(delete_parameter,
408 sizeof(*delete_parameter) * (delete_parameters + s_arg[i_arg].n_items - 2));
409 for (i = 2; i < s_arg[i_arg].n_items; i++)
410 delete_parameter[i - 2 + delete_parameters] = s_arg[i_arg].list[i];
411 delete_parameters += s_arg[i_arg].n_items - 2;
414 delete_array =
trealloc(delete_array,
415 sizeof(*delete_array) * (delete_arrays + s_arg[i_arg].n_items - 2));
416 for (i = 2; i < s_arg[i_arg].n_items; i++)
417 delete_array[i - 2 + delete_arrays] = s_arg[i_arg].list[i];
418 delete_arrays += s_arg[i_arg].n_items - 2;
421 fprintf(stderr,
"Error (%s): invalid -delete syntax: specify column, parameter or array\n", argv[0]);
426 if (s_arg[i_arg].n_items < 3) {
427 fprintf(stderr,
"Error (%s): invalid -retain syntax\n", argv[0]);
430 switch (
match_string(s_arg[i_arg].list[1], mode_name, MODES, 0)) {
432 retain_column =
trealloc(retain_column,
433 sizeof(*retain_column) * (retain_columns + s_arg[i_arg].n_items - 2));
434 for (i = 2; i < s_arg[i_arg].n_items; i++)
435 retain_column[i - 2 + retain_columns] = s_arg[i_arg].list[i];
436 retain_columns += s_arg[i_arg].n_items - 2;
439 retain_parameter =
trealloc(retain_parameter,
440 sizeof(*retain_parameter) * (retain_parameters + s_arg[i_arg].n_items - 2));
441 for (i = 2; i < s_arg[i_arg].n_items; i++)
442 retain_parameter[i - 2 + retain_parameters] = s_arg[i_arg].list[i];
443 retain_parameters += s_arg[i_arg].n_items - 2;
446 retain_array =
trealloc(retain_array,
447 sizeof(*retain_array) * (retain_arrays + s_arg[i_arg].n_items - 2));
448 for (i = 2; i < s_arg[i_arg].n_items; i++)
449 retain_array[i - 2 + retain_arrays] = s_arg[i_arg].list[i];
450 retain_arrays += s_arg[i_arg].n_items - 2;
453 fprintf(stderr,
"Error (%s): invalid -retain syntax: specify column, parameter or array\n", argv[0]);
458 if (s_arg[i_arg].n_items < 3) {
459 fprintf(stderr,
"Error (%s): invalid -rename syntax\n", argv[0]);
462 switch (
match_string(s_arg[i_arg].list[1], mode_name, MODES, 0)) {
464 rename_column =
trealloc(rename_column,
465 sizeof(*rename_column) * (rename_columns + s_arg[i_arg].n_items - 2));
466 for (i = 2; i < s_arg[i_arg].n_items; i++) {
467 if (!(ptr = strchr(s_arg[i_arg].list[i],
'='))) {
468 fprintf(stderr,
"Error (%s): invalid -rename syntax\n", argv[0]);
472 rename_column[i - 2 + rename_columns][0] = s_arg[i_arg].list[i];
473 rename_column[i - 2 + rename_columns][1] = ptr;
475 rename_columns += s_arg[i_arg].n_items - 2;
478 rename_parameter =
trealloc(rename_parameter,
479 sizeof(*rename_parameter) * (rename_parameters + s_arg[i_arg].n_items - 2));
480 for (i = 2; i < s_arg[i_arg].n_items; i++) {
481 if (!(ptr = strchr(s_arg[i_arg].list[i],
'='))) {
482 fprintf(stderr,
"Error (%s): invalid -rename syntax\n", argv[0]);
486 rename_parameter[i - 2 + rename_parameters][0] = s_arg[i_arg].list[i];
487 rename_parameter[i - 2 + rename_parameters][1] = ptr;
489 rename_parameters += s_arg[i_arg].n_items - 2;
492 rename_array =
trealloc(rename_array,
493 sizeof(*rename_array) * (rename_arrays + s_arg[i_arg].n_items - 2));
494 for (i = 2; i < s_arg[i_arg].n_items; i++) {
495 if (!(ptr = strchr(s_arg[i_arg].list[i],
'='))) {
496 fprintf(stderr,
"Error (%s): invalid -rename syntax\n", argv[0]);
500 rename_array[i - 2 + rename_arrays][0] = s_arg[i_arg].list[i];
501 rename_array[i - 2 + rename_arrays][1] = ptr;
503 rename_arrays += s_arg[i_arg].n_items - 2;
506 fprintf(stderr,
"Error (%s): invalid -rename syntax: specify column, parameter or array\n", argv[0]);
510 case SET_DESCRIPTION:
511 if (s_arg[i_arg].n_items != 3) {
512 fprintf(stderr,
"Error (%s): invalid -description syntax\n", argv[0]);
515 description_text = s_arg[i_arg].list[1];
516 description_contents = s_arg[i_arg].list[2];
519 if (s_arg[i_arg].n_items < 2) {
520 fprintf(stderr,
"Error (%s): invalid -table syntax\n", argv[0]);
523 if (pageNumber != 0) {
524 fprintf(stderr,
"Error (%s): specify -table once only\n", argv[0]);
527 if (sscanf(s_arg[i_arg].list[1],
"%ld", &pageNumber) != 1 || pageNumber <= 0) {
528 fprintf(stderr,
"Error (%s): invalid -table value\n", argv[0]);
531 fromPage = toPage = pageNumber;
534 if (s_arg[i_arg].n_items < 2) {
535 fprintf(stderr,
"Error (%s): invalid -fromPage syntax\n", argv[0]);
539 fprintf(stderr,
"Error (%s): specify -fromPage once only\n", argv[0]);
542 if (sscanf(s_arg[i_arg].list[1],
"%ld", &fromPage) != 1 || fromPage <= 0) {
543 fprintf(stderr,
"Error (%s): invalid -fromPage value\n", argv[0]);
548 if (s_arg[i_arg].n_items < 2) {
549 fprintf(stderr,
"Error (%s): invalid -toPage syntax\n", argv[0]);
553 fprintf(stderr,
"Error (%s): specify -toPage once only\n", argv[0]);
556 if (sscanf(s_arg[i_arg].list[1],
"%ld", &toPage) != 1 || toPage <= 0) {
557 fprintf(stderr,
"Error (%s): invalid -toPage value\n", argv[0]);
561 case SET_REMOVEPAGES:
562 if (s_arg[i_arg].n_items < 2) {
563 fprintf(stderr,
"Error (%s): invalid -removePages syntax\n", argv[0]);
566 if (removePage != NULL) {
567 fprintf(stderr,
"Error (%s): specify -removePages once only\n", argv[0]);
570 removePages = s_arg[i_arg].n_items - 1;
571 removePage =
trealloc(removePage,
sizeof(*removePage) * (removePages));
572 for (i = 0; i < removePages; i++) {
573 if (sscanf(s_arg[i_arg].list[i + 1],
"%ld", &removePage[i]) != 1 || removePage[i] <= 0) {
574 fprintf(stderr,
"Error (%s): invalid -removePages value\n", argv[0]);
580 if (s_arg[i_arg].n_items < 2) {
581 fprintf(stderr,
"Error (%s): invalid -keepPages syntax\n", argv[0]);
584 if (keepPage != NULL) {
585 fprintf(stderr,
"Error (%s): specify -keepPages once only\n", argv[0]);
588 keepPages = s_arg[i_arg].n_items - 1;
589 keepPage =
trealloc(keepPage,
sizeof(*keepPage) * (keepPages));
590 for (i = 0; i < keepPages; i++) {
591 if (sscanf(s_arg[i_arg].list[i + 1],
"%ld", &keepPage[i]) != 1 || keepPage[i] <= 0) {
592 fprintf(stderr,
"Error (%s): invalid -keepPages value\n", argv[0]);
598 if (s_arg[i_arg].n_items < 4) {
599 fprintf(stderr,
"Error (%s): invalid -editnames syntax\n", argv[0]);
602 switch (
match_string(s_arg[i_arg].list[1], mode_name, MODES, 0)) {
604 edit_column_request =
trealloc(edit_column_request,
605 sizeof(*edit_column_request) * (edit_column_requests + 1));
606 edit_column_request[edit_column_requests].match_string = s_arg[i_arg].list[2];
607 edit_column_request[edit_column_requests].edit_string = s_arg[i_arg].list[3];
608 edit_column_requests++;
611 edit_parameter_request =
trealloc(edit_parameter_request,
612 sizeof(*edit_parameter_request) * (edit_parameter_requests + 1));
613 edit_parameter_request[edit_parameter_requests].match_string = s_arg[i_arg].list[2];
614 edit_parameter_request[edit_parameter_requests].edit_string = s_arg[i_arg].list[3];
615 edit_parameter_requests++;
618 edit_array_request =
trealloc(edit_array_request,
619 sizeof(*edit_array_request) * (edit_array_requests + 1));
620 edit_array_request[edit_array_requests].match_string = s_arg[i_arg].list[2];
621 edit_array_request[edit_array_requests].edit_string = s_arg[i_arg].list[3];
622 edit_array_requests++;
625 fprintf(stderr,
"Error (%s): invalid -editnames syntax\n", argv[0]);
629 case SET_LINES_PER_ROW:
630 if (s_arg[i_arg].n_items != 2 ||
631 sscanf(s_arg[i_arg].list[1],
"%ld", &lines_per_row) != 1 ||
632 lines_per_row <= 0) {
633 fprintf(stderr,
"Error (%s): invalid -linesperrow syntax\n", argv[0]);
638 if (s_arg[i_arg].n_items != 1) {
639 fprintf(stderr,
"Error (%s): invalid -nowarnings syntax\n", argv[0]);
646 if (s_arg[i_arg].n_items != 1) {
648 if (s_arg[i_arg].n_items > 2 ||
649 strncmp(s_arg[i_arg].list[1],
"clip", strlen(s_arg[i_arg].list[1])) != 0) {
650 fprintf(stderr,
"Error (%s): invalid -recover syntax\n", argv[0]);
656 if (!
processPipeOption(s_arg[i_arg].list + 1, s_arg[i_arg].n_items - 1, &pipeFlags)) {
657 fprintf(stderr,
"Error (%s): invalid -pipe syntax\n", argv[0]);
661 case SET_ACCEPT_ALL_NAMES:
665 if (s_arg[i_arg].n_items != 2 ||
666 sscanf(s_arg[i_arg].list[1],
"%" SCNd64, &rowLimit) != 1 ||
668 fprintf(stderr,
"Error (%s): invalid -rowLimit syntax\n", argv[0]);
674 fprintf(stderr,
"Error (%s): unknown switch: %s\n", argv[0], s_arg[i_arg].list[0]);
679 input = s_arg[i_arg].list[0];
680 else if (output == NULL)
681 output = s_arg[i_arg].list[0];
683 fprintf(stderr,
"Error (%s): too many filenames\n", argv[0]);
689 if (fromPage && toPage && fromPage > toPage) {
690 fprintf(stderr,
"Error (%s): invalid -fromPage and -toPage\n", argv[0]);
694 processFilenames(
"sddsconvert", &input, &output, pipeFlags, noWarnings, &tmpfile_used);
697 fprintf(stderr,
"Initializing input and output files.\n");
704 if (!set_units_conversion(&SDDS_orig, convert_units_array, convert_units_arrays,
705 convert_units_column, convert_units_columns,
706 convert_units_parameter, convert_units_parameters)) {
711 if (!description_text)
715 ascii_output ? SDDS_ASCII : (binary_output ? SDDS_BINARY : SDDS_orig.layout.data_mode.mode),
716 lines_per_row, description_text, description_contents, output)) {
723 if (column_major != -1)
724 SDDS_dataset.layout.data_mode.column_major = column_major;
726 SDDS_dataset.layout.data_mode.column_major = SDDS_orig.layout.data_mode.column_major;
729 fprintf(stderr,
"Getting column, parameter, and array names from input file.\n");
735 if (orig_column_names &&
736 !(new_column_name = process_name_options(orig_column_name, &orig_column_flag, orig_column_names,
737 delete_column, delete_columns,
738 retain_column, retain_columns,
739 rename_column, rename_columns,
740 edit_column_request, edit_column_requests)))
749 fprintf(stderr,
"processing name options\n");
751 if (orig_parameter_names &&
752 !(new_parameter_name = process_name_options(orig_parameter_name, &orig_parameter_flag, orig_parameter_names,
753 delete_parameter, delete_parameters,
754 retain_parameter, retain_parameters,
755 rename_parameter, rename_parameters,
756 edit_parameter_request, edit_parameter_requests)))
763 if (orig_array_names &&
764 !(new_array_name = process_name_options(orig_array_name, &orig_array_flag, orig_array_names,
765 delete_array, delete_arrays,
766 retain_array, retain_arrays,
767 rename_array, rename_arrays,
768 edit_array_request, edit_array_requests)))
772 for (i = 0; i < orig_parameter_names; i++)
773 fprintf(stderr,
"parameter %s goes to %s\n", orig_parameter_name[i],
774 orig_parameter_flag[i] ? new_parameter_name[i] :
"<deleted>");
775 for (i = 0; i < orig_array_names; i++)
776 fprintf(stderr,
"array %s goes to %s\n", orig_array_name[i],
777 orig_array_flag[i] ? new_array_name[i] :
"<deleted>");
778 for (i = 0; i < orig_column_names; i++)
779 fprintf(stderr,
"column %s goes to %s\n", orig_column_name[i],
780 orig_column_flag[i] ? new_column_name[i] :
"<deleted>");
784 fprintf(stderr,
"Transferring definitions to new file\n");
786 for (i = 0; i < orig_parameter_names; i++) {
787 if (orig_parameter_flag[i]) {
789 orig_parameter_name[i], new_parameter_name[i])) {
790 fprintf(stderr,
"unable to transfer parameter %s to %s\n",
791 orig_parameter_name[i], new_parameter_name[i]);
797 for (i = 0; i < orig_array_names; i++) {
798 if (orig_array_flag[i]) {
800 orig_array_name[i], new_array_name[i])) {
801 fprintf(stderr,
"unable to transfer array %s to %s\n",
802 orig_array_name[i], new_array_name[i]);
809 for (i = 0; i < orig_column_names; i++) {
810 if (orig_column_flag[i]) {
813 orig_column_name[i], new_column_name[i])) {
814 fprintf(stderr,
"unable to transfer column %s to %s\n",
815 orig_column_name[i], new_column_name[i]);
823 fprintf(stderr,
"Writing layout.\n");
834 buffer =
tmalloc(max_size *
sizeof(
char));
838 fprintf(stderr,
"Reading file\n");
840 while (!recovered && (pageNumber =
SDDS_ReadPage(&SDDS_orig)) >= 0) {
841 if (pageNumber == 0) {
843 fprintf(stderr,
"error: SDDS data garbled--consider using -recover option\n");
844 fprintf(stderr,
"warning: one or more data pages may be missing\n");
851 fprintf(stderr,
"warning: unable to recover data--pages may be missing\n");
856 if (fromPage && pageNumber < fromPage)
860 for (i = 0; i < removePages; i++) {
861 if (removePage[i] == pageNumber) {
871 for (i = 0; i < keepPages; i++) {
872 if (keepPage[i] == pageNumber) {
880 if ((rows = SDDS_RowCount(&SDDS_orig)) < 0) {
881 fprintf(stderr,
"error: problem counting rows in input page\n");
886 fprintf(stderr,
"error: problem starting output page\n");
891 if (!set_units_conversion(&SDDS_orig, convert_units_array, convert_units_arrays,
892 convert_units_column, convert_units_columns,
893 convert_units_parameter, convert_units_parameters)) {
898 for (i = 0; i < orig_parameter_names; i++) {
899 if (orig_parameter_flag[i]) {
901 fprintf(stderr,
"error: problem getting parameter %s\n", orig_parameter_name[i]);
906 new_parameter_name[i], buffer, NULL)) {
907 fprintf(stderr,
"error: problem setting parameter %s\n", new_parameter_name[i]);
913 for (i = 0; i < orig_array_names; i++) {
915 if (orig_array_flag[i]) {
916 if (!(array =
SDDS_GetArray(&SDDS_orig, orig_array_name[i], NULL))) {
917 fprintf(stderr,
"error: problem getting array %s\n", orig_array_name[i]);
921 if (!
SDDS_SetArray(&SDDS_dataset, new_array_name[i], SDDS_CONTIGUOUS_DATA,
922 array->data, array->dimension)) {
923 fprintf(stderr,
"error: problem setting array %s\n", new_array_name[i]);
932 for (i = 0; i < orig_column_names; i++) {
933 if (orig_column_flag[i]) {
935 fprintf(stderr,
"error: problem getting column %s\n", orig_column_name[i]);
939 if (!
SDDS_SetColumn(&SDDS_dataset, SDDS_SET_BY_NAME, ptr, rows, new_column_name[i])) {
940 fprintf(stderr,
"error: problem setting column %s\n", new_column_name[i]);
948 fprintf(stderr,
"error: problem writing page to file %s\n", output);
952 if (toPage && pageNumber >= toPage)
964 for (i = 0; i < orig_parameter_names; i++) {
965 if (orig_parameter_name[i])
966 free(orig_parameter_name[i]);
967 if (new_parameter_name[i])
968 free(new_parameter_name[i]);
970 if (orig_parameter_name)
971 free(orig_parameter_name);
972 if (new_parameter_name)
973 free(new_parameter_name);
974 if (orig_parameter_flag)
975 free(orig_parameter_flag);
977 for (i = 0; i < orig_column_names; i++) {
978 if (orig_column_name[i])
979 free(orig_column_name[i]);
980 if (new_column_name[i])
981 free(new_column_name[i]);
983 if (orig_column_name)
984 free(orig_column_name);
986 free(new_column_name);
987 if (orig_column_flag)
988 free(orig_column_flag);
990 for (i = 0; i < orig_array_names; i++) {
991 if (orig_array_name[i])
992 free(orig_array_name[i]);
993 if (new_array_name[i])
994 free(new_array_name[i]);
997 free(orig_array_name);
999 free(new_array_name);
1000 if (orig_array_flag)
1001 free(orig_array_flag);
1006static char **process_name_options(
char **orig_name,
long **orig_flag,
long orig_names,
1007 char **
delete,
long deletes,
char **retain,
long retains,
1008 STRING_PAIR *rename,
long renames,
1014 *orig_flag =
tmalloc(
sizeof(**orig_flag) * orig_names);
1015 for (i = 0; i < orig_names; i++)
1016 (*orig_flag)[i] = 1;
1019 for (i = 0; i < deletes; i++) {
1024 for (j = 0; j < orig_names; j++) {
1025 for (i = 0; i < deletes; i++) {
1027 (*orig_flag)[j] = 0;
1035 for (i = 0; i < retains; i++) {
1041 for (j = 0; j < orig_names; j++)
1042 (*orig_flag)[j] = 0;
1043 for (j = 0; j < orig_names; j++) {
1044 if ((*orig_flag)[j])
1046 for (i = 0; i < retains; i++) {
1048 (*orig_flag)[j] = 1;
1055 new_name =
tmalloc(
sizeof(*new_name) * orig_names);
1056 for (j = 0; j < orig_names; j++) {
1057 for (i = 0; i < renames; i++) {
1058 if (strcmp(rename[i][0], orig_name[j]) == 0) {
1065 for (i = 0; i < edit_requests; i++) {
1066 char edit_buffer[256];
1069 edit_request[i].match_string = ptr;
1071 strcpy(edit_buffer, new_name[j]);
SDDS (Self Describing Data Set) Data Types Definitions and Function Prototypes.
int32_t SDDS_ReadRecoveryPossible(SDDS_DATASET *SDDS_dataset)
Checks if any data in an SDDS page was recovered after an error was detected.
int32_t SDDS_type_size[SDDS_NUM_TYPES]
Array of sizes for each supported data type.
int32_t SDDS_StartPage(SDDS_DATASET *SDDS_dataset, int64_t expected_n_rows)
int32_t SDDS_SetParameters(SDDS_DATASET *SDDS_dataset, int32_t mode,...)
int32_t SDDS_SetColumn(SDDS_DATASET *SDDS_dataset, int32_t mode, void *data, int64_t rows,...)
Sets the values for one data column in the current data table of an SDDS dataset.
int32_t SDDS_SetArray(SDDS_DATASET *SDDS_dataset, char *array_name, int32_t mode, void *data_pointer, int32_t *dimension)
Sets the values of an array variable in the SDDS dataset using specified dimensions.
int32_t SDDS_InitializeOutput(SDDS_DATASET *SDDS_dataset, int32_t data_mode, int32_t lines_per_row, const char *description, const char *contents, const char *filename)
Initializes the SDDS output dataset.
int32_t SDDS_SetNameValidityFlags(uint32_t flags)
Sets the validity flags for parameter and column names in the SDDS dataset.
int32_t SDDS_WritePage(SDDS_DATASET *SDDS_dataset)
Writes the current data table to the output file.
int32_t SDDS_WriteLayout(SDDS_DATASET *SDDS_dataset)
Writes the SDDS layout header to the output file.
int32_t SDDS_TransferColumnDefinition(SDDS_DATASET *target, SDDS_DATASET *source, char *name, char *newName)
Transfers a column definition from a source dataset to a target dataset.
int32_t SDDS_TransferArrayDefinition(SDDS_DATASET *target, SDDS_DATASET *source, char *name, char *newName)
Transfers an array definition from a source dataset to a target dataset.
int32_t SDDS_TransferParameterDefinition(SDDS_DATASET *target, SDDS_DATASET *source, char *name, char *newName)
Transfers a parameter definition from a source dataset to a target dataset.
void SDDS_FreeArray(SDDS_ARRAY *array)
Frees memory allocated for an SDDS array structure.
char ** SDDS_GetParameterNames(SDDS_DATASET *SDDS_dataset, int32_t *number)
Retrieves the names of all parameters in the SDDS dataset.
char ** SDDS_GetColumnNames(SDDS_DATASET *SDDS_dataset, int32_t *number)
Retrieves the names of all columns in the SDDS dataset.
void SDDS_PrintErrors(FILE *fp, int32_t mode)
Prints recorded error messages to a specified file stream.
void SDDS_RegisterProgramName(const char *name)
Registers the executable program name for use in error messages.
void SDDS_Bomb(char *message)
Terminates the program after printing an error message and recorded errors.
char ** SDDS_GetArrayNames(SDDS_DATASET *SDDS_dataset, int32_t *number)
Retrieves the names of all arrays in the SDDS dataset.
int32_t SDDS_CopyString(char **target, const char *source)
Copies a source string to a target string with memory allocation.
long edit_string(char *text, char *edit)
Edits the provided text based on the specified edit commands.
#define SDDS_NUM_TYPES
Total number of defined SDDS data types.
void * trealloc(void *old_ptr, uint64_t size_of_block)
Reallocates a memory block to a new size.
void * tmalloc(uint64_t size_of_block)
Allocates a memory block of the specified size with zero initialization.
char * delete_chars(char *s, char *t)
Removes all occurrences of characters found in string t from string s.
long match_string(char *string, char **option, long n_options, long mode)
Matches a given string against an array of option strings based on specified modes.
long replaceFileAndBackUp(char *file, char *replacement)
Replaces a file with a replacement file and creates a backup of the original.
int scanargs(SCANNED_ARG **scanned, int argc, char **argv)
long processPipeOption(char **item, long items, unsigned long *flags)
void processFilenames(char *programName, char **input, char **output, unsigned long pipeFlags, long noWarnings, long *tmpOutputUsed)
long scanItemList(unsigned long *flags, char **item, long *items, unsigned long mode,...)
Scans a list of items and assigns values based on provided keywords and types.
char * expand_ranges(char *template)
Expand range specifiers in a wildcard template into explicit character lists.
int wild_match(char *string, char *template)
Determine whether one string is a wildcard match for another.