lib/util/byteorder.h

   1 /*
   2    Unix SMB/CIFS implementation.
   3    SMB Byte handling
   4    Copyright (C) Andrew Tridgell 1992-1998
   5
   6    This program is free software; you can redistribute it and/or modify
   7    it under the terms of the GNU General Public License as published by
   8    the Free Software Foundation; either version 3 of the License, or
   9    (at your option) any later version.
  10
  11    This program is distributed in the hope that it will be useful,
  12    but WITHOUT ANY WARRANTY; without even the implied warranty of
  13    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14    GNU General Public License for more details.
  15
  16    You should have received a copy of the GNU General Public License
  17    along with this program.  If not, see <http://www.gnu.org/licenses/>.
  18 */
  19
  20 #ifndef _BYTEORDER_H
  21 #define _BYTEORDER_H
  22
  23 /*
  24    This file implements macros for machine independent short and
  25    int manipulation
  26
  27 Here is a description of this file that I emailed to the samba list once:
  28
  29 > I am confused about the way that byteorder.h works in Samba. I have
  30 > looked at it, and I would have thought that you might make a distinction
  31 > between LE and BE machines, but you only seem to distinguish between 386
  32 > and all other architectures.
  33 >
  34 > Can you give me a clue?
  35
  36 sure.
  37
  38 Ok, now to the macros themselves. I'll take a simple example, say we
  39 want to extract a 2 byte integer from a SMB packet and put it into a
  40 type called uint16_t that is in the local machines byte order, and you
  41 want to do it with only the assumption that uint16_t is _at_least_ 16
  42 bits long (this last condition is very important for architectures
  43 that don't have any int types that are 2 bytes long)
  44
  45 You do this:
  46
  47 #define CVAL(buf,pos) (((uint8_t *)(buf))[pos])
  48 #define PVAL(buf,pos) ((unsigned int)CVAL(buf,pos))
  49 #define SVAL(buf,pos) (PVAL(buf,pos)|PVAL(buf,(pos)+1)<<8)
  50
  51 then to extract a uint16_t value at offset 25 in a buffer you do this:
  52
  53 char *buffer = foo_bar();
  54 uint16_t xx = SVAL(buffer,25);
  55
  56 We are using the byteoder independence of the ANSI C bitshifts to do
  57 the work. A good optimising compiler should turn this into efficient
  58 code, especially if it happens to have the right byteorder :-)
  59
  60 I know these macros can be made a bit tidier by removing some of the
  61 casts, but you need to look at byteorder.h as a whole to see the
  62 reasoning behind them. byteorder.h defines the following macros:
  63
  64 SVAL(buf,pos) - extract a 2 byte SMB value
  65 IVAL(buf,pos) - extract a 4 byte SMB value
  66 BVAL(buf,pos) - extract a 8 byte SMB value
  67 SVALS(buf,pos) - signed version of SVAL()
  68 IVALS(buf,pos) - signed version of IVAL()
  69 BVALS(buf,pos) - signed version of BVAL()
  70
  71 SSVAL(buf,pos,val) - put a 2 byte SMB value into a buffer
  72 SIVAL(buf,pos,val) - put a 4 byte SMB value into a buffer
  73 SBVAL(buf,pos,val) - put a 8 byte SMB value into a buffer
  74 SSVALS(buf,pos,val) - signed version of SSVAL()
  75 SIVALS(buf,pos,val) - signed version of SIVAL()
  76 SBVALS(buf,pos,val) - signed version of SBVAL()
  77
  78 RSVAL(buf,pos) - like SVAL() but for NMB byte ordering
  79 RSVALS(buf,pos) - like SVALS() but for NMB byte ordering
  80 RIVAL(buf,pos) - like IVAL() but for NMB byte ordering
  81 RIVALS(buf,pos) - like IVALS() but for NMB byte ordering
  82 RSSVAL(buf,pos,val) - like SSVAL() but for NMB ordering
  83 RSIVAL(buf,pos,val) - like SIVAL() but for NMB ordering
  84 RSIVALS(buf,pos,val) - like SIVALS() but for NMB ordering
  85
  86 it also defines lots of intermediate macros, just ignore those :-)
  87
  88 */
  89
  90
  91 /*
  92  * On powerpc we can use the magic instructions to load/store in little endian.
  93  * The instructions are reverse-indexing, so assume a big endian Power
  94  * processor. Power8 can be big or little endian, so we need to explicitly
  95  * check.
  96  */
  97 #if (defined(__powerpc__) && defined(__GNUC__) && HAVE_BIG_ENDIAN)
  98 static __inline__ uint16_t ld_le16(const uint16_t *addr)
  99 {
 100         uint16_t val;
 101         __asm__ ("lhbrx %0,0,%1" : "=r" (val) : "r" (addr), "m" (*addr));
 102         return val;
 103 }
 104
 105 static __inline__ void st_le16(uint16_t *addr, const uint16_t val)
 106 {
 107         __asm__ ("sthbrx %1,0,%2" : "=m" (*addr) : "r" (val), "r" (addr));
 108 }
 109
 110 static __inline__ uint32_t ld_le32(const uint32_t *addr)
 111 {
 112         uint32_t val;
 113         __asm__ ("lwbrx %0,0,%1" : "=r" (val) : "r" (addr), "m" (*addr));
 114         return val;
 115 }
 116
 117 static __inline__ void st_le32(uint32_t *addr, const uint32_t val)
 118 {
 119         __asm__ ("stwbrx %1,0,%2" : "=m" (*addr) : "r" (val), "r" (addr));
 120 }
 121 #define HAVE_ASM_BYTEORDER 1
 122 #else
 123 #define HAVE_ASM_BYTEORDER 0
 124 #endif
 125
 126 #define CVAL(buf,pos) ((unsigned int)(((const uint8_t *)(buf))[pos]))
 127 #define CVAL_NC(buf,pos) (((uint8_t *)(buf))[pos]) /* Non-const version of CVAL */
 128 #define PVAL(buf,pos) (CVAL(buf,pos))
 129 #define SCVAL(buf,pos,val) (CVAL_NC(buf,pos) = (val))
 130
 131 #if HAVE_ASM_BYTEORDER
 132
 133 #define  _PTRPOS(buf,pos) (((const uint8_t *)(buf))+(pos))
 134 #define SVAL(buf,pos) ld_le16((const uint16_t *)_PTRPOS(buf,pos))
 135 #define IVAL(buf,pos) ld_le32((const uint32_t *)_PTRPOS(buf,pos))
 136 #define SSVAL(buf,pos,val) st_le16((uint16_t *)_PTRPOS(buf,pos), val)
 137 #define SIVAL(buf,pos,val) st_le32((uint32_t *)_PTRPOS(buf,pos), val)
 138 #define SVALS(buf,pos) ((int16_t)SVAL(buf,pos))
 139 #define IVALS(buf,pos) ((int32_t)IVAL(buf,pos))
 140 #define SSVALS(buf,pos,val) SSVAL((buf),(pos),((int16_t)(val)))
 141 #define SIVALS(buf,pos,val) SIVAL((buf),(pos),((int32_t)(val)))
 142
 143 #else /* not HAVE_ASM_BYTEORDER */
 144
 145 #define SVAL(buf,pos) (PVAL(buf,pos)|PVAL(buf,(pos)+1)<<8)
 146 #define IVAL(buf,pos) (SVAL(buf,pos)|SVAL(buf,(pos)+2)<<16)
 147 #define SSVALX(buf,pos,val) (CVAL_NC(buf,pos)=(uint8_t)((val)&0xFF),CVAL_NC(buf,pos+1)=(uint8_t)((val)>>8))
 148 #define SIVALX(buf,pos,val) (SSVALX(buf,pos,val&0xFFFF),SSVALX(buf,pos+2,val>>16))
 149 #define SVALS(buf,pos) ((int16_t)SVAL(buf,pos))
 150 #define IVALS(buf,pos) ((int32_t)IVAL(buf,pos))
 151 #define SSVAL(buf,pos,val) SSVALX((buf),(pos),((uint16_t)(val)))
 152 #define SIVAL(buf,pos,val) SIVALX((buf),(pos),((uint32_t)(val)))
 153 #define SSVALS(buf,pos,val) SSVALX((buf),(pos),((int16_t)(val)))
 154 #define SIVALS(buf,pos,val) SIVALX((buf),(pos),((int32_t)(val)))
 155
 156 #endif /* not HAVE_ASM_BYTEORDER */
 157
 158 /* 64 bit macros */
 159 #define BVAL(p, ofs) (IVAL(p,ofs) | (((uint64_t)IVAL(p,(ofs)+4)) << 32))
 160 #define BVALS(p, ofs) ((int64_t)BVAL(p,ofs))
 161 #define SBVAL(p, ofs, v) (SIVAL(p,ofs,(v)&0xFFFFFFFF), SIVAL(p,(ofs)+4,((uint64_t)(v))>>32))
 162 #define SBVALS(p, ofs, v) (SBVAL(p,ofs,(uint64_t)v))
 163
 164 /* now the reverse routines - these are used in nmb packets (mostly) */
 165 #define SREV(x) ((((x)&0xFF)<<8) | (((x)>>8)&0xFF))
 166 #define IREV(x) ((SREV(x)<<16) | (SREV((x)>>16)))
 167 #define BREV(x) ((IREV(x)<<32) | (IREV((x)>>32)))
 168
 169 #define RSVAL(buf,pos) SREV(SVAL(buf,pos))
 170 #define RSVALS(buf,pos) SREV(SVALS(buf,pos))
 171 #define RIVAL(buf,pos) IREV(IVAL(buf,pos))
 172 #define RIVALS(buf,pos) IREV(IVALS(buf,pos))
 173 #define RBVAL(buf,pos) BREV(BVAL(buf,pos))
 174 #define RBVALS(buf,pos) BREV(BVALS(buf,pos))
 175 #define RSSVAL(buf,pos,val) SSVAL(buf,pos,SREV(val))
 176 #define RSSVALS(buf,pos,val) SSVALS(buf,pos,SREV(val))
 177 #define RSIVAL(buf,pos,val) SIVAL(buf,pos,IREV(val))
 178 #define RSIVALS(buf,pos,val) SIVALS(buf,pos,IREV(val))
 179 #define RSBVAL(buf,pos,val) SBVAL(buf,pos,BREV(val))
 180 #define RSBVALS(buf,pos,val) SBVALS(buf,pos,BREV(val))
 181
 182 /* Alignment macros. */
 183 #define ALIGN4(p,base) ((p) + ((4 - (PTR_DIFF((p), (base)) & 3)) & 3))
 184 #define ALIGN2(p,base) ((p) + ((2 - (PTR_DIFF((p), (base)) & 1)) & 1))
 185
 186
 187 /* macros for accessing SMB protocol elements */
 188 #define VWV(vwv) ((vwv)*2)
 189
 190 #endif /* _BYTEORDER_H */