interpreter/preprocessor/faust-0.9.47mr3/architecture/osclib/oscpack/osc/OscPrintReceivedElements.cpp

   1 /*
   2         oscpack -- Open Sound Control packet manipulation library
   3         http://www.audiomulch.com/~rossb/oscpack
   4
   5         Copyright (c) 2004-2005 Ross Bencina <rossb@audiomulch.com>
   6
   7         Permission is hereby granted, free of charge, to any person obtaining
   8         a copy of this software and associated documentation files
   9         (the "Software"), to deal in the Software without restriction,
  10         including without limitation the rights to use, copy, modify, merge,
  11         publish, distribute, sublicense, and/or sell copies of the Software,
  12         and to permit persons to whom the Software is furnished to do so,
  13         subject to the following conditions:
  14
  15         The above copyright notice and this permission notice shall be
  16         included in all copies or substantial portions of the Software.
  17
  18         Any person wishing to distribute modifications to the Software is
  19         requested to send the modifications to the original developer so that
  20         they can be incorporated into the canonical version.
  21
  22         THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
  23         EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
  24         MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
  25         IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR
  26         ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF
  27         CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
  28         WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
  29 */
  30 #include "OscPrintReceivedElements.h"
  31
  32 #include <iostream>
  33 #include <iomanip>
  34 #include <ctime>
  35 #include <string.h>
  36
  37
  38 namespace osc{
  39
  40
  41 std::ostream& operator<<( std::ostream & os,
  42         const ReceivedMessageArgument& arg )
  43 {
  44     switch( arg.TypeTag() ){
  45         case TRUE_TYPE_TAG:
  46             os << "bool:true";
  47             break;
  48
  49         case FALSE_TYPE_TAG:
  50             os << "bool:false";
  51             break;
  52
  53         case NIL_TYPE_TAG:
  54             os << "(Nil)";
  55             break;
  56
  57         case INFINITUM_TYPE_TAG:
  58             os << "(Infinitum)";
  59             break;
  60
  61         case INT32_TYPE_TAG:
  62             os << "int32:" << arg.AsInt32Unchecked();
  63             break;
  64
  65         case FLOAT_TYPE_TAG:
  66             os << "float32:" << arg.AsFloatUnchecked();
  67             break;
  68
  69         case CHAR_TYPE_TAG:
  70             {
  71                 char s[2] = {0};
  72                 s[0] = arg.AsCharUnchecked();
  73                 os << "char:'" << s << "'";
  74             }
  75             break;
  76
  77         case RGBA_COLOR_TYPE_TAG:
  78             {
  79                 uint32 color = arg.AsRgbaColorUnchecked();
  80
  81                 os << "RGBA:0x"
  82                         << std::hex << std::setfill('0')
  83                         << std::setw(2) << (int)((color>>24) & 0xFF)
  84                         << std::setw(2) << (int)((color>>16) & 0xFF)
  85                         << std::setw(2) << (int)((color>>8) & 0xFF)
  86                         << std::setw(2) << (int)(color & 0xFF)
  87                         << std::setfill(' ');
  88                 os.unsetf(std::ios::basefield);
  89             }
  90             break;
  91
  92         case MIDI_MESSAGE_TYPE_TAG:
  93             {
  94                 uint32 m = arg.AsMidiMessageUnchecked();
  95                 os << "midi (port, status, data1, data2):<<"
  96                         << std::hex << std::setfill('0')
  97                         << "0x" << std::setw(2) << (int)((m>>24) & 0xFF)
  98                         << " 0x" << std::setw(2) << (int)((m>>16) & 0xFF)
  99                         << " 0x" << std::setw(2) << (int)((m>>8) & 0xFF)
 100                         << " 0x" << std::setw(2) << (int)(m & 0xFF)
 101                         << std::setfill(' ') << ">>";
 102                 os.unsetf(std::ios::basefield);
 103             }
 104             break;
 105
 106         case INT64_TYPE_TAG:
 107             os << "int64:" << arg.AsInt64Unchecked();
 108             break;
 109
 110         case TIME_TAG_TYPE_TAG:
 111             {
 112                 os << "OSC-timetag:" << arg.AsTimeTagUnchecked();
 113
 114                 std::time_t t =
 115                         (unsigned long)( arg.AsTimeTagUnchecked() >> 32 );
 116
 117                 // strip trailing newline from string returned by ctime
 118                 const char *timeString = std::ctime( &t );
 119                 size_t len = strlen( timeString );
 120                 char *s = new char[ len + 1 ];
 121                 strcpy( s, timeString );
 122                 if( len )
 123                     s[ len - 1 ] = '\0';
 124
 125                 os << " " << s;
 126             }
 127             break;
 128
 129         case DOUBLE_TYPE_TAG:
 130             os << "double:" << arg.AsDoubleUnchecked();
 131             break;
 132
 133         case STRING_TYPE_TAG:
 134             os << "OSC-string:`" << arg.AsStringUnchecked() << "'";
 135             break;
 136
 137         case SYMBOL_TYPE_TAG:
 138             os << "OSC-string (symbol):`" << arg.AsSymbolUnchecked() << "'";
 139             break;
 140
 141         case BLOB_TYPE_TAG:
 142             {
 143                 unsigned long size;
 144                 const void *data;
 145                 arg.AsBlobUnchecked( data, size );
 146                 os << "OSC-blob:<<" << std::hex << std::setfill('0');
 147                 unsigned char *p = (unsigned char*)data;
 148                 for( unsigned long i = 0; i < size; ++i ){
 149                     os << "0x" << std::setw(2) << int(p[i]);
 150                     if( i != size-1 )
 151                         os << ' ';
 152                 }
 153                 os.unsetf(std::ios::basefield);
 154                 os << ">>" << std::setfill(' ');
 155             }
 156             break;
 157
 158         default:
 159             os << "unknown";
 160     }
 161
 162     return os;
 163 }
 164
 165
 166 std::ostream& operator<<( std::ostream & os, const ReceivedMessage& m )
 167 {
 168
 169     os << "[" << m.AddressPattern();
 170     bool first = true;
 171
 172     for( ReceivedMessage::const_iterator i = m.ArgumentsBegin();
 173             i != m.ArgumentsEnd(); ++i ){
 174         if( first ){
 175             os << " ";
 176             first = false;
 177         }else{
 178             os << ", ";
 179         }
 180
 181         os << *i;
 182     }
 183
 184     os << "]";
 185
 186     return os;
 187 }
 188
 189
 190 std::ostream& operator<<( std::ostream & os, const ReceivedBundle& b )
 191 {
 192     static int indent = 0;
 193
 194     for( int j=0; j < indent; ++j )
 195         os << "  ";
 196     os << "{ ( ";
 197     if( b.TimeTag() == 1 )
 198         os << "immediate";
 199     else
 200         os << b.TimeTag();
 201     os << " )\n";
 202
 203     ++indent;
 204
 205     for( ReceivedBundle::const_iterator i = b.ElementsBegin();
 206             i != b.ElementsEnd(); ++i ){
 207         if( i->IsBundle() ){
 208             ReceivedBundle b(*i);
 209             os << b << "\n";
 210         }else{
 211             ReceivedMessage m(*i);
 212             for( int j=0; j < indent; ++j )
 213                 os << "  ";
 214             os << m << "\n";
 215         }
 216     }
 217
 218     --indent;
 219
 220     for( int j=0; j < indent; ++j )
 221         os << "  ";
 222     os << "}";
 223
 224     return os;
 225 }
 226
 227
 228 std::ostream& operator<<( std::ostream & os, const ReceivedPacket& p )
 229 {
 230     if( p.IsBundle() ){
 231         ReceivedBundle b(p);
 232         os << b << "\n";
 233     }else{
 234         ReceivedMessage m(p);
 235         os << m << "\n";
 236     }
 237
 238     return os;
 239 }
 240
 241 } // namespace osc