PLearn 0.1
|
00001 // -*- C++ -*- 00002 00003 // tostring.cc 00004 // 00005 // Copyright (C) 2005,2006 Christian Dorion, Pascal Vincent 00006 // 00007 // Redistribution and use in source and binary forms, with or without 00008 // modification, are permitted provided that the following conditions are met: 00009 // 00010 // 1. Redistributions of source code must retain the above copyright 00011 // notice, this list of conditions and the following disclaimer. 00012 // 00013 // 2. Redistributions in binary form must reproduce the above copyright 00014 // notice, this list of conditions and the following disclaimer in the 00015 // documentation and/or other materials provided with the distribution. 00016 // 00017 // 3. The name of the authors may not be used to endorse or promote 00018 // products derived from this software without specific prior written 00019 // permission. 00020 // 00021 // THIS SOFTWARE IS PROVIDED BY THE AUTHORS ``AS IS'' AND ANY EXPRESS OR 00022 // IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 00023 // OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN 00024 // NO EVENT SHALL THE AUTHORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, 00025 // SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED 00026 // TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR 00027 // PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF 00028 // LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING 00029 // NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS 00030 // SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 00031 // 00032 // This file is part of the PLearn library. For more information on the PLearn 00033 // library, go to the PLearn Web site at www.plearn.org 00034 00035 /* ******************************************************* 00036 * $Id: tostring.cc 9465 2008-09-19 16:01:29Z nouiz $ 00037 ******************************************************* */ 00038 00039 // Authors: Christian Dorion, Pascal Vincent 00040 00044 #include "tostring.h" 00045 #include <plearn/base/plerror.h> 00046 #include <plearn/math/pl_math.h> 00047 00048 00049 namespace PLearn { 00050 using namespace std; 00051 00052 PStream& _tostring_static_pstream_(bool lock, 00053 PStream::mode_t io_formatting) 00054 { 00055 static bool locked = false; 00056 static string s; 00057 static StringPStreamBuf* pbuf = 0; 00058 static PStream sout; 00059 00060 if(!pbuf) 00061 { 00062 pbuf = new StringPStreamBuf(&s, "w"); 00063 sout = pbuf; 00064 } 00065 00066 if(lock) 00067 { 00068 if(locked) 00069 exitmsg("In %s, already locked! Operations for PStream " 00070 "serialization (operator <<) should NEVER call " 00071 "tostring", __FUNCTION__); 00072 pbuf->clear(); 00073 sout.setOutMode(io_formatting); 00074 locked = true; 00075 } 00076 else // unlock 00077 { 00078 if(!locked) 00079 exitmsg("In %s, already unlocked! " 00080 "This should never happen", __FUNCTION__); 00081 sout.flush(); 00082 sout.clearOutMap(); 00083 locked = false; 00084 } 00085 00086 return sout; 00087 } 00088 00089 string tostring(const double& x, PStream::mode_t io_formatting) 00090 { 00091 string str; 00092 #ifdef _OPENMP 00093 #pragma omp critical (tostring) 00094 #endif 00095 { 00096 PStream& out = _tostring_static_pstream_(true, io_formatting); 00097 int ix = int(x); 00098 if (io_formatting==PStream::raw_ascii && fast_exact_is_equal(ix, x)) 00099 out << ix; 00100 else 00101 out << x; 00102 str = static_cast<StringPStreamBuf*>( 00103 (PStreamBuf*)_tostring_static_pstream_(false))->getString(); 00104 } 00105 return str; 00106 00107 } 00108 00109 } // end of namespace PLearn 00110 00111 00112 /* 00113 Local Variables: 00114 mode:c++ 00115 c-basic-offset:4 00116 c-file-style:"stroustrup" 00117 c-file-offsets:((innamespace . 0)(inline-open . 0)) 00118 indent-tabs-mode:nil 00119 fill-column:79 00120 End: 00121 */ 00122 // vim: filetype=cpp:expandtab:shiftwidth=4:tabstop=8:softtabstop=4:encoding=utf-8:textwidth=79 :