| 1 | // **************************************************************************
|
|---|
| 2 | /** @class FitsFile
|
|---|
| 3 |
|
|---|
| 4 | @brief FITS writter for the FACT project.
|
|---|
| 5 |
|
|---|
| 6 | The FactFits class is able to open, manage and update FITS files.
|
|---|
| 7 |
|
|---|
| 8 | The file columns should be given to the class before the file is openned. Once
|
|---|
| 9 | a file has been created, the structure of its columns cannot be changed. Only
|
|---|
| 10 | row can be added.
|
|---|
| 11 |
|
|---|
| 12 | This class relies on the CCfits and CFitsIO packages.
|
|---|
| 13 |
|
|---|
| 14 | */
|
|---|
| 15 | // **************************************************************************
|
|---|
| 16 | #include "FitsFile.h"
|
|---|
| 17 |
|
|---|
| 18 | //#include "Time.h"
|
|---|
| 19 | //#include "Converter.h"
|
|---|
| 20 | //#include "MessageImp.h"
|
|---|
| 21 |
|
|---|
| 22 | using namespace std;
|
|---|
| 23 | using namespace CCfits;
|
|---|
| 24 |
|
|---|
| 25 | bool FitsFile::WriteDefaultKeys(const string &prgname, float version)
|
|---|
| 26 | {
|
|---|
| 27 | if (!fTable)
|
|---|
| 28 | return false;
|
|---|
| 29 |
|
|---|
| 30 | try
|
|---|
| 31 | {
|
|---|
| 32 | const Time now;
|
|---|
| 33 | WriteKey("TELESCOP", "FACT", "Telescope that acquired this data");
|
|---|
| 34 | WriteKey("PACKAGE", PACKAGE_NAME, "Package name");
|
|---|
| 35 | WriteKey("VERSION", PACKAGE_VERSION, "Package description");
|
|---|
| 36 | WriteKey("CREATOR", prgname, "Program that wrote this file (FACT++ datalogger)");
|
|---|
| 37 | WriteKey("EXTREL", version, "Release Number");
|
|---|
| 38 | WriteKey("COMPILED", __DATE__" "__TIME__, "Compile time");
|
|---|
| 39 | WriteKey("REVISION", REVISION, "SVN revision");
|
|---|
| 40 | WriteKey("ORIGIN", "ISDC", "Institution that wrote the file");
|
|---|
| 41 | WriteKey("DATE", now.Iso(), "File creation date");
|
|---|
| 42 | WriteKey("NIGHT", now.NightAsInt(), "Night as int");
|
|---|
| 43 | WriteKey("TIMESYS", "UTC", "Time systen");
|
|---|
| 44 |
|
|---|
| 45 | //WriteKey("CONTACT", PACKAGE_BUGREPORT, "Current package maintainer");
|
|---|
| 46 | //WriteKey("URL", PACKAGE_URL, "Current repositiory location");
|
|---|
| 47 | }
|
|---|
| 48 | catch (const CCfits::FitsException &e)
|
|---|
| 49 | {
|
|---|
| 50 | Error("CCfits::Table::addKey failed for '"+fTable->name()+"' in '"+fFile->name()+"': "+e.message());
|
|---|
| 51 | return false;
|
|---|
| 52 | }
|
|---|
| 53 |
|
|---|
| 54 | return true;
|
|---|
| 55 | }
|
|---|
| 56 |
|
|---|
| 57 | // --------------------------------------------------------------------------
|
|---|
| 58 | //
|
|---|
| 59 | //! Add a new column to the vectors storing the column data.
|
|---|
| 60 | //! @param names the vector of string storing the columns names
|
|---|
| 61 | //! @param types the vector of string storing the FITS data format
|
|---|
| 62 | //! @param numElems the number of elements in this column
|
|---|
| 63 | //! @param type the char describing the FITS data format
|
|---|
| 64 | //! @param name the name of the particular column to be added.
|
|---|
| 65 | //
|
|---|
| 66 | void FitsFile::AddColumn(char type, const string &name, int numElems, const string &unit)
|
|---|
| 67 | {
|
|---|
| 68 | fColNames.push_back(name);
|
|---|
| 69 | fColUnits.push_back(unit);
|
|---|
| 70 |
|
|---|
| 71 | ostringstream str;
|
|---|
| 72 | if (numElems != 1)
|
|---|
| 73 | str << numElems;
|
|---|
| 74 |
|
|---|
| 75 | switch (toupper(type))
|
|---|
| 76 | {
|
|---|
| 77 | case 'B': str << 'L'; break; // logical
|
|---|
| 78 | case 'C': str << 'B'; break; // byte
|
|---|
| 79 | case 'S': str << 'I'; break; // short
|
|---|
| 80 | case 'I': str << 'J'; break; // int
|
|---|
| 81 | case 'X': str << 'K'; break; // long long
|
|---|
| 82 | case 'F': str << 'E'; break; // float
|
|---|
| 83 | case 'D': str << 'D'; break; // double
|
|---|
| 84 | }
|
|---|
| 85 |
|
|---|
| 86 | fColTypes.push_back(str.str());
|
|---|
| 87 | }
|
|---|
| 88 |
|
|---|
| 89 | void FitsFile::AddColumn(const string &name, const string &format, const string &unit)
|
|---|
| 90 | {
|
|---|
| 91 | fColNames.push_back(name);
|
|---|
| 92 | fColUnits.push_back(unit);
|
|---|
| 93 | fColTypes.push_back(format);
|
|---|
| 94 | }
|
|---|
| 95 |
|
|---|
| 96 | bool FitsFile::OpenFile(const string &filename, bool allow_open)
|
|---|
| 97 | {
|
|---|
| 98 | if (fFile || fTable)
|
|---|
| 99 | {
|
|---|
| 100 | Error("FitsFile::OpenFile - File already open.");
|
|---|
| 101 | return false;
|
|---|
| 102 | }
|
|---|
| 103 |
|
|---|
| 104 | // fFileName = fileName;
|
|---|
| 105 | if (!allow_open && access(filename.c_str(), F_OK)==0)
|
|---|
| 106 | {
|
|---|
| 107 | Error("File '"+filename+"' already existing.");
|
|---|
| 108 | return false;
|
|---|
| 109 | }
|
|---|
| 110 |
|
|---|
| 111 | //create the FITS object
|
|---|
| 112 | try
|
|---|
| 113 | {
|
|---|
| 114 | fFile = new CCfits::FITS(filename, CCfits::RWmode::Write);
|
|---|
| 115 | }
|
|---|
| 116 | catch (CCfits::FitsException e)
|
|---|
| 117 | {
|
|---|
| 118 | Error("CCfits::FITS failed for '"+filename+"': "+e.message());
|
|---|
| 119 | return false;
|
|---|
| 120 | }
|
|---|
| 121 |
|
|---|
| 122 | /*
|
|---|
| 123 | "SIMPLE = T / file does conform to FITS standard "
|
|---|
| 124 | "BITPIX = 8 / number of bits per data pixel "
|
|---|
| 125 | "NAXIS = 0 / number of data axes "
|
|---|
| 126 | "EXTEND = T / FITS dataset may contain extensions "
|
|---|
| 127 | "COMMENT FITS (Flexible Image Transport System) format is defined in 'Astronomy"
|
|---|
| 128 | "COMMENT and Astrophysics', volume 376, page 359; bibcode: 2001A&A...376..359H "
|
|---|
| 129 | "END ";
|
|---|
| 130 | */
|
|---|
| 131 |
|
|---|
| 132 | fIsOwner = true;
|
|---|
| 133 |
|
|---|
| 134 | return true;
|
|---|
| 135 | }
|
|---|
| 136 |
|
|---|
| 137 | void FitsFile::ResetColumns()
|
|---|
| 138 | {
|
|---|
| 139 | fColNames.clear();
|
|---|
| 140 | fColTypes.clear();
|
|---|
| 141 | fColUnits.clear();
|
|---|
| 142 | }
|
|---|
| 143 |
|
|---|
| 144 | bool FitsFile::SetFile(CCfits::FITS *file)
|
|---|
| 145 | {
|
|---|
| 146 | if (!file)
|
|---|
| 147 | {
|
|---|
| 148 | Error("Fits::SetFile failed: NULL argument.");
|
|---|
| 149 | return false;
|
|---|
| 150 | }
|
|---|
| 151 |
|
|---|
| 152 | if (fFile)
|
|---|
| 153 | {
|
|---|
| 154 | Error("Fits::SetFile failed: File already set.");
|
|---|
| 155 | return false;
|
|---|
| 156 | }
|
|---|
| 157 |
|
|---|
| 158 | fFile = file;
|
|---|
| 159 | fIsOwner = false;
|
|---|
| 160 |
|
|---|
| 161 | return true;
|
|---|
| 162 | }
|
|---|
| 163 |
|
|---|
| 164 | bool FitsFile::OpenTable(const string &tablename)
|
|---|
| 165 | {
|
|---|
| 166 | if (!fFile)
|
|---|
| 167 | {
|
|---|
| 168 | Error("FitsFile::OpenTable - No file open.");
|
|---|
| 169 | return false;
|
|---|
| 170 | }
|
|---|
| 171 | if (fTable)
|
|---|
| 172 | {
|
|---|
| 173 | Error("FitsFile::OpenTable - Table already open.");
|
|---|
| 174 | return false;
|
|---|
| 175 | }
|
|---|
| 176 |
|
|---|
| 177 | //actually create the table
|
|---|
| 178 | CCfits::Table *table = 0;
|
|---|
| 179 | try
|
|---|
| 180 | {
|
|---|
| 181 | table = fFile->addTable(tablename, 0, fColNames, fColTypes, fColUnits);
|
|---|
| 182 | }
|
|---|
| 183 | catch (const CCfits::FitsException &e)
|
|---|
| 184 | {
|
|---|
| 185 | Error("CCfits::Table::addTable failed for '"+tablename+"' in '"+fFile->name()+"': "+e.message());
|
|---|
| 186 | return false;
|
|---|
| 187 | }
|
|---|
| 188 |
|
|---|
| 189 | if (table->rows() != 0)
|
|---|
| 190 | {
|
|---|
| 191 | Error("FITS table '"+tablename+"' created in '"+fFile->name()+"' on the fly looks non-empty.");
|
|---|
| 192 | return false;
|
|---|
| 193 | }
|
|---|
| 194 |
|
|---|
| 195 | // Set this as last - we use it for IsOpen()
|
|---|
| 196 | fTable = table;
|
|---|
| 197 | fNumRows = 0;
|
|---|
| 198 |
|
|---|
| 199 | return true;
|
|---|
| 200 | }
|
|---|
| 201 |
|
|---|
| 202 | // --------------------------------------------------------------------------
|
|---|
| 203 | //
|
|---|
| 204 | //! This looks for a suitable table in the fits file, i.e. that corresponds to the name and column names. (no format check yet)
|
|---|
| 205 | //! @param tableName. the base table name to be obtained. If not suitable, numbers are appened to the name
|
|---|
| 206 | //! @param allNames. the name of all columns
|
|---|
| 207 | //! @param allDataTypes. the data types of all columns
|
|---|
| 208 | //! @param allUnits. the units of the columns
|
|---|
| 209 | //! @return a pointer to the newly retrieved/created table
|
|---|
| 210 | //
|
|---|
| 211 | bool FitsFile::OpenNewTable(const string &tableName, int maxtry)
|
|---|
| 212 | {
|
|---|
| 213 | if (!fFile)
|
|---|
| 214 | {
|
|---|
| 215 | Error("FitsFile::OpenNewTable - No file open.");
|
|---|
| 216 | return false;
|
|---|
| 217 | }
|
|---|
| 218 |
|
|---|
| 219 | if (fTable)
|
|---|
| 220 | {
|
|---|
| 221 | Error("FitsFile::OpenNewTable - Table already open.");
|
|---|
| 222 | return false;
|
|---|
| 223 | }
|
|---|
| 224 |
|
|---|
| 225 | //first, let's check if the table already exist in the file
|
|---|
| 226 | fFile->read(vector<string>(1, tableName));
|
|---|
| 227 |
|
|---|
| 228 | // FIXME: Check for fFile and fTable
|
|---|
| 229 | const multimap<string, CCfits::ExtHDU *> &extMap = fFile->extension();
|
|---|
| 230 |
|
|---|
| 231 | for (int i=0; i<maxtry; i++)
|
|---|
| 232 | {
|
|---|
| 233 | //if (i==10)
|
|---|
| 234 | // fMess->Warn("Already 10 different tables with different formats exist in this file. Please consider re-creating the file entirely (i.e. delete it please)");
|
|---|
| 235 |
|
|---|
| 236 | ostringstream str;
|
|---|
| 237 | str << tableName;
|
|---|
| 238 | if (i != 0)
|
|---|
| 239 | str << "-" << i;
|
|---|
| 240 |
|
|---|
| 241 | const string tname = str.str();
|
|---|
| 242 |
|
|---|
| 243 | const multimap<string,CCfits::ExtHDU*>::const_iterator it = extMap.find(tname);
|
|---|
| 244 |
|
|---|
| 245 | //current table name does not exist yet. return its associated fits table newly created
|
|---|
| 246 | if (it == extMap.end())
|
|---|
| 247 | {
|
|---|
| 248 | // What is this for?
|
|---|
| 249 | //for (multimap<string, CCfits::ExtHDU*>::const_iterator it=extMap.begin();
|
|---|
| 250 | // it!= extMap.end(); it++)
|
|---|
| 251 | // fMess->Debug(it->first);
|
|---|
| 252 |
|
|---|
| 253 | return OpenTable(tname);
|
|---|
| 254 | }
|
|---|
| 255 |
|
|---|
| 256 | CCfits::Table *table = dynamic_cast<CCfits::Table*>(it->second);
|
|---|
| 257 |
|
|---|
| 258 | // something wrong happened while getting the table pointer
|
|---|
| 259 | if (!table)
|
|---|
| 260 | {
|
|---|
| 261 | Error("HDU '"+tname+"' found in file, but it is not a proper CCfits::Table.");
|
|---|
| 262 | return false;
|
|---|
| 263 | }
|
|---|
| 264 |
|
|---|
| 265 | //now check that the table columns are the same
|
|---|
| 266 | //as the service columns
|
|---|
| 267 | table->makeThisCurrent();
|
|---|
| 268 |
|
|---|
| 269 | // FIXME: To be checked...
|
|---|
| 270 | /*
|
|---|
| 271 | const map<string, Column*> cMap = table->column();
|
|---|
| 272 | for (vector<string>::const_iterator ii=fFile->fColNames;
|
|---|
| 273 | ii!=fFile->fColNames.end(); ii++)
|
|---|
| 274 | if (cMap.find(*ii) == cMap.end())
|
|---|
| 275 | continue;
|
|---|
| 276 | */
|
|---|
| 277 |
|
|---|
| 278 | fNumRows = table->rows();
|
|---|
| 279 |
|
|---|
| 280 | // ----------- This is just a simple sanity check ----------
|
|---|
| 281 |
|
|---|
| 282 | // This is not necessary this is done already in
|
|---|
| 283 | // findSuitableTable (either directly or indirectly through OpenTable)
|
|---|
| 284 | // fFile->fTable->makeThisCurrent();
|
|---|
| 285 |
|
|---|
| 286 | //If the file already existed, then we must load its data to memory before writing to it.
|
|---|
| 287 | if (fNumRows>0)
|
|---|
| 288 | {
|
|---|
| 289 | CCfits::BinTable* bTable = dynamic_cast<CCfits::BinTable*>(table);
|
|---|
| 290 | if (!bTable)
|
|---|
| 291 | {
|
|---|
| 292 | Error("Table '"+tableName+"' found in '"+fFile->name()+"' is not a binary table.");
|
|---|
| 293 | return false;
|
|---|
| 294 | }
|
|---|
| 295 |
|
|---|
| 296 | //read the table binary data.
|
|---|
| 297 | vector<string> colName;
|
|---|
| 298 | bTable->readData(true, colName);
|
|---|
| 299 |
|
|---|
| 300 | // double check that the data was indeed read from the disk.
|
|---|
| 301 | // Go through the fTable instead as colName is empty (yes, it is !)
|
|---|
| 302 | const map<string,CCfits::Column*> &cMap = table->column();
|
|---|
| 303 |
|
|---|
| 304 | for (map<string,CCfits::Column*>::const_iterator cMapIt = cMap.begin();
|
|---|
| 305 | cMapIt != cMap.end(); cMapIt++)
|
|---|
| 306 | {
|
|---|
| 307 | if (!cMapIt->second->isRead())
|
|---|
| 308 | {
|
|---|
| 309 | Error("Reading column '"+cMapIt->first+"' back from '"+fFile->name()+"' failed.");
|
|---|
| 310 | return false;
|
|---|
| 311 | }
|
|---|
| 312 | }
|
|---|
| 313 | }
|
|---|
| 314 |
|
|---|
| 315 | // Set this as last - we use it for IsOpen()
|
|---|
| 316 | fTable = table;
|
|---|
| 317 |
|
|---|
| 318 | return true;
|
|---|
| 319 | }
|
|---|
| 320 |
|
|---|
| 321 | ostringstream str;
|
|---|
| 322 | str << "FitsFile::OpenNewTable failed - more than " << maxtry << " tables tried." << endl;
|
|---|
| 323 | Error(str);
|
|---|
| 324 |
|
|---|
| 325 | return false;
|
|---|
| 326 | }
|
|---|
| 327 |
|
|---|
| 328 | bool FitsFile::AddRow()
|
|---|
| 329 | {
|
|---|
| 330 | if (!fFile || !fTable)
|
|---|
| 331 | {
|
|---|
| 332 | Error("FitsFile::AddRow - No table open.");
|
|---|
| 333 | return false;
|
|---|
| 334 | }
|
|---|
| 335 |
|
|---|
| 336 | //insert a new row (1==number of rows to insert)
|
|---|
| 337 | int status(0);
|
|---|
| 338 | fits_insert_rows(fFile->fitsPointer(), fNumRows, 1, &status);
|
|---|
| 339 |
|
|---|
| 340 | // Status is also directly returned, but we need to give the
|
|---|
| 341 | // pointer anyway
|
|---|
| 342 | if (status)
|
|---|
| 343 | {
|
|---|
| 344 | char text[30];//max length of cfitsio error strings (from doc)
|
|---|
| 345 | fits_get_errstatus(status, text);
|
|---|
| 346 |
|
|---|
| 347 | ostringstream str;
|
|---|
| 348 | str << "Inserting row " << fNumRows << " failed in '"+fFile->name()+"': " << text << " (fits_insert_rows,rc=" << status << ")";
|
|---|
| 349 | Error(str);
|
|---|
| 350 |
|
|---|
| 351 | return false;
|
|---|
| 352 | }
|
|---|
| 353 |
|
|---|
| 354 | fNumRows++;
|
|---|
| 355 | fCursor = 1;
|
|---|
| 356 |
|
|---|
| 357 | return true;
|
|---|
| 358 | }
|
|---|
| 359 |
|
|---|
| 360 | bool FitsFile::WriteData(size_t &start, const void *ptr, size_t size)
|
|---|
| 361 | {
|
|---|
| 362 | if (!fFile || !fTable)
|
|---|
| 363 | {
|
|---|
| 364 | Error("FitsFile::AddRow - No table open.");
|
|---|
| 365 | return false;
|
|---|
| 366 | }
|
|---|
| 367 |
|
|---|
| 368 | int status = 0;
|
|---|
| 369 | fits_write_tblbytes(fFile->fitsPointer(), fNumRows, start, size,
|
|---|
| 370 | (unsigned char*)ptr, &status);
|
|---|
| 371 |
|
|---|
| 372 | // Status is also directly returned, but we need to give the
|
|---|
| 373 | // pointer anyway
|
|---|
| 374 | if (status)
|
|---|
| 375 | {
|
|---|
| 376 | char text[30];//max length of cfitsio error strings (from doc)
|
|---|
| 377 | fits_get_errstatus(status, text);
|
|---|
| 378 |
|
|---|
| 379 | ostringstream str;
|
|---|
| 380 | str << "Writing row " << fNumRows << " failed in '"+fFile->name()+"': " << text << " (file_write_tblbytes,rc=" << status << ")";
|
|---|
| 381 | Error(str);
|
|---|
| 382 | }
|
|---|
| 383 |
|
|---|
| 384 | start += size;
|
|---|
| 385 | return status==0;
|
|---|
| 386 | }
|
|---|
| 387 |
|
|---|
| 388 | void FitsFile::Close()
|
|---|
| 389 | {
|
|---|
| 390 | if (!fFile)
|
|---|
| 391 | return;
|
|---|
| 392 |
|
|---|
| 393 | if (fIsOwner)
|
|---|
| 394 | {
|
|---|
| 395 | const string name = fFile->name();
|
|---|
| 396 | delete fFile;
|
|---|
| 397 | }
|
|---|
| 398 |
|
|---|
| 399 | //WARNING: do NOT delete the table as it gets deleted by the
|
|---|
| 400 | // fFile object
|
|---|
| 401 | fFile = NULL;
|
|---|
| 402 | fTable = NULL;
|
|---|
| 403 | }
|
|---|
| 404 |
|
|---|
| 405 | size_t FitsFile::GetDataSize() const
|
|---|
| 406 | {
|
|---|
| 407 | size_t size = 0;
|
|---|
| 408 |
|
|---|
| 409 | for (vector<string>::const_iterator it=fColTypes.begin();
|
|---|
| 410 | it!=fColTypes.end(); it++)
|
|---|
| 411 | {
|
|---|
| 412 | size_t id=0;
|
|---|
| 413 |
|
|---|
| 414 | int n=1;
|
|---|
| 415 | try { n = stoi(*it, &id); }
|
|---|
| 416 | catch (const exception&) { }
|
|---|
| 417 |
|
|---|
| 418 | if (n==0)
|
|---|
| 419 | continue;
|
|---|
| 420 |
|
|---|
| 421 | switch ((*it)[id])
|
|---|
| 422 | {
|
|---|
| 423 | case 'L':
|
|---|
| 424 | case 'B': size += n*1; break; // logical/byte
|
|---|
| 425 | case 'I': size += n*2; break; // short
|
|---|
| 426 | case 'J': size += n*4; break; // int
|
|---|
| 427 | case 'K': size += n*8; break; // long long
|
|---|
| 428 | case 'E': size += n*4; break; // float
|
|---|
| 429 | case 'D': size += n*8; break; // double
|
|---|
| 430 | default:
|
|---|
| 431 | throw runtime_error("FitsFile::GetDataSize - id not known.");
|
|---|
| 432 | }
|
|---|
| 433 | }
|
|---|
| 434 |
|
|---|
| 435 | return size;
|
|---|
| 436 | }
|
|---|