]>
Commit | Line | Data |
---|---|---|
1 | /* | |
2 | * This file is part of the libsigrok project. | |
3 | * | |
4 | * Copyright (C) 2014 Aurelien Jacobs <aurel@gnuage.org> | |
5 | * | |
6 | * Inspired by the VXI11 Ethernet Protocol for Linux: | |
7 | * http://optics.eee.nottingham.ac.uk/vxi11/ | |
8 | * | |
9 | * This program is free software: you can redistribute it and/or modify | |
10 | * it under the terms of the GNU General Public License as published by | |
11 | * the Free Software Foundation, either version 3 of the License, or | |
12 | * (at your option) any later version. | |
13 | * | |
14 | * This program is distributed in the hope that it will be useful, | |
15 | * but WITHOUT ANY WARRANTY; without even the implied warranty of | |
16 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
17 | * GNU General Public License for more details. | |
18 | * | |
19 | * You should have received a copy of the GNU General Public License | |
20 | * along with this program. If not, see <http://www.gnu.org/licenses/>. | |
21 | */ | |
22 | ||
23 | #include <config.h> | |
24 | #include "vxi.h" | |
25 | #include <rpc/rpc.h> | |
26 | #include <string.h> | |
27 | #include <libsigrok/libsigrok.h> | |
28 | #include "libsigrok-internal.h" | |
29 | #include "scpi.h" | |
30 | ||
31 | #define LOG_PREFIX "scpi_vxi" | |
32 | #define VXI_DEFAULT_TIMEOUT_MS 2000 | |
33 | ||
34 | struct scpi_vxi { | |
35 | char *address; | |
36 | char *instrument; | |
37 | CLIENT *client; | |
38 | Device_Link link; | |
39 | unsigned int max_send_size; | |
40 | unsigned int read_complete; | |
41 | }; | |
42 | ||
43 | static int scpi_vxi_dev_inst_new(void *priv, struct drv_context *drvc, | |
44 | const char *resource, char **params, const char *serialcomm) | |
45 | { | |
46 | struct scpi_vxi *vxi = priv; | |
47 | ||
48 | (void)drvc; | |
49 | (void)resource; | |
50 | (void)serialcomm; | |
51 | ||
52 | if (!params || !params[1]) { | |
53 | sr_err("Invalid parameters."); | |
54 | return SR_ERR; | |
55 | } | |
56 | ||
57 | vxi->address = g_strdup(params[1]); | |
58 | vxi->instrument = g_strdup(params[2] ? params[2] : "inst0"); | |
59 | ||
60 | return SR_OK; | |
61 | } | |
62 | ||
63 | static int scpi_vxi_open(struct sr_scpi_dev_inst *scpi) | |
64 | { | |
65 | struct scpi_vxi *vxi = scpi->priv; | |
66 | Create_LinkParms link_parms; | |
67 | Create_LinkResp *link_resp; | |
68 | ||
69 | vxi->client = clnt_create(vxi->address, DEVICE_CORE, DEVICE_CORE_VERSION, "tcp"); | |
70 | if (!vxi->client) { | |
71 | sr_err("Client creation failed for %s", vxi->address); | |
72 | return SR_ERR; | |
73 | } | |
74 | ||
75 | /* Set link parameters */ | |
76 | link_parms.clientId = (long) vxi->client; | |
77 | link_parms.lockDevice = 0; | |
78 | link_parms.lock_timeout = VXI_DEFAULT_TIMEOUT_MS; | |
79 | link_parms.device = (char *)"inst0"; | |
80 | ||
81 | if (!(link_resp = create_link_1(&link_parms, vxi->client))) { | |
82 | sr_err("Link creation failed for %s", vxi->address); | |
83 | return SR_ERR; | |
84 | } | |
85 | vxi->link = link_resp->lid; | |
86 | vxi->max_send_size = link_resp->maxRecvSize; | |
87 | ||
88 | /* Set a default maxRecvSize for devices which do not specify it */ | |
89 | if (vxi->max_send_size <= 0) | |
90 | vxi->max_send_size = 4096; | |
91 | ||
92 | return SR_OK; | |
93 | } | |
94 | ||
95 | static int scpi_vxi_source_add(struct sr_session *session, void *priv, | |
96 | int events, int timeout, sr_receive_data_callback cb, void *cb_data) | |
97 | { | |
98 | (void)priv; | |
99 | ||
100 | /* Hook up a dummy handler to receive data from the device. */ | |
101 | return sr_session_source_add(session, -1, events, timeout, cb, cb_data); | |
102 | } | |
103 | ||
104 | static int scpi_vxi_source_remove(struct sr_session *session, void *priv) | |
105 | { | |
106 | (void)priv; | |
107 | ||
108 | return sr_session_source_remove(session, -1); | |
109 | } | |
110 | ||
111 | /* Operation Flags */ | |
112 | #define DF_WAITLOCK 0x01 /* wait if the operation is locked by another link */ | |
113 | #define DF_END 0x08 /* an END indicator is sent with last byte of buffer */ | |
114 | #define DF_TERM 0x80 /* a termination char is set during a read */ | |
115 | ||
116 | static int scpi_vxi_send(void *priv, const char *command) | |
117 | { | |
118 | struct scpi_vxi *vxi = priv; | |
119 | Device_WriteResp *write_resp; | |
120 | Device_WriteParms write_parms; | |
121 | unsigned long len; | |
122 | ||
123 | len = strlen(command); | |
124 | ||
125 | write_parms.lid = vxi->link; | |
126 | write_parms.io_timeout = VXI_DEFAULT_TIMEOUT_MS; | |
127 | write_parms.lock_timeout = VXI_DEFAULT_TIMEOUT_MS; | |
128 | write_parms.flags = DF_END; | |
129 | write_parms.data.data_len = MIN(len, vxi->max_send_size); | |
130 | write_parms.data.data_val = (char *)command; | |
131 | ||
132 | if (!(write_resp = device_write_1(&write_parms, vxi->client)) | |
133 | || write_resp->error) { | |
134 | sr_err("Device write failed for %s with error %ld", | |
135 | vxi->address, write_resp ? write_resp->error : 0); | |
136 | return SR_ERR; | |
137 | } | |
138 | ||
139 | if (write_resp->size < len) | |
140 | sr_dbg("Only sent %lu/%lu bytes of SCPI command: '%s'.", | |
141 | write_resp->size, len, command); | |
142 | else | |
143 | sr_spew("Successfully sent SCPI command: '%s'.", command); | |
144 | ||
145 | return SR_OK; | |
146 | } | |
147 | ||
148 | static int scpi_vxi_read_begin(void *priv) | |
149 | { | |
150 | struct scpi_vxi *vxi = priv; | |
151 | ||
152 | vxi->read_complete = 0; | |
153 | ||
154 | return SR_OK; | |
155 | } | |
156 | ||
157 | /* Read Response Reason Flags */ | |
158 | #define RRR_SIZE 0x01 /* requestSize bytes have been transferred */ | |
159 | #define RRR_TERM 0x02 /* a termination char has been read */ | |
160 | #define RRR_END 0x04 /* an END indicator has been read */ | |
161 | ||
162 | static int scpi_vxi_read_data(void *priv, char *buf, int maxlen) | |
163 | { | |
164 | struct scpi_vxi *vxi = priv; | |
165 | Device_ReadParms read_parms; | |
166 | Device_ReadResp *read_resp; | |
167 | ||
168 | read_parms.lid = vxi->link; | |
169 | read_parms.io_timeout = VXI_DEFAULT_TIMEOUT_MS; | |
170 | read_parms.lock_timeout = VXI_DEFAULT_TIMEOUT_MS; | |
171 | read_parms.flags = 0; | |
172 | read_parms.termChar = 0; | |
173 | read_parms.requestSize = maxlen; | |
174 | ||
175 | if (!(read_resp = device_read_1(&read_parms, vxi->client)) | |
176 | || read_resp->error) { | |
177 | sr_err("Device read failed for %s with error %ld", | |
178 | vxi->address, read_resp ? read_resp->error : 0); | |
179 | return SR_ERR; | |
180 | } | |
181 | ||
182 | memcpy(buf, read_resp->data.data_val, read_resp->data.data_len); | |
183 | vxi->read_complete = read_resp->reason & (RRR_TERM | RRR_END); | |
184 | return read_resp->data.data_len; /* actual number of bytes received */ | |
185 | } | |
186 | ||
187 | static int scpi_vxi_read_complete(void *priv) | |
188 | { | |
189 | struct scpi_vxi *vxi = priv; | |
190 | ||
191 | return vxi->read_complete; | |
192 | } | |
193 | ||
194 | static int scpi_vxi_close(struct sr_scpi_dev_inst *scpi) | |
195 | { | |
196 | struct scpi_vxi *vxi = scpi->priv; | |
197 | Device_Error *dev_error; | |
198 | ||
199 | if (!vxi->client) | |
200 | return SR_ERR; | |
201 | ||
202 | if (!(dev_error = destroy_link_1(&vxi->link, vxi->client))) { | |
203 | sr_err("Link destruction failed for %s", vxi->address); | |
204 | return SR_ERR; | |
205 | } | |
206 | ||
207 | clnt_destroy(vxi->client); | |
208 | vxi->client = NULL; | |
209 | ||
210 | return SR_OK; | |
211 | } | |
212 | ||
213 | static void scpi_vxi_free(void *priv) | |
214 | { | |
215 | struct scpi_vxi *vxi = priv; | |
216 | ||
217 | g_free(vxi->address); | |
218 | g_free(vxi->instrument); | |
219 | } | |
220 | ||
221 | SR_PRIV const struct sr_scpi_dev_inst scpi_vxi_dev = { | |
222 | .name = "VXI", | |
223 | .prefix = "vxi", | |
224 | .priv_size = sizeof(struct scpi_vxi), | |
225 | .dev_inst_new = scpi_vxi_dev_inst_new, | |
226 | .open = scpi_vxi_open, | |
227 | .source_add = scpi_vxi_source_add, | |
228 | .source_remove = scpi_vxi_source_remove, | |
229 | .send = scpi_vxi_send, | |
230 | .read_begin = scpi_vxi_read_begin, | |
231 | .read_data = scpi_vxi_read_data, | |
232 | .read_complete = scpi_vxi_read_complete, | |
233 | .close = scpi_vxi_close, | |
234 | .free = scpi_vxi_free, | |
235 | }; |