root / mainbox / tool.c @ dc472500
History | View | Annotate | Download (3.11 KB)
1 | 7bdb98c5 | Tom Mullins | #include "tool.h" |
---|---|---|---|
2 | #include "tooltron_mb.h" |
||
3 | #include <modbus.h> |
||
4 | #include <stdio.h> |
||
5 | #include <errno.h> |
||
6 | #include <stdlib.h> // TODO temporary |
||
7 | |||
8 | modbus_t *ctx; |
||
9 | |||
10 | int tool_init_mb(const char *device) { |
||
11 | 14688426 | Tom Mullins | struct timeval timeout;
|
12 | |||
13 | 7bdb98c5 | Tom Mullins | ctx = modbus_new_rtu(device, MB_BAUD, 'N', 8, 1); |
14 | if (ctx == NULL) { |
||
15 | fprintf(stderr, "modbus_new_rtu: %s\n", modbus_strerror(errno));
|
||
16 | return 1; |
||
17 | } |
||
18 | |||
19 | if (modbus_connect(ctx) == -1) { |
||
20 | fprintf(stderr, "modbus_connect: %s\n", modbus_strerror(errno));
|
||
21 | modbus_free(ctx); |
||
22 | return 1; |
||
23 | } |
||
24 | |||
25 | 14688426 | Tom Mullins | modbus_get_response_timeout(ctx, &timeout); |
26 | printf("Response timeout is %lus %luus\n", timeout.tv_sec, timeout.tv_usec);
|
||
27 | |||
28 | 7bdb98c5 | Tom Mullins | return 0; |
29 | } |
||
30 | |||
31 | void tool_close_mb() {
|
||
32 | modbus_close(ctx); |
||
33 | modbus_free(ctx); |
||
34 | } |
||
35 | |||
36 | static void tool_write_coil(int addr, int bit) { |
||
37 | if (modbus_write_bit(ctx, addr, bit) == -1) { |
||
38 | fprintf(stderr, "modbus_write_bit: %s\n", modbus_strerror(errno));
|
||
39 | } |
||
40 | } |
||
41 | |||
42 | static void tool_init(struct tool_t *tool) { |
||
43 | // TODO write current limit values
|
||
44 | tool_write_coil(MB_COIL_INIT, 1);
|
||
45 | tool->state = TS_OFF; |
||
46 | } |
||
47 | |||
48 | 3811693d | Tom Mullins | static void tool_read_user(struct tool_t *tool) { |
49 | 7bdb98c5 | Tom Mullins | unsigned short serno[2]; |
50 | 14688426 | Tom Mullins | if (modbus_read_input_registers(ctx, MB_INP_SERNOL, 2, serno) == -1) { |
51 | 7bdb98c5 | Tom Mullins | fprintf(stderr, "modbus_read_registers: %s\n", modbus_strerror(errno));
|
52 | tool->user = 0;
|
||
53 | } else {
|
||
54 | tool->user = MODBUS_GET_INT32_FROM_INT16(serno, 0);
|
||
55 | } |
||
56 | } |
||
57 | |||
58 | static void tool_grant_access(struct tool_t *tool) { |
||
59 | printf("Granting access to %08x on %s\n", tool->user, tool->name);
|
||
60 | tool_write_coil(MB_COIL_EN, 1);
|
||
61 | dc472500 | Tom Mullins | tool->state = TS_ON; |
62 | 7bdb98c5 | Tom Mullins | } |
63 | |||
64 | static void tool_deny_access(struct tool_t *tool) { |
||
65 | printf("Denying access to %08x on %s\n", tool->user, tool->name);
|
||
66 | tool_write_coil(MB_COIL_EN, 0);
|
||
67 | dc472500 | Tom Mullins | tool->state = TS_OFF; |
68 | 7bdb98c5 | Tom Mullins | } |
69 | |||
70 | void tool_request_disable(struct tool_t *tool) { |
||
71 | printf("Requesting disable on %s\n", tool->name);
|
||
72 | tool_write_coil(MB_COIL_REQ_DIS, 1);
|
||
73 | dc472500 | Tom Mullins | tool->state = TS_REQ_DIS; |
74 | 7bdb98c5 | Tom Mullins | } |
75 | |||
76 | void tool_poll(struct tool_t *tool) { |
||
77 | unsigned char status[N_COILS]; |
||
78 | |||
79 | 14688426 | Tom Mullins | if (modbus_set_slave(ctx, tool->address) == -1) { |
80 | 7bdb98c5 | Tom Mullins | fprintf(stderr, "modbus_set_slave: %s\n", modbus_strerror(errno));
|
81 | } |
||
82 | |||
83 | if (modbus_read_bits(ctx, 0, N_COILS, status) == -1) { |
||
84 | fprintf(stderr, "modbus_read_bits: %s\n", modbus_strerror(errno));
|
||
85 | return;
|
||
86 | } |
||
87 | |||
88 | dc472500 | Tom Mullins | printf("new:%d en:%d req_dis:%d init:%d\n", status[MB_COIL_NEW],
|
89 | status[MB_COIL_EN], status[MB_COIL_REQ_DIS], status[MB_COIL_INIT]); |
||
90 | |||
91 | 7bdb98c5 | Tom Mullins | if (!status[MB_COIL_INIT]) {
|
92 | tool->state = TS_INIT; |
||
93 | } |
||
94 | |||
95 | switch (tool->state) {
|
||
96 | |||
97 | case TS_INIT:
|
||
98 | tool_init(tool); |
||
99 | break;
|
||
100 | |||
101 | case TS_OFF:
|
||
102 | if (status[MB_COIL_NEW]) {
|
||
103 | 3811693d | Tom Mullins | tool_read_user(tool); |
104 | 7bdb98c5 | Tom Mullins | // TODO check actual credentials
|
105 | dc472500 | Tom Mullins | printf("user:%08x\n", tool->user);
|
106 | //if (rand() & 1) {
|
||
107 | 7bdb98c5 | Tom Mullins | tool_grant_access(tool); |
108 | dc472500 | Tom Mullins | /*} else {
|
109 | 7bdb98c5 | Tom Mullins | tool_deny_access(tool);
|
110 | dc472500 | Tom Mullins | }*/
|
111 | 7bdb98c5 | Tom Mullins | } |
112 | break;
|
||
113 | |||
114 | case TS_ON:
|
||
115 | if (!status[MB_COIL_EN]) {
|
||
116 | printf("Tool %s is off\n", tool->name);
|
||
117 | tool->state = TS_OFF; |
||
118 | } |
||
119 | break;
|
||
120 | |||
121 | case TS_REQ_DIS:
|
||
122 | if (!status[MB_COIL_EN]) {
|
||
123 | printf("Tool %s is off after requested disable\n", tool->name);
|
||
124 | tool->state = TS_OFF; |
||
125 | } |
||
126 | break;
|
||
127 | |||
128 | } |
||
129 | |||
130 | } |