andrewm@66: /**
andrewm@66:  *  @file
andrewm@66:  *  @brief Wiring-inspired utility functions and macros
andrewm@0:  *
andrewm@66:  *  Macros and functions for I/O and data processing taking after the Wiring
andrewm@66:  *  (Arduino) language. This code began as part of the Hackable Instruments
andrewm@66:  *  project (EPSRC) at Queen Mary University of London, 2013-14.
andrewm@66:  *
andrewm@66:  *  (c) 2014-15 Andrew McPherson, Victor Zappi and Giulio Moro,
andrewm@66:  *  Queen Mary University of London
andrewm@0:  */
andrewm@0: 
andrewm@0: #ifndef UTILITIES_H_
andrewm@0: #define UTILITIES_H_
andrewm@0: 
andrewm@45: #include "BeagleRT.h"
andrewm@45: 
andrewm@66: /// Set the given bit in \c word to 1.
andrewm@45: #define setBit(word,bit) 			((word) | (1 << (bit)))
andrewm@66: 
andrewm@66: /// Clear the given bit in \c word to 0.
andrewm@45: #define clearBit(word,bit) 			((word) &~ (1 << (bit)))
andrewm@66: 
andrewm@66: /// Check if the given bit in \c word is 1 (returns nonzero) or 0 (returns zero).
andrewm@45: #define getBit(word,bit) 			(((word) >> (bit)) & 1)
andrewm@66: 
andrewm@66: /// Set/clear the given bit in \c word to \c value.
andrewm@45: #define changeBit(word,bit,value) 	((clearBit((word),(bit))) | ((value) << (bit)))
andrewm@45: 
andrewm@45: #if 1
andrewm@56: // Note: pinMode(), analogWrite() and digitalWrite() should be able to be called from setup()
andrewm@56: // Likewise, thread launch should be able to be called from setup()
andrewm@45: // Also, make volume change functions callable from render() thread -- as an aux task?
andrewm@45: 
andrewm@45: float analogReadFrame(BeagleRTContext *context, int frame, int channel);
andrewm@45: void analogWriteFrame(BeagleRTContext *context, int frame, int channel, float value);
andrewm@45: void analogWriteFrameOnce(BeagleRTContext *context, int frame, int channel, float value);
andrewm@45: 
andrewm@45: int digitalReadFrame(BeagleRTContext *context, int frame, int channel);
andrewm@45: void digitalWriteFrame(BeagleRTContext *context, int frame, int channel, int value);
andrewm@45: void digitalWriteFrameOnce(BeagleRTContext *context, int frame, int channel, int value);
andrewm@45: 
andrewm@45: void pinModeFrame(BeagleRTContext *context, int frame, int channel, int mode);
andrewm@45: void pinModeFrameOnce(BeagleRTContext *context, int frame, int channel, int mode);
andrewm@45: 
andrewm@45: #else
andrewm@13: 
giuliomoro@19: // Macros for accessing the analog values: usable _only_ within render()
andrewm@5: 
giuliomoro@19: // Read an Analog input from input pin p at frame f
giuliomoro@23: #define analogRead(p, f) (analogIn[(f)*gNumAnalogChannels + (p)])
giuliomoro@19: // Write an Analog output frame at output pin p, frame f, to value v
giuliomoro@23: #define analogWriteFrame(p, f, v) (analogOut[(f)*gNumAnalogChannels + (p)] = (v))
giuliomoro@23: #define analogWrite(pin, frame, value) \
giuliomoro@18: (({do {\
giuliomoro@19: 	for (int _privateI=(frame); _privateI<numAnalogFrames; _privateI++){ \
giuliomoro@23: 		analogWriteFrame(pin,_privateI,value); \
giuliomoro@18: 	}\
giuliomoro@18: 	} while (0);}),(void)0)\
andrewm@5: 
andrewm@45: 
giuliomoro@19: //digital API:
giuliomoro@33: #define setDigitalDirectionFrame(pin,frame,direction) digital[(frame)]=changeBit(digital[(frame)],(pin),(direction)),void(0)
giuliomoro@33: #define setDigitalDirection(pin,frame,direction)\
giuliomoro@33: 		(({do {\
giuliomoro@33: 			for(int _privateI=(frame); _privateI<numDigitalFrames; _privateI++)\
giuliomoro@33: 				setDigitalDirectionFrame(pin,_privateI,direction);\
giuliomoro@33: 			} while (0);}), (void)0)
giuliomoro@19: #define digitalWriteAll(frame,value) digital[(frame)]=0xffff0000*(!(!value));
giuliomoro@16: //sets the bit in the high word, clears the bit in the low word (just in case the direction was not previously set)
giuliomoro@19: #define digitalWriteFrame(pin, frame, value) digital[(frame)]=( changeBit(digital[(frame)], (pin+16), (value)) & (0xffffffff-(1<<(pin))) ) //could have been done with two subsequent assignments
giuliomoro@18: #define digitalWrite(pin, frame, value) \
giuliomoro@18: 	(({do {\
giuliomoro@33: 		for (int _privateI=(frame); _privateI<numDigitalFrames; _privateI++) \
giuliomoro@18: 			digitalWriteFrame(pin,_privateI,value); \
giuliomoro@18: 		} while (0);}),(void)0)\
giuliomoro@18: 
giuliomoro@19: #define digitalRead(pin, frame) ( getBit(digital[(frame)], pin+16) )
giuliomoro@16: 
andrewm@45: #endif
andrewm@45: 
andrewm@66: /**
andrewm@66:  * \brief Linearly rescale a number from one range of values to another.
andrewm@66:  *
andrewm@66:  * This function linearly scales values of \c x such that the range in_min to
andrewm@66:  * in_max at the input corresponds to the range out_min to out_max
andrewm@66:  * at the output. Values outside this range are extrapolated.
andrewm@66:  *
andrewm@66:  * This function behaves identically to the function of the same name in Processing. It
andrewm@66:  * is also similar to the corresponding function in Arduino, except that it supports floating
andrewm@66:  * point values.
andrewm@66:  *
andrewm@66:  * \param x Input value to be mapped.
andrewm@66:  * \param in_min Lower bound of the input range.
andrewm@66:  * \param in_max Upper bound of the input range.
andrewm@66:  * \param out_min Lower bound of the output range.
andrewm@66:  * \param out_max Upper bound of the output range.
andrewm@66:  * \return Rescaled value.
andrewm@66:  */
andrewm@0: float map(float x, float in_min, float in_max, float out_min, float out_max);
andrewm@66: 
andrewm@66: /**
andrewm@66:  * \brief Constrain a number to stay within a given range.
andrewm@66:  *
andrewm@66:  * This function constrains \c x to remain within the range min_val to
andrewm@66:  * max_val. Values of \c x outside this range are clipped to the edges
andrewm@66:  * of the range.
andrewm@66:  *
andrewm@66:  * This function behaves identically to the function of the same name in Processing. It
andrewm@66:  * is also similar to the corresponding function in Arduino, except that it supports floating
andrewm@66:  * point values.
andrewm@66:  *
andrewm@66:  * \param x Input value to be constrained.
andrewm@66:  * \param min_val Minimum possible value.
andrewm@66:  * \param max_val Maximum possible value.
andrewm@66:  * \return Constrained value.
andrewm@66:  */
andrewm@0: float constrain(float x, float min_val, float max_val);
andrewm@0: 
andrewm@0: #endif /* UTILITIES_H_ */