lustre/portals/include/linux/portals_lib.h

   1 /* -*- mode: c; c-basic-offset: 8; indent-tabs-mode: nil; -*-
   2  * vim:expandtab:shiftwidth=8:tabstop=8:
   3  *
   4  *  Copyright (C) 2001 Cluster File Systems, Inc. <braam@clusterfs.com>
   5  *
   6  *   This file is part of Lustre, http://www.lustre.org.
   7  *
   8  *   Lustre is free software; you can redistribute it and/or
   9  *   modify it under the terms of version 2 of the GNU General Public
  10  *   License as published by the Free Software Foundation.
  11  *
  12  *   Lustre is distributed in the hope that it will be useful,
  13  *   but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15  *   GNU General Public License for more details.
  16  *
  17  *   You should have received a copy of the GNU General Public License
  18  *   along with Lustre; if not, write to the Free Software
  19  *   Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  20  *
  21  * Basic library routines.
  22  *
  23  */
  24
  25 #ifndef _PORTALS_LIB_H
  26 #define _PORTALS_LIB_H
  27
  28 #ifndef __KERNEL__
  29 # include <string.h>
  30 #else
  31 # include <asm/types.h>
  32 #endif
  33
  34 #undef MIN
  35 #define MIN(a,b) (((a)<(b)) ? (a): (b))
  36 #undef MAX
  37 #define MAX(a,b) (((a)>(b)) ? (a): (b))
  38 #define MKSTR(ptr) ((ptr))? (ptr) : ""
  39
  40 static inline int size_round (int val)
  41 {
  42         return (val + 7) & (~0x7);
  43 }
  44
  45 static inline int size_round16(int val)
  46 {
  47         return (val + 0xf) & (~0xf);
  48 }
  49
  50 static inline int size_round32(int val)
  51 {
  52         return (val + 0x1f) & (~0x1f);
  53 }
  54
  55 static inline int size_round0(int val)
  56 {
  57         if (!val)
  58                 return 0;
  59         return (val + 1 + 7) & (~0x7);
  60 }
  61
  62 static inline size_t round_strlen(char *fset)
  63 {
  64         return size_round(strlen(fset) + 1);
  65 }
  66
  67 #ifdef __KERNEL__
  68 static inline char *strdup(const char *str)
  69 {
  70         int len = strlen(str) + 1;
  71         char *tmp = kmalloc(len, GFP_KERNEL);
  72         if (tmp)
  73                 memcpy(tmp, str, len);
  74
  75         return tmp;
  76 }
  77 #endif
  78
  79 #ifdef __KERNEL__
  80 # define NTOH__u16(var) le16_to_cpu(var)
  81 # define NTOH__u32(var) le32_to_cpu(var)
  82 # define NTOH__u64(var) le64_to_cpu(var)
  83 # define HTON__u16(var) cpu_to_le16(var)
  84 # define HTON__u32(var) cpu_to_le32(var)
  85 # define HTON__u64(var) cpu_to_le64(var)
  86 #else
  87 # define expansion_u64(var) \
  88     ({  __u64 ret; \
  89        switch (sizeof(var)) {   \
  90        case 8: (ret) = (var); break; \
  91        case 4: (ret) = (__u32)(var); break; \
  92        case 2: (ret) = (__u16)(var); break; \
  93        case 1: (ret) = (__u8)(var); break; \
  94        };       \
  95        (ret);     \
  96     })
  97 # define NTOH__u16(var) (var)
  98 # define NTOH__u32(var) (var)
  99 # define NTOH__u64(var) (expansion_u64(var))
 100 # define HTON__u16(var) (var)
 101 # define HTON__u32(var) (var)
 102 # define HTON__u64(var) (expansion_u64(var))
 103 #endif
 104
 105 /*
 106  * copy sizeof(type) bytes from pointer to var and move ptr forward.
 107  * return EFAULT if pointer goes beyond end
 108  */
 109 #define UNLOGV(var,type,ptr,end)                \
 110 do {                                            \
 111         var = *(type *)ptr;                     \
 112         ptr += sizeof(type);                    \
 113         if (ptr > end )                         \
 114                 return -EFAULT;                 \
 115 } while (0)
 116
 117 /* the following two macros convert to little endian */
 118 /* type MUST be __u32 or __u64 */
 119 #define LUNLOGV(var,type,ptr,end)               \
 120 do {                                            \
 121         var = NTOH##type(*(type *)ptr);         \
 122         ptr += sizeof(type);                    \
 123         if (ptr > end )                         \
 124                 return -EFAULT;                 \
 125 } while (0)
 126
 127 /* now log values */
 128 #define LOGV(var,type,ptr)                      \
 129 do {                                            \
 130         *((type *)ptr) = var;                   \
 131         ptr += sizeof(type);                    \
 132 } while (0)
 133
 134 /* and in network order */
 135 #define LLOGV(var,type,ptr)                     \
 136 do {                                            \
 137         *((type *)ptr) = HTON##type(var);       \
 138         ptr += sizeof(type);                    \
 139 } while (0)
 140
 141
 142 /*
 143  * set var to point at (type *)ptr, move ptr forward with sizeof(type)
 144  * return from function with EFAULT if ptr goes beyond end
 145  */
 146 #define UNLOGP(var,type,ptr,end)                \
 147 do {                                            \
 148         var = (type *)ptr;                      \
 149         ptr += sizeof(type);                    \
 150         if (ptr > end )                         \
 151                 return -EFAULT;                 \
 152 } while (0)
 153
 154 #define LOGP(var,type,ptr)                      \
 155 do {                                            \
 156         memcpy(ptr, var, sizeof(type));         \
 157         ptr += sizeof(type);                    \
 158 } while (0)
 159
 160 /*
 161  * set var to point at (char *)ptr, move ptr forward by size_round(len);
 162  * return from function with EFAULT if ptr goes beyond end
 163  */
 164 #define UNLOGL(var,type,len,ptr,end)            \
 165 do {                                            \
 166         var = (type *)ptr;                      \
 167         ptr += size_round(len * sizeof(type));  \
 168         if (ptr > end )                         \
 169                 return -EFAULT;                 \
 170 } while (0)
 171
 172 #define UNLOGL0(var,type,len,ptr,end)                                   \
 173 do {                                                                    \
 174         UNLOGL(var,type,len,ptr,end);                                   \
 175         if ( *((char *)ptr - size_round(len) + len - 1) != '\0')        \
 176                 return -EFAULT;                                         \
 177 } while (0)
 178
 179 #define LOGL(var,len,ptr)                                       \
 180 do {                                                            \
 181         if (var)                                                \
 182                 memcpy((char *)ptr, (const char *)var, len);    \
 183         ptr += size_round(len);                                 \
 184 } while (0)
 185
 186 #define LOGU(var,len,ptr)                                       \
 187 do {                                                            \
 188         if (var)                                                \
 189                 memcpy((char *)var, (const char *)ptr, len);    \
 190         ptr += size_round(len);                                 \
 191 } while (0)
 192
 193 #define LOGL0(var,len,ptr)                              \
 194 do {                                                    \
 195         if (!len)                                       \
 196                 break;                                  \
 197         memcpy((char *)ptr, (const char *)var, len);    \
 198         *((char *)(ptr) + len) = 0;                     \
 199         ptr += size_round(len + 1);                     \
 200 } while (0)
 201
 202 #endif /* _PORTALS_LIB_H */