This repository has been archived by the owner on Dec 18, 2018. It is now read-only.
Permalink
Cannot retrieve contributors at this time
Name already in use
A tag already exists with the provided branch name. Many Git commands accept both tag and branch names, so creating this branch may cause unexpected behavior. Are you sure you want to create this branch?
librs232/doc/example.lua
Go to fileThis commit does not belong to any branch on this repository, and may belong to a fork outside of the repository.
47 lines (36 sloc)
1.28 KB
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| rs232 = require("luars232") | |
| -- Linux | |
| -- port_name = "/dev/ttyS0" | |
| -- (Open)BSD | |
| -- port_name = "/dev/cua00" | |
| -- Windows | |
| port_name = "COM1" | |
| local out = io.stderr | |
| -- open port | |
| local e, p = rs232.open(port_name) | |
| if e ~= rs232.RS232_ERR_NOERROR then | |
| -- handle error | |
| out:write(string.format("can't open serial port '%s', error: '%s'\n", | |
| port_name, rs232.error_tostring(e))) | |
| return | |
| end | |
| -- set port settings | |
| assert(p:set_baud_rate(rs232.RS232_BAUD_115200) == rs232.RS232_ERR_NOERROR) | |
| assert(p:set_data_bits(rs232.RS232_DATA_8) == rs232.RS232_ERR_NOERROR) | |
| assert(p:set_parity(rs232.RS232_PARITY_NONE) == rs232.RS232_ERR_NOERROR) | |
| assert(p:set_stop_bits(rs232.RS232_STOP_1) == rs232.RS232_ERR_NOERROR) | |
| assert(p:set_flow_control(rs232.RS232_FLOW_OFF) == rs232.RS232_ERR_NOERROR) | |
| out:write(string.format("OK, port open with values '%s'\n", tostring(p))) | |
| -- read with timeout | |
| local read_len = 1 -- read one byte | |
| local timeout = 100 -- in miliseconds | |
| local err, data_read, size = p:read(read_len, timeout) | |
| assert(e == rs232.RS232_ERR_NOERROR) | |
| -- write without timeout | |
| err, len_written = p:write("test") | |
| assert(e == rs232.RS232_ERR_NOERROR) | |
| -- write with timeout 100 msec | |
| err, len_written = p:write("test\n", timeout) | |
| assert(e == rs232.RS232_ERR_NOERROR) | |
| -- close | |
| assert(p:close() == rs232.RS232_ERR_NOERROR) |