PLearn 0.1
tostring.cc
Go to the documentation of this file.
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 :
 All Classes Namespaces Files Functions Variables Typedefs Enumerations Enumerator Friends Defines