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

   1 /* -*- c++ -*- */
   2 /*
   3  * Copyright 2006 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 <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
  36 class pmt_base : boost::noncopyable {
  37   mutable boost::detail::atomic_count count_;
  38
  39 protected:
  40   pmt_base() : count_(0) {};
  41   virtual ~pmt_base();
  42
  43 public:
  44   virtual bool is_bool()    const { return false; }
  45   virtual bool is_symbol()  const { return false; }
  46   virtual bool is_number()  const { return false; }
  47   virtual bool is_integer() const { return false; }
  48   virtual bool is_real()    const { return false; }
  49   virtual bool is_complex() const { return false; }
  50   virtual bool is_null()    const { return false; }
  51   virtual bool is_pair()    const { return false; }
  52   virtual bool is_vector()  const { return false; }
  53   virtual bool is_dict()    const { return false; }
  54   virtual bool is_any()     const { return false; }
  55
  56   virtual bool is_uniform_vector() const { return false; }
  57   virtual bool is_u8vector()  const { return false; }
  58   virtual bool is_s8vector()  const { return false; }
  59   virtual bool is_u16vector() const { return false; }
  60   virtual bool is_s16vector() const { return false; }
  61   virtual bool is_u32vector() const { return false; }
  62   virtual bool is_s32vector() const { return false; }
  63   virtual bool is_u64vector() const { return false; }
  64   virtual bool is_s64vector() const { return false; }
  65   virtual bool is_f32vector() const { return false; }
  66   virtual bool is_f64vector() const { return false; }
  67   virtual bool is_c32vector() const { return false; }
  68   virtual bool is_c64vector() const { return false; }
  69
  70   friend void intrusive_ptr_add_ref(pmt_base* p);
  71   friend void intrusive_ptr_release(pmt_base* p);
  72
  73 # if (PMT_LOCAL_ALLOCATOR)
  74   void *operator new(size_t);
  75   void operator delete(void *, size_t);
  76 #endif
  77 };
  78
  79 class pmt_bool : public pmt_base
  80 {
  81 public:
  82   pmt_bool();
  83   //~pmt_bool(){}
  84
  85   bool is_bool() const { return true; }
  86 };
  87
  88
  89 class pmt_symbol : public pmt_base
  90 {
  91   std::string   d_name;
  92   pmt_t         d_next;
  93
  94 public:
  95   pmt_symbol(const std::string &name);
  96   //~pmt_symbol(){}
  97
  98   bool is_symbol() const { return true; }
  99   const std::string name() { return d_name; }
 100
 101   pmt_t next() { return d_next; }               // symbol table link
 102   void set_next(pmt_t next) { d_next = next; }
 103 };
 104
 105 class pmt_integer : public pmt_base
 106 {
 107   long          d_value;
 108
 109 public:
 110   pmt_integer(long value);
 111   //~pmt_integer(){}
 112
 113   bool is_number()  const { return true; }
 114   bool is_integer() const { return true; }
 115   long value() const { return d_value; }
 116 };
 117
 118 class pmt_real : public pmt_base
 119 {
 120   double        d_value;
 121
 122 public:
 123   pmt_real(double value);
 124   //~pmt_real(){}
 125
 126   bool is_number()  const { return true; }
 127   bool is_real() const { return true; }
 128   double value() const { return d_value; }
 129 };
 130
 131 class pmt_complex : public pmt_base
 132 {
 133   std::complex<double>  d_value;
 134
 135 public:
 136   pmt_complex(std::complex<double> value);
 137   //~pmt_complex(){}
 138
 139   bool is_number()  const { return true; }
 140   bool is_complex() const { return true; }
 141   std::complex<double> value() const { return d_value; }
 142 };
 143
 144 class pmt_null  : public pmt_base
 145 {
 146 public:
 147   pmt_null();
 148   //~pmt_null(){}
 149
 150   bool is_null() const { return true; }
 151 };
 152
 153 class pmt_pair : public pmt_base
 154 {
 155   pmt_t         d_car;
 156   pmt_t         d_cdr;
 157
 158 public:
 159   pmt_pair(const pmt_t& car, const pmt_t& cdr);
 160   //~pmt_pair(){};
 161
 162   bool is_pair() const { return true; }
 163   pmt_t car() const { return d_car; }
 164   pmt_t cdr() const { return d_cdr; }
 165
 166   void set_car(pmt_t car) { d_car = car; }
 167   void set_cdr(pmt_t cdr) { d_cdr = cdr; }
 168 };
 169
 170 class pmt_vector : public pmt_base
 171 {
 172   std::vector<pmt_t>    d_v;
 173
 174 public:
 175   pmt_vector(size_t len, pmt_t fill);
 176   //~pmt_vector();
 177
 178   bool is_vector() const { return true; }
 179   pmt_t ref(size_t k) const;
 180   void  set(size_t k, pmt_t obj);
 181   void  fill(pmt_t fill);
 182   size_t length() const { return d_v.size(); }
 183
 184   pmt_t _ref(size_t k) const { return d_v[k]; }
 185 };
 186
 187 class pmt_dict : public pmt_base
 188 {
 189   pmt_t         d_alist;        // list of (key . value) pairs
 190
 191 public:
 192   pmt_dict();
 193   //~pmt_dict();
 194
 195   bool  is_dict() const { return true; }
 196   void  set(pmt_t key, pmt_t value);
 197   pmt_t ref(pmt_t key, pmt_t default_value) const;
 198   bool  has_key(pmt_t key) const;
 199   pmt_t items() const;
 200   pmt_t keys() const;
 201   pmt_t values() const;
 202 };
 203
 204 class pmt_any : public pmt_base
 205 {
 206   boost::any    d_any;
 207
 208 public:
 209   pmt_any(const boost::any &any);
 210   //~pmt_any();
 211
 212   bool is_any() const { return true; }
 213   const boost::any &ref() const { return d_any; }
 214   void  set(const boost::any &any) { d_any = any; }
 215 };
 216
 217
 218 class pmt_uniform_vector : public pmt_base
 219 {
 220 public:
 221   bool is_uniform_vector() const { return true; }
 222   virtual const void *uniform_elements(size_t &len) = 0;
 223   virtual void *uniform_writable_elements(size_t &len) = 0;
 224   virtual size_t length() const = 0;
 225 };
 226
 227 #include "pmt_unv_int.h"
 228
 229 #endif /* INCLUDED_PMT_INT_H */