3 * Copyright 2006 Free Software Foundation, Inc.
5 * This file is part of GNU Radio
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)
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.
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.
22 #ifndef INCLUDED_PMT_INT_H
23 #define INCLUDED_PMT_INT_H
26 #include <boost/utility.hpp>
29 * EVERYTHING IN THIS FILE IS PRIVATE TO THE IMPLEMENTATION!
31 * See pmt.h for the public interface
34 #define PMT_LOCAL_ALLOCATOR 0 // define to 0 or 1
36 class pmt_base : boost::noncopyable {
42 virtual bool is_bool() const { return false; }
43 virtual bool is_symbol() const { return false; }
44 virtual bool is_number() const { return false; }
45 virtual bool is_integer() const { return false; }
46 virtual bool is_real() const { return false; }
47 virtual bool is_complex() const { return false; }
48 virtual bool is_null() const { return false; }
49 virtual bool is_pair() const { return false; }
50 virtual bool is_vector() const { return false; }
51 virtual bool is_dict() const { return false; }
52 virtual bool is_any() const { return false; }
54 virtual bool is_uniform_vector() const { return false; }
55 virtual bool is_u8vector() const { return false; }
56 virtual bool is_s8vector() const { return false; }
57 virtual bool is_u16vector() const { return false; }
58 virtual bool is_s16vector() const { return false; }
59 virtual bool is_u32vector() const { return false; }
60 virtual bool is_s32vector() const { return false; }
61 virtual bool is_u64vector() const { return false; }
62 virtual bool is_s64vector() const { return false; }
63 virtual bool is_f32vector() const { return false; }
64 virtual bool is_f64vector() const { return false; }
65 virtual bool is_c32vector() const { return false; }
66 virtual bool is_c64vector() const { return false; }
68 # if (PMT_LOCAL_ALLOCATOR)
69 void *operator new(size_t);
70 void operator delete(void *, size_t);
74 class pmt_bool : public pmt_base
80 bool is_bool() const { return true; }
84 class pmt_symbol : public pmt_base
90 pmt_symbol(const std::string &name);
93 bool is_symbol() const { return true; }
94 const std::string name() { return d_name; }
96 pmt_t next() { return d_next; } // symbol table link
97 void set_next(pmt_t next) { d_next = next; }
100 class pmt_integer : public pmt_base
105 pmt_integer(long value);
108 bool is_number() const { return true; }
109 bool is_integer() const { return true; }
110 long value() const { return d_value; }
113 class pmt_real : public pmt_base
118 pmt_real(double value);
121 bool is_number() const { return true; }
122 bool is_real() const { return true; }
123 double value() const { return d_value; }
126 class pmt_complex : public pmt_base
128 std::complex<double> d_value;
131 pmt_complex(std::complex<double> value);
134 bool is_number() const { return true; }
135 bool is_complex() const { return true; }
136 std::complex<double> value() const { return d_value; }
139 class pmt_null : public pmt_base
145 bool is_null() const { return true; }
148 class pmt_pair : public pmt_base
154 pmt_pair(const pmt_t& car, const pmt_t& cdr);
157 bool is_pair() const { return true; }
158 pmt_t car() const { return d_car; }
159 pmt_t cdr() const { return d_cdr; }
161 void set_car(pmt_t car) { d_car = car; }
162 void set_cdr(pmt_t cdr) { d_cdr = cdr; }
165 class pmt_vector : public pmt_base
167 std::vector<pmt_t> d_v;
170 pmt_vector(size_t len, pmt_t fill);
173 bool is_vector() const { return true; }
174 pmt_t ref(size_t k) const;
175 void set(size_t k, pmt_t obj);
176 void fill(pmt_t fill);
177 size_t length() const { return d_v.size(); }
179 pmt_t _ref(size_t k) const { return d_v[k]; }
182 class pmt_dict : public pmt_base
184 pmt_t d_alist; // list of (key . value) pairs
190 bool is_dict() const { return true; }
191 void set(pmt_t key, pmt_t value);
192 pmt_t ref(pmt_t key, pmt_t default_value) const;
193 bool has_key(pmt_t key) const;
196 pmt_t values() const;
199 class pmt_any : public pmt_base
204 pmt_any(const boost::any &any);
207 bool is_any() const { return true; }
208 const boost::any &ref() const { return d_any; }
209 void set(const boost::any &any) { d_any = any; }
213 class pmt_uniform_vector : public pmt_base
216 bool is_uniform_vector() const { return true; }
217 virtual const void *uniform_elements(size_t &len) = 0;
218 virtual void *uniform_writable_elements(size_t &len) = 0;
219 virtual size_t length() const = 0;
222 #include "pmt_unv_int.h"
224 #endif /* INCLUDED_PMT_INT_H */