Changeset 39540
- Timestamp:
- Apr 19, 2016, 1:36:36 PM (10 years ago)
- File:
-
- 1 edited
-
trunk/Ohana/src/opihi/dvo/hosts.c (modified) (4 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/Ohana/src/opihi/dvo/hosts.c
r37030 r39540 4 4 5 5 enum {TEMP_NONE, TEMP_DVO_RESULTS, TEMP_DVO_LOG, 6 TEMP_RELASTRO_CATALOG, TEMP_RELPHOT_CATALOG, TEMP_RELPHOT_LOG, TEMP_DVOPSPS_DET, TEMP_FIXSTKIDS_RESULTS, 7 TEMP_RELASTRO_CAT_FULL, TEMP_RELPHOT_CAT_FULL, TEMP_CHECKASTRO_CAT_FULL, 6 TEMP_RELASTRO_CATALOG, TEMP_RELASTRO_CAT_SUBSET, 7 TEMP_RELPHOT_CATALOG, TEMP_RELPHOT_CAT_SUBSET, TEMP_RELPHOT_LOG, 8 TEMP_DVOPSPS_DET, TEMP_FIXSTKIDS_RESULTS, TEMP_CHECKASTRO_CATALOG, 8 9 }; 9 10 … … 68 69 // log.rlpc.* (relphot logs) 69 70 // relphot.catalog.subset.dat [no glob needed] 70 int TEMP_TYPE = TEMP_ DVO_RESULTS;71 int TEMP_TYPE = TEMP_NONE; 71 72 if ((N = get_argument (argc, argv, "-type"))) { 72 TEMP_TYPE = TEMP_NONE;73 73 remove_argument (N, &argc, argv); 74 if (!strcasecmp(argv[N], "dvo.results")) TEMP_TYPE = TEMP_DVO_RESULTS; 75 if (!strcasecmp(argv[N], "dvo.log")) TEMP_TYPE = TEMP_DVO_LOG; 76 if (!strcasecmp(argv[N], "relastro.catalog")) TEMP_TYPE = TEMP_RELASTRO_CATALOG; 77 if (!strcasecmp(argv[N], "relphot.catalog")) TEMP_TYPE = TEMP_RELPHOT_CATALOG; 78 if (!strcasecmp(argv[N], "relastro.catfull")) TEMP_TYPE = TEMP_RELASTRO_CAT_FULL; 79 if (!strcasecmp(argv[N], "checkastro.catfull"))TEMP_TYPE = TEMP_CHECKASTRO_CAT_FULL; 80 if (!strcasecmp(argv[N], "relphot.catfull")) TEMP_TYPE = TEMP_RELPHOT_CAT_FULL; 81 if (!strcasecmp(argv[N], "relphot.log")) TEMP_TYPE = TEMP_RELPHOT_LOG; 82 if (!strcasecmp(argv[N], "dvopsps.det")) TEMP_TYPE = TEMP_DVOPSPS_DET; 83 if (!strcasecmp(argv[N], "fixstkids.results")) TEMP_TYPE = TEMP_FIXSTKIDS_RESULTS; 84 if (TEMP_TYPE == TEMP_NONE) { 85 gprint (GP_ERR, "USAGE: hosts purge-temp [-type (type)]\n"); 86 gprint (GP_ERR, " allowed types dvo.results, dvo.log, relphot.catalog, relphot.log, relphot.catfull, relastro.catalog, relastro.catfull, checkastro.catfull, dvopsps.det, fixstkids.results]\n"); 87 return FALSE; 88 } 74 if (!strcasecmp(argv[N], "dvo.results")) TEMP_TYPE = TEMP_DVO_RESULTS; 75 if (!strcasecmp(argv[N], "dvo.log")) TEMP_TYPE = TEMP_DVO_LOG; 76 if (!strcasecmp(argv[N], "relphot.catalog")) TEMP_TYPE = TEMP_RELPHOT_CATALOG; 77 if (!strcasecmp(argv[N], "relphot.catalog.subset")) TEMP_TYPE = TEMP_RELPHOT_CAT_SUBSET; 78 if (!strcasecmp(argv[N], "relastro.catalog")) TEMP_TYPE = TEMP_RELASTRO_CATALOG; 79 if (!strcasecmp(argv[N], "relastro.catalog.subset")) TEMP_TYPE = TEMP_RELASTRO_CAT_SUBSET; 80 if (!strcasecmp(argv[N], "checkastro.catalog")) TEMP_TYPE = TEMP_CHECKASTRO_CATALOG; 81 if (!strcasecmp(argv[N], "relphot.log")) TEMP_TYPE = TEMP_RELPHOT_LOG; 82 if (!strcasecmp(argv[N], "dvopsps.det")) TEMP_TYPE = TEMP_DVOPSPS_DET; 83 if (!strcasecmp(argv[N], "fixstkids.results")) TEMP_TYPE = TEMP_FIXSTKIDS_RESULTS; 84 } 85 if (TEMP_TYPE == TEMP_NONE) { 86 gprint (GP_ERR, "USAGE: hosts purge-temp [-type (type)]\n"); 87 gprint (GP_ERR, " allowed types: dvo.results, dvo.log\n"); 88 gprint (GP_ERR, " relphot.catalog, relphot.catalog.subset, relphot.log\n"); 89 gprint (GP_ERR, " relastro.catalog, relastro.catalog.subset\n"); 90 gprint (GP_ERR, " checkastro.catalog, dvopsps.det, fixstkids.results\n"); 91 return FALSE; 89 92 remove_argument (N, &argc, argv); 90 93 } … … 108 111 109 112 if (argc != 2) { 110 gprint (GP_ERR, "USAGE: hosts purge-temp [-all-pid] [-old-pid PID] [-verbose] [-commit]\n"); 113 gprint (GP_ERR, "USAGE: hosts purge-temp -type type [options] : delete all tempfiles for this shell\n"); 114 gprint (GP_ERR, " [-old-pid] [-all-pid] [-v] [-verbose]\n"); 115 gprint (GP_ERR, " [-commit] [-age hours]\n"); 111 116 return FALSE; 112 117 } … … 119 124 char name[DVO_MAX_PATH]; 120 125 if (ALL_PID) { 121 if (TEMP_TYPE == TEMP_DVO_RESULTS) snprintf (name, DVO_MAX_PATH, "%s/dvo.results.*.fits", table->hosts[i].pathname);122 if (TEMP_TYPE == TEMP_DVO_LOG) snprintf (name, DVO_MAX_PATH, "%s/dvo.results.*.fits.log", table->hosts[i].pathname);123 if (TEMP_TYPE == TEMP_REL ASTRO_CATALOG) snprintf (name, DVO_MAX_PATH, "%s/relastro.catalog.subset.dat", table->hosts[i].pathname);124 if (TEMP_TYPE == TEMP_RELPHOT_CAT ALOG)snprintf (name, DVO_MAX_PATH, "%s/relphot.catalog.subset.dat", table->hosts[i].pathname);125 if (TEMP_TYPE == TEMP_RELPHOT_LOG) snprintf (name, DVO_MAX_PATH, "%s/log.rlpc.*", table->hosts[i].pathname);126 if (TEMP_TYPE == TEMP_RELASTRO_CAT _FULL)snprintf (name, DVO_MAX_PATH, "%s/relastro.catalog.?????.?????.dat", table->hosts[i].pathname);127 if (TEMP_TYPE == TEMP_ CHECKASTRO_CAT_FULL) snprintf (name, DVO_MAX_PATH, "%s/checkastro.catalog.?????.?????.dat", table->hosts[i].pathname);128 if (TEMP_TYPE == TEMP_ RELPHOT_CAT_FULL) snprintf (name, DVO_MAX_PATH, "%s/relphot.catalog.?????.?????.dat", table->hosts[i].pathname);129 if (TEMP_TYPE == TEMP_DVOPSPS_DET) snprintf (name, DVO_MAX_PATH, "%s/dvopsps.*.det.dat", table->hosts[i].pathname);130 if (TEMP_TYPE == TEMP_FIXSTKIDS_RESULTS) snprintf (name, DVO_MAX_PATH, "%s/fixstkids.results.*.dat", table->hosts[i].pathname);126 if (TEMP_TYPE == TEMP_DVO_RESULTS) snprintf (name, DVO_MAX_PATH, "%s/dvo.results.*.fits", table->hosts[i].pathname); 127 if (TEMP_TYPE == TEMP_DVO_LOG) snprintf (name, DVO_MAX_PATH, "%s/dvo.results.*.fits.log", table->hosts[i].pathname); 128 if (TEMP_TYPE == TEMP_RELPHOT_CATALOG) snprintf (name, DVO_MAX_PATH, "%s/relphot.catalog.?????.?????.dat", table->hosts[i].pathname); 129 if (TEMP_TYPE == TEMP_RELPHOT_CAT_SUBSET) snprintf (name, DVO_MAX_PATH, "%s/relphot.catalog.subset.dat", table->hosts[i].pathname); 130 if (TEMP_TYPE == TEMP_RELPHOT_LOG) snprintf (name, DVO_MAX_PATH, "%s/log.rlpc.*", table->hosts[i].pathname); 131 if (TEMP_TYPE == TEMP_RELASTRO_CATALOG) snprintf (name, DVO_MAX_PATH, "%s/relastro.catalog.?????.?????.dat", table->hosts[i].pathname); 132 if (TEMP_TYPE == TEMP_RELASTRO_CAT_SUBSET) snprintf (name, DVO_MAX_PATH, "%s/relastro.catalog.subset.dat", table->hosts[i].pathname); 133 if (TEMP_TYPE == TEMP_CHECKASTRO_CATALOG) snprintf (name, DVO_MAX_PATH, "%s/checkastro.catalog.?????.?????.dat", table->hosts[i].pathname); 134 if (TEMP_TYPE == TEMP_DVOPSPS_DET) snprintf (name, DVO_MAX_PATH, "%s/dvopsps.*.det.dat", table->hosts[i].pathname); 135 if (TEMP_TYPE == TEMP_FIXSTKIDS_RESULTS) snprintf (name, DVO_MAX_PATH, "%s/fixstkids.results.*.dat", table->hosts[i].pathname); 131 136 } else { 132 if (TEMP_TYPE == TEMP_DVO_RESULTS) snprintf (name, DVO_MAX_PATH, "%s/dvo.results.%05d.*.fits", table->hosts[i].pathname, PID);133 if (TEMP_TYPE == TEMP_DVO_LOG) snprintf (name, DVO_MAX_PATH, "%s/dvo.results.%05d.*.fits.log", table->hosts[i].pathname, PID);134 if (TEMP_TYPE == TEMP_REL ASTRO_CATALOG) snprintf (name, DVO_MAX_PATH, "%s/relastro.catalog.subset.dat", table->hosts[i].pathname);135 if (TEMP_TYPE == TEMP_RELPHOT_CAT ALOG)snprintf (name, DVO_MAX_PATH, "%s/relphot.catalog.subset.dat", table->hosts[i].pathname);136 if (TEMP_TYPE == TEMP_RELPHOT_LOG) snprintf (name, DVO_MAX_PATH, "%s/log.rlpc.*", table->hosts[i].pathname);137 if (TEMP_TYPE == TEMP_RELASTRO_CAT _FULL)snprintf (name, DVO_MAX_PATH, "%s/relastro.catalog.%05d.?????.dat", table->hosts[i].pathname, PID);138 if (TEMP_TYPE == TEMP_ CHECKASTRO_CAT_FULL) snprintf (name, DVO_MAX_PATH, "%s/checkastro.catalog.%05d.?????.dat", table->hosts[i].pathname, PID);139 if (TEMP_TYPE == TEMP_ RELPHOT_CAT_FULL) snprintf (name, DVO_MAX_PATH, "%s/relphot.catalog.%05d.?????.dat", table->hosts[i].pathname, PID);140 if (TEMP_TYPE == TEMP_DVOPSPS_DET) snprintf (name, DVO_MAX_PATH, "%s/dvopsps.%05d.*.det.dat", table->hosts[i].pathname, PID);141 if (TEMP_TYPE == TEMP_FIXSTKIDS_RESULTS) snprintf (name, DVO_MAX_PATH, "%s/fixstkids.results.%05d.*.dat", table->hosts[i].pathname, PID);137 if (TEMP_TYPE == TEMP_DVO_RESULTS) snprintf (name, DVO_MAX_PATH, "%s/dvo.results.%05d.*.fits", table->hosts[i].pathname, PID); 138 if (TEMP_TYPE == TEMP_DVO_LOG) snprintf (name, DVO_MAX_PATH, "%s/dvo.results.%05d.*.fits.log", table->hosts[i].pathname, PID); 139 if (TEMP_TYPE == TEMP_RELPHOT_CATALOG) snprintf (name, DVO_MAX_PATH, "%s/relphot.catalog.%05d.?????.dat", table->hosts[i].pathname, PID); 140 if (TEMP_TYPE == TEMP_RELPHOT_CAT_SUBSET) snprintf (name, DVO_MAX_PATH, "%s/relphot.catalog.subset.dat", table->hosts[i].pathname); 141 if (TEMP_TYPE == TEMP_RELPHOT_LOG) snprintf (name, DVO_MAX_PATH, "%s/log.rlpc.*", table->hosts[i].pathname); 142 if (TEMP_TYPE == TEMP_RELASTRO_CATALOG) snprintf (name, DVO_MAX_PATH, "%s/relastro.catalog.%05d.?????.dat", table->hosts[i].pathname, PID); 143 if (TEMP_TYPE == TEMP_RELASTRO_CAT_SUBSET) snprintf (name, DVO_MAX_PATH, "%s/relastro.catalog.subset.dat", table->hosts[i].pathname); 144 if (TEMP_TYPE == TEMP_CHECKASTRO_CATALOG) snprintf (name, DVO_MAX_PATH, "%s/checkastro.catalog.%05d.?????.dat", table->hosts[i].pathname, PID); 145 if (TEMP_TYPE == TEMP_DVOPSPS_DET) snprintf (name, DVO_MAX_PATH, "%s/dvopsps.%05d.*.det.dat", table->hosts[i].pathname, PID); 146 if (TEMP_TYPE == TEMP_FIXSTKIDS_RESULTS) snprintf (name, DVO_MAX_PATH, "%s/fixstkids.results.%05d.*.dat", table->hosts[i].pathname, PID); 142 147 } 143 148 if (VERBOSE) gprint (GP_ERR, "checking %s\n", name);
Note:
See TracChangeset
for help on using the changeset viewer.
