From 520626bcc203a15ec22ed7351204662a33a17ef5 Mon Sep 17 00:00:00 2001
From: Tom Rondeau <trondeau@vt.edu>
Date: Wed, 6 Mar 2013 09:54:14 -0500
Subject: blocks: moving message blocks to gr-blocks.

message_burst_source, message_source, message_sink, message_debug, message_strobe.
---
 gr-blocks/lib/message_debug_impl.cc | 120 ++++++++++++++++++++++++++++++++++++
 1 file changed, 120 insertions(+)
 create mode 100644 gr-blocks/lib/message_debug_impl.cc

(limited to 'gr-blocks/lib/message_debug_impl.cc')

diff --git a/gr-blocks/lib/message_debug_impl.cc b/gr-blocks/lib/message_debug_impl.cc
new file mode 100644
index 0000000000..d7b1e5db09
--- /dev/null
+++ b/gr-blocks/lib/message_debug_impl.cc
@@ -0,0 +1,120 @@
+/* -*- c++ -*- */
+/*
+ * Copyright 2005,2010,2012-2013 Free Software Foundation, Inc.
+ *
+ * This file is part of GNU Radio
+ *
+ * GNU Radio is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 3, or (at your option)
+ * any later version.
+ *
+ * GNU Radio is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with GNU Radio; see the file COPYING.  If not, write to
+ * the Free Software Foundation, Inc., 51 Franklin Street,
+ * Boston, MA 02110-1301, USA.
+ */
+
+#ifdef HAVE_CONFIG_H
+#include "config.h"
+#endif
+
+#include "message_debug_impl.h"
+#include <gr_io_signature.h>
+#include <cstdio>
+#include <iostream>
+
+namespace gr {
+  namespace blocks {
+    
+    message_debug::sptr
+    message_debug::make()
+    {
+      return gnuradio::get_initial_sptr
+        (new message_debug_impl());
+    }
+
+    void
+    message_debug_impl::print(pmt::pmt_t msg)
+    {
+      std::cout << "******* MESSAGE DEBUG PRINT ********\n";
+      pmt::pmt_print(msg);
+      std::cout << "************************************\n";
+    }
+
+    void
+    message_debug_impl::store(pmt::pmt_t msg)
+    {
+      gruel::scoped_lock guard(d_mutex);
+      d_messages.push_back(msg);
+    }
+
+    void
+    message_debug_impl::print_pdu(pmt::pmt_t pdu)
+    {
+      pmt::pmt_t meta = pmt::pmt_car(pdu);
+      pmt::pmt_t vector = pmt::pmt_cdr(pdu);
+      std::cout << "* MESSAGE DEBUG PRINT PDU VERBOSE *\n";
+      pmt::pmt_print(meta);
+      size_t len = pmt::pmt_length(vector);
+      std::cout << "pdu_length = " << len << std::endl;
+      std::cout << "contents = " << std::endl;
+      size_t offset(0);
+      const uint8_t* d = (const uint8_t*) pmt_uniform_vector_elements(vector, offset);
+      for(size_t i=0; i<len; i+=16){
+        printf("%04x: ", ((unsigned int)i));
+        for(size_t j=i; j<std::min(i+16,len); j++){
+          printf("%02x ",d[j] );
+        }
+
+        std::cout << std::endl;
+      }
+
+      std::cout << "***********************************\n";
+    }
+
+    int
+    message_debug_impl::num_messages()
+    {
+      return (int)d_messages.size();
+    }
+
+    pmt::pmt_t
+    message_debug_impl::get_message(int i)
+    {
+      gruel::scoped_lock guard(d_mutex);
+
+      if((size_t)i >= d_messages.size()) {
+        throw std::runtime_error("message_debug: index for message out of bounds.\n");
+      }
+
+      return d_messages[i];
+    }
+
+    message_debug_impl::message_debug_impl()
+      : gr_block("message_debug",
+                 gr_make_io_signature(0, 0, 0),
+                 gr_make_io_signature(0, 0, 0))
+    {
+      message_port_register_in(pmt::mp("print"));
+      set_msg_handler(pmt::mp("print"), boost::bind(&message_debug_impl::print, this, _1));
+  
+      message_port_register_in(pmt::mp("store"));
+      set_msg_handler(pmt::mp("store"), boost::bind(&message_debug_impl::store, this, _1));
+
+      message_port_register_in(pmt::mp("print_pdu"));
+      set_msg_handler(pmt::mp("print_pdu"), boost::bind(&message_debug_impl::print_pdu, this, _1));
+    }
+
+    message_debug_impl::~message_debug_impl()
+    {
+    }
+
+  } /* namespace blocks */
+} /* namespace gr */
+
-- 
cgit v1.2.3