/**************************************************************************** (c) SYSTEC electronic GmbH, D-07973 Greiz, August-Bebel-Str. 29 www.systec-electronic.com Project: openPOWERLINK Description: Abstract Memory Interface for x86 compatible License: Redistribution and use in source and binary forms, with or without modification, are permitted provided that the following conditions are met: 1. Redistributions of source code must retain the above copyright notice, this list of conditions and the following disclaimer. 2. Redistributions in binary form must reproduce the above copyright notice, this list of conditions and the following disclaimer in the documentation and/or other materials provided with the distribution. 3. Neither the name of SYSTEC electronic GmbH nor the names of its contributors may be used to endorse or promote products derived from this software without prior written permission. For written permission, please contact info@systec-electronic.com. THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDERS OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. Severability Clause: If a provision of this License is or becomes illegal, invalid or unenforceable in any jurisdiction, that shall not affect: 1. the validity or enforceability in that jurisdiction of any other provision of this License; or 2. the validity or enforceability in other jurisdictions of that or any other provision of this License. ------------------------------------------------------------------------- $RCSfile: amix86.c,v $ $Author: D.Krueger $ $Revision: 1.3 $ $Date: 2008/04/17 21:36:32 $ $State: Exp $ Build Environment: ... ------------------------------------------------------------------------- Revision History: r.s.: first implemetation 2006-06-13 d.k.: duplicate functions for little endian and big endian ****************************************************************************/ //#include "global.h" //#include "EplAmi.h" #include "EplInc.h" //--------------------------------------------------------------------------- // typedef //--------------------------------------------------------------------------- typedef struct { WORD m_wWord; } twStruct; typedef struct { DWORD m_dwDword; } tdwStruct; typedef struct { QWORD m_qwQword; } tqwStruct; //=========================================================================// // // // P U B L I C F U N C T I O N S // // // //=========================================================================// //--------------------------------------------------------------------------- // // Function: AmiSetXXXToBe() // // Description: writes the specified value to the absolute address in // big endian // // Parameters: pAddr_p = absolute address // xXXXVal_p = value // // Returns: (none) // // State: // //--------------------------------------------------------------------------- //------------< write u8 in big endian >-------------------------- /* void AmiSetByteToBe (void *pAddr_p, u8 bByteVal_p) { *(u8 *)pAddr_p = bByteVal_p; } */ //------------< write WORD in big endian >-------------------------- void AmiSetWordToBe(void * pAddr_p, WORD wWordVal_p) { twStruct *pwStruct; twStruct wValue; wValue.m_wWord = (WORD) ((wWordVal_p & 0x00FF) << 8); //LSB to MSB wValue.m_wWord |= (WORD) ((wWordVal_p & 0xFF00) >> 8); //MSB to LSB pwStruct = (twStruct *) pAddr_p; pwStruct->m_wWord = wValue.m_wWord; } //------------< write DWORD in big endian >------------------------- void AmiSetDwordToBe(void *pAddr_p, DWORD dwDwordVal_p) { tdwStruct *pdwStruct; tdwStruct dwValue; dwValue.m_dwDword = ((dwDwordVal_p & 0x000000FF) << 24); //LSB to MSB dwValue.m_dwDword |= ((dwDwordVal_p & 0x0000FF00) << 8); dwValue.m_dwDword |= ((dwDwordVal_p & 0x00FF0000) >> 8); dwValue.m_dwDword |= ((dwDwordVal_p & 0xFF000000) >> 24); //MSB to LSB pdwStruct = (tdwStruct *) pAddr_p; pdwStruct->m_dwDword = dwValue.m_dwDword; } //--------------------------------------------------------------------------- // // Function: AmiSetXXXToLe() // // Description: writes the specified value to the absolute address in // little endian // // Parameters: pAddr_p = absolute address // xXXXVal_p = value // // Returns: (none) // // State: // //--------------------------------------------------------------------------- //------------< write u8 in little endian >-------------------------- /* void AmiSetByteToLe (void *pAddr_p, u8 bByteVal_p) { *(u8 *)pAddr_p = bByteVal_p; } */ //------------< write WORD in little endian >-------------------------- void AmiSetWordToLe(void *pAddr_p, WORD wWordVal_p) { twStruct *pwStruct; pwStruct = (twStruct *) pAddr_p; pwStruct->m_wWord = wWordVal_p; } //------------< write DWORD in little endian >------------------------- void AmiSetDwordToLe(void *pAddr_p, DWORD dwDwordVal_p) { tdwStruct *pdwStruct; pdwStruct = (tdwStruct *) pAddr_p; pdwStruct->m_dwDword = dwDwordVal_p; } //--------------------------------------------------------------------------- // // Function: AmiGetXXXFromBe() // // Description: reads the specified value from the absolute address in // big endian // // Parameters: pAddr_p = absolute address // // Returns: XXX = value // // State: // //--------------------------------------------------------------------------- //------------< read u8 in big endian >--------------------------- /* u8 AmiGetByteFromBe (void *pAddr_p) { return ( *(u8 *)pAddr_p ); } */ //------------< read WORD in big endian >--------------------------- WORD AmiGetWordFromBe(void *pAddr_p) { twStruct *pwStruct; twStruct wValue; pwStruct = (twStruct *) pAddr_p; wValue.m_wWord = (WORD) ((pwStruct->m_wWord & 0x00FF) << 8); //LSB to MSB wValue.m_wWord |= (WORD) ((pwStruct->m_wWord & 0xFF00) >> 8); //MSB to LSB return (wValue.m_wWord); } //------------< read DWORD in big endian >-------------------------- DWORD AmiGetDwordFromBe(void *pAddr_p) { tdwStruct *pdwStruct; tdwStruct dwValue; pdwStruct = (tdwStruct *) pAddr_p; dwValue.m_dwDword = ((pdwStruct->m_dwDword & 0x000000FF) << 24); //LSB to MSB dwValue.m_dwDword |= ((pdwStruct->m_dwDword & 0x0000FF00) << 8); dwValue.m_dwDword |= ((pdwStruct->m_dwDword & 0x00FF0000) >> 8); dwValue.m_dwDword |= ((pdwStruct->m_dwDword & 0xFF000000) >> 24); //MSB to LSB return (dwValue.m_dwDword); } //--------------------------------------------------------------------------- // // Function: AmiGetXXXFromLe() // // Description: reads the specified value from the absolute address in // little endian // // Parameters: pAddr_p = absolute address // // Returns: XXX = value // // State: // //--------------------------------------------------------------------------- //------------< read u8 in little endian >--------------------------- /* u8 AmiGetByteFromLe (void *pAddr_p) { return ( *(u8 *)pAddr_p ); } */ //------------< read WORD in little endian >--------------------------- WORD AmiGetWordFromLe(void *pAddr_p) { twStruct *pwStruct; pwStruct = (twStruct *) pAddr_p; return (pwStruct->m_wWord); } //------------< read DWORD in little endian >-------------------------- DWORD AmiGetDwordFromLe(void *pAddr_p) { tdwStruct *pdwStruct; pdwStruct = (tdwStruct *) pAddr_p; return (pdwStruct->m_dwDword); } //--------------------------------------------------------------------------- // // Function: AmiSetDword24ToBe() // // Description: sets a 24 bit value to a buffer in big endian // // Parameters: pAddr_p = pointer to destination buffer // dwDwordVal_p = value to set // // Return: void // // State: not tested // //--------------------------------------------------------------------------- void AmiSetDword24ToBe(void *pAddr_p, DWORD dwDwordVal_p) { ((u8 *) pAddr_p)[0] = ((u8 *) & dwDwordVal_p)[2]; ((u8 *) pAddr_p)[1] = ((u8 *) & dwDwordVal_p)[1]; ((u8 *) pAddr_p)[2] = ((u8 *) & dwDwordVal_p)[0]; } //--------------------------------------------------------------------------- // // Function: AmiSetDword24ToLe() // // Description: sets a 24 bit value to a buffer in little endian // // Parameters: pAddr_p = pointer to destination buffer // dwDwordVal_p = value to set // // Return: void // // State: not tested // //--------------------------------------------------------------------------- void AmiSetDword24ToLe(void *pAddr_p, DWORD dwDwordVal_p) { ((u8 *) pAddr_p)[0] = ((u8 *) & dwDwordVal_p)[0]; ((u8 *) pAddr_p)[1] = ((u8 *) & dwDwordVal_p)[1]; ((u8 *) pAddr_p)[2] = ((u8 *) & dwDwordVal_p)[2]; } //--------------------------------------------------------------------------- // // Function: AmiGetDword24FromBe() // // Description: reads a 24 bit value from a buffer in big endian // // Parameters: pAddr_p = pointer to source buffer // // Return: DWORD = read value // // State: not tested // //--------------------------------------------------------------------------- DWORD AmiGetDword24FromBe(void *pAddr_p) { tdwStruct dwStruct; dwStruct.m_dwDword = AmiGetDwordFromBe(pAddr_p); dwStruct.m_dwDword >>= 8; return (dwStruct.m_dwDword); } //--------------------------------------------------------------------------- // // Function: AmiGetDword24FromLe() // // Description: reads a 24 bit value from a buffer in little endian // // Parameters: pAddr_p = pointer to source buffer // // Return: DWORD = read value // // State: not tested // //--------------------------------------------------------------------------- DWORD AmiGetDword24FromLe(void *pAddr_p) { tdwStruct dwStruct; dwStruct.m_dwDword = AmiGetDwordFromLe(pAddr_p); dwStruct.m_dwDword &= 0x00FFFFFF; return (dwStruct.m_dwDword); } //#ifdef USE_VAR64 //--------------------------------------------------------------------------- // // Function: AmiSetQword64ToBe() // // Description: sets a 64 bit value to a buffer in big endian // // Parameters: pAddr_p = pointer to destination buffer // qwQwordVal_p = quadruple word value // // Return: void // // State: not tested // //--------------------------------------------------------------------------- void AmiSetQword64ToBe(void *pAddr_p, QWORD qwQwordVal_p) { ((u8 *) pAddr_p)[0] = ((u8 *) & qwQwordVal_p)[7]; ((u8 *) pAddr_p)[1] = ((u8 *) & qwQwordVal_p)[6]; ((u8 *) pAddr_p)[2] = ((u8 *) & qwQwordVal_p)[5]; ((u8 *) pAddr_p)[3] = ((u8 *) & qwQwordVal_p)[4]; ((u8 *) pAddr_p)[4] = ((u8 *) & qwQwordVal_p)[3]; ((u8 *) pAddr_p)[5] = ((u8 *) & qwQwordVal_p)[2]; ((u8 *) pAddr_p)[6] = ((u8 *) & qwQwordVal_p)[1]; ((u8 *) pAddr_p)[7] = ((u8 *) & qwQwordVal_p)[0]; } //--------------------------------------------------------------------------- // // Function: AmiSetQword64ToLe() // // Description: sets a 64 bit value to a buffer in little endian // // Parameters: pAddr_p = pointer to destination buffer // qwQwordVal_p = quadruple word value // // Return: void // // State: not tested // //--------------------------------------------------------------------------- void AmiSetQword64ToLe(void *pAddr_p, QWORD qwQwordVal_p) { QWORD *pqwDst; pqwDst = (QWORD *) pAddr_p; *pqwDst = qwQwordVal_p; } //--------------------------------------------------------------------------- // // Function: AmiGetQword64FromBe() // // Description: reads a 64 bit value from a buffer in big endian // // Parameters: pAddr_p = pointer to source buffer // // Return: void // // State: not tested // //--------------------------------------------------------------------------- QWORD AmiGetQword64FromBe(void *pAddr_p) { tqwStruct qwStruct; ((u8 *) & qwStruct.m_qwQword)[0] = ((u8 *) pAddr_p)[7]; ((u8 *) & qwStruct.m_qwQword)[1] = ((u8 *) pAddr_p)[6]; ((u8 *) & qwStruct.m_qwQword)[2] = ((u8 *) pAddr_p)[5]; ((u8 *) & qwStruct.m_qwQword)[3] = ((u8 *) pAddr_p)[4]; ((u8 *) & qwStruct.m_qwQword)[4] = ((u8 *) pAddr_p)[3]; ((u8 *) & qwStruct.m_qwQword)[5] = ((u8 *) pAddr_p)[2]; ((u8 *) & qwStruct.m_qwQword)[6] = ((u8 *) pAddr_p)[1]; ((u8 *) & qwStruct.m_qwQword)[7] = ((u8 *) pAddr_p)[0]; return (qwStruct.m_qwQword); } //--------------------------------------------------------------------------- // // Function: AmiGetQword64FromLe() // // Description: reads a 64 bit value from a buffer in little endian // // Parameters: pAddr_p = pointer to source buffer // // Return: void // // State: not tested // //--------------------------------------------------------------------------- QWORD AmiGetQword64FromLe(void *pAddr_p) { tqwStruct *pqwStruct; tqwStruct qwStruct; pqwStruct = (tqwStruct *) pAddr_p; qwStruct.m_qwQword = pqwStruct->m_qwQword; return (qwStruct.m_qwQword); } //--------------------------------------------------------------------------- // // Function: AmiSetQword40ToBe() // // Description: sets a 40 bit value to a buffer in big endian // // Parameters: pAddr_p = pointer to destination buffer // qwQwordVal_p = quadruple word value // // Return: void // // State: not tested // //--------------------------------------------------------------------------- void AmiSetQword40ToBe(void *pAddr_p, QWORD qwQwordVal_p) { ((u8 *) pAddr_p)[0] = ((u8 *) & qwQwordVal_p)[4]; ((u8 *) pAddr_p)[1] = ((u8 *) & qwQwordVal_p)[3]; ((u8 *) pAddr_p)[2] = ((u8 *) & qwQwordVal_p)[2]; ((u8 *) pAddr_p)[3] = ((u8 *) & qwQwordVal_p)[1]; ((u8 *) pAddr_p)[4] = ((u8 *) & qwQwordVal_p)[0]; } //--------------------------------------------------------------------------- // // Function: AmiSetQword40ToLe() // // Description: sets a 40 bit value to a buffer in little endian // // Parameters: pAddr_p = pointer to destination buffer // qwQwordVal_p = quadruple word value // // Return: void // // State: not tested // //--------------------------------------------------------------------------- void AmiSetQword40ToLe(void *pAddr_p, QWORD qwQwordVal_p) { ((DWORD *) pAddr_p)[0] = ((DWORD *) & qwQwordVal_p)[0]; ((u8 *) pAddr_p)[4] = ((u8 *) & qwQwordVal_p)[4]; } //--------------------------------------------------------------------------- // // Function: AmiGetQword40FromBe() // // Description: reads a 40 bit value from a buffer in big endian // // Parameters: pAddr_p = pointer to source buffer // // Return: QWORD // // State: not tested // //--------------------------------------------------------------------------- QWORD AmiGetQword40FromBe(void *pAddr_p) { tqwStruct qwStruct; qwStruct.m_qwQword = AmiGetQword64FromBe(pAddr_p); qwStruct.m_qwQword >>= 24; return (qwStruct.m_qwQword); } //--------------------------------------------------------------------------- // // Function: AmiGetQword40FromLe() // // Description: reads a 40 bit value from a buffer in little endian // // Parameters: pAddr_p = pointer to source buffer // // Return: QWORD // // State: not tested // //--------------------------------------------------------------------------- QWORD AmiGetQword40FromLe(void *pAddr_p) { tqwStruct qwStruct; qwStruct.m_qwQword = AmiGetQword64FromLe(pAddr_p); qwStruct.m_qwQword &= 0x000000FFFFFFFFFFLL; return (qwStruct.m_qwQword); } //--------------------------------------------------------------------------- // // Function: AmiSetQword48ToBe() // // Description: sets a 48 bit value to a buffer in big endian // // Parameters: pAddr_p = pointer to destination buffer // qwQwordVal_p = quadruple word value // // Return: void // // State: not tested // //--------------------------------------------------------------------------- void AmiSetQword48ToBe(void *pAddr_p, QWORD qwQwordVal_p) { ((u8 *) pAddr_p)[0] = ((u8 *) & qwQwordVal_p)[5]; ((u8 *) pAddr_p)[1] = ((u8 *) & qwQwordVal_p)[4]; ((u8 *) pAddr_p)[2] = ((u8 *) & qwQwordVal_p)[3]; ((u8 *) pAddr_p)[3] = ((u8 *) & qwQwordVal_p)[2]; ((u8 *) pAddr_p)[4] = ((u8 *) & qwQwordVal_p)[1]; ((u8 *) pAddr_p)[5] = ((u8 *) & qwQwordVal_p)[0]; } //--------------------------------------------------------------------------- // // Function: AmiSetQword48ToLe() // // Description: sets a 48 bit value to a buffer in little endian // // Parameters: pAddr_p = pointer to destination buffer // qwQwordVal_p = quadruple word value // // Return: void // // State: not tested // //--------------------------------------------------------------------------- void AmiSetQword48ToLe(void *pAddr_p, QWORD qwQwordVal_p) { ((DWORD *) pAddr_p)[0] = ((DWORD *) & qwQwordVal_p)[0]; ((WORD *) pAddr_p)[2] = ((WORD *) & qwQwordVal_p)[2]; } //--------------------------------------------------------------------------- // // Function: AmiGetQword48FromBe() // // Description: reads a 48 bit value from a buffer in big endian // // Parameters: pAddr_p = pointer to source buffer // // Return: QWORD // // State: not tested // //--------------------------------------------------------------------------- QWORD AmiGetQword48FromBe(void *pAddr_p) { tqwStruct qwStruct; qwStruct.m_qwQword = AmiGetQword64FromBe(pAddr_p); qwStruct.m_qwQword >>= 16; return (qwStruct.m_qwQword); } //--------------------------------------------------------------------------- // // Function: AmiGetQword48FromLe() // // Description: reads a 48 bit value from a buffer in little endian // // Parameters: pAddr_p = pointer to source buffer // // Return: QWORD // // State: not tested // //--------------------------------------------------------------------------- QWORD AmiGetQword48FromLe(void *pAddr_p) { tqwStruct qwStruct; qwStruct.m_qwQword = AmiGetQword64FromLe(pAddr_p); qwStruct.m_qwQword &= 0x0000FFFFFFFFFFFFLL; return (qwStruct.m_qwQword); } //--------------------------------------------------------------------------- // // Function: AmiSetQword56ToBe() // // Description: sets a 56 bit value to a buffer in big endian // // Parameters: pAddr_p = pointer to destination buffer // qwQwordVal_p = quadruple word value // // Return: void // // State: not tested // //--------------------------------------------------------------------------- void AmiSetQword56ToBe(void *pAddr_p, QWORD qwQwordVal_p) { ((u8 *) pAddr_p)[0] = ((u8 *) & qwQwordVal_p)[6]; ((u8 *) pAddr_p)[1] = ((u8 *) & qwQwordVal_p)[5]; ((u8 *) pAddr_p)[2] = ((u8 *) & qwQwordVal_p)[4]; ((u8 *) pAddr_p)[3] = ((u8 *) & qwQwordVal_p)[3]; ((u8 *) pAddr_p)[4] = ((u8 *) & qwQwordVal_p)[2]; ((u8 *) pAddr_p)[5] = ((u8 *) & qwQwordVal_p)[1]; ((u8 *) pAddr_p)[6] = ((u8 *) & qwQwordVal_p)[0]; } //--------------------------------------------------------------------------- // // Function: AmiSetQword56ToLe() // // Description: sets a 56 bit value to a buffer in little endian // // Parameters: pAddr_p = pointer to destination buffer // qwQwordVal_p = quadruple word value // // Return: void // // State: not tested // //--------------------------------------------------------------------------- void AmiSetQword56ToLe(void *pAddr_p, QWORD qwQwordVal_p) { ((DWORD *) pAddr_p)[0] = ((DWORD *) & qwQwordVal_p)[0]; ((WORD *) pAddr_p)[2] = ((WORD *) & qwQwordVal_p)[2]; ((u8 *) pAddr_p)[6] = ((u8 *) & qwQwordVal_p)[6]; } //--------------------------------------------------------------------------- // // Function: AmiGetQword56FromBe() // // Description: reads a 56 bit value from a buffer in big endian // // Parameters: pAddr_p = pointer to source buffer // // Return: QWORD // // State: not tested // //--------------------------------------------------------------------------- QWORD AmiGetQword56FromBe(void *pAddr_p) { tqwStruct qwStruct; qwStruct.m_qwQword = AmiGetQword64FromBe(pAddr_p); qwStruct.m_qwQword >>= 8; return (qwStruct.m_qwQword); } //--------------------------------------------------------------------------- // // Function: AmiGetQword56FromLe() // // Description: reads a 56 bit value from a buffer in little endian // // Parameters: pAddr_p = pointer to source buffer // // Return: QWORD // // State: not tested // //--------------------------------------------------------------------------- QWORD AmiGetQword56FromLe(void *pAddr_p) { tqwStruct qwStruct; qwStruct.m_qwQword = AmiGetQword64FromLe(pAddr_p); qwStruct.m_qwQword &= 0x00FFFFFFFFFFFFFFLL; return (qwStruct.m_qwQword); } //--------------------------------------------------------------------------- // // Function: AmiSetTimeOfDay() // // Description: sets a TIME_OF_DAY (CANopen) value to a buffer // // Parameters: pAddr_p = pointer to destination buffer // pTimeOfDay_p = pointer to struct TIME_OF_DAY // // Return: void // // State: not tested // //--------------------------------------------------------------------------- void AmiSetTimeOfDay(void *pAddr_p, tTimeOfDay *pTimeOfDay_p) { AmiSetDwordToLe(((u8 *) pAddr_p), pTimeOfDay_p->m_dwMs & 0x0FFFFFFF); AmiSetWordToLe(((u8 *) pAddr_p) + 4, pTimeOfDay_p->m_wDays); } //--------------------------------------------------------------------------- // // Function: AmiGetTimeOfDay() // // Description: reads a TIME_OF_DAY (CANopen) value from a buffer // // Parameters: pAddr_p = pointer to source buffer // pTimeOfDay_p = pointer to struct TIME_OF_DAY // // Return: void // // State: not tested // //--------------------------------------------------------------------------- void AmiGetTimeOfDay(void *pAddr_p, tTimeOfDay *pTimeOfDay_p) { pTimeOfDay_p->m_dwMs = AmiGetDwordFromLe(((u8 *) pAddr_p)) & 0x0FFFFFFF; pTimeOfDay_p->m_wDays = AmiGetWordFromLe(((u8 *) pAddr_p) + 4); } // EOF // Die letzte Zeile muß unbedingt eine leere Zeile sein, weil manche Compiler // damit ein Problem haben, wenn das nicht so ist (z.B. GNU oder Borland C++ Builder).