[PD-cvs] externals/tb/Buzz~ Buzz~-help.pd, NONE, 1.1 Buzz~.cpp, NONE, 1.1 SConstruct, NONE, 1.1 package.txt, NONE, 1.1

[Tim Blechmann]

Update of /cvsroot/pure-data/externals/tb/Buzz~
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv22374

Added Files:
	Buzz~-help.pd Buzz~.cpp SConstruct package.txt 
Log Message:
new external: Buzz~

--- NEW FILE: SConstruct ---
# scons script for flext build system
# Copyright (C) 2005  Tim Blechmann
# 
# 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; see the file COPYING.  If not, write to
# the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
# Boston, MA 02111-1307, USA.


env = Environment(CCFLAGS = '-DFLEXT_SYS_PD -DFLEXT_THREADS -DFLEXT_SHARED')

env.SConsignFile()
env.CacheDir('./obj')

opt = Options(['options.cache', 'custom.py'])
opt.AddOptions(
	BoolOption('debug', 'Build with debugging symbols', False),
	('optimize', 'Optimize for specific architecture', None),
	BoolOption('simd', 'build with simd instructions', False),
	('prefix', 'install prefix', '/usr/local'),
	('flext_path', 'flext path', None),
	('pd_path', 'pd path', None),
	)

opt.Update(env)

opt.Save('options.cache',env)
Help(opt.GenerateHelpText(env))


if env.Dictionary().has_key('flext_path'):
	env.Append(CPPPATH=[env['flext_path']])
else:
	env.Append(CPPPATH=['../../grill/flext/source'])


if env.Dictionary().has_key('pd_path'):
	env.Append(CPPPATH=[env['pd_path']])

if env.Dictionary().has_key('optimize'):
	if env['optimize']:
		env.Append(CCFLAGS=' -O3 '+env['optimize'])

if env.Dictionary().has_key('simd') and env['simd']:
	env.Append(CCFLAGS=' -mfpmath=sse -msse -mmmx -msse2')
			   
if env.Dictionary().has_key('debug') and env['debug']:
	env.Append(CCFLAGS=' -g')
	env.Append(LIBS = 'flext-pd_d')
else:
	env.Append(LIBS = 'flext-pd')
	env.Append(CPPDEFINES="NDEBUG")

######################################################################
#
# read package.txt
#

packagefile = open('./package.txt', 'r')

desc = {}
line = packagefile.readline()
while line != "":
	line = line.strip()
	if len(line) > 0 and line[0] != '#' :
		var, data = line.split('=')

		while data [-1] == '\\':
			nextline = packagefile.readline()
			nextline = nextline.strip()
			data = data + " " + nextline

		data = data.replace("\\", "")
		desc[var] = data

	
	line = packagefile.readline()
packagefile.close()


name = desc["NAME"]
if not desc.has_key("SRCDIR"):
	desc["SRCDIR"] = "."

sources = map (lambda x: desc["SRCDIR"] + '/' + x,
			   desc["SRCS"].split())

if desc.has_key("INCPATH"):
	env.Append(CPPPATH=desc["INCPATH"].strip().replace("-I", "").split())

######################################################################
#
# build
#

external = env.SharedLibrary(name, sources, SHLIBPREFIX='', SHLIBSUFFIX='.pd_linux')

prefix = env['prefix']
env.Install(prefix+'/lib/pd/extra',external)
env.Alias('install', prefix+'/lib/pd/extra')

--- NEW FILE: package.txt ---
NAME=Buzz~
SRCS=Buzz~.cpp

--- NEW FILE: Buzz~.cpp ---
// 
//  
//  direct port of sndobj's Buzz
//  Copyright (C) 2005  Tim Blechmann
//  
//  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; see the file COPYING.  If not, write to
//  the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
//  Boston, MA 02111-1307, USA.



#define FLEXT_ATTRIBUTES 1

#include <flsndobj.h>
 
#if !defined(FLEXT_VERSION) || (FLEXT_VERSION < 500)
#error You need at least flext version 0.5
#endif


class FlextBuzz:
	public flext_sndobj
{
	FLEXT_HEADER(FlextBuzz,flext_sndobj);

public:
	FlextBuzz(int argc, t_atom* argv);

	virtual bool NewObjs();
	virtual void FreeObjs();
	virtual void ProcessObjs();

	Buzz* buzz;

	float freq;
	float amp;
	int harm;
	
private:
	
	FLEXT_ATTRVAR_F(amp);
	FLEXT_ATTRVAR_F(freq);
	FLEXT_ATTRVAR_I(harm);
};

FLEXT_LIB_DSP_V("Buzz~",FlextBuzz)


FlextBuzz::FlextBuzz(int argc, t_atom* argv)
{
	AtomList l(argc, argv);
	
	FLEXT_ADDATTR_VAR1("frequency", freq);
	FLEXT_ADDATTR_VAR1("amp", amp);
	FLEXT_ADDATTR_VAR1("harm", harm);

	AddOutSignal(1);
}


bool FlextBuzz::NewObjs()
{
	buzz = new Buzz(freq, amp, harm, 0, 
		0, Blocksize(), Samplerate());
	
	return true;
}

void FlextBuzz::FreeObjs()
{
	delete buzz;
}

void FlextBuzz::ProcessObjs()
{
	buzz->SetFreq(freq);
	buzz->SetAmp(amp);
	buzz->SetHarm(harm);
	
	buzz->DoProcess();
	
	*buzz >> OutObj(0);
}

static void setup()
{
	FLEXT_DSP_SETUP(FlextBuzz);
}

FLEXT_LIB_SETUP(Buzz_tilde,setup)

--- NEW FILE: Buzz~-help.pd ---
#N canvas 0 0 450 300 10;
#X obj 249 210 dac~;
#X obj 253 160 *~ 0.01;
#X obj 119 179 print~;
#X obj 113 129 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X obj 127 112 Buzz~ @frequency 10 @amp 1 @harm 100;
#X connect 1 0 0 0;
#X connect 1 0 0 1;
#X connect 3 0 2 0;
#X connect 4 0 1 0;
#X connect 4 0 2 0;