--- /dev/null
+//---------------------------------------------------------------------------\r
+// Copyright (C) 1999 Dallas Semiconductor Corporation, All Rights Reserved.\r
+//\r
+// Permission is hereby granted, free of charge, to any person obtaining a\r
+// copy of this software and associated documentation files (the "Software"),\r
+// to deal in the Software without restriction, including without limitation\r
+// the rights to use, copy, modify, merge, publish, distribute, sublicense,\r
+// and/or sell copies of the Software, and to permit persons to whom the\r
+// Software is furnished to do so, subject to the following conditions:\r
+//\r
+// The above copyright notice and this permission notice shall be included\r
+// in all copies or substantial portions of the Software.\r
+//\r
+// THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS\r
+// OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF\r
+// MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.\r
+// IN NO EVENT SHALL DALLAS SEMICONDUCTOR BE LIABLE FOR ANY CLAIM, DAMAGES\r
+// OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,\r
+// ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR\r
+// OTHER DEALINGS IN THE SOFTWARE.\r
+//\r
+// Except as contained in this notice, the name of Dallas Semiconductor\r
+// shall not be used except as stated in the Dallas Semiconductor\r
+// Branding Policy.\r
+//---------------------------------------------------------------------------\r
+//\r
+// tmexnet.C - Wrapper class to hook 1-Wire Public Domain API to TMEX API\r
+// for transport functions.\r
+//\r
+// Version: 3.00\r
+//\r
+\r
+#include "ownet.h"\r
+#include <windows.h>\r
+\r
+// external TMEX variables\r
+extern long SessionHandle[MAX_PORTNUM];\r
+extern "C" short far pascal TMBlockIO(long, uchar *, short);\r
+extern "C" short far pascal TMBlockStream(long, uchar *, short);\r
+\r
+//--------------------------------------------------------------------------\r
+// The 'owBlock' transfers a block of data to and from the\r
+// 1-Wire Net with an optional reset at the begining of communication.\r
+// The result is returned in the same buffer.\r
+//\r
+// 'do_reset' - cause a owTouchReset to occure at the begining of\r
+// communication TRUE(1) or not FALSE(0)\r
+// 'tran_buf' - pointer to a block of unsigned\r
+// chars of length 'TranferLength' that will be sent\r
+// to the 1-Wire Net\r
+// 'tran_len' - length in bytes to transfer\r
+// Supported devices: all\r
+//\r
+// Returns: TRUE (1) : The optional reset returned a valid\r
+// presence (do_reset == TRUE) or there\r
+// was no reset required.\r
+// FALSE (0): The reset did not return a valid prsence\r
+// (do_reset == TRUE).\r
+//\r
+// The maximum tran_len is 64\r
+//\r
+SMALLINT owBlock(int portnum, SMALLINT do_reset, uchar *tran_buf, SMALLINT tran_len)\r
+{\r
+ short rslt;\r
+\r
+ // check for a block too big\r
+ if (tran_len > 192)\r
+ {\r
+ OWERROR(OWERROR_BLOCK_TOO_BIG);\r
+ return FALSE;\r
+ }\r
+\r
+ // check if need to do a owTouchReset first\r
+ if (do_reset)\r
+ rslt = TMBlockIO(SessionHandle[portnum], tran_buf, (short)tran_len);\r
+ else\r
+ rslt = TMBlockStream(SessionHandle[portnum], tran_buf, (short)tran_len);\r
+\r
+ return (rslt == tran_len);\r
+}\r
+\r
+//--------------------------------------------------------------------------\r
+// Write a byte to an EPROM 1-Wire device.\r
+//\r
+// Supported devices: crc_type=0(CRC8)\r
+// DS1982\r
+// crc_type=1(CRC16)\r
+// DS1985, DS1986, DS2407\r
+//\r
+// 'portnum' - number 0 to MAX_PORTNUM-1. This number is provided to\r
+// indicate the symbolic port number.\r
+// 'write_byte' - byte to program\r
+// 'addr' - address of byte to program\r
+// 'write_cmd' - command used to write (0x0F reg mem, 0x55 status)\r
+// 'crc_type' - CRC used (0 CRC8, 1 CRC16)\r
+// 'do_access' - Flag to access device for each byte\r
+// (0 skip access, 1 do the access)\r
+// WARNING, only use do_access=0 if programing the NEXT\r
+// byte immediatly after the previous byte.\r
+//\r
+// Returns: >=0 success, this is the resulting byte from the program\r
+// effort\r
+// -1 error, device not connected or program pulse voltage\r
+// not available\r
+//\r
+SMALLINT owProgramByte(int portnum, SMALLINT write_byte, int addr, SMALLINT write_cmd,\r
+ SMALLINT crc_type, SMALLINT do_access)\r
+{\r
+ ushort lastcrc16;\r
+ uchar lastcrc8;\r
+\r
+ // optionally access the device\r
+ if (do_access)\r
+ {\r
+ if (!owAccess(portnum))\r
+ {\r
+ OWERROR(OWERROR_ACCESS_FAILED);\r
+ return -1;\r
+ }\r
+\r
+ // send the write command\r
+ if (!owWriteByte(portnum,write_cmd))\r
+ {\r
+ OWERROR(OWERROR_WRITE_BYTE_FAILED);\r
+ return -1;\r
+ }\r
+\r
+ // send the address\r
+ if (!owWriteByte(portnum,addr & 0xFF) || !owWriteByte(portnum,addr >> 8))\r
+ {\r
+ OWERROR(OWERROR_WRITE_BYTE_FAILED);\r
+ return -1;\r
+ }\r
+ }\r
+\r
+ // send the data to write\r
+ if (!owWriteByte(portnum,write_byte))\r
+ {\r
+ OWERROR(OWERROR_WRITE_BYTE_FAILED);\r
+ return -1;\r
+ }\r
+\r
+ // read the CRC\r
+ if (crc_type == 0)\r
+ {\r
+ // calculate CRC8\r
+ if (do_access)\r
+ {\r
+ setcrc8(portnum,0);\r
+ docrc8(portnum,(uchar)write_cmd);\r
+ docrc8(portnum,(uchar)(addr & 0xFF));\r
+ docrc8(portnum,(uchar)(addr >> 8));\r
+ }\r
+ else\r
+ setcrc8(portnum,(uchar)(addr & 0xFF));\r
+\r
+ docrc8(portnum,(uchar)write_byte);\r
+ // read and calculate the read crc\r
+ lastcrc8 = docrc8(portnum,(uchar)owReadByte(portnum));\r
+ // crc should now be 0x00\r
+ if (lastcrc8 != 0)\r
+ {\r
+ OWERROR(OWERROR_CRC_FAILED);\r
+ return -1;\r
+ }\r
+ }\r
+ else\r
+ {\r
+ // CRC16\r
+ if (do_access)\r
+ {\r
+ setcrc16(portnum,0);\r
+ docrc16(portnum,(ushort)write_cmd);\r
+ docrc16(portnum,(ushort)(addr & 0xFF));\r
+ docrc16(portnum,(ushort)(addr >> 8));\r
+ }\r
+ else\r
+ setcrc16(portnum,(ushort)addr);\r
+ docrc16(portnum,(ushort)write_byte);\r
+ // read and calculate the read crc\r
+ docrc16(portnum,(ushort)owReadByte(portnum));\r
+ lastcrc16 = docrc16(portnum,(ushort)owReadByte(portnum));\r
+ // crc should now be 0xB001\r
+ if (lastcrc16 != 0xB001)\r
+ return -1;\r
+ }\r
+\r
+ // send the program pulse\r
+ if (!owProgramPulse(portnum))\r
+ {\r
+ OWERROR(OWERROR_PROGRAM_PULSE_FAILED);\r
+ return -1;\r
+ }\r
+\r
+ // read back and return the resulting byte\r
+ return owReadByte(portnum);\r
+}\r
+\r
+\r
tm3d / owTools.git / blobdiff