hc
2024-11-01 2f529f9b558ca1c1bd74be7437a84e4711743404
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
/*
 * Copyright (C) 2011 Gilles Chanteperdrix <gch@xenomai.org>.
 *
 * This library is free software; you can redistribute it and/or
 * modify it under the terms of the GNU Lesser General Public
 * License as published by the Free Software Foundation; either
 * version 2 of the License, or (at your option) any later version.
 *
 * This library is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 * Lesser General Public License for more details.
 * You should have received a copy of the GNU Lesser General Public
 * License along with this library; if not, write to the Free Software
 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA.
 */
#include <sys/types.h>
#include <sys/stat.h>
#include <sys/mman.h>
#include <stdio.h>
#include <stdlib.h>
#include <fcntl.h>
#include <string.h>
#include <string.h>
#include <unistd.h>
#include <limits.h>
#include <cobalt/wrappers.h>
#include <cobalt/ticks.h>
#include <asm/xenomai/syscall.h>
#include <asm/xenomai/tsc.h>
#include <asm/xenomai/features.h>
#include <asm/xenomai/uapi/fptest.h>
#include "internal.h"
 
struct __xn_full_tscinfo __xn_tscinfo = {
   .kinfo = {
       .counter = NULL,
   },
};
 
void cobalt_arch_check_features(struct cobalt_featinfo *finfo)
{
   unsigned long phys_addr;
   unsigned page_size;
   int err, fd;
   void *addr;
 
   if (!cobalt_use_legacy_tsc())
       return;
 
   if (__xn_tscinfo.kinfo.counter != NULL)
       return;
 
   err = XENOMAI_SYSCALL2(sc_cobalt_archcall,
                  XENOMAI_SYSARCH_TSCINFO, &__xn_tscinfo.kinfo);
   if (err)
       early_panic("missing TSC emulation: %s",
                strerror(-err));
 
   fd = __STD(open("/dev/mem", O_RDONLY | O_SYNC));
   if (fd == -1)
       early_panic("failed open(/dev/mem): %s", strerror(errno));
 
   page_size = sysconf(_SC_PAGESIZE);
 
   __xn_tscinfo.kuser_tsc_get =
       (__xn_rdtsc_t *)(0xffff1004 -
               ((*(unsigned *)(0xffff0ffc) + 3) << 5));
 
   phys_addr = (unsigned long)__xn_tscinfo.kinfo.counter;
 
   addr = __STD(mmap(NULL, page_size, PROT_READ, MAP_SHARED,
             fd, phys_addr & ~(page_size - 1)));
   if (addr == MAP_FAILED)
       early_panic("failed mmap(/dev/mem): %s", strerror(errno));
 
   __xn_tscinfo.kinfo.counter =
       ((volatile unsigned *)
        ((char *) addr + (phys_addr & (page_size - 1))));
 
   __STD(close(fd));
}
 
int cobalt_fp_detect(void)
{
   char buffer[1024];
   int features = 0;
   FILE *fp;
 
   fp = fopen("/proc/cpuinfo", "r");
   if (fp == NULL)
       return 0;
 
   while (fgets(buffer, sizeof(buffer), fp)) {
       if(strncmp(buffer, "Features", sizeof("Features") - 1))
           continue;
       if (strstr(buffer, "vfp")) {
           features |= __COBALT_HAVE_VFP;
           break;
       }
   }
 
   fclose(fp);
 
   return features;
}