From 150c04f382f637287266d452f500aa26a3733253 Mon Sep 17 00:00:00 2001 From: Thomas Grill Date: Wed, 27 Oct 2004 19:18:54 +0000 Subject: *** empty log message *** svn path=/trunk/; revision=2179 --- externals/grill/dynext/build-pd-darwin.sh | 11 + externals/grill/dynext/build-pd-linux.sh | 11 + externals/grill/dynext/build-pd-msvc.bat | 4 + externals/grill/dynext/config-pd-darwin.txt | 35 ++ externals/grill/dynext/config-pd-linux.txt | 35 ++ externals/grill/dynext/config-pd-msvc.txt | 23 + externals/grill/dynext/dynext.vcproj | 257 +++++++++ externals/grill/dynext/gpl.txt | 346 +++++++++++++ externals/grill/dynext/license.txt | 50 ++ externals/grill/dynext/make-files.txt | 8 + externals/grill/dynext/makefile.pd-darwin | 86 +++ externals/grill/dynext/makefile.pd-linux | 98 ++++ externals/grill/dynext/makefile.pd-msvc | 60 +++ externals/grill/dynext/pd/help-dyn~.pd | 138 +++++ externals/grill/dynext/readme.txt | 140 ++--- externals/grill/dynext/src/main.cpp | 776 ++++++++++++++++++++++++++++ 16 files changed, 2008 insertions(+), 70 deletions(-) create mode 100644 externals/grill/dynext/build-pd-darwin.sh create mode 100644 externals/grill/dynext/build-pd-linux.sh create mode 100644 externals/grill/dynext/build-pd-msvc.bat create mode 100644 externals/grill/dynext/config-pd-darwin.txt create mode 100644 externals/grill/dynext/config-pd-linux.txt create mode 100644 externals/grill/dynext/config-pd-msvc.txt create mode 100644 externals/grill/dynext/dynext.vcproj create mode 100644 externals/grill/dynext/gpl.txt create mode 100644 externals/grill/dynext/license.txt create mode 100644 externals/grill/dynext/make-files.txt create mode 100644 externals/grill/dynext/makefile.pd-darwin create mode 100644 externals/grill/dynext/makefile.pd-linux create mode 100644 externals/grill/dynext/makefile.pd-msvc create mode 100644 externals/grill/dynext/pd/help-dyn~.pd create mode 100644 externals/grill/dynext/src/main.cpp diff --git a/externals/grill/dynext/build-pd-darwin.sh b/externals/grill/dynext/build-pd-darwin.sh new file mode 100644 index 00000000..edd03207 --- /dev/null +++ b/externals/grill/dynext/build-pd-darwin.sh @@ -0,0 +1,11 @@ +#!/bin/sh + +. config-pd-darwin.txt + +make -f makefile.pd-darwin && +{ + if [ $INSTPATH != "" ]; then + echo Now install as root + sudo make -f makefile.pd-darwin install + fi +} diff --git a/externals/grill/dynext/build-pd-linux.sh b/externals/grill/dynext/build-pd-linux.sh new file mode 100644 index 00000000..413650f7 --- /dev/null +++ b/externals/grill/dynext/build-pd-linux.sh @@ -0,0 +1,11 @@ +#!/bin/sh + +. config-pd-linux.txt + +make -f makefile.pd-linux && +{ + if [ $INSTPATH != "" ]; then + echo Now install as root + su -c "make -f makefile.pd-linux install" + fi +} diff --git a/externals/grill/dynext/build-pd-msvc.bat b/externals/grill/dynext/build-pd-msvc.bat new file mode 100644 index 00000000..d6187f08 --- /dev/null +++ b/externals/grill/dynext/build-pd-msvc.bat @@ -0,0 +1,4 @@ +@echo --- Building with MS Visual C++ --- + +nmake -f makefile.pd-msvc clean +nmake -f makefile.pd-msvc diff --git a/externals/grill/dynext/config-pd-darwin.txt b/externals/grill/dynext/config-pd-darwin.txt new file mode 100644 index 00000000..7494d33b --- /dev/null +++ b/externals/grill/dynext/config-pd-darwin.txt @@ -0,0 +1,35 @@ +# dyn~ - dynamic object management for PD +# +# Copyright (c)Thomas Grill (xovo@gmx.net) +# For information on usage and redistribution, and for a DISCLAIMER OF ALL +# WARRANTIES, see the file, "license.txt," in this distribution. +# + +# your c++ compiler (define only if not g++) +# CXX=gcc-3.3 + +# where are the PD header files? +# leave it blank if it is a system directory (like /usr/local/include), +# since gcc 3.2 complains about it +PDPATH=../../../pd/src + +# where is the PD executable? +PD=/usr/local/bin/pd + +# where do the flext libraries reside? +FLEXTPATH=/usr/local/lib/pd/flext + +# where should flext libraries be built? +TARGDIR=./pd-darwin + +# where should dyn be installed? +# (leave blank to omit installation) +INSTPATH=/usr/local/lib/pd/extra + +# additional compiler flags +# (check if they fit for your system!) +UFLAGS=-malign-power -maltivec -faltivec + +# build with a shared flext library +FLEXT_SHARED=1 + diff --git a/externals/grill/dynext/config-pd-linux.txt b/externals/grill/dynext/config-pd-linux.txt new file mode 100644 index 00000000..8cb605be --- /dev/null +++ b/externals/grill/dynext/config-pd-linux.txt @@ -0,0 +1,35 @@ +# dyn~ - dynamic object management for PD +# +# Copyright (c)Thomas Grill (xovo@gmx.net) +# For information on usage and redistribution, and for a DISCLAIMER OF ALL +# WARRANTIES, see the file, "license.txt," in this distribution. +# + +# your c++ compiler (define only if not g++) +# CXX= + +# where are the PD source files? +# (the normal header file doesn't work as g_canvas.h is not there) +# please note that currently the development branch (e.g devel_0_36) is needed +# +PDPATH=/usr/src/pd-0.37-0/src + +# where do the flext libraries reside? +FLEXTPATH=/usr/local/lib/pd/flext + +# where should flext libraries be built? +TARGDIR=./pd-linux + +# where should the external be installed? +# (leave blank to omit installation) +INSTPATH=/usr/local/lib/pd/extra + + +# additional compiler flags +# (check if they fit for your system!) +# UFLAGS=-mcpu=pentiumpro # gcc 2.95 +# UFLAGS=-mcpu=pentium3 -msse # gcc 3.2 + +# define for shared build +#FLEXT_SHARED=1 + diff --git a/externals/grill/dynext/config-pd-msvc.txt b/externals/grill/dynext/config-pd-msvc.txt new file mode 100644 index 00000000..e163ffd3 --- /dev/null +++ b/externals/grill/dynext/config-pd-msvc.txt @@ -0,0 +1,23 @@ +# dyn~ - dynamic object management for PD +# +# Copyright (c)Thomas Grill (xovo@gmx.net) +# For information on usage and redistribution, and for a DISCLAIMER OF ALL +# WARRANTIES, see the file, "license.txt," in this distribution. +# + +# where is PD? +PDPATH=c:\programme\audio\pd + +# where do the flext libraries reside? +FLEXTPATH=$(PDPATH)\flext + +# where is MS VC++ installed? +# if the VC++ command prompt is used VCINSTALLDIR should already be set correctly +MSVCDIR=$(VCINSTALLDIR) + +# where should the external be built? +OUTPATH=pd-msvc + +# where should the external be installed? +# (leave blank to omit installation) +INSTPATH=$(PDPATH)\extra diff --git a/externals/grill/dynext/dynext.vcproj b/externals/grill/dynext/dynext.vcproj new file mode 100644 index 00000000..78a1a91e --- /dev/null +++ b/externals/grill/dynext/dynext.vcproj @@ -0,0 +1,257 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + diff --git a/externals/grill/dynext/gpl.txt b/externals/grill/dynext/gpl.txt new file mode 100644 index 00000000..5ea29a7d --- /dev/null +++ b/externals/grill/dynext/gpl.txt @@ -0,0 +1,346 @@ + GNU GENERAL PUBLIC LICENSE + Version 2, June 1991 + + Copyright (C) 1989, 1991 Free Software Foundation, Inc. + 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + Everyone is permitted to copy and distribute verbatim copies + of this license document, but changing it is not allowed. + + Preamble + + The licenses for most software are designed to take away your +freedom to share and change it. By contrast, the GNU General Public +License is intended to guarantee your freedom to share and change free +software--to make sure the software is free for all its users. This +General Public License applies to most of the Free Software +Foundation's software and to any other program whose authors commit to +using it. (Some other Free Software Foundation software is covered by +the GNU Library General Public License instead.) You can apply it to +your programs, too. + + When we speak of free software, we are referring to freedom, not +price. Our General Public Licenses are designed to make sure that you +have the freedom to distribute copies of free software (and charge for +this service if you wish), that you receive source code or can get it +if you want it, that you can change the software or use pieces of it +in new free programs; and that you know you can do these things. + + To protect your rights, we need to make restrictions that forbid +anyone to deny you these rights or to ask you to surrender the rights. +These restrictions translate to certain responsibilities for you if you +distribute copies of the software, or if you modify it. + + For example, if you distribute copies of such a program, whether +gratis or for a fee, you must give the recipients all the rights that +you have. You must make sure that they, too, receive or can get the +source code. And you must show them these terms so they know their +rights. + + We protect your rights with two steps: (1) copyright the software, and +(2) offer you this license which gives you legal permission to copy, +distribute and/or modify the software. + + Also, for each author's protection and ours, we want to make certain +that everyone understands that there is no warranty for this free +software. If the software is modified by someone else and passed on, we +want its recipients to know that what they have is not the original, so +that any problems introduced by others will not reflect on the original +authors' reputations. + + Finally, any free program is threatened constantly by software +patents. We wish to avoid the danger that redistributors of a free +program will individually obtain patent licenses, in effect making the +program proprietary. To prevent this, we have made it clear that any +patent must be licensed for everyone's free use or not licensed at all. + + The precise terms and conditions for copying, distribution and +modification follow. + + + GNU GENERAL PUBLIC LICENSE + TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION + + 0. This License applies to any program or other work which contains +a notice placed by the copyright holder saying it may be distributed +under the terms of this General Public License. The "Program", below, +refers to any such program or work, and a "work based on the Program" +means either the Program or any derivative work under copyright law: +that is to say, a work containing the Program or a portion of it, +either verbatim or with modifications and/or translated into another +language. (Hereinafter, translation is included without limitation in +the term "modification".) Each licensee is addressed as "you". + +Activities other than copying, distribution and modification are not +covered by this License; they are outside its scope. The act of +running the Program is not restricted, and the output from the Program +is covered only if its contents constitute a work based on the +Program (independent of having been made by running the Program). +Whether that is true depends on what the Program does. + + 1. You may copy and distribute verbatim copies of the Program's +source code as you receive it, in any medium, provided that you +conspicuously and appropriately publish on each copy an appropriate +copyright notice and disclaimer of warranty; keep intact all the +notices that refer to this License and to the absence of any warranty; +and give any other recipients of the Program a copy of this License +along with the Program. + +You may charge a fee for the physical act of transferring a copy, and +you may at your option offer warranty protection in exchange for a fee. + + 2. You may modify your copy or copies of the Program or any portion +of it, thus forming a work based on the Program, and copy and +distribute such modifications or work under the terms of Section 1 +above, provided that you also meet all of these conditions: + + a) You must cause the modified files to carry prominent notices + stating that you changed the files and the date of any change. + + b) You must cause any work that you distribute or publish, that in + whole or in part contains or is derived from the Program or any + part thereof, to be licensed as a whole at no charge to all third + parties under the terms of this License. + + c) If the modified program normally reads commands interactively + when run, you must cause it, when started running for such + interactive use in the most ordinary way, to print or display an + announcement including an appropriate copyright notice and a + notice that there is no warranty (or else, saying that you provide + a warranty) and that users may redistribute the program under + these conditions, and telling the user how to view a copy of this + License. (Exception: if the Program itself is interactive but + does not normally print such an announcement, your work based on + the Program is not required to print an announcement.) + + +These requirements apply to the modified work as a whole. If +identifiable sections of that work are not derived from the Program, +and can be reasonably considered independent and separate works in +themselves, then this License, and its terms, do not apply to those +sections when you distribute them as separate works. But when you +distribute the same sections as part of a whole which is a work based +on the Program, the distribution of the whole must be on the terms of +this License, whose permissions for other licensees extend to the +entire whole, and thus to each and every part regardless of who wrote it. + +Thus, it is not the intent of this section to claim rights or contest +your rights to work written entirely by you; rather, the intent is to +exercise the right to control the distribution of derivative or +collective works based on the Program. + +In addition, mere aggregation of another work not based on the Program +with the Program (or with a work based on the Program) on a volume of +a storage or distribution medium does not bring the other work under +the scope of this License. + + 3. You may copy and distribute the Program (or a work based on it, +under Section 2) in object code or executable form under the terms of +Sections 1 and 2 above provided that you also do one of the following: + + a) Accompany it with the complete corresponding machine-readable + source code, which must be distributed under the terms of Sections + 1 and 2 above on a medium customarily used for software interchange; or, + + b) Accompany it with a written offer, valid for at least three + years, to give any third party, for a charge no more than your + cost of physically performing source distribution, a complete + machine-readable copy of the corresponding source code, to be + distributed under the terms of Sections 1 and 2 above on a medium + customarily used for software interchange; or, + + c) Accompany it with the information you received as to the offer + to distribute corresponding source code. (This alternative is + allowed only for noncommercial distribution and only if you + received the program in object code or executable form with such + an offer, in accord with Subsection b above.) + +The source code for a work means the preferred form of the work for +making modifications to it. For an executable work, complete source +code means all the source code for all modules it contains, plus any +associated interface definition files, plus the scripts used to +control compilation and installation of the executable. However, as a +special exception, the source code distributed need not include +anything that is normally distributed (in either source or binary +form) with the major components (compiler, kernel, and so on) of the +operating system on which the executable runs, unless that component +itself accompanies the executable. + +If distribution of executable or object code is made by offering +access to copy from a designated place, then offering equivalent +access to copy the source code from the same place counts as +distribution of the source code, even though third parties are not +compelled to copy the source along with the object code. + + + 4. You may not copy, modify, sublicense, or distribute the Program +except as expressly provided under this License. Any attempt +otherwise to copy, modify, sublicense or distribute the Program is +void, and will automatically terminate your rights under this License. +However, parties who have received copies, or rights, from you under +this License will not have their licenses terminated so long as such +parties remain in full compliance. + + 5. You are not required to accept this License, since you have not +signed it. However, nothing else grants you permission to modify or +distribute the Program or its derivative works. These actions are +prohibited by law if you do not accept this License. Therefore, by +modifying or distributing the Program (or any work based on the +Program), you indicate your acceptance of this License to do so, and +all its terms and conditions for copying, distributing or modifying +the Program or works based on it. + + 6. Each time you redistribute the Program (or any work based on the +Program), the recipient automatically receives a license from the +original licensor to copy, distribute or modify the Program subject to +these terms and conditions. You may not impose any further +restrictions on the recipients' exercise of the rights granted herein. +You are not responsible for enforcing compliance by third parties to +this License. + + 7. If, as a consequence of a court judgment or allegation of patent +infringement or for any other reason (not limited to patent issues), +conditions are imposed on you (whether by court order, agreement or +otherwise) that contradict the conditions of this License, they do not +excuse you from the conditions of this License. If you cannot +distribute so as to satisfy simultaneously your obligations under this +License and any other pertinent obligations, then as a consequence you +may not distribute the Program at all. For example, if a patent +license would not permit royalty-free redistribution of the Program by +all those who receive copies directly or indirectly through you, then +the only way you could satisfy both it and this License would be to +refrain entirely from distribution of the Program. + +If any portion of this section is held invalid or unenforceable under +any particular circumstance, the balance of the section is intended to +apply and the section as a whole is intended to apply in other +circumstances. + +It is not the purpose of this section to induce you to infringe any +patents or other property right claims or to contest validity of any +such claims; this section has the sole purpose of protecting the +integrity of the free software distribution system, which is +implemented by public license practices. Many people have made +generous contributions to the wide range of software distributed +through that system in reliance on consistent application of that +system; it is up to the author/donor to decide if he or she is willing +to distribute software through any other system and a licensee cannot +impose that choice. + +This section is intended to make thoroughly clear what is believed to +be a consequence of the rest of this License. + + + 8. If the distribution and/or use of the Program is restricted in +certain countries either by patents or by copyrighted interfaces, the +original copyright holder who places the Program under this License +may add an explicit geographical distribution limitation excluding +those countries, so that distribution is permitted only in or among +countries not thus excluded. In such case, this License incorporates +the limitation as if written in the body of this License. + + 9. The Free Software Foundation may publish revised and/or new versions +of the General Public License from time to time. Such new versions will +be similar in spirit to the present version, but may differ in detail to +address new problems or concerns. + +Each version is given a distinguishing version number. If the Program +specifies a version number of this License which applies to it and "any +later version", you have the option of following the terms and conditions +either of that version or of any later version published by the Free +Software Foundation. If the Program does not specify a version number of +this License, you may choose any version ever published by the Free Software +Foundation. + + 10. If you wish to incorporate parts of the Program into other free +programs whose distribution conditions are different, write to the author +to ask for permission. For software which is copyrighted by the Free +Software Foundation, write to the Free Software Foundation; we sometimes +make exceptions for this. Our decision will be guided by the two goals +of preserving the free status of all derivatives of our free software and +of promoting the sharing and reuse of software generally. + + NO WARRANTY + + 11. BECAUSE THE PROGRAM IS LICENSED FREE OF CHARGE, THERE IS NO WARRANTY +FOR THE PROGRAM, TO THE EXTENT PERMITTED BY APPLICABLE LAW. EXCEPT WHEN +OTHERWISE STATED IN WRITING THE COPYRIGHT HOLDERS AND/OR OTHER PARTIES +PROVIDE THE PROGRAM "AS IS" WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED +OR IMPLIED, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF +MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. THE ENTIRE RISK AS +TO THE QUALITY AND PERFORMANCE OF THE PROGRAM IS WITH YOU. SHOULD THE +PROGRAM PROVE DEFECTIVE, YOU ASSUME THE COST OF ALL NECESSARY SERVICING, +REPAIR OR CORRECTION. + + 12. IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING +WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MAY MODIFY AND/OR +REDISTRIBUTE THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU FOR DAMAGES, +INCLUDING ANY GENERAL, SPECIAL, INCIDENTAL OR CONSEQUENTIAL DAMAGES ARISING +OUT OF THE USE OR INABILITY TO USE THE PROGRAM (INCLUDING BUT NOT LIMITED +TO LOSS OF DATA OR DATA BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY +YOU OR THIRD PARTIES OR A FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER +PROGRAMS), EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE +POSSIBILITY OF SUCH DAMAGES. + + END OF TERMS AND CONDITIONS + + + How to Apply These Terms to Your New Programs + + If you develop a new program, and you want it to be of the greatest +possible use to the public, the best way to achieve this is to make it +free software which everyone can redistribute and change under these terms. + + To do so, attach the following notices to the program. It is safest +to attach them to the start of each source file to most effectively +convey the exclusion of warranty; and each file should have at least +the "copyright" line and a pointer to where the full notice is found. + + + Copyright (C) 19yy + + 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., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + + +Also add information on how to contact you by electronic and paper mail. + +If the program is interactive, make it output a short notice like this +when it starts in an interactive mode: + + Gnomovision version 69, Copyright (C) 19yy name of author + Gnomovision comes with ABSOLUTELY NO WARRANTY; for details type `show w'. + This is free software, and you are welcome to redistribute it + under certain conditions; type `show c' for details. + +The hypothetical commands `show w' and `show c' should show the appropriate +parts of the General Public License. Of course, the commands you use may +be called something other than `show w' and `show c'; they could even be +mouse-clicks or menu items--whatever suits your program. + +You should also get your employer (if you work as a programmer) or your +school, if any, to sign a "copyright disclaimer" for the program, if +necessary. Here is a sample; alter the names: + + Yoyodyne, Inc., hereby disclaims all copyright interest in the program + `Gnomovision' (which makes passes at compilers) written by James Hacker. + + , 1 April 1989 + Ty Coon, President of Vice + +This General Public License does not permit incorporating your program into +proprietary programs. If your program is a subroutine library, you may +consider it more useful to permit linking proprietary applications with the +library. If this is what you want to do, use the GNU Library General +Public License instead of this License. + diff --git a/externals/grill/dynext/license.txt b/externals/grill/dynext/license.txt new file mode 100644 index 00000000..4a10fba2 --- /dev/null +++ b/externals/grill/dynext/license.txt @@ -0,0 +1,50 @@ +dyn~ - dynamic object management for PD +Copyright (c) Thomas Grill (xovo@gmx.net) + +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., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. + +In the official dyn~ distribution, the GNU General Public License is +in the file gpl.txt + +--------------------------------------------------------- + + OTHER COPYRIGHT NOTICES + +--------------------------------------------------------- +This package uses the flext C++ layer - See its license text below: + + +--- flext ---------------------------------------------- +flext - C++ layer for Max/MSP and pd (pure data) externals +Copyright (C) 2001-2003 Thomas Grill + +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., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. + +In the official flext distribution, the GNU General Public License is +in the file gpl.txt + + diff --git a/externals/grill/dynext/make-files.txt b/externals/grill/dynext/make-files.txt new file mode 100644 index 00000000..0538f6b7 --- /dev/null +++ b/externals/grill/dynext/make-files.txt @@ -0,0 +1,8 @@ +NAME=dyn~ + +# all the source files from the package +DIR=src + +SRCS= main.cpp +HDRS= + diff --git a/externals/grill/dynext/makefile.pd-darwin b/externals/grill/dynext/makefile.pd-darwin new file mode 100644 index 00000000..f7588e29 --- /dev/null +++ b/externals/grill/dynext/makefile.pd-darwin @@ -0,0 +1,86 @@ +# dyn~ - dynamic object management for PD +# +# Copyright (c)Thomas Grill (xovo@gmx.net) +# For information on usage and redistribution, and for a DISCLAIMER OF ALL +# WARRANTIES, see the file, "license.txt," in this distribution. +# +# +# Makefile for gcc @ darwin (OSX) +# +# usage: +# to build run "make -f makefile.pd-darwin" +# to install (as root), do "make -f makefile.pd-darwin install" +# + +CONFIG=config-pd-darwin.txt + +include $(CONFIG) + +# compiler+linker stuff +INCLUDES=$(PDPATH) +LIBPATH= +FLAGS=-DFLEXT_SYS=2 +CFLAGS=-O2 ${UFLAGS} -Wno-unused -Wno-parentheses -Wno-switch -Wstrict-prototypes +LIBS=m +FRAMEWORKS=vecLib +LDFLAGS+=-Wl,-x -Wl,-S -bundle -bundle_loader $(PD) + +ifdef FLEXT_SHARED +CFLAGS+=-DFLEXT_SHARED +LDFLAGS+=-L$(FLEXTPATH) +FLEXTLIB=-lflext + +else + +FLEXTLIB=$(FLEXTPATH)/libflext.a + +endif + + +# --------------------------------------------- +# the rest can stay untouched +# ---------------------------------------------- + +# all the source files from the package +include make-files.txt + +TARGET=$(TARGDIR)/$(NAME).pd_darwin + +# default target +all: $(TARGDIR) $(TARGET) + +$(patsubst %,$(DIR)/%,$(SRCS)): $(patsubst %,$(DIR)/%,$(HDRS)) $(CONFIG) + touch $@ + +$(TARGDIR): + mkdir $(TARGDIR) + +$(TARGDIR)/%.o : $(DIR)/%.cpp + $(CXX) -c $(CFLAGS) $(FLAGS) $(patsubst %,-I%,$(INCLUDES) $(FLEXTPATH)) $< -o $@ + +$(TARGET) : $(patsubst %.cpp,$(TARGDIR)/%.o,$(SRCS)) + $(CXX) $(LDFLAGS) $^ $(patsubst %,-L%,$(LIBPATH)) $(patsubst %,-l%,$(LIBS)) $(patsubst %,-framework %,$(FRAMEWORKS)) $(FLEXTLIB) -o $@ + chmod 755 $@ + +$(INSTPATH): + mkdir $(INSTPATH) + +install:: $(INSTPATH) + +install:: $(TARGET) + cp $^ $(INSTPATH) +# chown root.root $(patsubst %,$(INSTPATH)/%,$(notdir $^)) +# chmod 755 $(patsubst %,$(INSTPATH)/%,$(notdir $^)) + +.PHONY: clean +clean: + rm -f $(TARGDIR)/*.o $(TARGET) + + + + + + + + + diff --git a/externals/grill/dynext/makefile.pd-linux b/externals/grill/dynext/makefile.pd-linux new file mode 100644 index 00000000..9d401053 --- /dev/null +++ b/externals/grill/dynext/makefile.pd-linux @@ -0,0 +1,98 @@ +# dyn~ - dynamic object management for PD +# +# Copyright (c)Thomas Grill (xovo@gmx.net) +# For information on usage and redistribution, and for a DISCLAIMER OF ALL +# WARRANTIES, see the file, "license.txt," in this distribution. +# +# +# Makefile for gcc @ linux +# +# usage: +# to build run "make -f makefile.pd-linux" +# to install (as root), do "make -f makefile.pd-linux install" +# + +CONFIG=config-pd-linux.txt + +include $(CONFIG) + + +# compiler+linker stuff +INCLUDES=$(PDPATH) +LIBPATH= +FLAGS=-DFLEXT_SYS=2 +CFLAGS=-O2 $(UFLAGS) +LDFLAGS=$(UFLAGS) # needed by icc +LIBS=stdc++ + + +ifdef FLEXT_SHARED +CFLAGS+=-shared -DFLEXT_SHARED +LDFLAGS+=-L $(FLEXTPATH) +LIBFLEXT=-lflext + +ifeq ($(CXX),icc) +LDFLAGS+=-i_dynamic +else +LDFLAGS+=-Wl,-Bdynamic +endif + +else + +LIBFLEXT=$(FLEXTPATH)/libflext.a + +endif + + +# --------------------------------------------- +# the rest can stay untouched +# ---------------------------------------------- + +NAME=dyn~ + +# all the source files from the package +include make-files.txt + + + +TARGET=$(TARGDIR)/$(NAME).pd_linux + +# default target +all: $(TARGDIR) $(TARGET) + +$(patsubst %,$(DIR)/%,$(SRCS)): $(patsubst %,$(DIR)/%,$(HDRS)) $(MAKEFILE) $(CONFIG) + touch $@ + +$(TARGDIR): + -mkdir $(TARGDIR) + +$(TARGDIR)/%.o : $(DIR)/%.cpp + $(CXX) -c $(CFLAGS) $(FLAGS) $(patsubst %,-I%,$(INCLUDES) $(FLEXTPATH)) $< -o $@ + +$(TARGET) : $(patsubst %.cpp,$(TARGDIR)/%.o,$(SRCS)) + $(CXX) -shared $(LDFLAGS) -o $@ $^ $(LIBFLEXT) $(patsubst %,-L%,$(LIBPATH)) $(patsubst %,-l%,$(LIBS)) + strip --strip-unneeded $@ + chmod 755 $@ + +$(INSTPATH): + -mkdir $(INSTPATH) + +install:: $(INSTPATH) + +install:: $(TARGET) + cp $^ $(INSTPATH) + chown root.root $(patsubst %,$(INSTPATH)/%,$(notdir $^)) + chmod 755 $(patsubst %,$(INSTPATH)/%,$(notdir $^)) + +.PHONY: clean +clean: + rm -f $(TARGDIR)/*.o $(TARGET) + + + + + + + + + diff --git a/externals/grill/dynext/makefile.pd-msvc b/externals/grill/dynext/makefile.pd-msvc new file mode 100644 index 00000000..94561b3e --- /dev/null +++ b/externals/grill/dynext/makefile.pd-msvc @@ -0,0 +1,60 @@ +# dyn~ - dynamic object management for PD +# +# Copyright (c)Thomas Grill (xovo@gmx.net) +# For information on usage and redistribution, and for a DISCLAIMER OF ALL +# WARRANTIES, see the file, "license.txt," in this distribution. +# +# +# Makefile for MSVC++ 7 +# +# usage: +# to build run "make -f makefile.pd-msvc" +# + +!include config-pd-msvc.txt + +# includes +INCPATH=/I"$(MSVCPATH)\include" /I"$(PDPATH)\src" /I"$(FLEXTPATH)" +LIBPATH=/LIBPATH:"$(MSVCPATH)\lib" /LIBPATH:"$(PDPATH)\bin" /LIBPATH:"$(FLEXTPATH)" +LIBS=pd.lib flext-pdwin.lib + +# compiler definitions and flags +DEFS=/DFLEXT_SYS=2 + +CFLAGS=/EHsc /G6 /Ox /ML + +# the rest can stay untouched +# ---------------------------------------------- + +# all the source files from the package +!include make-files.txt + +# ----------------------------------------------- + +NAME=dyn~ + +all: $(OUTPATH) $(OUTPATH)\$(NAME).dll + +# remove build +clean: + -del /q $(OUTPATH) > nul + -rmdir $(OUTPATH) > nul + +OBJS= $(SRCS:.cpp=.obj) + +$(OUTPATH): + -mkdir $(OUTPATH) > nul + +{$(DIR)}.cpp{}.obj: + cl /c /LD $(CFLAGS) $(DEFS) $(INCPATH) $** /Fo$(OUTPATH)\$@ + +$(OUTPATH)\$(NAME).dll: $(OBJS) + cd $(OUTPATH) + link /DLL /out:$(NAME).dll /INCREMENTAL:NO $** $(LIBS) $(LIBPATH) + @-del *.exp + @-del *.lib + cd .. +!ifdef INSTPATH + @-if not exist $(INSTPATH) mkdir $(INSTPATH) + copy $@ $(INSTPATH) > nul +!endif diff --git a/externals/grill/dynext/pd/help-dyn~.pd b/externals/grill/dynext/pd/help-dyn~.pd new file mode 100644 index 00000000..61d9e572 --- /dev/null +++ b/externals/grill/dynext/pd/help-dyn~.pd @@ -0,0 +1,138 @@ +#N canvas 81 25 813 532 12; +#N canvas 71 10 550 557 examples 0; +#X floatatom 148 239 5 0 0 0 - - -; +#X floatatom 105 304 5 0 0 0 - - -; +#X floatatom 113 501 5 0 0 0 - - -; +#X obj 251 273 +; +#X floatatom 252 301 5 0 0 0 - - -; +#X floatatom 155 423 5 0 0 0 - - -; +#X floatatom 244 424 5 0 0 0 - - -; +#X floatatom 306 422 5 0 0 0 - - -; +#X obj 261 468 * 2; +#X obj 303 469 + 1; +#X floatatom 270 499 5 0 0 0 - - -; +#X floatatom 256 238 5 0 0 0 - - -; +#X floatatom 224 72 5 0 0 0 - - -; +#X floatatom 98 136 5 0 0 0 - - -; +#X floatatom 237 133 5 0 0 0 - - -; +#X obj 236 107 f; +#X obj 99 107 dyn~ 0 1 0 1; +#X obj 106 273 dyn~ 0 2 0 1; +#X obj 113 468 dyn~ 0 3 0 1; +#X msg 37 36 reset \, newobj . a f \, conn 0 a 0 \, conn a 0 0; +#X msg 37 197 reset \, newobj . a + \, conn 0 a 0 \, conn 1 a 1 \, +conn a 0 0; +#X msg 37 368 reset \, newobj . a * 2 \, newobj . b + 1 \, conn 0 a +0 \, conn 1 a 1 \, conn a 0 b 0 \, conn 2 b 1 \, conn b 0 0; +#X connect 0 0 3 0; +#X connect 0 0 17 1; +#X connect 3 0 4 0; +#X connect 5 0 8 0; +#X connect 5 0 18 1; +#X connect 6 0 8 1; +#X connect 6 0 18 2; +#X connect 7 0 9 1; +#X connect 7 0 18 3; +#X connect 8 0 9 0; +#X connect 9 0 10 0; +#X connect 11 0 3 1; +#X connect 11 0 17 2; +#X connect 12 0 15 0; +#X connect 12 0 16 1; +#X connect 15 0 14 0; +#X connect 16 0 13 0; +#X connect 17 0 1 0; +#X connect 18 0 2 0; +#X connect 19 0 16 0; +#X connect 20 0 17 0; +#X connect 21 0 18 0; +#X restore 514 459 pd examples; +#X msg 127 70 reset; +#X text 184 70 clear all objects and connections; +#X msg 129 231 conn 0 a 0; +#X text 224 230 connect dyn-inlet 0 to a-inlet 0; +#X msg 129 260 conn a 0 0; +#X text 224 259 connect a-outlet 0 to dyn-outlet 0; +#X msg 129 293 conn x 2 y 3; +#X text 234 292 connect x-outlet 2 to y-inlet 3; +#X msg 129 356 del a; +#X text 181 358 delete object "a"; +#X obj 11 10 cnv 15 700 40 empty empty dyn~ 10 22 0 24 -260818 -1 0 +; +#X text 133 32 http://www.parasitaere-kapazitaeten.net; +#X msg 128 387 send a message 1; +#X text 270 387 send "message 1" to a-inlet 0; +#X obj 54 468 dyn~ 0 1 0 2; +#X text 156 467 dyn sig/msg inlets sig/msg outlets; +#X msg 165 421 vis \$1; +#X obj 129 421 tgl 20 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 +1; +#X text 222 417 make patch visible/invisible; +#X msg 129 323 dis x 2 y 3; +#X text 234 324 disconnect x-outlet 2 to y-inlet 3; +#X text 187 98 reload all objects (keep connections); +#X msg 127 98 reload; +#X text 218 432 (connections are not drawn at the moment!); +#N canvas 178 192 578 434 dsp-ex 0; +#X obj 73 380 dac~; +#X obj 183 257 hsl 128 15 0 1000 0 0 empty empty empty -2 -6 0 8 -261681 +-1 -1 0 1; +#X obj 194 282 nbx 5 14 -1e+037 1e+037 0 0 empty empty empty 0 -6 0 +10 -262144 -1 -1 0 256; +#X msg 66 78 reset; +#X obj 467 323 loadbang; +#X msg 466 347 \; pd dsp 1; +#X text 65 56 clear all; +#X obj 47 278 dyn~ 0 1 2 0; +#X text 70 107 make an oscillator (left); +#X text 66 167 add an oscillator (double frq \, right); +#X text 24 17 signals passing through dyn~ are delayed by one block +; +#X text 74 239 select frequency; +#X obj 57 341 *~ 0.2; +#X obj 141 340 *~ 0.2; +#X obj 179 313 hsl 128 15 0.001 1 1 0 empty empty empty -2 -6 0 8 -262131 +-1 -1 0 1; +#X text 316 309 gain; +#X msg 64 129 newobj . o1 osc~ 220 \, conn 0 o1 0 \, conn o1 0 0; +#X msg 67 187 newobj . m * 1.5 \, newobj . o2 osc~ 330 \, conn 0 m +0 \, conn m 0 o2 0 \, conn o2 0 1; +#X connect 1 0 2 0; +#X connect 1 0 7 1; +#X connect 3 0 7 0; +#X connect 4 0 5 0; +#X connect 7 0 12 0; +#X connect 7 1 13 0; +#X connect 12 0 0 0; +#X connect 13 0 0 1; +#X connect 14 0 12 1; +#X connect 14 0 13 1; +#X connect 16 0 7 0; +#X connect 17 0 7 0; +#X restore 514 487 pd dsp-ex; +#X msg 129 156 newmsg . b Hello; +#X msg 128 124 newobj . a + 1; +#X text 247 124 make new object [+ 1] with name "a" in root patcher +("."); +#X text 269 156 make new message object [Hello( with name "b" in root +patcher; +#X msg 128 200 newobj . c pd sub; +#X text 273 200 make sub patcher; +#X msg 432 198 newobj c d bang; +#X text 561 198 make object in sub patcher; +#X text 133 12 dynamic object management \, (C)2003-2004 Thomas Grill +; +#X connect 1 0 15 0; +#X connect 3 0 15 0; +#X connect 5 0 15 0; +#X connect 7 0 15 0; +#X connect 9 0 15 0; +#X connect 13 0 15 0; +#X connect 17 0 15 0; +#X connect 18 0 17 0; +#X connect 20 0 15 0; +#X connect 23 0 15 0; +#X connect 26 0 15 0; +#X connect 27 0 15 0; +#X connect 30 0 15 0; +#X connect 32 0 15 0; diff --git a/externals/grill/dynext/readme.txt b/externals/grill/dynext/readme.txt index e49df577..2942d4e6 100755 --- a/externals/grill/dynext/readme.txt +++ b/externals/grill/dynext/readme.txt @@ -1,70 +1,70 @@ -dyn~ - dynamic object management for PD - -Copyright (c)Thomas Grill (xovo@gmx.net) -For information on usage and redistribution, and for a DISCLAIMER OF ALL -WARRANTIES, see the file, "license.txt," in this distribution. - - ----------------------------------------------------------------------------- - -You will need the flext C++ layer for PD and Max/MSP externals to compile this. -see http://www.parasitaere-kapazitaeten.net/ext - ----------------------------------------------------------------------------- - -The package should at least compile (and is tested) with the following compilers/platforms: - -pd - Windows: -------------- -o Microsoft Visual C++: edit "config-pd-msvc.txt" & run "build-pd-msvc.bat" - - -pd - linux: ------------ -o GCC: edit "config-pd-linux.txt" & run "sh build-pd-linux.sh" - - -pd - MacOSX: ------------ -o GCC: edit "config-pd-darwin.txt" & run "sh build-pd-darwin.sh" - ----------------------------------------------------------------------------- - -BUGS: ------ - -- deletion of subcanvases and objects therein is crashy - - -CHANGES: --------- - -0.1.1: -- using aligned memory -- cached several symbols - -0.1.0: -- first release: PD 0.37 supports all necessary functionality -- cleaner message-based object creation -- also messages and comments can be created now -- handle sub-canvases - -0.0.2: -- give the dyn~ subcanvas a name (hard to access - for the wild scripters out there), - so that it is different from the canvas where dyn~ is in -- corrected names of message in- and out-proxies. -- manually retrigger DSP after loading an abstraction - -0.0.1: -- send loadbangs for loaded abstractions -- now use "dsp" message to enable dsp in sub-canvas (no need of canvas_addtolist, canvas_takefromlist any more) - - -0.0.0 - initial cvs version - - - -TODO: --------- -- Hash table for object tags -- add mute attribute +dyn~ - dynamic object management for PD + +Copyright (c)Thomas Grill (xovo@gmx.net) +For information on usage and redistribution, and for a DISCLAIMER OF ALL +WARRANTIES, see the file, "license.txt," in this distribution. + + +---------------------------------------------------------------------------- + +You will need the flext C++ layer for PD and Max/MSP externals to compile this. +see http://www.parasitaere-kapazitaeten.net/ext + +---------------------------------------------------------------------------- + +The package should at least compile (and is tested) with the following compilers/platforms: + +pd - Windows: +------------- +o Microsoft Visual C++: edit "config-pd-msvc.txt" & run "build-pd-msvc.bat" + + +pd - linux: +----------- +o GCC: edit "config-pd-linux.txt" & run "sh build-pd-linux.sh" + + +pd - MacOSX: +----------- +o GCC: edit "config-pd-darwin.txt" & run "sh build-pd-darwin.sh" + +---------------------------------------------------------------------------- + +BUGS: +----- + +- deletion of subcanvases and objects therein is crashy + + +CHANGES: +-------- + +0.1.1: +- using aligned memory +- cached several symbols + +0.1.0: +- first release: PD 0.37 supports all necessary functionality +- cleaner message-based object creation +- also messages and comments can be created now +- handle sub-canvases + +0.0.2: +- give the dyn~ subcanvas a name (hard to access - for the wild scripters out there), + so that it is different from the canvas where dyn~ is in +- corrected names of message in- and out-proxies. +- manually retrigger DSP after loading an abstraction + +0.0.1: +- send loadbangs for loaded abstractions +- now use "dsp" message to enable dsp in sub-canvas (no need of canvas_addtolist, canvas_takefromlist any more) + + +0.0.0 - initial cvs version + + + +TODO: +-------- +- Hash table for object tags +- add mute attribute diff --git a/externals/grill/dynext/src/main.cpp b/externals/grill/dynext/src/main.cpp new file mode 100644 index 00000000..a9aee6b7 --- /dev/null +++ b/externals/grill/dynext/src/main.cpp @@ -0,0 +1,776 @@ +/* + +dyn~ - dynamical object management for PD + +Copyright (c)2003-2004 Thomas Grill (xovo@gmx.net) +For information on usage and redistribution, and for a DISCLAIMER OF ALL +WARRANTIES, see the file, "license.txt," in this distribution. + + +-- this is all a bit hacky, but hey, it's PD! -- + +*/ + +#include + +#if !defined(FLEXT_VERSION) || (FLEXT_VERSION < 406) +#error You need at least flext version 0.4.6 +#endif + +#define DYN_VERSION "0.1.1pre" + + +#if FLEXT_SYS != FLEXT_SYS_PD +#error Sorry, dyn~ works for PD only! +#endif + + +#include "flinternal.h" +#include + +#ifdef _MSC_VER +#pragma warning(disable: 4091 4244) +#endif +#include "g_canvas.h" + + +class dyn: + public flext_dsp +{ + FLEXT_HEADER_S(dyn,flext_dsp,setup) +public: + dyn(int argc,const t_atom *argv); + virtual ~dyn(); + + void m_reset(); + void m_reload(); // refresh objects/abstractions + void m_newobj(int argc,const t_atom *argv); + void m_newmsg(int argc,const t_atom *argv); + void m_newtext(int argc,const t_atom *argv); + void m_del(const t_symbol *n); + void m_connect(int argc,const t_atom *argv) { ConnDis(true,argc,argv); } + void m_disconnect(int argc,const t_atom *argv) { ConnDis(false,argc,argv); } + void m_send(int argc,const t_atom *argv); + void m_vis(bool vis); + +protected: + + static const t_symbol *k_obj,*k_msg,*k_text; + + class obj { + public: + obj(unsigned long i,t_gobj *o): id(i),object(o),nxt(NULL) {} + + void Add(obj *o); + + unsigned long id; + t_gobj *object; + obj *nxt; + } *root; + + + obj *Find(const t_symbol *n); + t_glist *FindCanvas(const t_symbol *n); + void Add(const t_symbol *n,t_gobj *o); + + t_gobj *New(const t_symbol *kind,int _argc_,const t_atom *_argv_,bool add = true); + void Delete(t_gobj *o); + + void ConnDis(bool conn,int argc,const t_atom *argv); + + + virtual bool m_method_(int n,const t_symbol *s,int argc,const t_atom *argv); + virtual void m_dsp(int n,t_signalvec const *insigs,t_signalvec const *outsigs); + virtual void m_signal(int n,t_sample *const *insigs,t_sample *const *outsigs); + + + // proxy object + class proxy + { + public: + t_object obj; + dyn *th; + int n; + t_sample *buf; + t_sample defsig; + + void init(dyn *t); + + static void px_exit(proxy *px) { if(px->buf) FreeAligned(px->buf); } + }; + + // proxy for inbound messages + class proxyin: + public proxy + { + public: + t_outlet *outlet; + + void Message(const t_symbol *s,int argc,const t_atom *argv) + { + typedmess((t_pd *)&obj,(t_symbol *)s,argc,(t_atom *)argv); + } + + void init(dyn *t,bool s); + + static void px_method(proxyin *obj,const t_symbol *s,int argc,const t_atom *argv) + { + outlet_anything(obj->outlet,(t_symbol *)s,argc,(t_atom *)argv); + } + + static void dsp(proxyin *x, t_signal **sp); + }; + + + // proxy for outbound messages + class proxyout: + public proxy + { + public: + int outlet; + + void init(dyn *t,int o,bool s); + + static void px_method(proxyout *obj,const t_symbol *s,int argc,const t_atom *argv) + { + obj->th->ToOutAnything(obj->outlet,s,argc,argv); + } + + static void dsp(proxyout *x, t_signal **sp); + }; + + static t_class *pxin_class,*pxout_class; + static t_class *pxins_class,*pxouts_class; + + proxyin **pxin; + proxyout **pxout; + + static t_object *pxin_new() { return (t_object *)pd_new(pxin_class); } + static t_object *pxins_new() { return (t_object *)pd_new(pxins_class); } + static t_object *pxout_new() { return (t_object *)pd_new(pxout_class); } + static t_object *pxouts_new() { return (t_object *)pd_new(pxouts_class); } + + int m_inlets,s_inlets,m_outlets,s_outlets; + t_canvas *canvas; + +private: + static void setup(t_classid c); + + FLEXT_CALLBACK(m_reset) + FLEXT_CALLBACK(m_reload) + FLEXT_CALLBACK_V(m_newobj) + FLEXT_CALLBACK_V(m_newmsg) + FLEXT_CALLBACK_V(m_newtext) + FLEXT_CALLBACK_S(m_del) + FLEXT_CALLBACK_V(m_connect) + FLEXT_CALLBACK_V(m_disconnect) + FLEXT_CALLBACK_V(m_send) + FLEXT_CALLBACK_B(m_vis) + + static const t_symbol *sym_dot,*sym_dynsin,*sym_dynsout,*sym_dynin,*sym_dynout,*sym_dyncanvas; + static const t_symbol *sym_vis,*sym_loadbang,*sym_dsp; +}; + +FLEXT_NEW_DSP_V("dyn~",dyn) + + +t_class *dyn::pxin_class = NULL,*dyn::pxout_class = NULL; +t_class *dyn::pxins_class = NULL,*dyn::pxouts_class = NULL; + +const t_symbol *dyn::k_obj = NULL; +const t_symbol *dyn::k_msg = NULL; +const t_symbol *dyn::k_text = NULL; + +const t_symbol *dyn::sym_dot = NULL; +const t_symbol *dyn::sym_dynsin = NULL; +const t_symbol *dyn::sym_dynsout = NULL; +const t_symbol *dyn::sym_dynin = NULL; +const t_symbol *dyn::sym_dynout = NULL; +const t_symbol *dyn::sym_dyncanvas = NULL; + +const t_symbol *dyn::sym_vis = NULL; +const t_symbol *dyn::sym_loadbang = NULL; +const t_symbol *dyn::sym_dsp = NULL; + + +void dyn::setup(t_classid c) +{ + post(""); + post("dyn~ %s - dynamic object management, (C)2003-04 Thomas Grill",DYN_VERSION); + post(""); + + sym_dynsin = MakeSymbol("dyn_in~"); + sym_dynsout = MakeSymbol("dyn_out~"); + sym_dynin = MakeSymbol("dyn_in"); + sym_dynout = MakeSymbol("dyn_out"); + + sym_dot = MakeSymbol("."); + sym_dyncanvas = MakeSymbol(" dyn~-canvas "); + + // set up proxy class for inbound messages + pxin_class = class_new(const_cast(sym_dynin),(t_newmethod)pxin_new,(t_method)proxy::px_exit,sizeof(proxyin),0, A_NULL); + add_anything(pxin_class,proxyin::px_method); + + // set up proxy class for inbound signals + pxins_class = class_new(const_cast(sym_dynsin),(t_newmethod)pxins_new,(t_method)proxy::px_exit,sizeof(proxyin),0, A_NULL); + add_dsp(pxins_class,proxyin::dsp); + CLASS_MAINSIGNALIN(pxins_class, proxyin, defsig); + + // set up proxy class for outbound messages + pxout_class = class_new(const_cast(sym_dynout),(t_newmethod)pxout_new,(t_method)proxy::px_exit,sizeof(proxyout),0, A_NULL); + add_anything(pxout_class,proxyout::px_method); + + // set up proxy class for outbound signals + pxouts_class = class_new(const_cast(sym_dynsout),(t_newmethod)pxouts_new,(t_method)proxy::px_exit,sizeof(proxyout),0, A_NULL); + add_dsp(pxouts_class,proxyout::dsp); + CLASS_MAINSIGNALIN(pxouts_class, proxyout, defsig); + + // set up dyn~ + FLEXT_CADDMETHOD_(c,0,"reset",m_reset); + FLEXT_CADDMETHOD_(c,0,"reload",m_reload); + FLEXT_CADDMETHOD_(c,0,"newobj",m_newobj); + FLEXT_CADDMETHOD_(c,0,"newmsg",m_newmsg); + FLEXT_CADDMETHOD_(c,0,"newtext",m_newtext); + FLEXT_CADDMETHOD_(c,0,"del",m_del); + FLEXT_CADDMETHOD_(c,0,"conn",m_connect); + FLEXT_CADDMETHOD_(c,0,"dis",m_disconnect); + FLEXT_CADDMETHOD_(c,0,"send",m_send); + FLEXT_CADDMETHOD_(c,0,"vis",m_vis); + + // set up symbols + k_obj = MakeSymbol("obj"); + k_msg = MakeSymbol("msg"); + k_text = MakeSymbol("text"); + + sym_vis = MakeSymbol("vis"); + sym_loadbang = MakeSymbol("loadbang"); + sym_dsp = MakeSymbol("dsp"); +} + + +/* +There must be a separate canvas for the dynamically created objects as some mechanisms in PD +(like copy/cut/paste) get confused otherwise. +On the other hand it seems to be possible to create objects without a canvas. +They won't receive DSP processing, though, hence it's only possible for message objects. +Problems arise when an object is not yet loaded... the canvas environment is then needed to +load it.. if there is no canvas, PD currently crashes. + + +How to create the canvas: +1) via direct call to canvas_new() +2) a message to pd_canvasmaker + con: does not return a pointer for the created canvas + +There are two possibilities for the canvas +1) make a sub canvas to the one where dyn~ resides: + pro: no problems with environment (abstractions are found and loaded correctly) +2) make a root canvas: + pro: it will be in the canvas list per default, hence DSP is processed + con: canvas environment must be created manually + (is normally done by pd_canvasmaker if there is a directory set, which is again done somewhere else) + +Enabling DSP on the subcanvas +1) send it a "dsp" message (see rabin~ by K.Czaja)... but, which signal vector should be taken? + -> answer: NONE! (just send NULL) +2) add it to the list of _root_ canvases (these will be DSP-processed per default) + (for this the canvas_addtolist and canvas_takefromlist functions are used) + however, it's not clear if this can lead to problems since it is no root-canvas! + +In all cases the 1)s have been chosen as the cleaner solution +*/ + +dyn::dyn(int argc,const t_atom *argv): + root(NULL), + canvas(NULL), + pxin(NULL),pxout(NULL) +{ + if(argc < 4) { + post("%s - Syntax: dyn~ sig-ins msg-ins sig-outs msg-outs",thisName()); + InitProblem(); + return; + } + + s_inlets = GetAInt(argv[0]); + m_inlets = GetAInt(argv[1]); + s_outlets = GetAInt(argv[2]); + m_outlets = GetAInt(argv[3]); + + int i; + + // --- make a sub-canvas for dyn~ ------ + + t_atom arg[6]; + SetInt(arg[0],0); // xpos + SetInt(arg[1],0); // ypos + SetInt(arg[2],700); // xwidth + SetInt(arg[3],520); // xwidth + SetSymbol(arg[4],sym_dyncanvas); // canvas name + SetInt(arg[5],0); // visible + + canvas = canvas_new(NULL, NULL, 6, arg); + // must do that.... + canvas_unsetcurrent(canvas); + + // --- create inlet proxies ------ + + pxin = new proxyin *[s_inlets+m_inlets]; + for(i = 0; i < s_inlets+m_inlets; ++i) { + bool sig = i < s_inlets; + + t_atom lst[5]; + SetInt(lst[0],i*100); + SetInt(lst[1],10); + SetSymbol(lst[2],sym_dot); + SetSymbol(lst[3],sym__); + SetSymbol(lst[4],sig?sym_dynsin:sym_dynin); + + try { + pxin[i] = (proxyin *)New(k_obj,5,lst,false); + if(pxin[i]) pxin[i]->init(this,sig); + } + catch(...) { + error("%s - Error creating inlet proxy",thisName()); + } + } + + // --- create outlet proxies ------ + + pxout = new proxyout *[s_outlets+m_outlets]; + for(i = 0; i < s_outlets+m_outlets; ++i) { + bool sig = i < s_outlets; + + t_atom lst[5]; + SetInt(lst[0],i*100); + SetInt(lst[1],500); + SetSymbol(lst[2],sym_dot); + SetSymbol(lst[3],sym__); + SetSymbol(lst[4],sig?sym_dynsout:sym_dynout); + + try { + pxout[i] = (proxyout *)New(k_obj,5,lst,false); + if(pxout[i]) pxout[i]->init(this,i,sig); + } + catch(...) { + error("%s - Error creating outlet proxy",thisName()); + } + } + + AddInSignal("Messages (newobj,newmsg,newtext,del,conn,dis)"); + AddInSignal(s_inlets); + AddInAnything(m_inlets); + AddOutSignal(s_outlets); + AddOutAnything(m_outlets); +} + +dyn::~dyn() +{ + m_reset(); + + if(canvas) pd_free((t_pd *)canvas); + + if(pxin) delete[] pxin; + if(pxout) delete[] pxout; +} + + +void dyn::obj::Add(obj *o) { if(nxt) nxt->Add(o); else nxt = o; } + +dyn::obj *dyn::Find(const t_symbol *n) +{ + unsigned long id = *(unsigned long *)n; + obj *o; + for(o = root; o && o->id != id; o = o->nxt) {} + return o; +} + +t_glist *dyn::FindCanvas(const t_symbol *n) +{ + if(n == sym_dot) + return canvas; + else { + obj *o = Find(n); + if(o && pd_class(&o->object->g_pd) == canvas_class) + return (t_glist *)o->object; + else + return NULL; + } +} + +void dyn::Add(const t_symbol *n,t_gobj *ob) +{ + unsigned long id = *(unsigned long *)n; + obj *o = new obj(id,ob); + if(root) root->Add(o); else root = o; +} + +void dyn::Delete(t_gobj *o) +{ + glist_delete(canvas,o); +} + +static t_gobj *GetLast(t_glist *gl) +{ + t_gobj *go = gl->gl_list; + if(go) + while(go->g_next) + go = go->g_next; + return go; +} + +t_gobj *dyn::New(const t_symbol *kind,int _argc_,const t_atom *_argv_,bool add) +{ + t_gobj *newest = NULL; + const char *err = NULL; + int argc = 0; + t_atom *argv = NULL; + const t_symbol *name = NULL,*canv = NULL; + t_glist *glist = NULL; + + if(_argc_ >= 4 && CanbeInt(_argv_[0]) && CanbeInt(_argv_[1]) && IsSymbol(_argv_[2]) && IsSymbol(_argv_[3])) { + canv = GetSymbol(_argv_[2]); + name = GetSymbol(_argv_[3]); + + argc = _argc_-2; + argv = new t_atom[argc]; + SetInt(argv[0],GetAInt(_argv_[0])); + SetInt(argv[1],GetAInt(_argv_[1])); + for(int i = 0; i < argc-2; ++i) SetAtom(argv[i+2],_argv_[i+4]); + } + else if(_argc_ >= 3 && IsSymbol(_argv_[0]) && IsSymbol(_argv_[1])) { + canv = GetSymbol(_argv_[0]); + name = GetSymbol(_argv_[1]); + + argc = _argc_; + argv = new t_atom[argc]; + // random position if not given + SetInt(argv[0],rand()%600); + SetInt(argv[1],50+rand()%400); + for(int i = 0; i < argc-2; ++i) SetAtom(argv[i+2],_argv_[i+2]); + } + + if(argv) { + if(add && (!name || name == sym_dot || Find(name))) + err = "Object name is already present"; + else if(!canv || !(glist = FindCanvas(canv))) + err = "Canvas could not be found"; + else { + // set selected canvas as current + canvas_setcurrent(glist); + + t_gobj *last = GetLast(glist); + pd_typedmess((t_pd *)glist,(t_symbol *)kind,argc,argv); + newest = GetLast(glist); + + if(kind == k_obj) { + t_object *o = (t_object *)pd_newest(); + + if(!o) { + // PD creates a text object when the intended object could not be created + t_gobj *trash = GetLast(glist); + + // Test for newly created object.... + if(trash && last != trash) { + // Delete it! + glist_delete(glist,trash); + } + newest = NULL; + } + else + newest = &o->te_g; + } + + // look for latest created object + if(newest) { + // add to database + if(add) Add(name,newest); + + // send loadbang (if it is an abstraction) + if(pd_class(&newest->g_pd) == canvas_class) { + // hide the sub-canvas + pd_vmess((t_pd *)newest,const_cast(sym_vis),"i",0); + + // loadbang the abstraction + pd_vmess((t_pd *)newest,const_cast(sym_loadbang),""); + } + + // restart dsp - that's necessary because ToCanvas is called manually + canvas_update_dsp(); + } + else + if(!err) err = "Could not create object"; + + // pop the current canvas + canvas_unsetcurrent(glist); + } + + delete[] argv; + } + else + if(!err) err = "new name object [args]"; + + if(err) throw err; + + return newest; +} + + +void dyn::m_reset() +{ + obj *o = root; + while(o) { + Delete(o->object); + obj *n = o->nxt; + delete o; + o = n; + } + root = NULL; +} + +void dyn::m_vis(bool vis) +{ + canvas_vis(canvas,vis?1:0); +} + +void dyn::m_reload() +{ + post("%s - reload: not implemented yet",thisName()); +} + +void dyn::m_newobj(int argc,const t_atom *argv) +{ + try { New(k_obj,argc,argv); } + catch(const char *err) { + post("%s - %s",thisName(),err); + } + catch(...) { + post("%s - unknown error",thisName()); + } +} + +void dyn::m_newmsg(int argc,const t_atom *argv) +{ + try { New(k_msg,argc,argv); } + catch(const char *err) { + post("%s - %s",thisName(),err); + } + catch(...) { + post("%s - unknown error",thisName()); + } +} + +void dyn::m_newtext(int argc,const t_atom *argv) +{ + try { New(k_text,argc,argv); } + catch(const char *err) { + post("%s - %s",thisName(),err); + } + catch(...) { + post("%s - unknown error",thisName()); + } +} + +void dyn::m_del(const t_symbol *n) +{ + unsigned long id = *(unsigned long *)n; + + obj *p = NULL,*o = root; + for(; o && o->id != id; p = o,o = o->nxt) {} + + if(o) { + if(p) p->nxt = o->nxt; else root = o->nxt; + + Delete(o->object); + delete o; + } + else + post("%s - del: object not found",thisName()); +} + +void dyn::ConnDis(bool conn,int argc,const t_atom *argv) +{ + const t_symbol *s_n = NULL,*d_n = NULL; + int s_x,d_x; + + if(argc == 4 && IsSymbol(argv[0]) && CanbeInt(argv[1]) && IsSymbol(argv[2]) && CanbeInt(argv[3])) { + s_n = GetSymbol(argv[0]); + s_x = GetAInt(argv[1]); + d_n = GetSymbol(argv[2]); + d_x = GetAInt(argv[3]); + } + else if(argc == 3 && CanbeInt(argv[0]) && IsSymbol(argv[1]) && CanbeInt(argv[2])) { + s_n = NULL; + s_x = GetAInt(argv[0]); + d_n = GetSymbol(argv[1]); + d_x = GetAInt(argv[2]); + } + else if(argc == 3 && IsSymbol(argv[0]) && CanbeInt(argv[1]) && CanbeInt(argv[2])) { + s_n = GetSymbol(argv[0]); + s_x = GetAInt(argv[1]); + d_n = NULL; + d_x = GetAInt(argv[2]); + } + else if(argc == 2 && CanbeInt(argv[0]) && CanbeInt(argv[1])) { + // direct connection from proxy-in to proxy-out (for testing above all....) + s_n = NULL; + s_x = GetAInt(argv[0]); + d_n = NULL; + d_x = GetAInt(argv[1]); + } + else { + post("%s - connect: [src] srcslot [dst] dstslot",thisName()); + return; + } + + t_text *s_obj,*d_obj; + if(s_n) { + obj *s_o = Find(s_n); + if(!s_o) { + post("%s - connect: source \"%s\" not found",thisName(),GetString(s_n)); + return; + } + s_obj = (t_text *)s_o->object; + } + else if(s_x < 0 && s_x >= s_inlets+m_inlets) { + post("%s - connect: inlet %i out of range (0..%i)",thisName(),s_x,s_inlets+m_inlets-1); + return; + } + else { + s_obj = &pxin[s_x]->obj; + s_x = 0; // always 0 for proxy + } + + if(d_n) { + obj *d_o = Find(d_n); + if(!d_o) { + post("%s - connect: destination \"%s\" not found",thisName(),GetString(d_n)); + return; + } + d_obj = (t_text *)d_o->object; + } + else if(d_x < 0 && d_x >= s_outlets+m_outlets) { + post("%s - connect: outlet %i out of range (0..%i)",thisName(),d_x,s_outlets+m_outlets-1); + return; + } + else { + d_obj = &pxout[d_x]->obj; + d_x = 0; // always 0 for proxy + } + +#ifndef NO_VIS + int s_oix = canvas_getindex(canvas,&s_obj->te_g); + int d_oix = canvas_getindex(canvas,&d_obj->te_g); +#endif + + if(conn) { + if(!canvas_isconnected(canvas,(t_text *)s_obj,s_x,(t_text *)d_obj,d_x)) { +#ifdef NO_VIS + if(!obj_connect(s_obj, s_x, d_obj, d_x)) + post("%s - connect: connection could not be made",thisName()); +#else + canvas_connect(canvas,s_oix,s_x,d_oix,d_x); +#endif + } + } + else { +#ifdef NO_VIS + obj_disconnect(s_obj, s_x, d_obj, d_x); +#else + canvas_disconnect(canvas,s_oix,s_x,d_oix,d_x); +#endif + } +} + + +bool dyn::m_method_(int n,const t_symbol *s,int argc,const t_atom *argv) +{ + if(n == 0) + // messages into inlet 0 are for dyn~ + return flext_base::m_method_(n,s,argc,argv); + else { + // all other messages are forwarded to proxies (and connected objects) + pxin[n-1]->Message(s,argc,argv); + return true; + } +} + + +void dyn::m_send(int argc,const t_atom *argv) +{ + if(argc < 2 || !IsSymbol(argv[0])) + post("%s - Syntax: send name message [args]",thisName()); + else { + obj *o = Find(GetSymbol(argv[0])); + if(!o) + post("%s - send: object \"%s\" not found",thisName(),GetString(argv[0])); + else + pd_forwardmess((t_pd *)o->object,argc-1,(t_atom *)argv+1); + } +} + + +void dyn::proxy::init(dyn *t) +{ + th = t; + n = 0,buf = NULL; + defsig = 0; +} + +void dyn::proxyin::dsp(proxyin *x,t_signal **sp) +{ + int n = sp[0]->s_n; + if(n != x->n) { + // if vector size has changed make new buffer + if(x->buf) FreeAligned(x->buf); + x->buf = (t_sample *)NewAligned(sizeof(t_sample)*(x->n = n)); + } + dsp_add_copy(x->buf,sp[0]->s_vec,n); +} + +void dyn::proxyin::init(dyn *t,bool s) +{ + proxy::init(t); + outlet = outlet_new(&obj,s?&s_signal:&s_anything); +} + + + + +void dyn::proxyout::dsp(proxyout *x,t_signal **sp) +{ + int n = sp[0]->s_n; + if(n != x->n) { + // if vector size has changed make new buffer + if(x->buf) FreeAligned(x->buf); + x->buf = (t_sample *)NewAligned(sizeof(t_sample)*(x->n = n)); + } + dsp_add_copy(sp[0]->s_vec,x->buf,n); +} + +void dyn::proxyout::init(dyn *t,int o,bool s) +{ + proxy::init(t); + outlet = o; + if(s) outlet_new(&obj,&s_signal); +} + + +void dyn::m_dsp(int n,t_signalvec const *insigs,t_signalvec const *outsigs) +{ + // add sub canvas to dsp list (no signal vector to borrow from .. set it to NULL) + mess1((t_pd *)canvas,const_cast(sym_dsp),NULL); + + flext_dsp::m_dsp(n,insigs,outsigs); +} + +void dyn::m_signal(int n,t_sample *const *insigs,t_sample *const *outsigs) +{ + int i; + for(i = 0; i < s_inlets; ++i) + if(pxin[i]->buf) + CopySamples(pxin[i]->buf,insigs[i+1],n); + for(i = 0; i < s_outlets; ++i) + if(pxout[i]->buf) + CopySamples(outsigs[i],pxout[i]->buf,n); +} + -- cgit v1.2.1