|
Teuchos - Trilinos Tools Package
Version of the Day
|
00001 // @HEADER 00002 // *********************************************************************** 00003 // 00004 // Teuchos: Common Tools Package 00005 // Copyright (2004) Sandia Corporation 00006 // 00007 // Under terms of Contract DE-AC04-94AL85000, there is a non-exclusive 00008 // license for use of this work by or on behalf of the U.S. Government. 00009 // 00010 // Redistribution and use in source and binary forms, with or without 00011 // modification, are permitted provided that the following conditions are 00012 // met: 00013 // 00014 // 1. Redistributions of source code must retain the above copyright 00015 // notice, this list of conditions and the following disclaimer. 00016 // 00017 // 2. Redistributions in binary form must reproduce the above copyright 00018 // notice, this list of conditions and the following disclaimer in the 00019 // documentation and/or other materials provided with the distribution. 00020 // 00021 // 3. Neither the name of the Corporation nor the names of the 00022 // contributors may be used to endorse or promote products derived from 00023 // this software without specific prior written permission. 00024 // 00025 // THIS SOFTWARE IS PROVIDED BY SANDIA CORPORATION "AS IS" AND ANY 00026 // EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 00027 // IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 00028 // PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL SANDIA CORPORATION OR THE 00029 // CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, 00030 // EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, 00031 // PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR 00032 // PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF 00033 // LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING 00034 // NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS 00035 // SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 00036 // 00037 // Questions? Contact Michael A. Heroux (maherou@sandia.gov) 00038 // 00039 // *********************************************************************** 00040 // @HEADER 00041 00042 #include "Teuchos_FileInputStream.hpp" 00043 #include "Teuchos_Assert.hpp" 00044 00045 using namespace Teuchos; 00046 00047 FileInputStream::FileInputStream(const std::string& filename) 00048 : XMLInputStream(), file_(std::fopen(filename.c_str(), "rb")) 00049 { 00050 TEUCHOS_TEST_FOR_EXCEPTION(file_ == NULL, 00051 std::runtime_error, 00052 "FileInputStream ctor failed to open file: " 00053 << filename); 00054 } 00055 00056 unsigned int FileInputStream::readBytes(unsigned char* const toFill, 00057 const unsigned int maxToRead) 00058 { 00059 if ( 00060 #if defined(ICL) || defined(__sgi) 00061 feof(file_) 00062 #else 00063 std::feof(file_) 00064 #endif 00065 ) 00066 return (size_t)0; 00067 int n = std::fread((void*) toFill, sizeof(char), maxToRead, file_); 00068 if (n==0) return (size_t)0; 00069 00070 const bool 00071 is_eof 00072 #if defined(ICL) || defined(__sgi) 00073 = feof(file_) 00074 #else 00075 = std::feof(file_) 00076 #endif 00077 ; 00078 00079 TEUCHOS_TEST_FOR_EXCEPTION( 00080 n < 0 || (n<(int) maxToRead && !is_eof), 00081 std::runtime_error, 00082 "FileInputStream::readBytes error" 00083 ); 00084 00085 return (size_t) n; 00086 } 00087 00088 // 2007/07/08: rabartl: Above, for some reason the header <cstdio> on the 00089 // Intel C++ compiler 8.0 for Windows XP just does not have the function 00090 // feof(...) in the correct std namespace. On this compiler, you just have to 00091 // access it from the global namespace.
1.7.6.1