summaryrefslogtreecommitdiff
path: root/2.3-1/macros/Hardware/RasberryPi/Serial/RPI_serialClose.sci
diff options
context:
space:
mode:
authorAbhinav Dronamraju2017-07-17 22:03:40 +0530
committerAbhinav Dronamraju2017-07-17 22:03:40 +0530
commitecbb528a2b7823d0512f3869f4d220e568c10025 (patch)
treeca35baab9f80f50bfdce12ffd00257e3b297df95 /2.3-1/macros/Hardware/RasberryPi/Serial/RPI_serialClose.sci
parent83869364b668666f317b348aca35a940e010761d (diff)
parent966afe93dbda0568dc376534ac94704ebbfb0329 (diff)
downloadScilab2C-ecbb528a2b7823d0512f3869f4d220e568c10025.tar.gz
Scilab2C-ecbb528a2b7823d0512f3869f4d220e568c10025.tar.bz2
Scilab2C-ecbb528a2b7823d0512f3869f4d220e568c10025.zip
Merged fossee master
Diffstat (limited to '2.3-1/macros/Hardware/RasberryPi/Serial/RPI_serialClose.sci')
-rwxr-xr-x2.3-1/macros/Hardware/RasberryPi/Serial/RPI_serialClose.sci40
1 files changed, 40 insertions, 0 deletions
diff --git a/2.3-1/macros/Hardware/RasberryPi/Serial/RPI_serialClose.sci b/2.3-1/macros/Hardware/RasberryPi/Serial/RPI_serialClose.sci
new file mode 100755
index 00000000..6f54b655
--- /dev/null
+++ b/2.3-1/macros/Hardware/RasberryPi/Serial/RPI_serialClose.sci
@@ -0,0 +1,40 @@
+// Copyright (C) 2017 - IIT Bombay - FOSSEE
+//
+// This file must be used under the terms of the CeCILL.
+// This source file is licensed as described in the file COPYING, which
+// you should have received as part of this distribution. The terms
+// are also available at
+// http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt
+// Organization: FOSSEE, IIT Bombay
+// Email: toolbox@scilab.in
+
+function out=RPI_serialClose(fd)
+// Function to close and open serial device
+//
+// Calling Sequence
+// RPI_serialClose(fd)
+//
+// Parameters
+// fd: file-descriptor obtained from RPI_serialOpen function
+//
+// Description
+// This function closes the device identified by the file descriptor given.
+//
+// Examples
+// RPI_serialClose(13)
+// See also
+// RPI_serialOpen, RPI_serialFlush, RPI_serialPutchar, RPI_serialPuts, RPI_serialPrintf, RPI_serialDataAvail, RPI_serialGetchar
+//
+// Authors
+// Jorawar Singh
+//
+// Bibliography
+// http://wiringpi.com/reference/
+
+ commande="sCl#1#"+string(fd)+"#";
+ if getos()=="Linux" then
+ out=unix_g("python -c ""import socket;s=socket.socket();s.connect((''"+RPI_piAdress+"'',9077));s.send(''"+commande+"'');print(s.recv(1024));s.close()""");
+ elseif getos()=="Windows" then
+ [out,RPI_winR]=dos("python -c ""import socket;s=socket.socket();s.connect((''"+RPI_piAdress+"'',9077));s.send(''"+commande+"'');print(s.recv(1024));s.close()""");
+ end
+endfunction