if SYS_gettid doesn't exist (like under HURD), use getpid() instead
[platform/upstream/openblas.git] / common_linux.h
1 /*********************************************************************/
2 /* Copyright 2009, 2010 The University of Texas at Austin.           */
3 /* All rights reserved.                                              */
4 /*                                                                   */
5 /* Redistribution and use in source and binary forms, with or        */
6 /* without modification, are permitted provided that the following   */
7 /* conditions are met:                                               */
8 /*                                                                   */
9 /*   1. Redistributions of source code must retain the above         */
10 /*      copyright notice, this list of conditions and the following  */
11 /*      disclaimer.                                                  */
12 /*                                                                   */
13 /*   2. Redistributions in binary form must reproduce the above      */
14 /*      copyright notice, this list of conditions and the following  */
15 /*      disclaimer in the documentation and/or other materials       */
16 /*      provided with the distribution.                              */
17 /*                                                                   */
18 /*    THIS  SOFTWARE IS PROVIDED  BY THE  UNIVERSITY OF  TEXAS AT    */
19 /*    AUSTIN  ``AS IS''  AND ANY  EXPRESS OR  IMPLIED WARRANTIES,    */
20 /*    INCLUDING, BUT  NOT LIMITED  TO, THE IMPLIED  WARRANTIES OF    */
21 /*    MERCHANTABILITY  AND FITNESS FOR  A PARTICULAR  PURPOSE ARE    */
22 /*    DISCLAIMED.  IN  NO EVENT SHALL THE UNIVERSITY  OF TEXAS AT    */
23 /*    AUSTIN OR CONTRIBUTORS BE  LIABLE FOR ANY DIRECT, INDIRECT,    */
24 /*    INCIDENTAL,  SPECIAL, EXEMPLARY,  OR  CONSEQUENTIAL DAMAGES    */
25 /*    (INCLUDING, BUT  NOT LIMITED TO,  PROCUREMENT OF SUBSTITUTE    */
26 /*    GOODS  OR  SERVICES; LOSS  OF  USE,  DATA,  OR PROFITS;  OR    */
27 /*    BUSINESS INTERRUPTION) HOWEVER CAUSED  AND ON ANY THEORY OF    */
28 /*    LIABILITY, WHETHER  IN CONTRACT, STRICT  LIABILITY, OR TORT    */
29 /*    (INCLUDING NEGLIGENCE OR OTHERWISE)  ARISING IN ANY WAY OUT    */
30 /*    OF  THE  USE OF  THIS  SOFTWARE,  EVEN  IF ADVISED  OF  THE    */
31 /*    POSSIBILITY OF SUCH DAMAGE.                                    */
32 /*                                                                   */
33 /* The views and conclusions contained in the software and           */
34 /* documentation are those of the authors and should not be          */
35 /* interpreted as representing official policies, either expressed   */
36 /* or implied, of The University of Texas at Austin.                 */
37 /*********************************************************************/
38
39 #ifndef COMMON_LINUX_H
40 #define COMMON_LINUX_H
41
42 #ifndef ASSEMBLER
43
44 #include <syscall.h>
45
46 extern long int syscall (long int __sysno, ...);
47
48 #ifndef MPOL_PREFERRED
49 #define MPOL_PREFERRED 1
50 #endif
51
52 #ifndef MPOL_INTERLEAVE
53 #define MPOL_INTERLEAVE 3
54 #endif
55
56 #if defined(ARCH_IA64) && defined(__ECC)
57 #ifndef __NR_mbind
58 #define __NR_mbind                      1259
59 #endif
60 #ifndef __NR_get_mempolicy
61 #define __NR_get_mempolicy              1260
62 #endif
63 #ifndef __NR_set_mempolicy
64 #define __NR_set_mempolicy              1261
65 #endif
66 #endif
67
68 static inline int my_mbind(void *addr, unsigned long len, int mode,
69                            unsigned long *nodemask, unsigned long maxnode,
70                            unsigned flags) {
71 #if defined (LOONGSON3B) 
72 #if defined (__64BIT__)
73         return syscall(SYS_mbind, addr, len, mode, nodemask, maxnode, flags);
74 #else
75         return 0; //NULL Implementation on Loongson 3B 32bit.
76 #endif
77 #else
78 //Fixed randomly SEGFAULT when nodemask==NULL with above Linux 2.6.34
79 //      unsigned long null_nodemask=0;
80         return syscall(SYS_mbind, addr, len, mode, nodemask, maxnode, flags);
81 #endif
82 }
83
84 static inline int my_set_mempolicy(int mode, const unsigned long *addr, unsigned long flag) {
85
86   return syscall(SYS_set_mempolicy, mode, addr, flag);
87 }
88
89 static inline int my_gettid(void) { 
90 #ifdef SYS_gettid
91 return syscall(SYS_gettid); 
92 #else
93 return getpid();
94 #endif
95 }
96
97 #endif
98 #endif