git.gag.com Git - debian/gnuradio/blob - gruel/src/lib/pmt_int.h

   1 /* -*- c++ -*- */
   2 /*
   3  * Copyright 2006,2009 Free Software Foundation, Inc.
   4  *
   5  * This file is part of GNU Radio
   6  *
   7  * GNU Radio is free software; you can redistribute it and/or modify
   8  * it under the terms of the GNU General Public License as published by
   9  * the Free Software Foundation; either version 3, or (at your option)
  10  * any later version.
  11  *
  12  * GNU Radio is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15  * GNU General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU General Public License
  18  * along with GNU Radio; see the file COPYING.  If not, write to
  19  * the Free Software Foundation, Inc., 51 Franklin Street,
  20  * Boston, MA 02110-1301, USA.
  21  */
  22 #ifndef INCLUDED_PMT_INT_H
  23 #define INCLUDED_PMT_INT_H
  24
  25 #include <gruel/pmt.h>
  26 #include <boost/utility.hpp>
  27
  28 /*
  29  * EVERYTHING IN THIS FILE IS PRIVATE TO THE IMPLEMENTATION!
  30  *
  31  * See pmt.h for the public interface
  32  */
  33
  34 #define PMT_LOCAL_ALLOCATOR 0           // define to 0 or 1
  35 namespace gruel {
  36
  37 class pmt_base : boost::noncopyable {
  38 protected:
  39   pmt_base(){};
  40   virtual ~pmt_base();
  41
  42 public:
  43   virtual bool is_bool()    const { return false; }
  44   virtual bool is_symbol()  const { return false; }
  45   virtual bool is_number()  const { return false; }
  46   virtual bool is_integer() const { return false; }
  47   virtual bool is_real()    const { return false; }
  48   virtual bool is_complex() const { return false; }
  49   virtual bool is_null()    const { return false; }
  50   virtual bool is_pair()    const { return false; }
  51   virtual bool is_vector()  const { return false; }
  52   virtual bool is_dict()    const { return false; }
  53   virtual bool is_any()     const { return false; }
  54
  55   virtual bool is_uniform_vector() const { return false; }
  56   virtual bool is_u8vector()  const { return false; }
  57   virtual bool is_s8vector()  const { return false; }
  58   virtual bool is_u16vector() const { return false; }
  59   virtual bool is_s16vector() const { return false; }
  60   virtual bool is_u32vector() const { return false; }
  61   virtual bool is_s32vector() const { return false; }
  62   virtual bool is_u64vector() const { return false; }
  63   virtual bool is_s64vector() const { return false; }
  64   virtual bool is_f32vector() const { return false; }
  65   virtual bool is_f64vector() const { return false; }
  66   virtual bool is_c32vector() const { return false; }
  67   virtual bool is_c64vector() const { return false; }
  68
  69 # if (PMT_LOCAL_ALLOCATOR)
  70   void *operator new(size_t);
  71   void operator delete(void *, size_t);
  72 #endif
  73 };
  74
  75 class pmt_bool : public pmt_base
  76 {
  77 public:
  78   pmt_bool();
  79   //~pmt_bool(){}
  80
  81   bool is_bool() const { return true; }
  82 };
  83
  84
  85 class pmt_symbol : public pmt_base
  86 {
  87   std::string   d_name;
  88   pmt_t         d_next;
  89
  90 public:
  91   pmt_symbol(const std::string &name);
  92   //~pmt_symbol(){}
  93
  94   bool is_symbol() const { return true; }
  95   const std::string name() { return d_name; }
  96
  97   pmt_t next() { return d_next; }               // symbol table link
  98   void set_next(pmt_t next) { d_next = next; }
  99 };
 100
 101 class pmt_integer : public pmt_base
 102 {
 103   long          d_value;
 104
 105 public:
 106   pmt_integer(long value);
 107   //~pmt_integer(){}
 108
 109   bool is_number()  const { return true; }
 110   bool is_integer() const { return true; }
 111   long value() const { return d_value; }
 112 };
 113
 114 class pmt_real : public pmt_base
 115 {
 116   double        d_value;
 117
 118 public:
 119   pmt_real(double value);
 120   //~pmt_real(){}
 121
 122   bool is_number()  const { return true; }
 123   bool is_real() const { return true; }
 124   double value() const { return d_value; }
 125 };
 126
 127 class pmt_complex : public pmt_base
 128 {
 129   std::complex<double>  d_value;
 130
 131 public:
 132   pmt_complex(std::complex<double> value);
 133   //~pmt_complex(){}
 134
 135   bool is_number()  const { return true; }
 136   bool is_complex() const { return true; }
 137   std::complex<double> value() const { return d_value; }
 138 };
 139
 140 class pmt_null  : public pmt_base
 141 {
 142 public:
 143   pmt_null();
 144   //~pmt_null(){}
 145
 146   bool is_null() const { return true; }
 147 };
 148
 149 class pmt_pair : public pmt_base
 150 {
 151   pmt_t         d_car;
 152   pmt_t         d_cdr;
 153
 154 public:
 155   pmt_pair(const pmt_t& car, const pmt_t& cdr);
 156   //~pmt_pair(){};
 157
 158   bool is_pair() const { return true; }
 159   pmt_t car() const { return d_car; }
 160   pmt_t cdr() const { return d_cdr; }
 161
 162   void set_car(pmt_t car) { d_car = car; }
 163   void set_cdr(pmt_t cdr) { d_cdr = cdr; }
 164 };
 165
 166 class pmt_vector : public pmt_base
 167 {
 168   std::vector<pmt_t>    d_v;
 169
 170 public:
 171   pmt_vector(size_t len, pmt_t fill);
 172   //~pmt_vector();
 173
 174   bool is_vector() const { return true; }
 175   pmt_t ref(size_t k) const;
 176   void  set(size_t k, pmt_t obj);
 177   void  fill(pmt_t fill);
 178   size_t length() const { return d_v.size(); }
 179
 180   pmt_t _ref(size_t k) const { return d_v[k]; }
 181 };
 182
 183 class pmt_dict : public pmt_base
 184 {
 185   pmt_t         d_alist;        // list of (key . value) pairs
 186
 187 public:
 188   pmt_dict();
 189   //~pmt_dict();
 190
 191   bool  is_dict() const { return true; }
 192   void  set(pmt_t key, pmt_t value);
 193   pmt_t ref(pmt_t key, pmt_t default_value) const;
 194   bool  has_key(pmt_t key) const;
 195   pmt_t items() const;
 196   pmt_t keys() const;
 197   pmt_t values() const;
 198 };
 199
 200 class pmt_any : public pmt_base
 201 {
 202   boost::any    d_any;
 203
 204 public:
 205   pmt_any(const boost::any &any);
 206   //~pmt_any();
 207
 208   bool is_any() const { return true; }
 209   const boost::any &ref() const { return d_any; }
 210   void  set(const boost::any &any) { d_any = any; }
 211 };
 212
 213
 214 class pmt_uniform_vector : public pmt_base
 215 {
 216 public:
 217   bool is_uniform_vector() const { return true; }
 218   virtual const void *uniform_elements(size_t &len) = 0;
 219   virtual void *uniform_writable_elements(size_t &len) = 0;
 220   virtual size_t length() const = 0;
 221 };
 222
 223 #include "pmt_unv_int.h"
 224
 225 } /* namespace gruel */
 226
 227 #endif /* INCLUDED_PMT_INT_H */