aboutsummaryrefslogtreecommitdiff
path: root/PDContainer/src/h_multiset.cpp
diff options
context:
space:
mode:
authorGeorg Holzmann <grholzi@users.sourceforge.net>2005-10-21 11:56:32 +0000
committerGeorg Holzmann <grholzi@users.sourceforge.net>2005-10-21 11:56:32 +0000
commit1d6d1e8c73193f57a9c98387ea42eb91eb4d21d1 (patch)
tree8d0853fe30b12c73774c786f02f3d3011b147d4c /PDContainer/src/h_multiset.cpp
parentdf8ac7c52ff0dfc8e2ba828c4226ed34b0e9ebfc (diff)
only moving to a new directory
svn path=/trunk/externals/grh/; revision=3740
Diffstat (limited to 'PDContainer/src/h_multiset.cpp')
-rwxr-xr-xPDContainer/src/h_multiset.cpp220
1 files changed, 220 insertions, 0 deletions
diff --git a/PDContainer/src/h_multiset.cpp b/PDContainer/src/h_multiset.cpp
new file mode 100755
index 0000000..0886a8b
--- /dev/null
+++ b/PDContainer/src/h_multiset.cpp
@@ -0,0 +1,220 @@
+// *********************(c)*2004*********************>
+// -holzilib--holzilib--holzilib--holzilib--holzilib->
+// ++++PD-External++by+Georg+Holzmann++grh@gmx.at++++>
+//
+// PDContainer:
+// this is a port of the containers from the C++ STL
+// (Standard Template Library)
+// for usage see the documentation and PD help files
+// for license see readme.txt
+//
+// h_multiset.cpp
+
+
+#include "include/HMultiSet.h"
+
+
+static t_class *h_multiset_class;
+
+typedef struct _h_multiset
+{
+ t_object x_obj;
+ t_canvas *x_canvas;
+ t_outlet *out0, *out1;
+ HMultiSet *hmultiset;
+} t_h_multiset;
+
+static void h_multiset_add(t_h_multiset *x, t_symbol *s, int argc, t_atom *argv)
+{
+ if(!argc)
+ {
+ post("h_multiset, add: no arguments");
+ return;
+ }
+
+ Element key(argc,argv);
+ x->hmultiset->add( key );
+}
+
+static void h_multiset_get(t_h_multiset *x, t_symbol *s, int argc, t_atom *argv)
+{
+ if(!argc)
+ {
+ post("h_multiset, get: no arguments");
+ return;
+ }
+
+ Element key(argc,argv);
+ int output = x->hmultiset->get( key );
+
+ outlet_float(x->out0, output);
+}
+
+static void h_multiset_remove(t_h_multiset *x, t_symbol *s, int argc, t_atom *argv)
+{
+ if(!argc)
+ {
+ post("h_multiset, remove: no arguments");
+ return;
+ }
+
+ Element key(argc,argv);
+ x->hmultiset->remove( key );
+}
+
+static void h_multiset_getsize(t_h_multiset *x)
+{
+ outlet_float(x->out1,x->hmultiset->getSize());
+}
+
+static void h_multiset_help(t_h_multiset *x)
+{
+ x->hmultiset->help();
+}
+
+static void h_multiset_set_namespace(t_h_multiset *x, t_symbol *s)
+{
+ x->hmultiset->setNamespace(s->s_name);
+}
+
+static void h_multiset_get_namespace(t_h_multiset *x)
+{
+ post("h_multiset current namespace: %s",x->hmultiset->getNamespace().c_str());
+}
+
+static void h_multiset_print(t_h_multiset *x)
+{
+ x->hmultiset->printAll();
+}
+
+static void h_multiset_clear(t_h_multiset *x)
+{
+ x->hmultiset->clearNamespace();
+}
+
+static void h_multiset_clear_all(t_h_multiset *x)
+{
+ x->hmultiset->clearAll();
+}
+
+static void h_multiset_save(t_h_multiset *x, t_symbol *s)
+{
+ // make correct path
+ char filnam[MAXPDSTRING];
+ char filename[MAXPDSTRING];
+ canvas_makefilename(x->x_canvas, s->s_name, filnam, MAXPDSTRING);
+ sys_bashfilename(filnam, filename);
+
+ if(x->hmultiset->saveToFile(filename))
+ post("h_multiset: data of namespace %s written to file %s",
+ x->hmultiset->getNamespace().c_str(),s->s_name);
+ else
+ post("h_multiset: couldn't write to file %s",s->s_name);
+}
+
+static void h_multiset_read(t_h_multiset *x, t_symbol *s)
+{
+ // make correct path
+ char filnam[MAXPDSTRING];
+ char filename[MAXPDSTRING];
+ canvas_makefilename(x->x_canvas, s->s_name, filnam, MAXPDSTRING);
+ sys_bashfilename(filnam, filename);
+
+ if(!x->hmultiset->readFromFile(filename))
+ post("h_multiset: couldn't read from file %s",s->s_name);
+}
+
+static void h_multiset_save_xml(t_h_multiset *x, t_symbol *s)
+{
+ // make correct path
+ char filnam[MAXPDSTRING];
+ char filename[MAXPDSTRING];
+ canvas_makefilename(x->x_canvas, s->s_name, filnam, MAXPDSTRING);
+ sys_bashfilename(filnam, filename);
+
+ if(x->hmultiset->saveToFileXML(filename))
+ post("h_multiset: data of namespace %s written to file %s",
+ x->hmultiset->getNamespace().c_str(),s->s_name);
+ else
+ post("h_multiset: couldn't write to file %s",s->s_name);
+}
+
+static void h_multiset_read_xml(t_h_multiset *x, t_symbol *s)
+{
+ // make correct path
+ char filnam[MAXPDSTRING];
+ char filename[MAXPDSTRING];
+ canvas_makefilename(x->x_canvas, s->s_name, filnam, MAXPDSTRING);
+ sys_bashfilename(filnam, filename);
+
+ if(!x->hmultiset->readFromFileXML(filename))
+ post("h_multiset: couldn't read from file %s",s->s_name);
+}
+
+static void *h_multiset_new(t_symbol *s, int argc, t_atom *argv)
+{
+
+ t_h_multiset *x = (t_h_multiset *)pd_new(h_multiset_class);
+
+ switch(argc)
+ {
+ default:
+ post("h_multiset warning: only one argument for namespace is possible!");
+ case 1:
+ x->hmultiset = new HMultiSet(atom_getsymbol(argv)->s_name);
+ break;
+ case 0:
+ x->hmultiset = new HMultiSet();
+ break;
+ }
+
+ x->out0 = outlet_new(&x->x_obj, &s_float);
+ x->out1 = outlet_new(&x->x_obj, &s_float);
+ x->x_canvas = canvas_getcurrent();
+
+ return (void *)x;
+}
+
+static void *h_multiset_free(t_h_multiset *x)
+{
+ delete x->hmultiset;
+ return (void *)x;
+}
+
+void h_multiset_setup(void)
+{
+ // the object class
+ h_multiset_class = class_new(gensym("h_multiset"), (t_newmethod)h_multiset_new,
+ (t_method)h_multiset_free, sizeof(t_h_multiset),
+ CLASS_DEFAULT, A_GIMME, 0);
+
+ class_addmethod(h_multiset_class, (t_method)h_multiset_add,
+ gensym("add"), A_GIMME , 0);
+ class_addmethod(h_multiset_class, (t_method)h_multiset_get,
+ gensym("get"), A_GIMME , 0);
+ class_addmethod(h_multiset_class, (t_method)h_multiset_remove,
+ gensym("remove"), A_GIMME , 0);
+ class_addmethod(h_multiset_class, (t_method)h_multiset_getsize,
+ gensym("getsize"), A_DEFFLOAT , 0);
+ class_addmethod(h_multiset_class, (t_method)h_multiset_set_namespace,
+ gensym("namespace"), A_DEFSYMBOL , 0);
+ class_addmethod(h_multiset_class, (t_method)h_multiset_get_namespace,
+ gensym("getnamespace"), A_DEFFLOAT, 0);
+ class_addmethod(h_multiset_class, (t_method)h_multiset_print,
+ gensym("print"), A_DEFFLOAT, 0);
+ class_addmethod(h_multiset_class, (t_method)h_multiset_clear,
+ gensym("clear"), A_DEFFLOAT, 0);
+ class_addmethod(h_multiset_class, (t_method)h_multiset_clear_all,
+ gensym("clearall"), A_DEFFLOAT, 0);
+ class_addmethod(h_multiset_class, (t_method)h_multiset_save,
+ gensym("save"), A_DEFSYMBOL , 0);
+ class_addmethod(h_multiset_class, (t_method)h_multiset_read,
+ gensym("read"), A_DEFSYMBOL , 0);
+ class_addmethod(h_multiset_class, (t_method)h_multiset_save_xml,
+ gensym("saveXML"), A_DEFSYMBOL , 0);
+ class_addmethod(h_multiset_class, (t_method)h_multiset_read_xml,
+ gensym("readXML"), A_DEFSYMBOL , 0);
+
+ // without an argument the following two methods wont work ??? why?? because of c++?
+ class_addmethod(h_multiset_class, (t_method)h_multiset_help, gensym("help"),A_DEFFLOAT, 0);
+}