Delphi/Lazarus - CAN Bricklet¶

Loopback¶

Download (ExampleLoopback.pas)

 1program ExampleLoopback;
 2
 3{$ifdef MSWINDOWS}{$apptype CONSOLE}{$endif}
 4{$ifdef FPC}{$mode OBJFPC}{$H+}{$endif}
 5
 6uses
 7  SysUtils, IPConnection, BrickletCAN;
 8
 9type
10  TExample = class
11  private
12    ipcon: TIPConnection;
13    can: TBrickletCAN;
14  public
15    procedure FrameReadCB(sender: TBrickletCAN; const frameType: byte;
16                          const identifier: longword; const data: TArray0To7OfUInt8;
17                          const length_: byte);
18    procedure Execute;
19  end;
20
21const
22  HOST = 'localhost';
23  PORT = 4223;
24  UID = 'XYZ'; { Change XYZ to the UID of your CAN Bricklet }
25
26var
27  e: TExample;
28
29{ Callback procedure for frame read callback }
30procedure TExample.FrameReadCB(sender: TBrickletCAN; const frameType: byte;
31                               const identifier: longword; const data: TArray0To7OfUInt8;
32                               const length_: byte);
33var i: integer;
34begin
35  if (frameType = BRICKLET_CAN_FRAME_TYPE_STANDARD_DATA) then begin
36    WriteLn('Frame Type: Standard Data');
37  end
38  else if (frameType = BRICKLET_CAN_FRAME_TYPE_STANDARD_REMOTE) then begin
39    WriteLn('Frame Type: Standard Remote');
40  end
41  else if (frameType = BRICKLET_CAN_FRAME_TYPE_EXTENDED_DATA) then begin
42    WriteLn('Frame Type: Extended Data');
43  end
44  else if (frameType = BRICKLET_CAN_FRAME_TYPE_EXTENDED_REMOTE) then begin
45    WriteLn('Frame Type: Extended Remote');
46  end;
47
48  WriteLn(Format('Identifier: %d', [identifier]));
49  Write(Format('Data (Length: %d):', [length_]));
50  for i := 0 to (length_ - 1) do begin
51    if i < 8 then begin
52      Write(Format(' %d', [data[i]]));
53    end;
54  end;
55
56  WriteLn('');
57  WriteLn('');
58end;
59
60procedure TExample.Execute;
61var data: TArray0To7OfUInt8;
62begin
63  { Create IP connection }
64  ipcon := TIPConnection.Create;
65
66  { Create device object }
67  can := TBrickletCAN.Create(UID, ipcon);
68
69  { Connect to brickd }
70  ipcon.Connect(HOST, PORT);
71  { Don't use device before ipcon is connected }
72
73  { Configure transceiver for loopback mode }
74  can.SetConfiguration(BRICKLET_CAN_BAUD_RATE_1000KBPS,
75                       BRICKLET_CAN_TRANSCEIVER_MODE_LOOPBACK, 0);
76
77  { Register frame read callback to procedure FrameReadCB }
78  can.OnFrameRead := {$ifdef FPC}@{$endif}FrameReadCB;
79
80  { Enable frame read callback }
81  can.EnableFrameReadCallback;
82
83  { Write standard data frame with identifier 1742 and 3 bytes of data }
84  data[0] := 42; data[1] := 23; data[2] := 17;
85  can.WriteFrame(BRICKLET_CAN_FRAME_TYPE_STANDARD_DATA, 1742, data, 3);
86
87  WriteLn('Press key to exit');
88  ReadLn;
89
90  can.DisableFrameReadCallback;
91
92  ipcon.Destroy; { Calls ipcon.Disconnect internally }
93end;
94
95begin
96  e := TExample.Create;
97  e.Execute;
98  e.Destroy;
99end.

Basic Functions¶

constructor TBrickletCAN.Create(const uid: string; ipcon: TIPConnection)¶

Parameters:	uid – Type: string ipcon – Type: TIPConnection
Returns:	can – Type: TBrickletCAN

Creates an object with the unique device ID uid:

can := TBrickletCAN.Create('YOUR_DEVICE_UID', ipcon);

This object can then be used after the IP Connection is connected.

function TBrickletCAN.WriteFrame(const frameType: byte; const identifier: longword; const data: array [0..7] of byte; const length: byte): boolean¶

Parameters:	frameType – Type: byte, Range: See constants identifier – Type: longword, Range: [0 to 230 - 1] data – Type: array [0..7] of byte, Range: [0 to 255] length – Type: byte, Range: [0 to 15]
Returns:	success – Type: boolean

Writes a data or remote frame to the write buffer to be transmitted over the CAN transceiver.

The Bricklet supports the standard 11-bit (CAN 2.0A) and the additional extended 18-bit (CAN 2.0B) identifiers. For standard frames the Bricklet uses bit 0 to 10 from the identifier parameter as standard 11-bit identifier. For extended frames the Bricklet additionally uses bit 11 to 28 from the identifier parameter as extended 18-bit identifier.

For remote frames the data parameter is ignored.

Returns true if the frame was successfully added to the write buffer. Returns false if the frame could not be added because write buffer is already full.

The write buffer can overflow if frames are written to it at a higher rate than the Bricklet can transmitted them over the CAN transceiver. This may happen if the CAN transceiver is configured as read-only or is using a low baud rate (see SetConfiguration). It can also happen if the CAN bus is congested and the frame cannot be transmitted because it constantly loses arbitration or because the CAN transceiver is currently disabled due to a high write error level (see GetErrorLog).

The following constants are available for this function:

For frameType:

• BRICKLET_CAN_FRAME_TYPE_STANDARD_DATA = 0

• BRICKLET_CAN_FRAME_TYPE_STANDARD_REMOTE = 1

• BRICKLET_CAN_FRAME_TYPE_EXTENDED_DATA = 2

• BRICKLET_CAN_FRAME_TYPE_EXTENDED_REMOTE = 3

procedure TBrickletCAN.ReadFrame(out success: boolean; out frameType: byte; out identifier: longword; out data: array [0..7] of byte; out length: byte)¶

Output Parameters:	success – Type: boolean frameType – Type: byte, Range: See constants identifier – Type: longword, Range: [0 to 230 - 1] data – Type: array [0..7] of byte, Range: [0 to 255] length – Type: byte, Range: [0 to 15]

Tries to read the next data or remote frame from the read buffer and return it. If a frame was successfully read, then the success return value is set to true and the other return values contain the frame. If the read buffer is empty and no frame could be read, then the success return value is set to false and the other return values contain invalid data.

The identifier return value follows the identifier format described for WriteFrame.

For remote frames the data return value always contains invalid data.

A configurable read filter can be used to define which frames should be received by the CAN transceiver and put into the read buffer (see SetReadFilter).

Instead of polling with this function, you can also use callbacks. See the EnableFrameReadCallback function and the OnFrameRead callback.

The following constants are available for this function:

For frameType:

• BRICKLET_CAN_FRAME_TYPE_STANDARD_DATA = 0

• BRICKLET_CAN_FRAME_TYPE_STANDARD_REMOTE = 1

• BRICKLET_CAN_FRAME_TYPE_EXTENDED_DATA = 2

• BRICKLET_CAN_FRAME_TYPE_EXTENDED_REMOTE = 3

procedure TBrickletCAN.SetConfiguration(const baudRate: byte; const transceiverMode: byte; const writeTimeout: longint)¶

Parameters:	baudRate – Type: byte, Range: See constants, Default: 3 transceiverMode – Type: byte, Range: See constants, Default: 0 writeTimeout – Type: longint, Range: [-1 to 231 - 1], Default: 0

Sets the configuration for the CAN bus communication.

The baud rate can be configured in steps between 10 and 1000 kbit/s.

The CAN transceiver has three different modes:

• Normal: Reads from and writes to the CAN bus and performs active bus error detection and acknowledgement.

• Loopback: All reads and writes are performed internally. The transceiver is disconnected from the actual CAN bus.

• Read-Only: Only reads from the CAN bus, but does neither active bus error detection nor acknowledgement. Only the receiving part of the transceiver is connected to the CAN bus.

The write timeout has three different modes that define how a failed frame transmission should be handled:

• One-Shot (= -1): Only one transmission attempt will be made. If the transmission fails then the frame is discarded.

• Infinite (= 0): Infinite transmission attempts will be made. The frame will never be discarded.

• Milliseconds (> 0): A limited number of transmission attempts will be made. If the frame could not be transmitted successfully after the configured number of milliseconds then the frame is discarded.

The following constants are available for this function:

For baudRate:

• BRICKLET_CAN_BAUD_RATE_10KBPS = 0

• BRICKLET_CAN_BAUD_RATE_20KBPS = 1

• BRICKLET_CAN_BAUD_RATE_50KBPS = 2

• BRICKLET_CAN_BAUD_RATE_125KBPS = 3

• BRICKLET_CAN_BAUD_RATE_250KBPS = 4

• BRICKLET_CAN_BAUD_RATE_500KBPS = 5

• BRICKLET_CAN_BAUD_RATE_800KBPS = 6

• BRICKLET_CAN_BAUD_RATE_1000KBPS = 7

For transceiverMode:

• BRICKLET_CAN_TRANSCEIVER_MODE_NORMAL = 0

• BRICKLET_CAN_TRANSCEIVER_MODE_LOOPBACK = 1

• BRICKLET_CAN_TRANSCEIVER_MODE_READ_ONLY = 2

procedure TBrickletCAN.GetConfiguration(out baudRate: byte; out transceiverMode: byte; out writeTimeout: longint)¶

Output Parameters:	baudRate – Type: byte, Range: See constants, Default: 3 transceiverMode – Type: byte, Range: See constants, Default: 0 writeTimeout – Type: longint, Range: [-1 to 231 - 1], Default: 0

Returns the configuration as set by SetConfiguration.

The following constants are available for this function:

For baudRate:

• BRICKLET_CAN_BAUD_RATE_10KBPS = 0

• BRICKLET_CAN_BAUD_RATE_20KBPS = 1

• BRICKLET_CAN_BAUD_RATE_50KBPS = 2

• BRICKLET_CAN_BAUD_RATE_125KBPS = 3

• BRICKLET_CAN_BAUD_RATE_250KBPS = 4

• BRICKLET_CAN_BAUD_RATE_500KBPS = 5

• BRICKLET_CAN_BAUD_RATE_800KBPS = 6

• BRICKLET_CAN_BAUD_RATE_1000KBPS = 7

For transceiverMode:

• BRICKLET_CAN_TRANSCEIVER_MODE_NORMAL = 0

• BRICKLET_CAN_TRANSCEIVER_MODE_LOOPBACK = 1

• BRICKLET_CAN_TRANSCEIVER_MODE_READ_ONLY = 2

Advanced Functions¶

procedure TBrickletCAN.SetReadFilter(const mode: byte; const mask: longword; const filter1: longword; const filter2: longword)¶

Parameters:	mode – Type: byte, Range: See constants, Default: 1 mask – Type: longword, Range: [0 to 230 - 1] filter1 – Type: longword, Range: [0 to 230 - 1] filter2 – Type: longword, Range: [0 to 230 - 1]

Set the read filter configuration. This can be used to define which frames should be received by the CAN transceiver and put into the read buffer.

The read filter has five different modes that define if and how the mask and the two filters are applied:

• Disabled: No filtering is applied at all. All frames are received even incomplete and defective frames. This mode should be used for debugging only.

• Accept-All: All complete and error-free frames are received.

• Match-Standard: Only standard frames with a matching identifier are received.

• Match-Standard-and-Data: Only standard frames with matching identifier and data bytes are received.

• Match-Extended: Only extended frames with a matching identifier are received.

The mask and filters are used as bit masks. Their usage depends on the mode:

• Disabled: Mask and filters are ignored.

• Accept-All: Mask and filters are ignored.

• Match-Standard: Bit 0 to 10 (11 bits) of mask and filters are used to match the 11-bit identifier of standard frames.

• Match-Standard-and-Data: Bit 0 to 10 (11 bits) of mask and filters are used to match the 11-bit identifier of standard frames. Bit 11 to 18 (8 bits) and bit 19 to 26 (8 bits) of mask and filters are used to match the first and second data byte (if present) of standard frames.

• Match-Extended: Bit 0 to 10 (11 bits) of mask and filters are used to match the standard 11-bit identifier part of extended frames. Bit 11 to 28 (18 bits) of mask and filters are used to match the extended 18-bit identifier part of extended frames.

The mask and filters are applied in this way: The mask is used to select the identifier and data bits that should be compared to the corresponding filter bits. All unselected bits are automatically accepted. All selected bits have to match one of the filters to be accepted. If all bits for the selected mode are accepted then the frame is accepted and is added to the read buffer.

Mask Bit	Filter Bit	Identifier/Data Bit	Result
0	X	X	Accept
1	0	0	Accept
1	0	1	Reject
1	1	0	Reject
1	1	1	Accept

For example, to receive standard frames with identifier 0x123 only the mode can be set to Match-Standard with 0x7FF as mask and 0x123 as filter 1 and filter 2. The mask of 0x7FF selects all 11 identifier bits for matching so that the identifier has to be exactly 0x123 to be accepted.

To accept identifier 0x123 and identifier 0x456 at the same time, just set filter 2 to 0x456 and keep mask and filter 1 unchanged.

The following constants are available for this function:

For mode:

• BRICKLET_CAN_FILTER_MODE_DISABLED = 0

• BRICKLET_CAN_FILTER_MODE_ACCEPT_ALL = 1

• BRICKLET_CAN_FILTER_MODE_MATCH_STANDARD = 2

• BRICKLET_CAN_FILTER_MODE_MATCH_STANDARD_AND_DATA = 3

• BRICKLET_CAN_FILTER_MODE_MATCH_EXTENDED = 4

procedure TBrickletCAN.GetReadFilter(out mode: byte; out mask: longword; out filter1: longword; out filter2: longword)¶

Output Parameters:	mode – Type: byte, Range: See constants, Default: 1 mask – Type: longword, Range: [0 to 230 - 1] filter1 – Type: longword, Range: [0 to 230 - 1] filter2 – Type: longword, Range: [0 to 230 - 1]

Returns the read filter as set by SetReadFilter.

The following constants are available for this function:

For mode:

• BRICKLET_CAN_FILTER_MODE_DISABLED = 0

• BRICKLET_CAN_FILTER_MODE_ACCEPT_ALL = 1

• BRICKLET_CAN_FILTER_MODE_MATCH_STANDARD = 2

• BRICKLET_CAN_FILTER_MODE_MATCH_STANDARD_AND_DATA = 3

• BRICKLET_CAN_FILTER_MODE_MATCH_EXTENDED = 4

procedure TBrickletCAN.GetErrorLog(out writeErrorLevel: byte; out readErrorLevel: byte; out transceiverDisabled: boolean; out writeTimeoutCount: longword; out readRegisterOverflowCount: longword; out readBufferOverflowCount: longword)¶

Output Parameters:	writeErrorLevel – Type: byte, Range: [0 to 255] readErrorLevel – Type: byte, Range: [0 to 255] transceiverDisabled – Type: boolean writeTimeoutCount – Type: longword, Range: [0 to 232 - 1] readRegisterOverflowCount – Type: longword, Range: [0 to 232 - 1] readBufferOverflowCount – Type: longword, Range: [0 to 232 - 1]

Returns information about different kinds of errors.

The write and read error levels indicate the current level of checksum, acknowledgement, form, bit and stuffing errors during CAN bus write and read operations.

When the write error level exceeds 255 then the CAN transceiver gets disabled and no frames can be transmitted or received anymore. The CAN transceiver will automatically be activated again after the CAN bus is idle for a while.

The write and read error levels are not available in read-only transceiver mode (see SetConfiguration) and are reset to 0 as a side effect of changing the configuration or the read filter.

The write timeout, read register and buffer overflow counts represents the number of these errors:

• A write timeout occurs if a frame could not be transmitted before the configured write timeout expired (see SetConfiguration).

• A read register overflow occurs if the read register of the CAN transceiver still contains the last received frame when the next frame arrives. In this case the newly arrived frame is lost. This happens if the CAN transceiver receives more frames than the Bricklet can handle. Using the read filter (see SetReadFilter) can help to reduce the amount of received frames. This count is not exact, but a lower bound, because the Bricklet might not able detect all overflows if they occur in rapid succession.

• A read buffer overflow occurs if the read buffer of the Bricklet is already full when the next frame should be read from the read register of the CAN transceiver. In this case the frame in the read register is lost. This happens if the CAN transceiver receives more frames to be added to the read buffer than are removed from the read buffer using the ReadFrame function. Using the OnFrameRead callback ensures that the read buffer can not overflow.

procedure TBrickletCAN.GetIdentity(out uid: string; out connectedUid: string; out position: char; out hardwareVersion: array [0..2] of byte; out firmwareVersion: array [0..2] of byte; out deviceIdentifier: word)¶

Output Parameters:

uid – Type: string, Length: up to 8 connectedUid – Type: string, Length: up to 8 position – Type: char, Range: ['a' to 'h', 'z'] hardwareVersion – Type: array [0..2] of byte 0: major – Type: byte, Range: [0 to 255] 1: minor – Type: byte, Range: [0 to 255] 2: revision – Type: byte, Range: [0 to 255] firmwareVersion – Type: array [0..2] of byte 0: major – Type: byte, Range: [0 to 255] 1: minor – Type: byte, Range: [0 to 255] 2: revision – Type: byte, Range: [0 to 255] deviceIdentifier – Type: word, Range: [0 to 216 - 1]

Returns the UID, the UID where the Bricklet is connected to, the position, the hardware and firmware version as well as the device identifier.

The position can be 'a', 'b', 'c', 'd', 'e', 'f', 'g' or 'h' (Bricklet Port). A Bricklet connected to an Isolator Bricklet is always at position 'z'.

The device identifier numbers can be found here. There is also a constant for the device identifier of this Bricklet.

Callback Configuration Functions¶

procedure TBrickletCAN.EnableFrameReadCallback¶

Enables the OnFrameRead callback.

By default the callback is disabled. Enabling this callback will disable the OnFrameReadable callback.

procedure TBrickletCAN.DisableFrameReadCallback¶

Disables the OnFrameRead callback.

By default the callback is disabled.

function TBrickletCAN.IsFrameReadCallbackEnabled: boolean¶

Returns:	enabled – Type: boolean, Default: false

Returns true if the OnFrameRead callback is enabled, false otherwise.

procedure TBrickletCAN.SetFrameReadableCallbackConfiguration(const enabled: boolean)¶

Parameters:	enabled – Type: boolean, Default: false

Enables/disables the OnFrameReadable callback.

By default the callback is disabled. Enabling this callback will disable the OnFrameRead callback.

New in version 2.0.1$nbsp;(Plugin).

function TBrickletCAN.GetFrameReadableCallbackConfiguration: boolean¶

Returns:	enabled – Type: boolean, Default: false

Returns true if the OnFrameReadable callback is enabled, false otherwise.

New in version 2.0.1$nbsp;(Plugin).

Callbacks¶

Callbacks can be registered to receive time critical or recurring data from the device. The registration is done by assigning a procedure to an callback property of the device object:

procedure TExample.MyCallback(sender: TBrickletCAN; const value: longint);
begin
  WriteLn(Format('Value: %d', [value]));
end;

can.OnExample := {$ifdef FPC}@{$endif}example.MyCallback;

The available callback properties and their parameter types are described below.

property TBrickletCAN.OnFrameRead¶

procedure(sender: TBrickletCAN; const frameType: byte; const identifier: longword; const data: array [0..7] of byte; const length: byte) of object;

Callback Parameters:	sender – Type: TBrickletCAN frameType – Type: byte, Range: See constants identifier – Type: longword, Range: [0 to 230 - 1] data – Type: array [0..7] of byte, Range: [0 to 255] length – Type: byte, Range: [0 to 15]

This callback is triggered if a data or remote frame was received by the CAN transceiver.

The identifier return value follows the identifier format described for WriteFrame.

For remote frames the data return value always contains invalid values.

A configurable read filter can be used to define which frames should be received by the CAN transceiver at all (see SetReadFilter).

To enable this callback, use EnableFrameReadCallback.

The following constants are available for this function:

For frameType:

• BRICKLET_CAN_FRAME_TYPE_STANDARD_DATA = 0

• BRICKLET_CAN_FRAME_TYPE_STANDARD_REMOTE = 1

• BRICKLET_CAN_FRAME_TYPE_EXTENDED_DATA = 2

• BRICKLET_CAN_FRAME_TYPE_EXTENDED_REMOTE = 3

property TBrickletCAN.OnFrameReadable¶

procedure(sender: TBrickletCAN) of object;

Callback Parameters:	sender – Type: TBrickletCAN

This callback is triggered if a data or remote frame was received by the CAN transceiver. The received frame can be read with ReadFrame. If additional frames are received, but ReadFrame was not called yet, the callback will not trigger again.

A configurable read filter can be used to define which frames should be received by the CAN transceiver and put into the read queue (see SetReadFilter).

To enable this callback, use SetFrameReadableCallbackConfiguration.

New in version 2.0.1$nbsp;(Plugin).

Virtual Functions¶

Virtual functions don't communicate with the device itself, but operate only on the API bindings device object. They can be called without the corresponding IP Connection object being connected.

function TBrickletCAN.GetAPIVersion: array [0..2] of byte¶

Output Parameters:	apiVersion – Type: array [0..2] of byte 0: major – Type: byte, Range: [0 to 255] 1: minor – Type: byte, Range: [0 to 255] 2: revision – Type: byte, Range: [0 to 255]

Returns the version of the API definition implemented by this API bindings. This is neither the release version of this API bindings nor does it tell you anything about the represented Brick or Bricklet.

function TBrickletCAN.GetResponseExpected(const functionId: byte): boolean¶

Parameters:	functionId – Type: byte, Range: See constants
Returns:	responseExpected – Type: boolean

Returns the response expected flag for the function specified by the function ID parameter. It is true if the function is expected to send a response, false otherwise.

For getter functions this is enabled by default and cannot be disabled, because those functions will always send a response. For callback configuration functions it is enabled by default too, but can be disabled by SetResponseExpected. For setter functions it is disabled by default and can be enabled.

Enabling the response expected flag for a setter function allows to detect timeouts and other error conditions calls of this setter as well. The device will then send a response for this purpose. If this flag is disabled for a setter function then no response is sent and errors are silently ignored, because they cannot be detected.

The following constants are available for this function:

For functionId:

• BRICKLET_CAN_FUNCTION_ENABLE_FRAME_READ_CALLBACK = 3

• BRICKLET_CAN_FUNCTION_DISABLE_FRAME_READ_CALLBACK = 4

• BRICKLET_CAN_FUNCTION_SET_CONFIGURATION = 6

• BRICKLET_CAN_FUNCTION_SET_READ_FILTER = 8

• BRICKLET_CAN_FUNCTION_SET_FRAME_READABLE_CALLBACK_CONFIGURATION = 12

procedure TBrickletCAN.SetResponseExpected(const functionId: byte; const responseExpected: boolean)¶

Parameters:	functionId – Type: byte, Range: See constants responseExpected – Type: boolean

Changes the response expected flag of the function specified by the function ID parameter. This flag can only be changed for setter (default value: false) and callback configuration functions (default value: true). For getter functions it is always enabled.

Enabling the response expected flag for a setter function allows to detect timeouts and other error conditions calls of this setter as well. The device will then send a response for this purpose. If this flag is disabled for a setter function then no response is sent and errors are silently ignored, because they cannot be detected.

The following constants are available for this function:

For functionId:

• BRICKLET_CAN_FUNCTION_ENABLE_FRAME_READ_CALLBACK = 3

• BRICKLET_CAN_FUNCTION_DISABLE_FRAME_READ_CALLBACK = 4

• BRICKLET_CAN_FUNCTION_SET_CONFIGURATION = 6

• BRICKLET_CAN_FUNCTION_SET_READ_FILTER = 8

• BRICKLET_CAN_FUNCTION_SET_FRAME_READABLE_CALLBACK_CONFIGURATION = 12

procedure TBrickletCAN.SetResponseExpectedAll(const responseExpected: boolean)¶

Parameters:	responseExpected – Type: boolean

Changes the response expected flag for all setter and callback configuration functions of this device at once.

Constants¶

const BRICKLET_CAN_DEVICE_IDENTIFIER¶

This constant is used to identify a CAN Bricklet.

The GetIdentity function and the TIPConnection.OnEnumerate callback of the IP Connection have a deviceIdentifier parameter to specify the Brick's or Bricklet's type.

const BRICKLET_CAN_DEVICE_DISPLAY_NAME¶

This constant represents the human readable name of a CAN Bricklet.