annotate libgomp/affinity.c @ 158:494b0b89df80 default tip

...
author Shinji KONO <kono@ie.u-ryukyu.ac.jp>
date Mon, 25 May 2020 18:13:55 +0900
parents 1830386684a0
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
145
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
1 /* Copyright (C) 2006-2020 Free Software Foundation, Inc.
111
kono
parents:
diff changeset
2 Contributed by Jakub Jelinek <jakub@redhat.com>.
kono
parents:
diff changeset
3
kono
parents:
diff changeset
4 This file is part of the GNU Offloading and Multi Processing Library
kono
parents:
diff changeset
5 (libgomp).
kono
parents:
diff changeset
6
kono
parents:
diff changeset
7 Libgomp is free software; you can redistribute it and/or modify it
kono
parents:
diff changeset
8 under the terms of the GNU General Public License as published by
kono
parents:
diff changeset
9 the Free Software Foundation; either version 3, or (at your option)
kono
parents:
diff changeset
10 any later version.
kono
parents:
diff changeset
11
kono
parents:
diff changeset
12 Libgomp is distributed in the hope that it will be useful, but WITHOUT ANY
kono
parents:
diff changeset
13 WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
kono
parents:
diff changeset
14 FOR A PARTICULAR PURPOSE. See the GNU General Public License for
kono
parents:
diff changeset
15 more details.
kono
parents:
diff changeset
16
kono
parents:
diff changeset
17 Under Section 7 of GPL version 3, you are granted additional
kono
parents:
diff changeset
18 permissions described in the GCC Runtime Library Exception, version
kono
parents:
diff changeset
19 3.1, as published by the Free Software Foundation.
kono
parents:
diff changeset
20
kono
parents:
diff changeset
21 You should have received a copy of the GNU General Public License and
kono
parents:
diff changeset
22 a copy of the GCC Runtime Library Exception along with this program;
kono
parents:
diff changeset
23 see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
kono
parents:
diff changeset
24 <http://www.gnu.org/licenses/>. */
kono
parents:
diff changeset
25
kono
parents:
diff changeset
26 /* This is a generic stub implementation of a CPU affinity setting. */
kono
parents:
diff changeset
27
kono
parents:
diff changeset
28 #include "libgomp.h"
145
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
29 #include <string.h>
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
30 #include <stdio.h>
111
kono
parents:
diff changeset
31
kono
parents:
diff changeset
32 void
kono
parents:
diff changeset
33 gomp_init_affinity (void)
kono
parents:
diff changeset
34 {
kono
parents:
diff changeset
35 }
kono
parents:
diff changeset
36
kono
parents:
diff changeset
37 #ifdef LIBGOMP_USE_PTHREADS
kono
parents:
diff changeset
38 void
kono
parents:
diff changeset
39 gomp_init_thread_affinity (pthread_attr_t *attr, unsigned int place)
kono
parents:
diff changeset
40 {
kono
parents:
diff changeset
41 (void) attr;
kono
parents:
diff changeset
42 (void) place;
kono
parents:
diff changeset
43 }
kono
parents:
diff changeset
44 #endif
kono
parents:
diff changeset
45
kono
parents:
diff changeset
46 void **
kono
parents:
diff changeset
47 gomp_affinity_alloc (unsigned long count, bool quiet)
kono
parents:
diff changeset
48 {
kono
parents:
diff changeset
49 (void) count;
kono
parents:
diff changeset
50 if (!quiet)
kono
parents:
diff changeset
51 gomp_error ("Affinity not supported on this configuration");
kono
parents:
diff changeset
52 return NULL;
kono
parents:
diff changeset
53 }
kono
parents:
diff changeset
54
kono
parents:
diff changeset
55 void
kono
parents:
diff changeset
56 gomp_affinity_init_place (void *p)
kono
parents:
diff changeset
57 {
kono
parents:
diff changeset
58 (void) p;
kono
parents:
diff changeset
59 }
kono
parents:
diff changeset
60
kono
parents:
diff changeset
61 bool
kono
parents:
diff changeset
62 gomp_affinity_add_cpus (void *p, unsigned long num,
kono
parents:
diff changeset
63 unsigned long len, long stride, bool quiet)
kono
parents:
diff changeset
64 {
kono
parents:
diff changeset
65 (void) p;
kono
parents:
diff changeset
66 (void) num;
kono
parents:
diff changeset
67 (void) len;
kono
parents:
diff changeset
68 (void) stride;
kono
parents:
diff changeset
69 (void) quiet;
kono
parents:
diff changeset
70 return false;
kono
parents:
diff changeset
71 }
kono
parents:
diff changeset
72
kono
parents:
diff changeset
73 bool
kono
parents:
diff changeset
74 gomp_affinity_remove_cpu (void *p, unsigned long num)
kono
parents:
diff changeset
75 {
kono
parents:
diff changeset
76 (void) p;
kono
parents:
diff changeset
77 (void) num;
kono
parents:
diff changeset
78 return false;
kono
parents:
diff changeset
79 }
kono
parents:
diff changeset
80
kono
parents:
diff changeset
81 bool
kono
parents:
diff changeset
82 gomp_affinity_copy_place (void *p, void *q, long stride)
kono
parents:
diff changeset
83 {
kono
parents:
diff changeset
84 (void) p;
kono
parents:
diff changeset
85 (void) q;
kono
parents:
diff changeset
86 (void) stride;
kono
parents:
diff changeset
87 return false;
kono
parents:
diff changeset
88 }
kono
parents:
diff changeset
89
kono
parents:
diff changeset
90 bool
kono
parents:
diff changeset
91 gomp_affinity_same_place (void *p, void *q)
kono
parents:
diff changeset
92 {
kono
parents:
diff changeset
93 (void) p;
kono
parents:
diff changeset
94 (void) q;
kono
parents:
diff changeset
95 return false;
kono
parents:
diff changeset
96 }
kono
parents:
diff changeset
97
kono
parents:
diff changeset
98 bool
kono
parents:
diff changeset
99 gomp_affinity_finalize_place_list (bool quiet)
kono
parents:
diff changeset
100 {
kono
parents:
diff changeset
101 (void) quiet;
kono
parents:
diff changeset
102 return false;
kono
parents:
diff changeset
103 }
kono
parents:
diff changeset
104
kono
parents:
diff changeset
105 bool
kono
parents:
diff changeset
106 gomp_affinity_init_level (int level, unsigned long count, bool quiet)
kono
parents:
diff changeset
107 {
kono
parents:
diff changeset
108 (void) level;
kono
parents:
diff changeset
109 (void) count;
kono
parents:
diff changeset
110 (void) quiet;
kono
parents:
diff changeset
111 if (!quiet)
kono
parents:
diff changeset
112 gomp_error ("Affinity not supported on this configuration");
kono
parents:
diff changeset
113 return NULL;
kono
parents:
diff changeset
114 }
kono
parents:
diff changeset
115
kono
parents:
diff changeset
116 void
kono
parents:
diff changeset
117 gomp_affinity_print_place (void *p)
kono
parents:
diff changeset
118 {
kono
parents:
diff changeset
119 (void) p;
kono
parents:
diff changeset
120 }
kono
parents:
diff changeset
121
kono
parents:
diff changeset
122 int
kono
parents:
diff changeset
123 omp_get_place_num_procs (int place_num)
kono
parents:
diff changeset
124 {
kono
parents:
diff changeset
125 (void) place_num;
kono
parents:
diff changeset
126 return 0;
kono
parents:
diff changeset
127 }
kono
parents:
diff changeset
128
kono
parents:
diff changeset
129 void
kono
parents:
diff changeset
130 omp_get_place_proc_ids (int place_num, int *ids)
kono
parents:
diff changeset
131 {
kono
parents:
diff changeset
132 (void) place_num;
kono
parents:
diff changeset
133 (void) ids;
kono
parents:
diff changeset
134 }
kono
parents:
diff changeset
135
kono
parents:
diff changeset
136 void
kono
parents:
diff changeset
137 gomp_get_place_proc_ids_8 (int place_num, int64_t *ids)
kono
parents:
diff changeset
138 {
kono
parents:
diff changeset
139 (void) place_num;
kono
parents:
diff changeset
140 (void) ids;
kono
parents:
diff changeset
141 }
kono
parents:
diff changeset
142
145
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
143 void
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
144 gomp_display_affinity_place (char *buffer, size_t size, size_t *ret,
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
145 int place)
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
146 {
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
147 char buf[sizeof (long) * 3 + 4];
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
148 if (gomp_available_cpus > 1)
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
149 sprintf (buf, "0-%lu", gomp_available_cpus - 1);
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
150 else
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
151 strcpy (buf, "0");
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
152 gomp_display_string (buffer, size, ret, buf, strlen (buf));
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
153 }
1830386684a0 gcc-9.2.0
anatofuz
parents: 131
diff changeset
154
111
kono
parents:
diff changeset
155 ialias(omp_get_place_num_procs)
kono
parents:
diff changeset
156 ialias(omp_get_place_proc_ids)