Kernel/arch/x86_64/lib.c

   1 /*
   2  */
   3 #include <acess.h>
   4 #include <arch.h>
   5
   6 // === CODE ===
   7
   8 void outb(Uint16 Port, Uint8 Data)
   9 {
  10         __asm__ __volatile__ ("outb %%al, %%dx"::"d"(Port),"a"(Data));
  11 }
  12 void outw(Uint16 Port, Uint16 Data)
  13 {
  14         __asm__ __volatile__ ("outw %%ax, %%dx"::"d"(Port),"a"(Data));
  15 }
  16 void outd(Uint16 Port, Uint32 Data)
  17 {
  18         __asm__ __volatile__ ("outl %%eax, %%dx"::"d"(Port),"a"(Data));
  19 }
  20 Uint8 inb(Uint16 Port)
  21 {
  22         Uint8   ret;
  23         __asm__ __volatile__ ("inb %%dx, %%al":"=a"(ret):"d"(Port));
  24         return ret;
  25 }
  26 Uint16 inw(Uint16 Port)
  27 {
  28         Uint16  ret;
  29         __asm__ __volatile__ ("inw %%dx, %%ax":"=a"(ret):"d"(Port));
  30         return ret;
  31 }
  32 Uint32 ind(Uint16 Port)
  33 {
  34         Uint32  ret;
  35         __asm__ __volatile__ ("inl %%dx, %%eax":"=a"(ret):"d"(Port));
  36         return ret;
  37 }
  38
  39 // === Endianness ===
  40 Uint32 BigEndian32(Uint32 Value)
  41 {
  42         Uint32  ret;
  43         ret = (Value >> 24);
  44         ret |= ((Value >> 16) & 0xFF) << 8;
  45         ret |= ((Value >>  8) & 0xFF) << 16;
  46         ret |= ((Value >>  0) & 0xFF) << 24;
  47         return ret;
  48 }
  49
  50 Uint16 BigEndian16(Uint16 Value)
  51 {
  52         return  (Value>>8)|(Value<<8);
  53 }
  54
  55 // === Memory Manipulation ===
  56 int memcmp(const void *__dest, const void *__src, size_t __count)
  57 {
  58         if( ((tVAddr)__dest & 7) != ((tVAddr)__src & 7) ) {
  59                 const Uint8     *src = __src, *dst = __dest;
  60                 while(__count)
  61                 {
  62                         if( *src != *dst )
  63                                 return *dst - *src;
  64                         src ++; dst ++; __count --;
  65                 }
  66                 return 0;
  67         }
  68         else {
  69                 const Uint8     *src = __src;
  70                 const Uint8     *dst = __dest;
  71                 const Uint64    *src64, *dst64;
  72
  73                 while( (tVAddr)src & 7 && __count ) {
  74                         if( *src != *dst )
  75                                 return *dst - *src;
  76                         dst ++; src ++; __count --;
  77                 }
  78
  79                 src64 = (void*)src;
  80                 dst64 = (void*)dst;
  81
  82                 while( __count >= 8 )
  83                 {
  84                         if( *src64 != *dst64 )
  85                         {
  86                                 src = (void*)src64;
  87                                 dst = (void*)dst64;
  88                                 if(src[0] != dst[0])    return dst[0]-src[0];
  89                                 if(src[1] != dst[1])    return dst[1]-src[1];
  90                                 if(src[2] != dst[2])    return dst[2]-src[2];
  91                                 if(src[3] != dst[3])    return dst[3]-src[3];
  92                                 if(src[4] != dst[4])    return dst[4]-src[4];
  93                                 if(src[5] != dst[5])    return dst[5]-src[5];
  94                                 if(src[6] != dst[6])    return dst[6]-src[6];
  95                                 if(src[7] != dst[7])    return dst[7]-src[7];
  96                                 return -1;      // This should never happen
  97                         }
  98                         __count -= 8;
  99                         src64 ++;
 100                         dst64 ++;
 101                 }
 102
 103                 src = (void*)src64;
 104                 dst = (void*)dst64;
 105                 while( __count-- )
 106                 {
 107                         if(*dst != *src)        return *dst - *src;
 108                         dst ++;
 109                         src ++;
 110                 }
 111         }
 112         return 0;
 113 }
 114
 115 void *memcpy(void *__dest, const void *__src, size_t __count)
 116 {
 117         if( ((tVAddr)__dest & 7) != ((tVAddr)__src & 7) )
 118                 __asm__ __volatile__ ("rep movsb" : : "D"(__dest),"S"(__src),"c"(__count));
 119         else {
 120                 const Uint8     *src = __src;
 121                 Uint8   *dst = __dest;
 122                 while( (tVAddr)src & 7 && __count ) {
 123                         *dst++ = *src++;
 124                         __count --;
 125                 }
 126
 127                 __asm__ __volatile__ ("rep movsq" : : "D"(dst),"S"(src),"c"(__count/8));
 128                 src += __count & ~7;
 129                 dst += __count & ~7;
 130                 __count = __count & 7;
 131                 while( __count-- )
 132                         *dst++ = *src++;
 133         }
 134         return __dest;
 135 }
 136
 137 void *memset(void *__dest, int __val, size_t __count)
 138 {
 139         if( __val != 0 || ((tVAddr)__dest & 7) != 0 )
 140                 __asm__ __volatile__ ("rep stosb" : : "D"(__dest),"a"(__val),"c"(__count));
 141         else {
 142                 Uint8   *dst = __dest;
 143
 144                 __asm__ __volatile__ ("rep stosq" : : "D"(dst),"a"(0),"c"(__count/8));
 145                 dst += __count & ~7;
 146                 __count = __count & 7;
 147                 while( __count-- )
 148                         *dst++ = 0;
 149         }
 150         return __dest;
 151 }
 152
 153 void *memsetd(void *__dest, Uint32 __val, size_t __count)
 154 {
 155         __asm__ __volatile__ ("rep stosl" : : "D"(__dest),"a"(__val),"c"(__count));
 156         return __dest;
 157 }
 158