API tools faq
paste
Advertisement
Guest User

Untitled

a guest
Nov 23rd, 2011
1,033
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 45.08 KB | None | 0 0
raw download clone embed print report
  1. /*
  2. Part of Libnodave, a free communication libray for Siemens S7 200/300/400 via
  3. the MPI adapter 6ES7 972-0CA22-0XAC
  4. or MPI adapter 6ES7 972-0CA23-0XAC
  5. or TS adapter 6ES7 972-0CA33-0XAC
  6. or MPI adapter 6ES7 972-0CA11-0XAC,
  7. IBH/MHJ-NetLink or CPs 243, 343 and 443
  8. or VIPA Speed7 with builtin ethernet support.
  9.  
  10. (C) Thomas Hergenhahn ([email protected]) 2002..2005
  11.  
  12. Libnodave is free software; you can redistribute it and/or modify
  13. it under the terms of the GNU Library General Public License as published by
  14. the Free Software Foundation; either version 2, or (at your option)
  15. any later version.
  16.  
  17. Libnodave is distributed in the hope that it will be useful,
  18. but WITHOUT ANY WARRANTY; without even the implied warranty of
  19. MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
  20. GNU General Public License for more details.
  21.  
  22. You should have received a copy of the GNU Library General Public License
  23. along with Libnodave; see the file COPYING. If not, write to
  24. the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
  25. */
  26.  
  27. #ifdef __cplusplus
  28.  
  29. extern "C" {
  30. #endif
  31.  
  32. #ifndef __nodave
  33. #define __nodave
  34.  
  35. #define daveSerialConnection 0
  36. #define daveTcpConnection 1
  37. #define daveS7OnlineConnection 2
  38.  
  39. #ifdef LINUX
  40. #define DECL2
  41. #define EXPORTSPEC
  42. typedef struct dost {
  43. int rfd;
  44. int wfd;
  45. // int connectionType;
  46. } _daveOSserialType;
  47. #include <stdlib.h>
  48. #define tmotype int
  49. #define OS_KNOWN // get rid of nested ifdefs.
  50. #endif
  51.  
  52. #ifdef BCCWIN
  53. #define WIN32_LEAN_AND_MEAN
  54. #include <windows.h>
  55. #include <stdio.h>
  56. #include <stdlib.h>
  57. #define DECL2 __stdcall
  58. #define tmotype int
  59.  
  60. #ifdef DOEXPORT
  61. #define EXPORTSPEC __declspec (dllexport)
  62. #else
  63. #define EXPORTSPEC __declspec (dllimport)
  64. #endif
  65.  
  66. typedef struct dost {
  67. HANDLE rfd;
  68. HANDLE wfd;
  69. // int connectionType;
  70. } _daveOSserialType;
  71.  
  72. #define OS_KNOWN
  73. #endif
  74.  
  75. #ifdef DOS
  76. #include <stdio.h>
  77. #include <stdlib.h>
  78. //#define DECL2 WINAPI
  79. // #define DECL2
  80. #define DECL2 __cedcl
  81. #define EXPORTSPEC
  82.  
  83. typedef struct dost {
  84. int rfd;
  85. int wfd;
  86. int connectionType;
  87. } _daveOSserialType;
  88. #define OS_KNOWN
  89. #endif
  90.  
  91. #ifdef AVR
  92. #include <stdio.h>
  93. #include <stdlib.h>
  94. #define DECL2
  95. #define EXPORTSPEC
  96. typedef struct dost {
  97. int rfd;
  98. int wfd;
  99. int connectionType;
  100. } _daveOSserialType;
  101. #define tmotype long
  102. #define OS_KNOWN
  103. #endif
  104.  
  105. #ifndef OS_KNOWN
  106. #error Fill in what you need for your OS or API.
  107. #endif
  108.  
  109. /*
  110. some frequently used ASCII control codes:
  111. */
  112. #define DLE 0x10
  113. #define ETX 0x03
  114. #define STX 0x02
  115. #define SYN 0x16
  116. #define NAK 0x15
  117. #define EOT 0x04 // for S5
  118. #define ACK 0x06 // for S5
  119. /*
  120. Protocol types to be used with newInterface:
  121. */
  122. #define daveProtoMPI 0 /* MPI for S7 300/400 */
  123. #define daveProtoMPI2 1 /* MPI for S7 300/400, "Andrew's version" without STX */
  124. #define daveProtoMPI3 2 /* MPI for S7 300/400, Step 7 Version, not yet implemented */
  125. #define daveProtoMPI4 3 /* MPI for S7 300/400, "Andrew's version" with STX */
  126.  
  127. #define daveProtoPPI 10 /* PPI for S7 200 */
  128.  
  129. #define daveProtoAS511 20 /* S5 programming port protocol */
  130.  
  131. #define daveProtoS7online 50 /* use s7onlinx.dll for transport */
  132.  
  133. #define daveProtoISOTCP 122 /* ISO over TCP */
  134. #define daveProtoISOTCP243 123 /* ISO over TCP with CP243 */
  135. #define daveProtoISOTCPR 124 /* ISO over TCP with Routing */
  136.  
  137. #define daveProtoMPI_IBH 223 /* MPI with IBH NetLink MPI to ethernet gateway */
  138. #define daveProtoPPI_IBH 224 /* PPI with IBH NetLink PPI to ethernet gateway */
  139.  
  140. #define daveProtoNLpro 230 /* MPI with NetLink Pro MPI to ethernet gateway */
  141.  
  142. #define daveProtoUserTransport 255 /* Libnodave will pass the PDUs of S7 Communication to user */
  143. /* defined call back functions. */
  144.  
  145. /*
  146. * ProfiBus speed constants:
  147. */
  148. #define daveSpeed9k 0
  149. #define daveSpeed19k 1
  150. #define daveSpeed187k 2
  151. #define daveSpeed500k 3
  152. #define daveSpeed1500k 4
  153. #define daveSpeed45k 5
  154. #define daveSpeed93k 6
  155.  
  156. /*
  157. Some MPI function codes (yet unused ones may be incorrect).
  158. */
  159. #define daveFuncOpenS7Connection 0xF0
  160. #define daveFuncRead 0x04
  161. #define daveFuncWrite 0x05
  162. #define daveFuncRequestDownload 0x1A
  163. #define daveFuncDownloadBlock 0x1B
  164. #define daveFuncDownloadEnded 0x1C
  165. #define daveFuncStartUpload 0x1D
  166. #define daveFuncUpload 0x1E
  167. #define daveFuncEndUpload 0x1F
  168. #define daveFuncInsertBlock 0x28
  169. /*
  170. S7 specific constants:
  171. */
  172. #define daveBlockType_OB '8'
  173. #define daveBlockType_DB 'A'
  174. #define daveBlockType_SDB 'B'
  175. #define daveBlockType_FC 'C'
  176. #define daveBlockType_SFC 'D'
  177. #define daveBlockType_FB 'E'
  178. #define daveBlockType_SFB 'F'
  179.  
  180. #define daveS5BlockType_DB 0x01
  181. #define daveS5BlockType_SB 0x02
  182. #define daveS5BlockType_PB 0x04
  183. #define daveS5BlockType_FX 0x05
  184. #define daveS5BlockType_FB 0x08
  185. #define daveS5BlockType_DX 0x0C
  186. #define daveS5BlockType_OB 0x10
  187.  
  188. /*
  189. Use these constants for parameter "area" in daveReadBytes and daveWriteBytes
  190. */
  191. #define daveSysInfo 0x3 /* System info of 200 family */
  192. #define daveSysFlags 0x5 /* System flags of 200 family */
  193. #define daveAnaIn 0x6 /* analog inputs of 200 family */
  194. #define daveAnaOut 0x7 /* analog outputs of 200 family */
  195.  
  196. #define daveP 0x80 /* direct peripheral access */
  197. #define daveInputs 0x81
  198. #define daveOutputs 0x82
  199. #define daveFlags 0x83
  200. #define daveDB 0x84 /* data blocks */
  201. #define daveDI 0x85 /* instance data blocks */
  202. #define daveLocal 0x86 /* not tested */
  203. #define daveV 0x87 /* don't know what it is */
  204. #define daveCounter 28 /* S7 counters */
  205. #define daveTimer 29 /* S7 timers */
  206. #define daveCounter200 30 /* IEC counters (200 family) */
  207. #define daveTimer200 31 /* IEC timers (200 family) */
  208. #define daveSysDataS5 0x86 /* system data area ? */
  209. #define daveRawMemoryS5 0 /* just the raw memory */
  210.  
  211. /**
  212. Library specific:
  213. **/
  214. /*
  215. Result codes. Genarally, 0 means ok,
  216. >0 are results (also errors) reported by the PLC
  217. <0 means error reported by library code.
  218. */
  219. #define daveResOK 0 /* means all ok */
  220. #define daveResNoPeripheralAtAddress 1 /* CPU tells there is no peripheral at address */
  221. #define daveResMultipleBitsNotSupported 6 /* CPU tells it does not support to read a bit block with a */
  222. /* length other than 1 bit. */
  223. #define daveResItemNotAvailable200 3 /* means a a piece of data is not available in the CPU, e.g. */
  224. /* when trying to read a non existing DB or bit bloc of length<>1 */
  225. /* This code seems to be specific to 200 family. */
  226.  
  227. #define daveResItemNotAvailable 10 /* means a a piece of data is not available in the CPU, e.g. */
  228. /* when trying to read a non existing DB */
  229.  
  230. #define daveAddressOutOfRange 5 /* means the data address is beyond the CPUs address range */
  231. #define daveWriteDataSizeMismatch 7 /* means the write data size doesn't fit item size */
  232. #define daveResCannotEvaluatePDU -123 /* PDU is not understood by libnodave */
  233. #define daveResCPUNoData -124
  234. #define daveUnknownError -125
  235. #define daveEmptyResultError -126
  236. #define daveEmptyResultSetError -127
  237. #define daveResUnexpectedFunc -128
  238. #define daveResUnknownDataUnitSize -129
  239. #define daveResNoBuffer -130
  240. #define daveNotAvailableInS5 -131
  241. #define daveResInvalidLength -132
  242. #define daveResInvalidParam -133
  243. #define daveResNotYetImplemented -134
  244.  
  245. #define daveResShortPacket -1024
  246. #define daveResTimeout -1025
  247.  
  248. /*
  249. Error code to message string conversion:
  250. Call this function to get an explanation for error codes returned by other functions.
  251. */
  252. EXPORTSPEC char * DECL2 daveStrerror(int code); // result is char because this is usual for strings
  253.  
  254. /*
  255. Copy an internal String into an external string buffer. This is needed to interface
  256. with Visual Basic. Maybe it is helpful elsewhere, too.
  257. */
  258. EXPORTSPEC void DECL2 daveStringCopy(char * intString, char * extString); // args are char because this is usual for strings
  259.  
  260.  
  261. /*
  262. Max number of bytes in a single message.
  263. An upper limit for MPI over serial is:
  264. 8 transport header
  265. +2*240 max PDU len *2 if every character were a DLE
  266. +3 DLE,ETX and BCC
  267. = 491
  268.  
  269. Later I saw some programs offering up to 960 bytes in PDU size negotiation
  270.  
  271. Max number of bytes in a single message.
  272. An upper limit for MPI over serial is:
  273. 8 transport header
  274. +2*960 max PDU len *2 if every character were a DLE
  275. +3 DLE,ETX and BCC
  276. = 1931
  277.  
  278. For now, we take the rounded max of all this to determine our buffer size. This is ok
  279. for PC systems, where one k less or more doesn't matter.
  280. */
  281. #define daveMaxRawLen 2048
  282. /*
  283. Some definitions for debugging:
  284. */
  285. #define daveDebugRawRead 0x01 /* Show the single bytes received */
  286. #define daveDebugSpecialChars 0x02 /* Show when special chars are read */
  287. #define daveDebugRawWrite 0x04 /* Show the single bytes written */
  288. #define daveDebugListReachables 0x08 /* Show the steps when determine devices in MPI net */
  289. #define daveDebugInitAdapter 0x10 /* Show the steps when Initilizing the MPI adapter */
  290. #define daveDebugConnect 0x20 /* Show the steps when connecting a PLC */
  291. #define daveDebugPacket 0x40
  292. #define daveDebugByte 0x80
  293. #define daveDebugCompare 0x100
  294. #define daveDebugExchange 0x200
  295. #define daveDebugPDU 0x400 /* debug PDU handling */
  296. #define daveDebugUpload 0x800 /* debug PDU loading program blocks from PLC */
  297. #define daveDebugMPI 0x1000
  298. #define daveDebugPrintErrors 0x2000 /* Print error messages */
  299. #define daveDebugPassive 0x4000
  300.  
  301. #define daveDebugErrorReporting 0x8000
  302. #define daveDebugOpen 0x10000 /* print messages in openSocket and setPort */
  303.  
  304. #define daveDebugAll 0x1ffff
  305. /*
  306. IBH-NetLink packet types:
  307. */
  308. #define _davePtEmpty -2
  309. #define _davePtMPIAck -3
  310. #define _davePtUnknownMPIFunc -4
  311. #define _davePtUnknownPDUFunc -5
  312. #define _davePtReadResponse 1
  313. #define _davePtWriteResponse 2
  314.  
  315. /*
  316. set and read debug level:
  317. */
  318. EXPORTSPEC void DECL2 daveSetDebug(int nDebug);
  319. EXPORTSPEC int DECL2 daveGetDebug(void);
  320. /*
  321. Some data types:
  322. */
  323. #define uc unsigned char
  324. #define us unsigned short
  325. #define u32 unsigned int
  326.  
  327. /*
  328. This is a wrapper for the serial or ethernet interface. This is here to make porting easier.
  329. */
  330.  
  331. typedef struct _daveConnection daveConnection;
  332. typedef struct _daveInterface daveInterface;
  333.  
  334. /*
  335. Helper struct to manage PDUs. This is NOT the part of the packet I would call PDU, but
  336. a set of pointers that ease access to the "private parts" of a PDU.
  337. */
  338. typedef struct {
  339. uc * header; /* pointer to start of PDU (PDU header) */
  340. uc * param; /* pointer to start of parameters inside PDU */
  341. uc * data; /* pointer to start of data inside PDU */
  342. uc * udata; /* pointer to start of data inside PDU */
  343. int hlen; /* header length */
  344. int plen; /* parameter length */
  345. int dlen; /* data length */
  346. int udlen; /* user or result data length */
  347. } PDU;
  348.  
  349. /*
  350. Definitions of prototypes for the protocol specific functions. The library "switches"
  351. protocol by setting pointers to the protol specific implementations.
  352. */
  353. typedef int (DECL2 * _initAdapterFunc) (daveInterface * );
  354. typedef int (DECL2 * _connectPLCFunc) (daveConnection *);
  355. typedef int (DECL2 * _disconnectPLCFunc) (daveConnection *);
  356. typedef int (DECL2 * _disconnectAdapterFunc) (daveInterface * );
  357. typedef int (DECL2 * _exchangeFunc) (daveConnection *, PDU *);
  358. typedef int (DECL2 * _sendMessageFunc) (daveConnection *, PDU *);
  359. typedef int (DECL2 * _getResponseFunc) (daveConnection *);
  360. typedef int (DECL2 * _listReachablePartnersFunc) (daveInterface * di, char * buf); // changed to unsigned char because it is a copy of an uc buffer
  361.  
  362. /*
  363. Definitions of prototypes for i/O functions.
  364. */
  365. typedef int (DECL2 * _writeFunc) (daveInterface *, char *, int); // changed to char because char is what system read/write expects
  366. typedef int (DECL2 * _readFunc) (daveInterface *, char *, int);
  367.  
  368. /*
  369. This groups an interface together with some information about it's properties
  370. in the library's context.
  371. */
  372. struct _daveInterface {
  373. tmotype timeout; /* Timeout in microseconds used in transort. */
  374. _daveOSserialType fd; /* some handle for the serial interface */
  375. int localMPI; /* the adapter's MPI address */
  376.  
  377. int users; /* a counter used when multiple PLCs are accessed via */
  378. /* the same serial interface and adapter. */
  379. char * name; /* just a name that can be used in programs dealing with multiple */
  380. /* daveInterfaces */
  381. int protocol; /* The kind of transport protocol used on this interface. */
  382. int speed; /* The MPI or Profibus speed */
  383. int ackPos; /* position of some packet number that has to be repeated in ackknowledges */
  384. int nextConnection;
  385. _initAdapterFunc initAdapter; /* pointers to the protocol */
  386. _connectPLCFunc connectPLC; /* specific implementations */
  387. _disconnectPLCFunc disconnectPLC; /* of these functions */
  388. _disconnectAdapterFunc disconnectAdapter;
  389. _exchangeFunc exchange;
  390. _sendMessageFunc sendMessage;
  391. _getResponseFunc getResponse;
  392. _listReachablePartnersFunc listReachablePartners;
  393. char realName[20];
  394. _readFunc ifread;
  395. _writeFunc ifwrite;
  396. int seqNumber;
  397. };
  398.  
  399. EXPORTSPEC daveInterface * DECL2 daveNewInterface(_daveOSserialType nfd, char * nname, int localMPI, int protocol, int speed);
  400. EXPORTSPEC daveInterface * DECL2 davePascalNewInterface(_daveOSserialType* nfd, char * nname, int localMPI, int protocol, int speed);
  401. /*
  402. This is the packet header used by IBH ethernet NetLink.
  403. */
  404. typedef struct {
  405. uc ch1; // logical connection or channel ?
  406. uc ch2; // logical connection or channel ?
  407. uc len; // number of bytes counted from the ninth one.
  408. uc packetNumber; // a counter, response packets refer to request packets
  409. us sFlags; // my guess
  410. us rFlags; // my interpretation
  411. } IBHpacket;
  412.  
  413. /*
  414. Header for MPI packets on IBH-NetLink:
  415. */
  416.  
  417. typedef struct {
  418. uc src_conn;
  419. uc dst_conn;
  420. uc MPI;
  421. uc localMPI;
  422. uc len;
  423. uc func;
  424. uc packetNumber;
  425. } MPIheader;
  426.  
  427. typedef struct {
  428. uc src_conn;
  429. uc dst_conn;
  430. uc MPI;
  431. uc xxx1;
  432. uc xxx2;
  433. uc xx22;
  434. uc len;
  435. uc func;
  436. uc packetNumber;
  437. } MPIheader2;
  438.  
  439. typedef struct _daveS5AreaInfo {
  440. int area;
  441. int DBnumber;
  442. int address;
  443. int len;
  444. struct _daveS5AreaInfo * next;
  445. } daveS5AreaInfo;
  446.  
  447. typedef struct _daveS5cache {
  448. int PAE; // start of inputs
  449. int PAA; // start of outputs
  450. int flags; // start of flag (marker) memory
  451. int timers; // start of timer memory
  452. int counters;// start of counter memory
  453. int systemData;// start of system data
  454. daveS5AreaInfo * first;
  455. } daveS5cache;
  456.  
  457. /*
  458. This holds data for a PLC connection;
  459. */
  460.  
  461. struct _daveConnection {
  462. int AnswLen; /* length of last message */
  463. uc * resultPointer; /* used to retrieve single values from the result byte array */
  464. int maxPDUlength;
  465. int MPIAdr; /* The PLC's address */
  466. daveInterface * iface; /* pointer to used interface */
  467. int needAckNumber; /* message number we need ackknowledge for */
  468. int PDUnumber; /* current PDU number */
  469. int ibhSrcConn;
  470. int ibhDstConn;
  471. uc msgIn[daveMaxRawLen];
  472. uc msgOut[daveMaxRawLen];
  473. uc * _resultPointer;
  474. int PDUstartO; /* position of PDU in outgoing messages. This is different for different transport methodes. */
  475. int PDUstartI; /* position of PDU in incoming messages. This is different for different transport methodes. */
  476. int rack; /* rack number for ISO over TCP */
  477. int slot; /* slot number for ISO over TCP */
  478. int connectionNumber;
  479. int connectionNumber2;
  480. uc messageNumber; /* current MPI message number */
  481. uc packetNumber; /* packetNumber in transport layer */
  482. void * hook; /* used in CPU/CP simulation: pointer to the rest we have to send if message doesn't fit in a single packet */
  483. daveS5cache * cache; /* used in AS511: We cache addresses of memory areas and datablocks here */
  484. };
  485.  
  486. /*
  487. Setup a new connection structure using an initialized
  488. daveInterface and PLC's MPI address.
  489. */
  490. EXPORTSPEC
  491. daveConnection * DECL2 daveNewConnection(daveInterface * di, int MPI,int rack, int slot);
  492.  
  493.  
  494. typedef struct {
  495. uc type[2];
  496. unsigned short count;
  497. } daveBlockTypeEntry;
  498.  
  499. typedef struct {
  500. unsigned short number;
  501. uc type[2];
  502. } daveBlockEntry;
  503.  
  504. typedef struct {
  505. uc type[2];
  506. uc x1[2]; /* 00 4A */
  507. uc w1[2]; /* some word var? */
  508. char pp[2]; /* allways 'pp' */
  509. uc x2[4]; /* 00 4A */
  510. unsigned short number; /* the block's number */
  511. uc x3[26]; /* ? */
  512. unsigned short length; /* the block's length */
  513. uc x4[16];
  514. uc name[8];
  515. uc x5[12];
  516. } daveBlockInfo;
  517. /**
  518. PDU handling:
  519. PDU is the central structure present in S7 communication.
  520. It is composed of a 10 or 12 byte header,a parameter block and a data block.
  521. When reading or writing values, the data field is itself composed of a data
  522. header followed by payload data
  523. **/
  524. typedef struct {
  525. uc P; /* allways 0x32 */
  526. uc type; /* Header type, one of 1,2,3 or 7. type 2 and 3 headers are two bytes longer. */
  527. uc a,b; /* currently unknown. Maybe it can be used for long numbers? */
  528. us number; /* A number. This can be used to make sure a received answer */
  529. /* corresponds to the request with the same number. */
  530. us plen; /* length of parameters which follow this header */
  531. us dlen; /* length of data which follow the parameters */
  532. uc result[2]; /* only present in type 2 and 3 headers. This contains error information. */
  533. } PDUHeader;
  534. /*
  535. set up the header. Needs valid header pointer in the struct p points to.
  536. */
  537. EXPORTSPEC void DECL2 _daveInitPDUheader(PDU * p, int type);
  538. /*
  539. add parameters after header, adjust pointer to data.
  540. needs valid header
  541. */
  542. EXPORTSPEC void DECL2 _daveAddParam(PDU * p,uc * param,us len);
  543. /*
  544. add data after parameters, set dlen
  545. needs valid header,and valid parameters.
  546. */
  547. EXPORTSPEC void DECL2 _daveAddData(PDU * p,void * data,int len);
  548. /*
  549. add values after value header in data, adjust dlen and data count.
  550. needs valid header,parameters,data,dlen
  551. */
  552. EXPORTSPEC void DECL2 _daveAddValue(PDU * p,void * data,int len);
  553. /*
  554. add data in user data. Add a user data header, if not yet present.
  555. */
  556. EXPORTSPEC void DECL2 _daveAddUserData(PDU * p, uc * da, int len);
  557. /*
  558. set up pointers to the fields of a received message
  559. */
  560. EXPORTSPEC int DECL2 _daveSetupReceivedPDU(daveConnection * dc,PDU * p);
  561. /*
  562. Get the eror code from a PDU, if one.
  563. */
  564. EXPORTSPEC int DECL2 daveGetPDUerror(PDU * p);
  565. /*
  566. send PDU to PLC and retrieve the answer
  567. */
  568. EXPORTSPEC int DECL2 _daveExchange(daveConnection * dc,PDU *p);
  569. /*
  570. retrieve the answer
  571. */
  572. EXPORTSPEC int DECL2 daveGetResponse(daveConnection * dc);
  573. /*
  574. send PDU to PLC
  575. */
  576. EXPORTSPEC int DECL2 daveSendMessage(daveConnection * dc, PDU * p);
  577.  
  578. /******
  579.  
  580. Utilities:
  581.  
  582. ****/
  583. /*
  584. Hex dump PDU:
  585. */
  586. EXPORTSPEC void DECL2 _daveDumpPDU(PDU * p);
  587.  
  588. /*
  589. This is an extended memory compare routine. It can handle don't care and stop flags
  590. in the sample data. A stop flag lets it return success, if there were no mismatches
  591. up to this point.
  592. */
  593. EXPORTSPEC int DECL2 _daveMemcmp(us * a, uc *b, size_t len);
  594.  
  595. /*
  596. Hex dump. Write the name followed by len bytes written in hex and a newline:
  597. */
  598. //EXPORTSPEC void DECL2 _daveDump(char * name, uc *b, int len);
  599. EXPORTSPEC void DECL2 _daveDump(char * name, void *b, int len);
  600.  
  601. /*
  602. names for PLC objects:
  603. */
  604. EXPORTSPEC char * DECL2 daveBlockName(uc bn); // char or uc,to decide
  605. EXPORTSPEC char * DECL2 daveAreaName(uc n); // to decide
  606.  
  607. /*
  608. swap functions. These swap function do a swao on little endian machines only:
  609. */
  610. EXPORTSPEC short DECL2 daveSwapIed_16(short ff);
  611. EXPORTSPEC int DECL2 daveSwapIed_32(int ff);
  612.  
  613. /**
  614. Data conversion convenience functions. The older set has been removed.
  615. Newer conversion routines. As the terms WORD, INT, INTEGER etc have different meanings
  616. for users of different programming languages and compilers, I choose to provide a new
  617. set of conversion routines named according to the bit length of the value used. The 'U'
  618. or 'S' stands for unsigned or signed.
  619. **/
  620. /*
  621. Get a value from the position b points to. B is typically a pointer to a buffer that has
  622. been filled with daveReadBytes:
  623. */
  624. EXPORTSPEC float DECL2 daveGetFloatAt(daveConnection * dc, int pos);
  625. EXPORTSPEC float DECL2 daveGetKGAt(daveConnection * dc, int pos);
  626.  
  627.  
  628. EXPORTSPEC float DECL2 toPLCfloat(float ff);
  629. EXPORTSPEC int DECL2 daveToPLCfloat(float ff);
  630. EXPORTSPEC int DECL2 daveToKG(float ff);
  631.  
  632.  
  633. EXPORTSPEC int DECL2 daveGetS8from(uc *b);
  634. EXPORTSPEC int DECL2 daveGetU8from(uc *b);
  635. EXPORTSPEC int DECL2 daveGetS16from(uc *b);
  636. EXPORTSPEC int DECL2 daveGetU16from(uc *b);
  637. EXPORTSPEC int DECL2 daveGetS32from(uc *b);
  638. EXPORTSPEC unsigned int DECL2 daveGetU32from(uc *b);
  639. EXPORTSPEC float DECL2 daveGetFloatfrom(uc *b);
  640. EXPORTSPEC float DECL2 daveGetKGfrom(uc *b);
  641. /*
  642. Get a value from the current position in the last result read on the connection dc.
  643. This will increment an internal pointer, so the next value is read from the position
  644. following this value.
  645. */
  646.  
  647. EXPORTSPEC int DECL2 daveGetS8(daveConnection * dc);
  648. EXPORTSPEC int DECL2 daveGetU8(daveConnection * dc);
  649. EXPORTSPEC int DECL2 daveGetS16(daveConnection * dc);
  650. EXPORTSPEC int DECL2 daveGetU16(daveConnection * dc);
  651. EXPORTSPEC int DECL2 daveGetS32(daveConnection * dc);
  652. EXPORTSPEC unsigned int DECL2 daveGetU32(daveConnection * dc);
  653. EXPORTSPEC float DECL2 daveGetFloat(daveConnection * dc);
  654. EXPORTSPEC float DECL2 daveGetKG(daveConnection * dc);
  655. /*
  656. Get a value from a given position in the last result read on the connection dc.
  657. */
  658. EXPORTSPEC int DECL2 daveGetS8At(daveConnection * dc, int pos);
  659. EXPORTSPEC int DECL2 daveGetU8At(daveConnection * dc, int pos);
  660. EXPORTSPEC int DECL2 daveGetS16At(daveConnection * dc, int pos);
  661. EXPORTSPEC int DECL2 daveGetU16At(daveConnection * dc, int pos);
  662. EXPORTSPEC int DECL2 daveGetS32At(daveConnection * dc, int pos);
  663. EXPORTSPEC unsigned int DECL2 daveGetU32At(daveConnection * dc, int pos);
  664. /*
  665. put one byte into buffer b:
  666. */
  667. EXPORTSPEC uc * DECL2 davePut8(uc *b,int v);
  668. EXPORTSPEC uc * DECL2 davePut16(uc *b,int v);
  669. EXPORTSPEC uc * DECL2 davePut32(uc *b,int v);
  670. EXPORTSPEC uc * DECL2 davePutFloat(uc *b,float v);
  671. EXPORTSPEC uc * DECL2 davePutKG(uc *b,float v);
  672. EXPORTSPEC void DECL2 davePut8At(uc *b, int pos, int v);
  673. EXPORTSPEC void DECL2 davePut16At(uc *b, int pos, int v);
  674. EXPORTSPEC void DECL2 davePut32At(uc *b, int pos, int v);
  675. EXPORTSPEC void DECL2 davePutFloatAt(uc *b,int pos, float v);
  676. EXPORTSPEC void DECL2 davePutKGAt(uc *b,int pos, float v);
  677. /**
  678. Timer and Counter conversion functions:
  679. **/
  680. /*
  681. get time in seconds from current read position:
  682. */
  683. EXPORTSPEC float DECL2 daveGetSeconds(daveConnection * dc);
  684. /*
  685. get time in seconds from random position:
  686. */
  687. EXPORTSPEC float DECL2 daveGetSecondsAt(daveConnection * dc, int pos);
  688. /*
  689. get counter value from current read position:
  690. */
  691. EXPORTSPEC int DECL2 daveGetCounterValue(daveConnection * dc);
  692. /*
  693. get counter value from random read position:
  694. */
  695. EXPORTSPEC int DECL2 daveGetCounterValueAt(daveConnection * dc,int pos);
  696.  
  697. /*
  698. Functions to load blocks from PLC:
  699. */
  700. EXPORTSPEC void DECL2 _daveConstructUpload(PDU *p, char blockType, int blockNr); // char or uc,to decide
  701.  
  702. EXPORTSPEC void DECL2 _daveConstructDoUpload(PDU * p, int uploadID);
  703.  
  704. EXPORTSPEC void DECL2 _daveConstructEndUpload(PDU * p, int uploadID);
  705. /*
  706. Get the PLC's order code as ASCIIZ. Buf must provide space for
  707. 21 characters at least.
  708. */
  709.  
  710. #define daveOrderCodeSize 21
  711. EXPORTSPEC int DECL2 daveGetOrderCode(daveConnection * dc, char * buf); // char, users buffer, or to decide
  712.  
  713. /*
  714. connect to a PLC. returns 0 on success.
  715. */
  716. EXPORTSPEC int DECL2 daveConnectPLC(daveConnection * dc);
  717.  
  718. /*
  719. Read len bytes from the PLC. Start determines the first byte.
  720. Area denotes whether the data comes from FLAGS, DATA BLOCKS,
  721. INPUTS or OUTPUTS, etc.
  722. DB is the number of the data block to be used. Set it to zero
  723. for other area types.
  724. Buffer is a pointer to a memory block provided by the calling
  725. program. If the pointer is not NULL, the result data will be copied thereto.
  726. Hence it must be big enough to take up the result.
  727. In any case, you can also retrieve the result data using the get<type> macros
  728. on the connection pointer.
  729.  
  730. RESTRICTION:There is no check for max. message len or automatic splitting into
  731. multiple messages. Use daveReadManyBytes() in case the data you want
  732. to read doesn't fit into a single PDU.
  733.  
  734. */
  735. EXPORTSPEC int DECL2 daveReadBytes(daveConnection * dc, int area, int DB, int start, int len, void * buffer);
  736.  
  737. /*
  738. Read len bytes from the PLC. Start determines the first byte.
  739. In contrast to daveReadBytes(), this function can read blocks
  740. that are too long for a single transaction. To achieve this,
  741. the data is fetched with multiple subsequent read requests to
  742. the CPU.
  743. Area denotes whether the data comes from FLAGS, DATA BLOCKS,
  744. INPUTS or OUTPUTS, etc.
  745. DB is the number of the data block to be used. Set it to zero
  746. for other area types.
  747. Buffer is a pointer to a memory block provided by the calling
  748. program. It may not be NULL, the result data will be copied thereto.
  749. Hence it must be big enough to take up the result.
  750. You CANNOT read result bytes from the internal buffer of the
  751. daveConnection. This buffer is overwritten in each read request.
  752. */
  753. EXPORTSPEC int DECL2 daveReadManyBytes(daveConnection * dc,int area, int DBnum, int start,int len, void * buffer);
  754.  
  755. /*
  756. Write len bytes from buffer to the PLC.
  757. Start determines the first byte.
  758. Area denotes whether the data goes to FLAGS, DATA BLOCKS,
  759. INPUTS or OUTPUTS, etc.
  760. DB is the number of the data block to be used. Set it to zero
  761. for other area types.
  762. RESTRICTION: There is no check for max. message len or automatic splitting into
  763. multiple messages. Use daveReadManyBytes() in case the data you want
  764. to read doesn't fit into a single PDU.
  765.  
  766. */
  767. EXPORTSPEC int DECL2 daveWriteBytes(daveConnection * dc,int area, int DB, int start, int len, void * buffer);
  768.  
  769. /*
  770. Write len bytes to the PLC. Start determines the first byte.
  771. In contrast to daveWriteBytes(), this function can write blocks
  772. that are too long for a single transaction. To achieve this, the
  773. the data is transported with multiple subsequent write requests to
  774. the CPU.
  775. Area denotes whether the data comes from FLAGS, DATA BLOCKS,
  776. INPUTS or OUTPUTS, etc.
  777. DB is the number of the data block to be used. Set it to zero
  778. for other area types.
  779. Buffer is a pointer to a memory block provided by the calling
  780. program. It may not be NULL.
  781. */
  782. EXPORTSPEC int DECL2 daveWriteManyBytes(daveConnection * dc,int area, int DB, int start, int len, void * buffer);
  783. /*
  784. Bit manipulation:
  785. */
  786. EXPORTSPEC int DECL2 daveReadBits(daveConnection * dc, int area, int DB, int start, int len, void * buffer);
  787. EXPORTSPEC int DECL2 daveWriteBits(daveConnection * dc,int area, int DB, int start, int len, void * buffer);
  788. EXPORTSPEC int DECL2 daveSetBit(daveConnection * dc,int area, int DB, int byteAdr, int bitAdr);
  789. EXPORTSPEC int DECL2 daveClrBit(daveConnection * dc,int area, int DB, int byteAdr, int bitAdr);
  790.  
  791. /*
  792. PLC diagnostic and inventory functions:
  793. */
  794. EXPORTSPEC int DECL2 daveBuildAndSendPDU(daveConnection * dc, PDU*p2,uc *pa,int psize, uc *ud,int usize);
  795. EXPORTSPEC int DECL2 daveReadSZL(daveConnection * dc, int ID, int index, void * buf, int buflen);
  796. EXPORTSPEC int DECL2 daveListBlocksOfType(daveConnection * dc,uc type,daveBlockEntry * buf);
  797. EXPORTSPEC int DECL2 daveListBlocks(daveConnection * dc,daveBlockTypeEntry * buf);
  798. EXPORTSPEC int DECL2 daveGetBlockInfo(daveConnection * dc, daveBlockInfo *dbi, uc type, int number);
  799. /*
  800. PLC program read functions:
  801. */
  802. EXPORTSPEC int DECL2 initUpload(daveConnection * dc, char blockType, int blockNr, int * uploadID); // char or uc,to decide
  803. EXPORTSPEC int DECL2 doUpload(daveConnection*dc, int * more, uc**buffer, int*len, int uploadID);
  804. EXPORTSPEC int DECL2 endUpload(daveConnection*dc, int uploadID);
  805. /*
  806. PLC run/stop control functions:
  807. */
  808. EXPORTSPEC int DECL2 daveStop(daveConnection*dc);
  809. EXPORTSPEC int DECL2 daveStart(daveConnection*dc);
  810. /*
  811. PLC special commands
  812. */
  813. EXPORTSPEC int DECL2 daveCopyRAMtoROM(daveConnection*dc);
  814.  
  815. EXPORTSPEC int DECL2 daveForce200(daveConnection * dc, int area, int start, int val);
  816. /*
  817. Multiple variable support:
  818. */
  819. typedef struct {
  820. int error;
  821. int length;
  822. uc * bytes;
  823. } daveResult;
  824.  
  825. typedef struct {
  826. int numResults;
  827. daveResult * results;
  828. } daveResultSet;
  829.  
  830.  
  831. /* use this to initialize a multivariable read: */
  832. EXPORTSPEC void DECL2 davePrepareReadRequest(daveConnection * dc, PDU *p);
  833. /* Adds a new variable to a prepared request: */
  834. EXPORTSPEC void DECL2 daveAddVarToReadRequest(PDU *p, int area, int DBnum, int start, int bytes);
  835. /* Executes the complete request. */
  836. EXPORTSPEC int DECL2 daveExecReadRequest(daveConnection * dc, PDU *p, daveResultSet * rl);
  837. /* Lets the functions daveGet<data type> work on the n-th result: */
  838. EXPORTSPEC int DECL2 daveUseResult(daveConnection * dc, daveResultSet * rl, int n);
  839. /* Frees the memory occupied by the result structure */
  840. EXPORTSPEC void DECL2 daveFreeResults(daveResultSet * rl);
  841. /* Adds a new bit variable to a prepared request: */
  842. EXPORTSPEC void DECL2 daveAddBitVarToReadRequest(PDU *p, int area, int DBnum, int start, int byteCount);
  843.  
  844. /* use this to initialize a multivariable write: */
  845. EXPORTSPEC void DECL2 davePrepareWriteRequest(daveConnection * dc, PDU *p);
  846. /* Add a preformed variable aderess to a read request: */
  847. EXPORTSPEC void DECL2 daveAddToReadRequest(PDU *p, int area, int DBnum, int start, int byteCount, int isBit);
  848. /* Adds a new variable to a prepared request: */
  849. EXPORTSPEC void DECL2 daveAddVarToWriteRequest(PDU *p, int area, int DBnum, int start, int bytes, void * buffer);
  850. /* Adds a new bit variable to a prepared write request: */
  851. EXPORTSPEC void DECL2 daveAddBitVarToWriteRequest(PDU *p, int area, int DBnum, int start, int byteCount, void * buffer);
  852. EXPORTSPEC int DECL2 _daveTestResultData(PDU * p);
  853. EXPORTSPEC int DECL2 _daveTestReadResult(PDU * p);
  854. EXPORTSPEC int DECL2 _daveTestPGReadResult(PDU * p);
  855.  
  856. /* Executes the complete request. */
  857. EXPORTSPEC int DECL2 daveExecWriteRequest(daveConnection * dc, PDU *p, daveResultSet * rl);
  858. EXPORTSPEC int DECL2 _daveTestWriteResult(PDU * p);
  859.  
  860. EXPORTSPEC int DECL2 daveInitAdapter(daveInterface * di);
  861. EXPORTSPEC int DECL2 daveConnectPLC(daveConnection * dc);
  862. EXPORTSPEC int DECL2 daveDisconnectPLC(daveConnection * dc);
  863.  
  864. EXPORTSPEC int DECL2 daveDisconnectAdapter(daveInterface * di);
  865. EXPORTSPEC int DECL2 daveListReachablePartners(daveInterface * di, char * buf);
  866.  
  867. EXPORTSPEC int DECL2 _daveReturnOkDummy(daveInterface * di);
  868. EXPORTSPEC int DECL2 _daveReturnOkDummy2(daveConnection * dc);
  869. EXPORTSPEC int DECL2 _daveListReachablePartnersDummy(daveInterface * di, char * buf);
  870.  
  871. EXPORTSPEC int DECL2 _daveNegPDUlengthRequest(daveConnection * dc, PDU *p);
  872.  
  873. /* MPI specific functions */
  874.  
  875. #define daveMPIReachable 0x30
  876. #define daveMPIActive 0x30
  877. #define daveMPIPassive 0x00
  878. #define daveMPIunused 0x10
  879. #define davePartnerListSize 126
  880.  
  881. EXPORTSPEC int DECL2 _daveListReachablePartnersMPI(daveInterface * di, char * buf);
  882. EXPORTSPEC int DECL2 _daveInitAdapterMPI1(daveInterface * di);
  883. EXPORTSPEC int DECL2 _daveInitAdapterMPI2(daveInterface * di);
  884. EXPORTSPEC int DECL2 _daveConnectPLCMPI1(daveConnection * dc);
  885. EXPORTSPEC int DECL2 _daveConnectPLCMPI2(daveConnection * dc);
  886. EXPORTSPEC int DECL2 _daveDisconnectPLCMPI(daveConnection * dc);
  887. EXPORTSPEC int DECL2 _daveDisconnectAdapterMPI(daveInterface * di);
  888. EXPORTSPEC int DECL2 _daveExchangeMPI(daveConnection * dc,PDU * p1);
  889.  
  890. EXPORTSPEC int DECL2 _daveListReachablePartnersMPI3(daveInterface * di,char * buf);
  891. EXPORTSPEC int DECL2 _daveInitAdapterMPI3(daveInterface * di);
  892. EXPORTSPEC int DECL2 _daveConnectPLCMPI3(daveConnection * dc);
  893. EXPORTSPEC int DECL2 _daveDisconnectPLCMPI3(daveConnection * dc);
  894. EXPORTSPEC int DECL2 _daveDisconnectAdapterMPI3(daveInterface * di);
  895. EXPORTSPEC int DECL2 _daveExchangeMPI3(daveConnection * dc,PDU * p1);
  896. EXPORTSPEC int DECL2 _daveIncMessageNumber(daveConnection * dc);
  897.  
  898. /* ISO over TCP specific functions */
  899. EXPORTSPEC int DECL2 _daveExchangeTCP(daveConnection * dc,PDU * p1);
  900. EXPORTSPEC int DECL2 _daveConnectPLCTCP(daveConnection * dc);
  901. /*
  902. make internal PPI functions available for experimental use:
  903. */
  904. EXPORTSPEC int DECL2 _daveExchangePPI(daveConnection * dc,PDU * p1);
  905. EXPORTSPEC void DECL2 _daveSendLength(daveInterface * di, int len);
  906. EXPORTSPEC void DECL2 _daveSendRequestData(daveConnection * dc, int alt);
  907. EXPORTSPEC void DECL2 _daveSendIt(daveInterface * di, uc * b, int size);
  908. EXPORTSPEC int DECL2 _daveGetResponsePPI(daveConnection *dc);
  909. EXPORTSPEC int DECL2 _daveReadChars(daveInterface * di, uc *b, tmotype tmo, int max);
  910. EXPORTSPEC int DECL2 _daveReadChars2(daveInterface * di,uc *b, int max);
  911. EXPORTSPEC int DECL2 _daveConnectPLCPPI(daveConnection * dc);
  912.  
  913. /*
  914. make internal MPI functions available for experimental use:
  915. */
  916. EXPORTSPEC int DECL2 _daveReadMPI(daveInterface * di, uc *b);
  917. EXPORTSPEC void DECL2 _daveSendSingle(daveInterface * di, uc c);
  918. EXPORTSPEC int DECL2 _daveSendAck(daveConnection * dc, int nr);
  919. EXPORTSPEC int DECL2 _daveGetAck(daveConnection * dc);
  920. EXPORTSPEC int DECL2 _daveSendDialog2(daveConnection * dc, int size);
  921. EXPORTSPEC int DECL2 _daveSendWithPrefix(daveConnection * dc, uc * b, int size);
  922. EXPORTSPEC int DECL2 _daveSendWithPrefix2(daveConnection * dc, int size);
  923. EXPORTSPEC int DECL2 _daveSendWithCRC(daveInterface * di, uc *b, int size);
  924. EXPORTSPEC int DECL2 _daveReadSingle(daveInterface * di);
  925. EXPORTSPEC int DECL2 _daveReadOne(daveInterface * di, uc *b);
  926. EXPORTSPEC int DECL2 _daveReadMPI2(daveInterface * di, uc *b);
  927. EXPORTSPEC int DECL2 _daveGetResponseMPI(daveConnection *dc);
  928. EXPORTSPEC int DECL2 _daveSendMessageMPI(daveConnection * dc, PDU * p);
  929.  
  930. /*
  931. make internal ISO_TCP functions available for experimental use:
  932. */
  933. /*
  934. Read one complete packet. The bytes 3 and 4 contain length information.
  935. */
  936. EXPORTSPEC int DECL2 _daveReadISOPacket(daveInterface * di,uc *b);
  937. EXPORTSPEC int DECL2 _daveGetResponseISO_TCP(daveConnection *dc);
  938.  
  939.  
  940. typedef uc * (*userReadFunc) (int , int, int, int, int *);
  941. typedef void (*userWriteFunc) (int , int, int, int, int *,uc *);
  942. extern userReadFunc readCallBack;
  943. extern userWriteFunc writeCallBack;
  944.  
  945. EXPORTSPEC void DECL2 _daveConstructReadResponse(PDU * p);
  946. EXPORTSPEC void DECL2 _daveConstructWriteResponse(PDU * p);
  947. EXPORTSPEC void DECL2 _daveConstructBadReadResponse(PDU * p);
  948. EXPORTSPEC void DECL2 _daveHandleRead(PDU * p1,PDU * p2);
  949. EXPORTSPEC void DECL2 _daveHandleWrite(PDU * p1,PDU * p2);
  950. /*
  951. make internal IBH functions available for experimental use:
  952. */
  953. EXPORTSPEC int DECL2 _daveReadIBHPacket(daveInterface * di,uc *b);
  954. EXPORTSPEC int DECL2 _daveWriteIBH(daveInterface * di, uc * buffer, int len);
  955. EXPORTSPEC int DECL2 _davePackPDU(daveConnection * dc,PDU *p);
  956. EXPORTSPEC void DECL2 _daveSendMPIAck_IBH(daveConnection*dc);
  957. EXPORTSPEC void DECL2 _daveSendIBHNetAck(daveConnection * dc);
  958. EXPORTSPEC int DECL2 __daveAnalyze(daveConnection * dc);
  959. EXPORTSPEC int DECL2 _daveExchangeIBH(daveConnection * dc, PDU * p);
  960. EXPORTSPEC int DECL2 _daveSendMessageMPI_IBH(daveConnection * dc, PDU * p);
  961. EXPORTSPEC int DECL2 _daveGetResponseMPI_IBH(daveConnection *dc);
  962. EXPORTSPEC int DECL2 _daveInitStepIBH(daveInterface * iface, uc * chal, int cl, us* resp,int rl, uc*b);
  963.  
  964. EXPORTSPEC int DECL2 _daveConnectPLC_IBH(daveConnection*dc);
  965. EXPORTSPEC int DECL2 _daveDisconnectPLC_IBH(daveConnection*dc);
  966. EXPORTSPEC void DECL2 _daveSendMPIAck2(daveConnection *dc);
  967. EXPORTSPEC int DECL2 _davePackPDU_PPI(daveConnection * dc,PDU *p);
  968. EXPORTSPEC void DECL2 _daveSendIBHNetAckPPI(daveConnection * dc);
  969. EXPORTSPEC int DECL2 _daveListReachablePartnersMPI_IBH(daveInterface *di, char * buf);
  970. EXPORTSPEC int DECL2 __daveAnalyzePPI(daveConnection * dc, uc sa);
  971. EXPORTSPEC int DECL2 _daveExchangePPI_IBH(daveConnection * dc, PDU * p);
  972. EXPORTSPEC int DECL2 _daveGetResponsePPI_IBH(daveConnection *dc);
  973.  
  974. /**
  975. C# interoperability:
  976. **/
  977. EXPORTSPEC void DECL2 daveSetTimeout(daveInterface * di, int tmo);
  978. EXPORTSPEC int DECL2 daveGetTimeout(daveInterface * di);
  979. EXPORTSPEC char * DECL2 daveGetName(daveInterface * di);
  980.  
  981. EXPORTSPEC int DECL2 daveGetMPIAdr(daveConnection * dc);
  982. EXPORTSPEC int DECL2 daveGetAnswLen(daveConnection * dc);
  983. EXPORTSPEC int DECL2 daveGetMaxPDULen(daveConnection * dc);
  984. EXPORTSPEC daveResultSet * DECL2 daveNewResultSet();
  985. EXPORTSPEC void DECL2 daveFree(void * dc);
  986. EXPORTSPEC PDU * DECL2 daveNewPDU();
  987. EXPORTSPEC int DECL2 daveGetErrorOfResult(daveResultSet *,int number);
  988.  
  989. /*
  990. Special function do disconnect arbitrary connections on IBH-Link:
  991. */
  992. EXPORTSPEC int DECL2 daveForceDisconnectIBH(daveInterface * di, int src, int dest, int mpi);
  993. /*
  994. Special function do reset an IBH-Link:
  995. */
  996. EXPORTSPEC int DECL2 daveResetIBH(daveInterface * di);
  997. /*
  998. Program Block from PLC:
  999. */
  1000. EXPORTSPEC int DECL2 daveGetProgramBlock(daveConnection * dc, int blockType, int number, char* buffer, int * length);
  1001. /**
  1002. PLC realtime clock handling:
  1003. */
  1004. /*
  1005. read out clock:
  1006. */
  1007. EXPORTSPEC int DECL2 daveReadPLCTime(daveConnection * dc);
  1008. /*
  1009. set clock to a value given by user:
  1010. */
  1011. EXPORTSPEC int DECL2 daveSetPLCTime(daveConnection * dc,uc * ts);
  1012. /*
  1013. set clock to PC system clock:
  1014. */
  1015. EXPORTSPEC int DECL2 daveSetPLCTimeToSystime(daveConnection * dc);
  1016. /*
  1017. BCD conversions:
  1018. */
  1019. EXPORTSPEC uc DECL2 daveToBCD(uc i);
  1020. EXPORTSPEC uc DECL2 daveFromBCD(uc i);
  1021. /*
  1022. S5:
  1023. */
  1024. EXPORTSPEC int DECL2 _daveFakeExchangeAS511(daveConnection * dc, PDU * p);
  1025. EXPORTSPEC int DECL2 _daveExchangeAS511(daveConnection * dc, uc * b,int len,int maxLen, int trN);
  1026. EXPORTSPEC int DECL2 _daveSendMessageAS511(daveConnection * dc, PDU * p);
  1027. EXPORTSPEC int DECL2 _daveConnectPLCAS511(daveConnection * dc);
  1028. EXPORTSPEC int DECL2 _daveDisconnectPLCAS511(daveConnection * dc);
  1029. EXPORTSPEC int DECL2 _daveIsS5BlockArea(uc area);
  1030. EXPORTSPEC int DECL2 _daveReadS5BlockAddress(daveConnection * dc, uc area, uc BlockN, daveS5AreaInfo * ai);
  1031. EXPORTSPEC int DECL2 _daveReadS5ImageAddress(daveConnection * dc, uc area, daveS5AreaInfo * ai);
  1032. EXPORTSPEC int DECL2 _daveIsS5ImageArea(uc area);
  1033. EXPORTSPEC int DECL2 _daveIsS5DBBlockArea(uc area);
  1034. EXPORTSPEC int DECL2 daveReadS5Bytes(daveConnection * dc, uc area, uc BlockN, int offset, int count);
  1035. EXPORTSPEC int DECL2 daveWriteS5Bytes(daveConnection * dc, uc area, uc BlockN, int offset, int count, void * buf);
  1036. EXPORTSPEC int DECL2 daveStopS5(daveConnection * dc);
  1037. EXPORTSPEC int DECL2 daveStartS5(daveConnection * dc);
  1038. EXPORTSPEC int DECL2 daveGetS5ProgramBlock(daveConnection * dc, int blockType, int number, char* buffer, int * length);
  1039.  
  1040. /*
  1041. MPI version 3:
  1042. */
  1043. EXPORTSPEC int DECL2 _daveSendWithPrefix31(daveConnection * dc, uc *b, int size);
  1044. EXPORTSPEC int DECL2 _daveGetResponseMPI3(daveConnection *dc);
  1045. EXPORTSPEC int DECL2 _daveSendMessageMPI3(daveConnection * dc, PDU * p);
  1046.  
  1047. /*
  1048. using S7 dlls for transporrt:
  1049. */
  1050.  
  1051. #pragma pack(1)
  1052.  
  1053. #ifndef BCCWIN //We can use this under windows only, but avoid error messages
  1054. #define HANDLE int
  1055. #endif
  1056.  
  1057. /*
  1058. Prototypes for the functions in S7onlinx.dll:
  1059. They are guessed.
  1060. */
  1061. typedef int (DECL2 * _openFunc) (const uc *);
  1062. typedef int (DECL2 * _closeFunc) (int);
  1063. typedef int (DECL2 * _sendFunc) (int, us, uc *);
  1064. typedef int (DECL2 * _receiveFunc) (int, us, int *, us, uc *);
  1065. //typedef int (DECL2 * _SetHWndMsgFunc) (int, int, ULONG);
  1066. //typedef int (DECL2 * _SetHWndFunc) (int, HANDLE);
  1067. typedef int (DECL2 * _get_errnoFunc) (void);
  1068.  
  1069. /*
  1070. And pointers to the functions. We load them using GetProcAddress() on their names because:
  1071. 1. We have no .lib file for s7onlinx.
  1072. 2. We don't want to link with a particular version.
  1073. 3. Libnodave shall remain useable without Siemens .dlls. So it shall not try to access them
  1074. unless the user chooses the daveProtoS7online transport.
  1075. */
  1076. extern _openFunc SCP_open;
  1077. extern _closeFunc SCP_close;
  1078. extern _sendFunc SCP_send;
  1079. extern _receiveFunc SCP_receive;
  1080. //_SetHWndMsgFunc SetSinecHWndMsg;
  1081. //_SetHWndFunc SetSinecHWnd;
  1082. extern _get_errnoFunc SCP_get_errno;
  1083. /*
  1084. A block of data exchanged between S7onlinx.dll and a program using it. Most fields seem to
  1085. be allways 0. Meaningful names are guessed.
  1086. */
  1087.  
  1088. typedef struct {
  1089. us unknown [2];
  1090. uc headerlength;
  1091. us number;
  1092. uc allways2;
  1093. uc field5;
  1094. uc unknown3 [3];
  1095. uc field6;
  1096. uc field7;
  1097. us field8;
  1098. us validDataLength;
  1099. uc unknown11;
  1100. us payloadLength;
  1101. us payloadStart;
  1102. uc unknown2[12];
  1103. uc field10;
  1104. us id3;
  1105. short functionCode;
  1106. uc unknown4[2];
  1107. uc field13;
  1108. uc field11;
  1109. uc field12;
  1110. uc unknown6[35];
  1111. uc payload[520];
  1112. } S7OexchangeBlock;
  1113.  
  1114. EXPORTSPEC int DECL2 _daveCP_send(int fd, int len, uc * reqBlock);
  1115. EXPORTSPEC int DECL2 _daveSCP_send(int fd, uc * reqBlock);
  1116. EXPORTSPEC int DECL2 _daveConnectPLCS7online (daveConnection * dc);
  1117. EXPORTSPEC int DECL2 _daveSendMessageS7online(daveConnection * dc, PDU *p);
  1118. EXPORTSPEC int DECL2 _daveGetResponseS7online(daveConnection * dc);
  1119. EXPORTSPEC int DECL2 _daveExchangeS7online(daveConnection * dc, PDU * p);
  1120. EXPORTSPEC int DECL2 _daveListReachablePartnersS7online (daveInterface * di, char * buf);
  1121. EXPORTSPEC int DECL2 _daveDisconnectAdapterS7online(daveInterface * di);
  1122.  
  1123. EXPORTSPEC int DECL2 stdwrite(daveInterface * di, char * buffer, int length);
  1124. EXPORTSPEC int DECL2 stdread(daveInterface * di, char * buffer, int length);
  1125.  
  1126. EXPORTSPEC int DECL2 _daveInitAdapterNLpro(daveInterface * di);
  1127. EXPORTSPEC int DECL2 _daveInitStepNLpro(daveInterface * iface, int nr, uc* fix, int len, char*caller, uc * buffer);
  1128. EXPORTSPEC int DECL2 _daveConnectPLCNLpro (daveConnection * dc);
  1129. EXPORTSPEC int DECL2 _daveSendMessageNLpro(daveConnection *dc, PDU *p);
  1130. EXPORTSPEC int DECL2 _daveGetResponseNLpro(daveConnection *dc);
  1131. EXPORTSPEC int DECL2 _daveExchangeNLpro(daveConnection * dc, PDU * p);
  1132. EXPORTSPEC int DECL2 _daveSendDialogNLpro(daveConnection * dc, int size);
  1133. EXPORTSPEC int DECL2 _daveSendWithPrefixNLpro(daveConnection * dc, uc * b,int size);
  1134. EXPORTSPEC int DECL2 _daveSendWithPrefix2NLpro(daveConnection * dc, int size);
  1135. EXPORTSPEC int DECL2 _daveDisconnectPLCNLpro(daveConnection * dc);
  1136. EXPORTSPEC int DECL2 _daveDisconnectAdapterNLpro(daveInterface * di);
  1137. EXPORTSPEC int DECL2 _daveListReachablePartnersNLpro(daveInterface * di, char * buf);
  1138.  
  1139.  
  1140. #endif /* _nodave */
  1141.  
  1142. #ifdef __cplusplus
  1143. //#ifdef CPLUSPLUS
  1144. }
  1145. #endif
  1146.  
  1147.  
  1148. /*
  1149. Changes:
  1150. 07/19/04 added the definition of daveExchange().
  1151. 09/09/04 applied patch for variable Profibus speed from Andrew Rostovtsew.
  1152. 09/09/04 applied patch from Bryan D. Payne to make this compile under Cygwin and/or newer gcc.
  1153. 12/09/04 added daveReadBits(), daveWriteBits()
  1154. 12/09/04 added some more comments.
  1155. 12/09/04 changed declaration of _daveMemcmp to use typed pointers.
  1156. 01/15/04 generic getResponse, more internal functions, use a single dummy to replace
  1157. initAdapterDummy,
  1158. 01/26/05 replaced _daveConstructReadRequest by the sequence prepareReadRequest, addVarToReadRequest
  1159. 01/26/05 added multiple write
  1160. 02/02/05 added readIBHpacket
  1161. 02/06/05 replaced _daveConstructBitWriteRequest by the sequence prepareWriteRequest, addBitVarToWriteRequest
  1162. 02/08/05 removed inline functions.
  1163. 03/23/05 added _daveGetResponsePPI_IBH().
  1164. 03/24/05 added function codes for download.
  1165. 03/28/05 added some comments.
  1166. 04/05/05 reworked error reporting.
  1167. 04/06/05 renamed swap functions. When I began libnodave on little endian i386 and Linux, I used
  1168. used Linux bswap functions. Then users (and later me) tried other systems without
  1169. a bswap. I also cannot use inline functions in Pascal. So I made my own bswaps. Then
  1170. I, made the core of my own swaps dependent of LITTLEENDIAN conditional to support also
  1171. bigendien systems. Now I want to rename them from bswap to something else to avoid
  1172. confusion for LINUX/UNIX users. The new names are swapIed_16 and swapIed_32. This
  1173. shall say swap "if endianness differs". While I could have used similar functions
  1174. from the network API (htons etc.) on Unix and Win32, they may not be present on
  1175. e.g. microcontrollers.
  1176. I highly recommend to use these functions even when writing software for big endian
  1177. systems, where they effectively do nothing, as it will make your software portable.
  1178. 04/08/05 removed deprecated conversion functions.
  1179. 04/09/05 removed daveDebug. Use setDebug and getDebug instead. Some programming environments
  1180. do not allow access to global variables in a shared library.
  1181. 04/09/05 removed CYGWIN defines. As there were no more differences against LINUX, it should
  1182. work with LINUX defines.
  1183. 04/09/05 reordered fields in daveInterface to put fields used in normal test programs at the
  1184. beginning. This allows to make a simplified version in nodavesimple as short as
  1185. possible.
  1186. 05/09/05 renamed more functions to daveXXX.
  1187. 05/11/05 added some functions for the convenience of usage with .net or mono. The goal is
  1188. that the application doesn't have to use members of data structures defined herein
  1189. directly. This avoids "unsafe" pointer expressions in .net/MONO. It should also ease
  1190. porting to VB or other languages for which it could be difficult to define byte by
  1191. byte equivalents of these structures.
  1192. 07/31/05 added message string copying for Visual Basic.
  1193. 08/28/05 added some functions to read and set PLC realtime clock.
  1194. 09/02/05 added the pointer "hook" to daveConnection. This can be used by applications to pass
  1195. data between function calls using the dc.
  1196. 09/11/05 added read/write functions for long blocks of data.
  1197. 09/17/05 incorporation of S5 functions
  1198. 09/18/05 implemented conversions from and to S5 KG format (old, propeiatary floating point format).
  1199. */
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!