1/* Subroutines for the gcc driver. 2 Copyright (C) 2011-2015 Free Software Foundation, Inc. 3 4This file is part of GCC. 5 6GCC is free software; you can redistribute it and/or modify 7it under the terms of the GNU General Public License as published by 8the Free Software Foundation; either version 3, or (at your option) 9any later version. 10 11GCC is distributed in the hope that it will be useful, 12but WITHOUT ANY WARRANTY; without even the implied warranty of 13MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 14GNU General Public License for more details. 15 16You should have received a copy of the GNU General Public License 17along with GCC; see the file COPYING3. If not see 18<http://www.gnu.org/licenses/>. */ 19 20#include "config.h" 21#include "system.h" 22#include "coretypes.h" 23#include "tm.h" 24#include "configargs.h" 25 26struct vendor_cpu { 27 const char *part_no; 28 const char *arch_name; 29 const char *cpu_name; 30}; 31 32static struct vendor_cpu arm_cpu_table[] = { 33 {"0x926", "armv5te", "arm926ej-s"}, 34 {"0xa26", "armv5te", "arm1026ej-s"}, 35 {"0xb02", "armv6k", "mpcore"}, 36 {"0xb36", "armv6j", "arm1136j-s"}, 37 {"0xb56", "armv6t2", "arm1156t2-s"}, 38 {"0xb76", "armv6zk", "arm1176jz-s"}, 39 {"0xc05", "armv7-a", "cortex-a5"}, 40 {"0xc07", "armv7ve", "cortex-a7"}, 41 {"0xc08", "armv7-a", "cortex-a8"}, 42 {"0xc09", "armv7-a", "cortex-a9"}, 43 {"0xc0d", "armv7ve", "cortex-a12"}, 44 {"0xc0e", "armv7ve", "cortex-a17"}, 45 {"0xc0f", "armv7ve", "cortex-a15"}, 46 {"0xc14", "armv7-r", "cortex-r4"}, 47 {"0xc15", "armv7-r", "cortex-r5"}, 48 {"0xc20", "armv6-m", "cortex-m0"}, 49 {"0xc21", "armv6-m", "cortex-m1"}, 50 {"0xc23", "armv7-m", "cortex-m3"}, 51 {"0xc24", "armv7e-m", "cortex-m4"}, 52 {NULL, NULL, NULL} 53}; 54 55static struct { 56 const char *vendor_no; 57 const struct vendor_cpu *vendor_parts; 58} vendors[] = { 59 {"0x41", arm_cpu_table}, 60 {NULL, NULL} 61}; 62 63/* This will be called by the spec parser in gcc.c when it sees 64 a %:local_cpu_detect(args) construct. Currently it will be called 65 with either "arch", "cpu" or "tune" as argument depending on if 66 -march=native, -mcpu=native or -mtune=native is to be substituted. 67 68 It returns a string containing new command line parameters to be 69 put at the place of the above two options, depending on what CPU 70 this is executed. E.g. "-march=armv7-a" on a Cortex-A8 for 71 -march=native. If the routine can't detect a known processor, 72 the -march or -mtune option is discarded. 73 74 ARGC and ARGV are set depending on the actual arguments given 75 in the spec. */ 76const char * 77host_detect_local_cpu (int argc, const char **argv) 78{ 79 const char *val = NULL; 80 char buf[128]; 81 FILE *f = NULL; 82 bool arch; 83 const struct vendor_cpu *cpu_table = NULL; 84 85 if (argc < 1) 86 goto not_found; 87 88 arch = strcmp (argv[0], "arch") == 0; 89 if (!arch && strcmp (argv[0], "cpu") != 0 && strcmp (argv[0], "tune")) 90 goto not_found; 91 92 f = fopen ("/proc/cpuinfo", "r"); 93 if (f == NULL) 94 goto not_found; 95 96 while (fgets (buf, sizeof (buf), f) != NULL) 97 { 98 /* Ensure that CPU implementer is ARM (0x41). */ 99 if (strncmp (buf, "CPU implementer", sizeof ("CPU implementer") - 1) == 0) 100 { 101 int i; 102 for (i = 0; vendors[i].vendor_no != NULL; i++) 103 if (strstr (buf, vendors[i].vendor_no) != NULL) 104 { 105 cpu_table = vendors[i].vendor_parts; 106 break; 107 } 108 } 109 110 /* Detect arch/cpu. */ 111 if (strncmp (buf, "CPU part", sizeof ("CPU part") - 1) == 0) 112 { 113 int i; 114 115 if (cpu_table == NULL) 116 goto not_found; 117 118 for (i = 0; cpu_table[i].part_no != NULL; i++) 119 if (strstr (buf, cpu_table[i].part_no) != NULL) 120 { 121 val = arch ? cpu_table[i].arch_name : cpu_table[i].cpu_name; 122 break; 123 } 124 break; 125 } 126 } 127 128 if (val) 129 { 130 fclose (f); 131 return concat ("-m", argv[0], "=", val, NULL); 132 } 133 134not_found: 135 { 136 unsigned int i; 137 unsigned int opt; 138 const char *search[] = {NULL, "arch"}; 139 140 if (f) 141 fclose (f); 142 143 search[0] = argv[0]; 144 for (opt = 0; opt < ARRAY_SIZE (search); opt++) 145 for (i = 0; i < ARRAY_SIZE (configure_default_options); i++) 146 if (strcmp (configure_default_options[i].name, search[opt]) == 0) 147 return concat ("-m", search[opt], "=", 148 configure_default_options[i].value, NULL); 149 return NULL; 150 } 151} 152