diff options
| -rw-r--r-- | comport/comport-help.pd | 403 | ||||
| -rw-r--r-- | comport/comport.c | 9 |
2 files changed, 212 insertions, 200 deletions
diff --git a/comport/comport-help.pd b/comport/comport-help.pd index db9e305..c64e894 100644 --- a/comport/comport-help.pd +++ b/comport/comport-help.pd @@ -1,200 +1,203 @@ -#N canvas 349 113 882 646 10;
-#X obj 18 415 comport 1 9600;
-#X msg 13 189 66;
-#X msg 7 147 64;
-#X text 40 189 point;
-#X text 32 147 stream;
-#X msg 18 238 86;
-#X text 46 239 position;
-#X msg 24 283 70;
-#X msg 25 323 71;
-#X text 49 283 run;
-#X text 50 323 sleep;
-#X msg 314 61 bits 8;
-#X msg 314 87 stopbit 0;
-#X msg 314 113 parity 0;
-#X text 381 112 parity 1=even \, -1=odd \, 0=off;
-#X text 392 86 extra stopbit 1=on \, 0=off;
-#X text 363 60 databits 5 \, 6 \, 7 \, 8;
-#X obj 43 394 r comctl;
-#X obj 199 417 s comctl;
-#X text 394 138 use handshake xon/off 1=on 0=off;
-#X text 392 166 cts/rts hardwarehandshake 1=on 0=off;
-#X msg 318 214 pollintervall 1;
-#X text 428 214 (default is 1 tick 1ms);
-#X msg 317 246 close;
-#X msg 317 272 open 1;
-#X text 356 246 Close Serial port;
-#X msg 458 385 devicename /dev/ttyS1;
-#X text 458 402 Danger !!! you can open every file in your system and
-maybe if suid is root damage the system.;
-#X text 4 -9 (C) 1998-2005 IEM Winfried Ritsch GPL (see LICENSE.txt)
-;
-#X obj 144 50 hsl 128 15 0 255 0 0 empty empty empty -2 -6 0 8 -262144
--1 -1 0 1;
-#X floatatom 183 76 5 0 0 0 - - -;
-#X text 60 35 you can send bytes directly (0-255):;
-#X text 360 272 Open serial port by number;
-#X text 611 385 open the serial port by name;
-#X msg 313 353 dtr \$1;
-#X obj 293 353 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0
-1;
-#X obj 292 388 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0
-1;
-#X msg 312 388 rts \$1;
-#X text 362 352 dtr output;
-#X text 361 388 rts output;
-#X msg 172 384 help;
-#X msg 313 323 verbose \$1;
-#X obj 294 323 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0
-1;
-#X text 377 197 set poll interval for read in ms;
-#X msg 123 191 info;
-#X floatatom 111 469 7 0 0 1 baud - -;
-#X floatatom 237 517 4 0 0 3 parity - -;
-#X floatatom 279 517 4 0 0 2 stop - -;
-#X floatatom 322 517 4 0 0 3 data - -;
-#X obj 491 469 print;
-#X obj 111 440 route baud dsr cts parity stop data rtscts xonxoff port
-;
-#X floatatom 448 466 4 0 0 0 port - -;
-#X msg 136 291 devices;
-#X obj 141 74 % 255;
-#X floatatom 149 95 5 0 0 0 - - -;
-#X text 158 191 status list on right outlet;
-#X text 192 290 print available devices (wait for it...);
-#X text 393 -9 2006 Martin Peach;
-#X obj 69 75 key;
-#X obj 69 96 sel 0;
-#X floatatom 58 119 5 0 0 0 ascii - -;
-#X text 10 76 terminal:;
-#X msg 152 222 open 0;
-#X obj 364 484 tgl 15 0 empty empty rts/cts -10 -6 0 8 -262144 -1 -1
-0 1;
-#X obj 406 484 tgl 15 0 empty empty xon/xoff -10 20 0 8 -262144 -1
--1 0 1;
-#X text 87 516 serial packet format:;
-#X text 277 482 handshaking:;
-#X text 3 548 flow control inputs:;
-#X obj 153 549 tgl 15 0 empty empty dsr 0 22 0 8 -262144 -1 -1 0 1
-;
-#X obj 195 549 tgl 15 0 empty empty cts 0 20 0 8 -262144 -1 -1 0 1
-;
-#N canvas 513 0 735 499 bauds 0;
-#X msg 229 314 baud 57600;
-#X msg 229 358 baud 230400;
-#X msg 229 336 baud 115200;
-#X msg 222 288 baud 38400;
-#X msg 229 261 baud 19200;
-#X msg 229 239 baud 9600;
-#X msg 229 217 baud 4800;
-#X msg 229 195 baud 2400;
-#X obj 162 375 s comctl;
-#X msg 229 173 baud 1800;
-#X msg 229 151 baud 1200;
-#X msg 229 129 baud 600;
-#X msg 229 107 baud 300;
-#X msg 229 85 baud 200;
-#X msg 229 41 baud 134;
-#X msg 229 19 baud 110;
-#X msg 229 -3 baud 75;
-#X msg 229 -25 baud 50;
-#X msg 229 -47 baud 0;
-#X msg 229 63 baud 150;
-#X text 303 282 this is a special baud rate that can be configured
-;
-#X text 12 -48 standard baud rates for linux:;
-#X text 279 -48 0 deasserts control lines and resets the serial port
-;
-#X text 316 358 won't work with standard setup. See setserial;
-#X msg 381 227 baud \$1;
-#X text 386 210 on Windows some other baud rates might work;
-#X text 304 295 on-the-fly with setserial:;
-#X text 383 324 gives 14400 baud instead of 38400;
-#X text 369 310 "setserial /dev/ttyS0 spd_cust divisor 8";
-#X msg 381 32 115200;
-#X floatatom 395 60 7 1 115200 1 divisor - -;
-#X obj 381 98 / 1;
-#X obj 395 77 sel 0;
-#X floatatom 381 120 7 0 0 0 - - -;
-#X text 442 71 (1-115200);
-#X connect 0 0 8 0;
-#X connect 1 0 8 0;
-#X connect 2 0 8 0;
-#X connect 3 0 8 0;
-#X connect 4 0 8 0;
-#X connect 5 0 8 0;
-#X connect 6 0 8 0;
-#X connect 7 0 8 0;
-#X connect 9 0 8 0;
-#X connect 10 0 8 0;
-#X connect 11 0 8 0;
-#X connect 12 0 8 0;
-#X connect 13 0 8 0;
-#X connect 14 0 8 0;
-#X connect 15 0 8 0;
-#X connect 16 0 8 0;
-#X connect 17 0 8 0;
-#X connect 18 0 8 0;
-#X connect 19 0 8 0;
-#X connect 24 0 8 0;
-#X connect 29 0 31 0;
-#X connect 30 0 32 0;
-#X connect 31 0 33 0;
-#X connect 32 1 31 1;
-#X connect 33 0 24 0;
-#X restore 622 72 pd bauds;
-#X msg 314 139 xonxoff \$1;
-#X obj 275 139 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0
-1;
-#X msg 314 167 rtscts \$1;
-#X obj 274 167 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0
-1;
-#X text 117 11 comport: a serial port interface;
-#X msg 102 118 13;
-#X connect 0 1 50 0;
-#X connect 1 0 0 0;
-#X connect 2 0 0 0;
-#X connect 5 0 0 0;
-#X connect 7 0 0 0;
-#X connect 8 0 0 0;
-#X connect 11 0 18 0;
-#X connect 12 0 18 0;
-#X connect 13 0 18 0;
-#X connect 17 0 0 0;
-#X connect 21 0 18 0;
-#X connect 23 0 18 0;
-#X connect 24 0 18 0;
-#X connect 26 0 18 0;
-#X connect 29 0 30 0;
-#X connect 29 0 53 0;
-#X connect 34 0 18 0;
-#X connect 35 0 34 0;
-#X connect 36 0 37 0;
-#X connect 37 0 18 0;
-#X connect 40 0 18 0;
-#X connect 41 0 18 0;
-#X connect 42 0 41 0;
-#X connect 44 0 0 0;
-#X connect 50 0 45 0;
-#X connect 50 1 68 0;
-#X connect 50 2 69 0;
-#X connect 50 3 46 0;
-#X connect 50 4 47 0;
-#X connect 50 5 48 0;
-#X connect 50 6 63 0;
-#X connect 50 7 64 0;
-#X connect 50 8 51 0;
-#X connect 50 9 49 0;
-#X connect 52 0 0 0;
-#X connect 53 0 0 0;
-#X connect 53 0 54 0;
-#X connect 58 0 59 0;
-#X connect 59 1 60 0;
-#X connect 59 1 0 0;
-#X connect 62 0 0 0;
-#X connect 71 0 18 0;
-#X connect 72 0 71 0;
-#X connect 73 0 18 0;
-#X connect 74 0 73 0;
-#X connect 76 0 0 0;
+#N canvas 95 38 746 619 10; +#X obj 18 415 comport 1 9600; +#X msg 13 189 66; +#X msg 7 147 64; +#X text 40 189 point; +#X text 32 147 stream; +#X msg 18 238 86; +#X text 46 239 position; +#X msg 24 283 70; +#X msg 25 323 71; +#X text 49 283 run; +#X text 50 323 sleep; +#X msg 314 61 bits 8; +#X msg 314 87 stopbit 0; +#X msg 314 113 parity 0; +#X text 381 112 parity 1=even \, -1=odd \, 0=off; +#X text 392 86 extra stopbit 1=on \, 0=off; +#X text 363 60 databits 5 \, 6 \, 7 \, 8; +#X obj 43 394 r comctl; +#X obj 199 447 s comctl; +#X text 394 138 use handshake xon/off 1=on 0=off; +#X text 392 166 cts/rts hardwarehandshake 1=on 0=off; +#X msg 318 214 pollintervall 1; +#X text 428 214 (default is 1 tick 1ms); +#X msg 317 246 close; +#X msg 317 272 open 1; +#X text 356 246 Close Serial port; +#X msg 313 415 devicename /dev/ttyS1; +#X text 313 432 Danger !!! you can open every file in your system and +maybe if suid is root damage the system.; +#X text 4 -9 (C) 1998-2005 IEM Winfried Ritsch GPL (see LICENSE.txt) +; +#X obj 144 50 hsl 128 15 0 255 0 0 empty empty empty -2 -6 0 8 -262144 +-1 -1 0 1; +#X floatatom 183 76 5 0 0 0 - - -; +#X text 60 35 you can send bytes directly (0-255):; +#X text 360 272 Open serial port by number; +#X text 473 416 open the serial port by name; +#X msg 313 353 dtr \$1; +#X obj 293 353 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 +1; +#X obj 292 388 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 +1; +#X msg 312 388 rts \$1; +#X text 362 352 dtr output; +#X text 361 388 rts output; +#X msg 172 384 help; +#X msg 313 323 verbose \$1; +#X obj 294 323 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 +1; +#X text 377 197 set poll interval for read in ms; +#X msg 123 191 info; +#X floatatom 111 499 7 0 0 1 baud - -; +#X floatatom 237 547 4 0 0 3 parity - -; +#X floatatom 279 547 4 0 0 2 stop - -; +#X floatatom 322 547 4 0 0 3 data - -; +#X obj 526 498 print; +#X floatatom 448 496 4 0 0 0 port - -; +#X msg 136 291 devices; +#X obj 141 74 % 255; +#X floatatom 149 95 5 0 0 0 - - -; +#X text 158 191 status list on right outlet; +#X text 192 290 print available devices (wait for it...); +#X text 393 -9 2006 Martin Peach; +#X obj 69 75 key; +#X obj 69 96 sel 0; +#X floatatom 58 119 5 0 0 0 ascii - -; +#X text 10 76 terminal:; +#X msg 152 222 open 0; +#X obj 364 514 tgl 15 0 empty empty rts/cts -10 20 1 11 -262144 -1 +-1 0 1; +#X obj 406 514 tgl 15 0 empty empty xon/xoff -14 20 1 11 -262144 -1 +-1 0 1; +#X text 87 546 serial packet format:; +#X text 277 512 handshaking:; +#X text 3 571 flow control inputs:; +#X obj 153 572 tgl 15 0 empty empty dsr 0 20 1 11 -262144 -1 -1 0 1 +; +#X obj 195 572 tgl 15 0 empty empty cts 0 20 1 11 -262144 -1 -1 0 1 +; +#N canvas 513 22 735 499 bauds 0; +#X msg 229 314 baud 57600; +#X msg 229 358 baud 230400; +#X msg 229 336 baud 115200; +#X msg 222 288 baud 38400; +#X msg 229 261 baud 19200; +#X msg 229 239 baud 9600; +#X msg 229 217 baud 4800; +#X msg 229 195 baud 2400; +#X obj 162 375 s comctl; +#X msg 229 173 baud 1800; +#X msg 229 151 baud 1200; +#X msg 229 129 baud 600; +#X msg 229 107 baud 300; +#X msg 229 85 baud 200; +#X msg 229 41 baud 134; +#X msg 229 19 baud 110; +#X msg 229 -3 baud 75; +#X msg 229 -25 baud 50; +#X msg 229 -47 baud 0; +#X msg 229 63 baud 150; +#X text 303 282 this is a special baud rate that can be configured +; +#X text 12 -48 standard baud rates for linux:; +#X text 279 -48 0 deasserts control lines and resets the serial port +; +#X text 316 358 won't work with standard setup. See setserial; +#X msg 381 227 baud \$1; +#X text 386 210 on Windows some other baud rates might work; +#X text 304 295 on-the-fly with setserial:; +#X text 383 324 gives 14400 baud instead of 38400; +#X text 369 310 "setserial /dev/ttyS0 spd_cust divisor 8"; +#X msg 381 32 115200; +#X floatatom 395 60 7 1 115200 1 divisor - -; +#X obj 381 98 / 1; +#X obj 395 77 sel 0; +#X floatatom 381 120 7 0 0 0 - - -; +#X text 442 71 (1-115200); +#X connect 0 0 8 0; +#X connect 1 0 8 0; +#X connect 2 0 8 0; +#X connect 3 0 8 0; +#X connect 4 0 8 0; +#X connect 5 0 8 0; +#X connect 6 0 8 0; +#X connect 7 0 8 0; +#X connect 9 0 8 0; +#X connect 10 0 8 0; +#X connect 11 0 8 0; +#X connect 12 0 8 0; +#X connect 13 0 8 0; +#X connect 14 0 8 0; +#X connect 15 0 8 0; +#X connect 16 0 8 0; +#X connect 17 0 8 0; +#X connect 18 0 8 0; +#X connect 19 0 8 0; +#X connect 24 0 8 0; +#X connect 29 0 31 0; +#X connect 30 0 32 0; +#X connect 31 0 33 0; +#X connect 32 1 31 1; +#X connect 33 0 24 0; +#X restore 622 72 pd bauds; +#X msg 314 139 xonxoff \$1; +#X obj 275 139 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 +1; +#X msg 314 167 rtscts \$1; +#X obj 274 167 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 +1; +#X text 117 11 comport: a serial port interface; +#X msg 102 118 13; +#X obj 111 470 route baud dsr cts parity stop data rtscts xonxoff port +open; +#X obj 484 499 tgl 15 0 empty empty open -6 20 1 11 -262144 -1 -1 0 +1; +#X connect 0 1 76 0; +#X connect 1 0 0 0; +#X connect 2 0 0 0; +#X connect 5 0 0 0; +#X connect 7 0 0 0; +#X connect 8 0 0 0; +#X connect 11 0 18 0; +#X connect 12 0 18 0; +#X connect 13 0 18 0; +#X connect 17 0 0 0; +#X connect 21 0 18 0; +#X connect 23 0 18 0; +#X connect 24 0 18 0; +#X connect 26 0 18 0; +#X connect 29 0 30 0; +#X connect 29 0 52 0; +#X connect 34 0 18 0; +#X connect 35 0 34 0; +#X connect 36 0 37 0; +#X connect 37 0 18 0; +#X connect 40 0 18 0; +#X connect 41 0 18 0; +#X connect 42 0 41 0; +#X connect 44 0 0 0; +#X connect 51 0 0 0; +#X connect 52 0 0 0; +#X connect 52 0 53 0; +#X connect 57 0 58 0; +#X connect 58 1 59 0; +#X connect 58 1 0 0; +#X connect 61 0 0 0; +#X connect 70 0 18 0; +#X connect 71 0 70 0; +#X connect 72 0 18 0; +#X connect 73 0 72 0; +#X connect 75 0 0 0; +#X connect 76 0 45 0; +#X connect 76 1 67 0; +#X connect 76 2 68 0; +#X connect 76 3 46 0; +#X connect 76 4 47 0; +#X connect 76 5 48 0; +#X connect 76 6 62 0; +#X connect 76 7 63 0; +#X connect 76 8 50 0; +#X connect 76 9 77 0; +#X connect 76 10 49 0; diff --git a/comport/comport.c b/comport/comport.c index 0aabdf9..c5fa729 100644 --- a/comport/comport.c +++ b/comport/comport.c @@ -1415,6 +1415,14 @@ static void comport_output_xonxoff(t_comport *x) comport_output_status(x, gensym("xonxoff"), x->xonxoff); } +static void comport_output_open_status(t_comport *x) +{ + if(x->comhandle == INVALID_HANDLE_VALUE) + comport_output_status(x, gensym("open"), 0); + else + comport_output_status(x, gensym("open"), 1); +} + static void comport_devices(t_comport *x) { comport_output_print(x); @@ -1422,6 +1430,7 @@ static void comport_devices(t_comport *x) static void comport_info(t_comport *x) { + comport_output_open_status(x); comport_output_port_status(x); comport_output_baud_rate(x); comport_output_dsr_status(x); |