Changeset 5519
- Timestamp:
- Nov 15, 2005, 12:20:17 PM (21 years ago)
- Location:
- trunk/psLib
- Files:
-
- 6 edited
-
src/astro/psEarthOrientation.c (modified) (9 diffs)
-
src/fits/psFitsTable.c (modified) (4 diffs)
-
src/types/psMetadata.c (modified) (5 diffs)
-
test/fits/tst_psFits.c (modified) (6 diffs)
-
test/types/tst_psMetadata_04.c (modified) (4 diffs)
-
test/types/tst_psMetadata_07.c (modified) (2 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/psLib/src/astro/psEarthOrientation.c
r5513 r5519 8 8 * @author Robert Daniel DeSonia, MHPCC 9 9 * 10 * @version $Revision: 1.1 3$ $Name: not supported by cvs2svn $11 * @date $Date: 2005-11-1 4 23:44:35$10 * @version $Revision: 1.14 $ $Name: not supported by cvs2svn $ 11 * @date $Date: 2005-11-15 22:19:29 $ 12 12 * 13 13 * Copyright 2005 Maui High Performance Computing Center, University of Hawaii … … 86 86 bool success = false; 87 87 // Get table format 88 char* tableFormat = psMetadataLookup Ptr(&success, eocMetadata, "psLib.eoc.precession.table.format");88 char* tableFormat = psMetadataLookupStr(&success, eocMetadata, "psLib.eoc.precession.table.format"); 89 89 if(! success || tableFormat == NULL) { 90 90 psError(PS_ERR_BAD_PARAMETER_VALUE, true, PS_ERRORTEXT_psTime_LOOKUP_METADATA_FAILED, … … 93 93 } 94 94 95 char* xTableName = psMetadataLookup Ptr(&success, eocMetadata, "psLib.eoc.precession.table.file.x");95 char* xTableName = psMetadataLookupStr(&success, eocMetadata, "psLib.eoc.precession.table.file.x"); 96 96 if(! success || xTableName == NULL) { 97 psFree(tableFormat); 97 98 psError(PS_ERR_BAD_PARAMETER_VALUE, true, PS_ERRORTEXT_psTime_LOOKUP_METADATA_FAILED, 98 99 "psLib.eoc.precession.x.file"); … … 100 101 } 101 102 102 char* yTableName = psMetadataLookup Ptr(&success, eocMetadata, "psLib.eoc.precession.table.file.y");103 char* yTableName = psMetadataLookupStr(&success, eocMetadata, "psLib.eoc.precession.table.file.y"); 103 104 if(! success || yTableName == NULL) { 105 psFree(tableFormat); 106 psFree(xTableName); 104 107 psError(PS_ERR_BAD_PARAMETER_VALUE, true, PS_ERRORTEXT_psTime_LOOKUP_METADATA_FAILED, 105 108 "psLib.eoc.precession.y.file"); … … 107 110 } 108 111 109 char* sTableName = psMetadataLookup Ptr(&success, eocMetadata, "psLib.eoc.precession.table.file.s");112 char* sTableName = psMetadataLookupStr(&success, eocMetadata, "psLib.eoc.precession.table.file.s"); 110 113 if(! success || sTableName == NULL) { 114 psFree(tableFormat); 115 psFree(xTableName); 116 psFree(yTableName); 111 117 psError(PS_ERR_BAD_PARAMETER_VALUE, true, PS_ERRORTEXT_psTime_LOOKUP_METADATA_FAILED, 112 118 "psLib.eoc.precession.s.file"); … … 116 122 yTable = psVectorsReadFromFile(yTableName, tableFormat); 117 123 sTable = psVectorsReadFromFile(sTableName, tableFormat); 124 psFree(tableFormat); 125 psFree(xTableName); 126 psFree(yTableName); 127 psFree(sTableName); 128 118 129 if(xTable == NULL || yTable == NULL || sTable == NULL) { 119 130 // XXX: need to move the error message to the error messages file. … … 131 142 psVector* yCoeff = psMetadataLookupPtr(&success, eocMetadata, "psLib.eoc.precession.poly.y"); 132 143 if(! success || yCoeff == NULL || yCoeff->type.type != PS_TYPE_F64) { 144 psFree(xCoeff); 133 145 psError(PS_ERR_BAD_PARAMETER_VALUE, true, PS_ERRORTEXT_psTime_LOOKUP_METADATA_FAILED, 134 146 "psLib.eoc.precession.poly.y"); … … 137 149 psVector* sCoeff = psMetadataLookupPtr(&success, eocMetadata, "psLib.eoc.precession.poly.s"); 138 150 if(! success || sCoeff == NULL || sCoeff->type.type != PS_TYPE_F64) { 151 psFree(xCoeff); 152 psFree(yCoeff); 139 153 psError(PS_ERR_BAD_PARAMETER_VALUE, true, PS_ERRORTEXT_psTime_LOOKUP_METADATA_FAILED, 140 154 "psLib.eoc.precession.poly.s"); … … 147 161 sPoly = psPolynomial1DAlloc(sCoeff->n, PS_POLYNOMIAL_ORD); 148 162 memcpy(sPoly->coeff, sCoeff->data.F64,PSELEMTYPE_SIZEOF(PS_TYPE_F64)*sCoeff->n); 163 164 psFree(xCoeff); 165 psFree(yCoeff); 166 psFree(sCoeff); 149 167 150 168 return true; -
trunk/psLib/src/fits/psFitsTable.c
r5511 r5519 7 7 * @author Robert DeSonia, MHPCC 8 8 * 9 * @version $Revision: 1. 1$ $Name: not supported by cvs2svn $10 * @date $Date: 2005-11-1 4 22:18:30$9 * @version $Revision: 1.2 $ $Name: not supported by cvs2svn $ 10 * @date $Date: 2005-11-15 22:20:13 $ 11 11 * 12 12 * Copyright 2004-2005 Maui High Performance Computing Center, University of Hawaii … … 699 699 } 700 700 701 char*extname = NULL;701 psString extname = NULL; 702 702 if (header != NULL) { 703 extname = psMetadataLookup Ptr(NULL, header, "EXTNAME");703 extname = psMetadataLookupStr(NULL, header, "EXTNAME"); 704 704 if ( extname == NULL) { 705 extname = psMetadataLookup Ptr(NULL, header, "HDUNAME");705 extname = psMetadataLookupStr(NULL, header, "HDUNAME"); 706 706 } 707 707 } … … 719 719 psFree(columnNames); 720 720 psFree(columnTypes); 721 psFree(extname); 721 722 722 723 // fill in the table elements with data … … 747 748 psArray* colArray = psArrayAlloc(table->n); 748 749 for (row = 0; row < table->n; row++) { 749 colArray->data[row] = psMemIncrRefCounter( 750 psMetadataLookupStr(NULL, 751 table->data[row], 752 item->name)); 750 colArray->data[row] =psMetadataLookupStr(NULL, 751 table->data[row], 752 item->name); 753 753 } 754 754 fits_write_col_str(fits->fd, -
trunk/psLib/src/types/psMetadata.c
r5517 r5519 12 12 * @author Ross Harman, MHPCC 13 13 * 14 * @version $Revision: 1. 89$ $Name: not supported by cvs2svn $15 * @date $Date: 2005-11-15 2 0:10:32$14 * @version $Revision: 1.90 $ $Name: not supported by cvs2svn $ 15 * @date $Date: 2005-11-15 22:20:14 $ 16 16 * 17 17 * Copyright 2004-2005 Maui High Performance Computing Center, University of Hawaii … … 613 613 return NULL; 614 614 } else { 615 return metadataItem->data.V;615 return psMemIncrRefCounter(metadataItem->data.V); 616 616 } 617 617 } … … 831 831 } 832 832 833 psMetadata *psMetadataLookupMD(bool *status, const834 psMetadata *md,833 psMetadata *psMetadataLookupMD(bool *status, 834 const psMetadata *md, 835 835 const char *key) 836 836 { … … 857 857 *status = true; 858 858 } 859 value = item->data.md; // The requested metadata859 value = psMemIncrRefCounter(item->data.md); // The requested metadata 860 860 } 861 861 return value; … … 890 890 *status = true; 891 891 } 892 // value = item->data.V; // The requested metadata893 892 value = psStringNCopy(item->data.V, strlen(item->data.V) ); 894 893 } -
trunk/psLib/test/fits/tst_psFits.c
r5511 r5519 6 6 * @author Robert DeSonia, MHPCC 7 7 * 8 * @version $Revision: 1.1 2$ $Name: not supported by cvs2svn $9 * @date $Date: 2005-11-1 4 22:18:38$8 * @version $Revision: 1.13 $ $Name: not supported by cvs2svn $ 9 * @date $Date: 2005-11-15 22:20:16 $ 10 10 * 11 11 * Copyright 2004-2005 Maui High Performance Computing Center, University of Hawaii … … 738 738 psF64 dblItem = psMetadataLookupF64(NULL,header, "MYDBL"); 739 739 psMetadataItem* boolItem = psMetadataLookup(header, "MYBOOL"); 740 char* strItem = psMetadataLookupPtr(NULL, header, "MYSTR");740 psString strItem = psMetadataLookupStr(NULL, header, "MYSTR"); 741 741 742 742 if (intItem != hdunum) { … … 773 773 return 24; 774 774 } 775 776 psFree(strItem); 775 777 776 778 psFree(header); … … 858 860 } 859 861 862 psFree(header); 860 863 } 861 864 … … 902 905 } 903 906 907 psFree(header); 904 908 } 905 909 … … 1013 1017 return 26; 1014 1018 } 1019 1020 psFree(strItem); 1021 psFree(vecItem); 1015 1022 } 1016 1023 -
trunk/psLib/test/types/tst_psMetadata_04.c
r5454 r5519 25 25 * @author Ross Harman, MHPCC 26 26 * 27 * @version $Revision: 1. 7$ $Name: not supported by cvs2svn $28 * @date $Date: 2005-1 0-29 00:05:53$27 * @version $Revision: 1.8 $ $Name: not supported by cvs2svn $ 28 * @date $Date: 2005-11-15 22:20:17 $ 29 29 * 30 30 * Copyright 2004-2005 Maui High Performance Computing Center, University of Hawaii … … 197 197 // Test I - Lookup metadata item and return psVector pointer 198 198 printPositiveTestHeader(stdout, "psMetadata", "Test I - Lookup metadata item and return psVector pointer"); 199 psVector *valueVec = NULL; 200 valueVec = psMetadataLookupPtr(&status, metadata, "myItem6"); 199 psVector *valueVec = psMetadataLookupPtr(&status, metadata, "myItem6"); 201 200 if(valueVec != vec) { 202 201 printf("ERROR: Bad vector pointer\n"); … … 206 205 return 17; 207 206 } 207 psFree(valueVec); 208 208 printFooter(stdout, "psMetadata", "Test I - Lookup metadata item and return psVector pointer", true); 209 209 … … 303 303 return 24; 304 304 } 305 psFree(valueVec); 305 306 printFooter(stdout, "psMetadata","Test P - Attempt get psVector value of non-existant metadata item",true); 306 307 -
trunk/psLib/test/types/tst_psMetadata_07.c
r5296 r5519 14 14 * @author David Robbins, MHPCC 15 15 * 16 * @version $Revision: 1.1 3$ $Name: not supported by cvs2svn $17 * @date $Date: 2005-1 0-12 21:52:52$16 * @version $Revision: 1.14 $ $Name: not supported by cvs2svn $ 17 * @date $Date: 2005-11-15 22:20:17 $ 18 18 * 19 19 * Copyright 2004-2005 Maui High Performance Computing Center, University of Hawaii … … 219 219 psFree(item); 220 220 psFree(vecptr); 221 psFree(vecptr2); 221 222 psFree(md); 222 223 return 0;
Note:
See TracChangeset
for help on using the changeset viewer.
