Mercurial > hg > truffle
annotate src/os_gpu/linux_ptx/vm/gpu_linux.cpp @ 11523:d4537043ccc8
mx: Remove debug printing in specjvm2008
| author | Gilles Duboscq <duboscq@ssw.jku.at> |
|---|---|
| date | Wed, 04 Sep 2013 10:40:56 +0200 |
| parents | 49bb1bc983c6 |
| children | 4f69a5189e77 |
| rev | line source |
|---|---|
| 10879 | 1 /* |
| 2 * Copyright (c) 2013, Oracle and/or its affiliates. All rights reserved. | |
| 3 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. | |
| 4 * | |
| 5 * This code is free software; you can redistribute it and/or modify it | |
| 6 * under the terms of the GNU General Public License version 2 only, as | |
| 7 * published by the Free Software Foundation. | |
| 8 * | |
| 9 * This code is distributed in the hope that it will be useful, but WITHOUT | |
| 10 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or | |
| 11 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License | |
| 12 * version 2 for more details (a copy is included in the LICENSE file that | |
| 13 * accompanied this code). | |
| 14 * | |
| 15 * You should have received a copy of the GNU General Public License version | |
| 16 * 2 along with this work; if not, write to the Free Software Foundation, | |
| 17 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA. | |
| 18 * | |
| 19 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA | |
| 20 * or visit www.oracle.com if you need additional information or have any | |
| 21 * questions. | |
| 22 * | |
| 23 */ | |
| 24 | |
| 25 #include "runtime/gpu.hpp" | |
| 26 #include "utilities/ostream.hpp" | |
| 27 | |
| 28 void gpu::probe_gpu() { | |
| 29 set_available(gpu::Linux::probe_gpu()); | |
| 30 if (TraceGPUInteraction) { | |
| 31 tty->print_cr("gpu_linux::probe_gpu(): %d", gpu::is_available()); | |
| 32 } | |
| 33 } | |
| 34 | |
| 35 /* | |
| 36 * Probe for CUDA device on PCI bus using /proc/bus/pci/devices. Do | |
| 37 * not rely on CUDA tool kit being installed. We will check if CUDA | |
| 38 * library is installed later. | |
| 39 */ | |
| 40 | |
| 41 static unsigned int nvidia_vendor_id = 0x10de; | |
| 42 | |
| 43 bool gpu::Linux::probe_gpu() { | |
| 44 /* | |
|
11292
5040ec3ff3aa
Defer PTX on Mac probe to the CUDA driver initialization call
Morris Meyer <morris.meyer@oracle.com>
parents:
10879
diff
changeset
|
45 * Open /proc/bus/pci/devices to look for the first CUDA enabled |
|
5040ec3ff3aa
Defer PTX on Mac probe to the CUDA driver initialization call
Morris Meyer <morris.meyer@oracle.com>
parents:
10879
diff
changeset
|
46 * device. For now, finding the first CUDA device. Will need to |
|
5040ec3ff3aa
Defer PTX on Mac probe to the CUDA driver initialization call
Morris Meyer <morris.meyer@oracle.com>
parents:
10879
diff
changeset
|
47 * revisit this to support execution on multiple CUDA devices if |
|
5040ec3ff3aa
Defer PTX on Mac probe to the CUDA driver initialization call
Morris Meyer <morris.meyer@oracle.com>
parents:
10879
diff
changeset
|
48 * they exist. |
|
5040ec3ff3aa
Defer PTX on Mac probe to the CUDA driver initialization call
Morris Meyer <morris.meyer@oracle.com>
parents:
10879
diff
changeset
|
49 */ |
| 10879 | 50 FILE *pci_devices = fopen("/proc/bus/pci/devices", "r"); |
| 51 char contents[4096]; | |
| 52 unsigned int bus_num_devfn_ign; | |
| 53 unsigned int vendor; | |
| 54 unsigned int device; | |
| 55 bool cuda_device_exists = false; | |
| 56 if (pci_devices == NULL) { | |
| 57 tty->print_cr("*** Failed to open /proc/bus/pci/devices"); | |
| 58 return cuda_device_exists; | |
| 59 } | |
| 60 | |
| 61 while (fgets(contents, sizeof(contents)-1, pci_devices)) { | |
| 62 sscanf(contents, "%04x%04x%04x", &bus_num_devfn_ign, &vendor, &device); | |
| 63 /* Break after finding the first CUDA device. */ | |
|
11485
49bb1bc983c6
Implement several missing PTX codegen features; return value capture and method args passing of java method executed on GPU.
bharadwaj
parents:
11292
diff
changeset
|
64 if (vendor == nvidia_vendor_id) { |
| 10879 | 65 cuda_device_exists = true; |
| 66 if (TraceGPUInteraction) { | |
| 67 tty->print_cr("Found supported nVidia CUDA device vendor : 0x%04x device 0x%04x", vendor, device); | |
| 68 } | |
| 69 break; | |
| 70 } | |
| 71 } | |
| 72 | |
| 73 // Close file pointer. | |
| 74 fclose(pci_devices); | |
| 75 | |
| 76 return cuda_device_exists; | |
| 77 } |