1 files changed, 119 insertions, 0 deletions
diff --git a/system/pdp_comm.c b/system/pdp_comm.c
new file mode 100644
index 0000000..80cbaaa
--- /dev/null
+++ b/system/pdp_comm.c
@@ -0,0 +1,119 @@
+/*
+ *   Pure Data Packet system implementation.
+ *   Copyright (c) by Tom Schouten <pdp@zzz.kotnet.org>
+ *
+ *   This program 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 2 of the License, or
+ *   (at your option) any later version.
+ *
+ *   This program 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 this program; if not, write to the Free Software
+ *   Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+ *
+ */
+
+/* this file contains misc communication methods */
+
+
+#include "pdp.h"
+#include "pdp_internals.h"
+#include <stdio.h>
+
+/* all symbols are C style */
+#ifdef __cplusplus
+extern "C"
+{
+#endif
+
+
+/************** packet management and communication convenience functions ************/
+
+/* send a packet to an outlet */
+void outlet_pdp(t_outlet *out, int packetid)
+{
+    t_atom atom[2];
+    t_symbol *s = gensym("pdp");
+    t_symbol *rro = gensym("register_ro");
+    t_symbol *rrw = gensym("register_rw");
+    t_symbol *proc = gensym("process");
+
+
+    SETFLOAT(atom+1, (float)packetid);
+
+    SETSYMBOL(atom+0, rro);
+    outlet_anything(out, s, 2, atom);
+
+    SETSYMBOL(atom+0, rrw);
+    outlet_anything(out, s, 2, atom);
+
+    /* this is not really necessary, it can be triggered by the rw message */
+    SETSYMBOL(atom+0, proc);
+    outlet_anything(out, s, 1, atom);
+
+}
+
+
+/* unregister a packet and send it to an outlet */
+void
+pdp_pass_if_valid(t_outlet *outlet, int *packet)
+{
+    if (-1 != *packet){
+	pdp_packet_mark_unused(*packet);
+	outlet_pdp(outlet, *packet);
+	*packet = -1;
+    }
+}
+
+void
+pdp_replace_if_valid(int *dpacket, int *spacket)
+{
+    if (-1 != *spacket){
+	pdp_packet_mark_unused(*dpacket);
+	*dpacket = *spacket;
+	*spacket = -1;
+    }
+    
+}
+
+
+int
+pdp_packet_copy_ro_or_drop(int *dpacket, int spacket)
+{
+    int drop = 0;
+    if (*dpacket == -1) *dpacket = pdp_packet_copy_ro(spacket);
+    else {
+	/* send a notification there is a dropped packet */
+	pdp_control_notify_drop(spacket);
+	drop = 1;
+    }
+    return drop;
+}
+
+
+int
+pdp_packet_copy_rw_or_drop(int *dpacket, int spacket)
+{
+    int drop = 0;
+    if (*dpacket == -1) *dpacket = pdp_packet_copy_rw(spacket);
+    else {
+	/* send a notification there is a dropped packet */
+	pdp_control_notify_drop(spacket);
+	drop = 1;
+    }
+    return drop;
+}
+
+
+
+
+
+
+#ifdef __cplusplus
+}
+#endif