File	Size	Hits
LairdTechnologies.lbr	17.7 KiB	12
MAXIM.lbr	57.1 KiB	12
Microchip.lbr	4.0 KiB	13
muRata-cap.lbr	11.2 KiB	12
muRata-piezo.lbr	5.7 KiB	12
ROHM.lbr	13.1 KiB	14

• muRata : capacitors, buzzers
• Laird Technologies : Bluetooth modules
• MAXIM : IC, semiconductors
• Microchip : IC, semiconductor devices
• ROHM Semiconductor : resistors, tantalum capacitors

These come from the net:

• ST Microelectronics : STM32
• various

Following the rich documentation available on the internet I set up a test bench composed by
• SparkFun BMP085 Breakout board
• Arduino 2009 board
• NI LabVIEW 2011 software

The main objective of the test is the assessment of sensor’s noise; then I would like to evaluate the impact of different environment conditions, in particular the room temperature. Finally a floating point math will be used to process sensor data (Weather Station Data Logger for Arduino uses a floating point math along with BMP085 sensor, read the dissertation).

Further details on how to wire SparkFun board to the Arduino 2009 can be found in the link below. BMP085 library for Arduino (with sample .pde) is available for downloaded from Adafruit GitHub. More details about the process and math involved in the library can be found in the BMP085 datasheet.

GENERAL REFERENCE
BMP085 \ Learning \ Wiring
Interactive Matter – Arduino & Barometric Pressure Sensor BMP085
bildr – Sensing Barometric Pressure | BMP085 + Arduino

File	Size	Hits
LIFA_test_1.zip	5.7 KiB	164
LIFA_test_1.vi	16.5 KiB	163
LIFA_test_2.vi	19.1 KiB	169
LIFA_test_2.zip	5.8 KiB	267

I was looking for a way to plot real-time Arduino data and after a bit of search I decided to couple it with LabVIEW; but among all the documentation and references I found on the internet about the topic none of them suited exactly my needs.

The documents from NI provides useful information to directly access read/write Arduino pins both analog and digital, but no further details are given to transfer variables back and forth.

If you don’t have Arduino IDE or LabVIEW installed, please follow the instructions from NI page on how to setup the environment.

METHOD 1: SEQUENCE OF CHARS
Common practice when it comes to transfer data over a serial line is to send them as sequence of ASCII characters. The following example show how to send a float variable from Arduino as fixed 4 characters, and read it in LabVIEW using the “Send Receive” utility block.

The trick here is to send a dummy flush command to Arduino, which otherwise respond with a “sync” signal that mess up with actual data.

LabVIEW + Arduino

LabVIEW Interface for Arduino (LIFA) Community
007 VISV Getting Started With the LabVIEW Interface for Arduino
Arduino and LabVIEW
LabVIEW + Arduino Serial Communication

I’ve been programming software and firmware for about 15 years, and over the time I found that the learning curve changed a lot. Nowadays the availability of informations, cheap hardware and open-source code lead to very short development time compared to a decade ago. But most of the time faster accomplishments are not supported by a deep understanding of “what’s going on behind”

So I’ve been able to make a LED blinking (the equivalent Hello World for MCUs) on my eval board without even write a line of code.

Then I decided to start learn something! …and as I found that most of the example and tutorial programs use the STM32 Standard Peripheral Library as an abstraction layer to access the MCU resources, I fine-tuned my own Eclipse project to build different version of such library.

DEVELOPMENT ENVIRONMENT SETUP
I followed a step-by-step guide to setup the Eclipse IDE, C/C++ plugin for embedded devices and the toolchain of choice: Setting up Eclipse and Code Sourcery lite for STM32 Discovery Development
This guide give now sort of outdated information and links, but keep it as a trace of the steps required.

HTC

http://htcdev.com/

BOOT / ROOT / UNLOCK

http://revolutionary.io/

File	Size	Hits
BladedInterface.zip	20.8 KiB	95

This code would also be a step toward a more flexible and cross-platform/cross-compiler integration between FAST and external control routines.

In detail, the most significant changes come into MODULE DLL_Interface. Hope you’ll find it useful.

WINDOWS

 !=======================================================================
 MODULE DLL_Interface

USE ISO_C_BINDING

IMPLICIT NONE

! define some function binded to kernel32.dll exports
 INTERFACE
 FUNCTION LoadLibraryA(lpFileName) BIND(C,NAME='LoadLibraryA')
 USE ISO_C_BINDING
 IMPLICIT NONE
 INTEGER(C_INTPTR_T) LoadLibraryA
 CHARACTER(KIND=C_CHAR) lpFileName
 END FUNCTION LoadLibraryA

FUNCTION GetProcAddress(hModule, lpProcName) BIND(C,NAME='GetProcAddress')
 USE ISO_C_BINDING
 IMPLICIT NONE
 TYPE(C_FUNPTR) GetProcAddress
 INTEGER(C_INTPTR_T), VALUE :: hModule
 CHARACTER(KIND=C_CHAR) lpProcName
 END FUNCTION GetProcAddress

FUNCTION FreeLibrary(hModule) BIND(C,NAME='FreeLibrary')
 USE ISO_C_BINDING
 IMPLICIT NONE
 INTEGER(C_INTPTR_T), VALUE :: hModule
 INTEGER(C_INT) FreeLibrary
 END FUNCTION FreeLibrary

FUNCTION GetLastError() BIND(C,NAME='GetLastError')
 USE ISO_C_BINDING
 IMPLICIT NONE
 INTEGER(C_INT32_T) GetLastError
 END FUNCTION GetLastError
 END INTERFACE

! Defined TYPEs:

TYPE DLL_Type

INTEGER(C_INTPTR_T) :: FileAddr = 0
 TYPE(C_FUNPTR) :: ProcAddr = C_NULL_FUNPTR ! The address of procedure ProcName.

CHARACTER(1024) :: FileName ! The name of the DLL file including the full path to the current working directory.
 CHARACTER(1024) :: ProcName ! The name of the procedure in the DLL that will be called.

END TYPE DLL_Type

! DLL Interface:

ABSTRACT INTERFACE
 SUBROUTINE DLL_Procedure ( avrSWAP, aviFAIL, accINFILE, avcOUTNAME, avcMSG )
 REAL(4) :: avrSWAP (*)
 INTEGER(4) :: aviFAIL
 INTEGER(1) :: accINFILE (*)
 INTEGER(1) :: avcMSG (*)
 INTEGER(1) :: avcOUTNAME(*)
 END SUBROUTINE DLL_Procedure
 END INTERFACE

CONTAINS
 !=======================================================================
 SUBROUTINE LoadDLL ( DLL )

! This SUBROUTINE is used to load the DLL.

!bjj start of proposed change
 USE NWTC_LIBRARY, ONLY: ProgAbort, Int2LStr
 !bjj end of proposed change

IMPLICIT NONE

! Passed Variables:

TYPE (DLL_Type), POINTER :: DLL ! The DLL to be loaded.

DLL%FileAddr = LoadLibraryA( TRIM(DLL%FileName)//C_NULL_CHAR)
 IF(DLL%FileAddr == 0) THEN
 CALL ProgAbort(' The DLL '//TRIM(DLL%FileName)//' could not be loaded. Error: '//TRIM(Int2LStr(GetLastError())))
 ENDIF

DLL%ProcAddr = GetProcAddress( DLL%FileAddr, TRIM(DLL%ProcName)//C_NULL_CHAR )
 IF(.NOT. C_ASSOCIATED(DLL%ProcAddr)) THEN
 CALL ProgAbort( ' The procedure '//TRIM(DLL%ProcName)//' could not be loaded. Error: '//TRIM(Int2LStr(GetLastError())) )
 ENDIF

RETURN
 END SUBROUTINE LoadDLL
 !=======================================================================
 SUBROUTINE CallDLL ( DLL, avrSWAP, aviFAIL, accINFILE, avcOUTNAME, avcMSG )

! This SUBROUTINE is used to call the DLL.

IMPLICIT NONE

! Passed Variables:

REAL(4), INTENT(INOUT) :: avrSWAP (*) ! The swap array, used to pass data to, and receive data from, the DLL controller.

INTEGER(4), INTENT( OUT) :: aviFAIL ! A flag used to indicate the success of this DLL call set as follows: 0 if the DLL call was successful, >0 if the DLL call was successful but cMessage should be issued as a warning messsage,

INTEGER(1), INTENT(IN ) :: accINFILE (*) ! The address of the first record of an array of 1-byte CHARACTERs giving the name of the parameter input file, 'DISCON.IN'.
 INTEGER(1), INTENT( OUT) :: avcMSG (*) ! The address of the first record of an array of 1-byte CHARACTERS giving the message contained in cMessage, which will be displayed by the calling program if aviFAIL <> 0.
 INTEGER(1), INTENT(IN ) :: avcOUTNAME(*) ! The address of the first record of an array of 1-byte CHARACTERS giving the simulation run name without extension.

TYPE (DLL_Type), INTENT(IN ) :: DLL ! The DLL to be called.

! Local Variables:

PROCEDURE(DLL_Procedure), POINTER :: DLL_ProcAddr

! Call the DLL through a POINTER:

CALL C_F_PROCPOINTER(DLL%ProcAddr,DLL_ProcAddr)

CALL DLL_ProcAddr ( avrSWAP, aviFAIL, accINFILE, avcOUTNAME, avcMSG )

RETURN
 END SUBROUTINE CallDLL
 !=======================================================================
 END MODULE DLL_Interface
 

LINUX

 MODULE DLL_Interface

USE ISO_C_BINDING

IMPLICIT NONE

!define some function binded to libdl.so exports

INTEGER, PARAMETER, PUBLIC :: RTLD_LAZY=1, RTLD_NOW=2, RTLD_GLOBAL=256, RTLD_LOCAL=0

INTERFACE ! All we need is interfaces for the prototypes in FUNCTION dlOpen(file,mode) RESULT(handle) BIND(C,NAME="dlopen")
 ! void *dlopen(const char *file, int mode);
 USE ISO_C_BINDING
 CHARACTER(C_CHAR), DIMENSION(*), INTENT(IN) :: file
 ! C strings should be declared as character arrays
 INTEGER(C_INT), VALUE :: mode
 TYPE(C_PTR) :: handle
 END FUNCTION
 FUNCTION dlSym(handle,name) RESULT(funptr) BIND(C,NAME="dlsym")
 ! void *dlsym(void *handle, const char *name);
 USE ISO_C_BINDING
 TYPE(C_PTR), VALUE :: handle
 CHARACTER(C_CHAR), DIMENSION(*), INTENT(IN) :: name
 TYPE(C_FUNPTR) :: funptr ! A function pointer
 END FUNCTION
 FUNCTION dlClose(handle) RESULT(status) BIND(C,NAME="dlclose")
 ! int dlclose(void *handle);
 USE ISO_C_BINDING
 TYPE(C_PTR), VALUE :: handle
 INTEGER(C_INT) :: status
 END FUNCTION
 FUNCTION dlError() RESULT(error) BIND(C,NAME="dlerror")
 ! char *dlerror(void);
 USE ISO_C_BINDING
 TYPE(C_PTR) :: error
 END FUNCTION
 END INTERFACE

! Defined TYPEs:

TYPE DLL_Type

TYPE(C_PTR) :: FileAddr = C_NULL_PTR
 TYPE(C_FUNPTR) :: ProcAddr = C_NULL_FUNPTR ! The address of procedure ProcName.

CHARACTER(1024) :: FileName ! The name of the DLL file including the full path to the current working directory.
 CHARACTER(1024) :: ProcName ! The name of the procedure in the DLL that will be called.

END TYPE DLL_Type

! DLL Interface:

ABSTRACT INTERFACE
 SUBROUTINE DLL_Procedure ( avrSWAP, aviFAIL, accINFILE, avcOUTNAME, avcMSG )
 REAL(4) :: avrSWAP (*)
 INTEGER(4) :: aviFAIL
 INTEGER(1) :: accINFILE (*)
 INTEGER(1) :: avcMSG (*)
 INTEGER(1) :: avcOUTNAME(*)
 END SUBROUTINE DLL_Procedure
 END INTERFACE

CONTAINS
 !=======================================================================
 SUBROUTINE LoadDLL ( DLL )

! This SUBROUTINE is used to load the DLL.

!bjj start of proposed change
 USE NWTC_LIBRARY, ONLY: ProgAbort
 !bjj end of proposed change

IMPLICIT NONE

! Passed Variables:

TYPE (DLL_Type), POINTER :: DLL ! The DLL to be loaded.

DLL%FileAddr = dlOpen( TRIM(DLL%FileName)//C_NULL_CHAR, RTLD_LAZY )
 IF(.NOT. C_ASSOCIATED(DLL%FileAddr)) THEN
 CALL ProgAbort(' The SO '//TRIM(DLL%FileName)//' could not be loaded.')! Error in dlopen: '//C_F_STRING(dlError()))
 ENDIF

DLL%ProcAddr = dlSym( DLL%FileAddr, TRIM(DLL%ProcName)//C_NULL_CHAR )
 IF(.NOT. C_ASSOCIATED(DLL%ProcAddr)) THEN
 CALL ProgAbort( ' The procedure '//TRIM(DLL%ProcName)//' could not be loaded.')
 ENDIF

RETURN
 END SUBROUTINE LoadDLL
 !=======================================================================
 SUBROUTINE CallDLL ( DLL, avrSWAP, aviFAIL, accINFILE, avcOUTNAME, avcMSG )

! This SUBROUTINE is used to call the DLL.

IMPLICIT NONE

! Passed Variables:

REAL(4), INTENT(INOUT) :: avrSWAP (*) ! The swap array, used to pass data to, and receive data from, the DLL controller.

INTEGER(4), INTENT( OUT) :: aviFAIL ! A flag used to indicate the success of this DLL call set as follows: 0 if the DLL call was successful, >0 if the DLL call was successful but cMessage should be issued as a warning messsage,

INTEGER(1), INTENT(IN ) :: accINFILE (*) ! The address of the first record of an array of 1-byte CHARACTERs giving the name of the parameter input file, 'DISCON.IN'.
 INTEGER(1), INTENT( OUT) :: avcMSG (*) ! The address of the first record of an array of 1-byte CHARACTERS giving the message contained in cMessage, which will be displayed by the calling program if aviFAIL <> 0.
 INTEGER(1), INTENT(IN ) :: avcOUTNAME(*) ! The address of the first record of an array of 1-byte CHARACTERS giving the simulation run name without extension.

TYPE (DLL_Type), INTENT(IN ) :: DLL ! The DLL to be called.

! Local Variables:

PROCEDURE(DLL_Procedure), POINTER :: DLL_ProcAddr

! Call the DLL through a POINTER:

CALL C_F_PROCPOINTER(DLL%ProcAddr,DLL_ProcAddr)

CALL DLL_ProcAddr ( avrSWAP, aviFAIL, accINFILE, avcOUTNAME, avcMSG )

RETURN
 END SUBROUTINE CallDLL
 !=======================================================================
 END MODULE DLL_Interface
 

This is the recently restiled website: www.terom.it

The IDE is deployed in the form of an Eclipse plugin which exploits all the capabilities offered by the hosting framework such as views (Project Browser, Outline, Error, etc), toolbars and external program launching features.

Specific editor for the various file formats used in Cp-Lambda has been developed using XText, an iimpressive Eclipse technology for development of programming languages and domain specific languages (DSLs): this editor is comprehensive of error/warning check, cross-reference code navigation and source code folding.

A 3D view of the multi-body model is available: such visualization rely on LWJGL plugin for Eclipse. Finally, an Eclipse to MATLAB interface is provided, which grant to the user the possibility to run MATLAB instances and execute m code (scripts and functions) from Eclipse.