URL https://opencores.org/ocsvn/or1k_soc_on_altera_embedded_dev_kit/or1k_soc_on_altera_embedded_dev_kit/trunk

Subversion Repositories or1k_soc_on_altera_embedded_dev_kit

[/] [or1k_soc_on_altera_embedded_dev_kit/] [trunk/] [soc/] [sw/] [orpmon/] [common/] [support.c] - Blame information for rev 20

Details | Compare with Previous | View Log


/* Support */
 
#include "spr_defs.h"
#include "support.h"
#include "common.h"
#include "int.h"
 
#include <ctype.h>
 
volatile unsigned long timestamp = 0;
 
void int_main(void);
 
/* return value by making a syscall */
void exit (int i)
{
  asm("l.add r3,r0,%0": : "r" (i));
  asm("l.nop %0": :"K" (NOP_EXIT));
  while (1);
}
 
/* activate printf support in simulator */
void __printf(const char *fmt, ...)
{
 
  va_list args;
  va_start(args, fmt);
  __asm__ __volatile__ ("  l.addi\tr3,%1,0\n \
                           l.addi\tr4,%2,0\n \
                           l.nop %0": :"K" (NOP_PRINTF), "r" (fmt), "r"  (args) : "r3", "r4");
}
 
/* print long */
void report(unsigned long value)
{
  asm("l.addi\tr3,%0,0": :"r" (value));
  asm("l.nop %0": :"K" (NOP_REPORT));
}
 
/* just to satisfy linker */
void __main(void)
{
}
 
/* For writing into SPR. */
void mtspr(unsigned long spr, unsigned long value)
{
  asm("l.mtspr\t\t%0,%1,0": : "r" (spr), "r" (value));
}
 
/* For reading SPR. */
unsigned long mfspr(unsigned long spr)
{
  unsigned long value;
  asm("l.mfspr\t\t%0,%1,0" : "=r" (value) : "r" (spr));
  return value;
}
 
 
 
/* Parses hex or decimal number */
unsigned long strtoul (const char *str, char **endptr, int base)
{
 
  {
 
    unsigned long number = 0;
    char *pos = (char *) str;
    char *fail_char = (char *) str;
 
 
  while (isspace(*pos)) pos++;  /* skip leading whitespace */
 
  if ((base == 16) && (*pos == '0')) { /* handle option prefix */
    ++pos;
    fail_char = pos;
    if ((*pos == 'x') || (*pos == 'X')) ++pos;
  }
 
  if (base == 0) {               /* dynamic base */
    base = 10;          /* default is 10 */
    if (*pos == '0') {
      ++pos;
      base -= 2;                /* now base is 8 (or 16) */
      fail_char = pos;
      if ((*pos == 'x') || (*pos == 'X')) {
        base += 8;      /* base is 16 */
        ++pos;
      }
    }
  }
 
  /* check for illegal base */
  if ( !((base < 2) || (base > 36)) )
    while (1) {
      int digit = 40;
      if ((*pos >= '0') && (*pos <= '9')) {
          digit = (*pos - '0');
      } else if (*pos >= 'a') {
          digit = (*pos - 'a' + 10);
      } else if (*pos >= 'A') {
          digit = (*pos - 'A' + 10);
      } else break;
 
      if (digit >= base) break;
 
      fail_char = ++pos;
      number = number * base + digit;
    }
 
  if (endptr) *endptr = fail_char; {
    return number;
  }
  }
}
 
unsigned long get_timer (unsigned long base)
{
__printf("%s - %s: %d\n", __FILE__, __FUNCTION__, __LINE__);
__printf("   timestamp = %.8lx base = %.8lx\n", timestamp, base);
  return (timestamp - base);
}
 
void set_timer (unsigned long t)
{
  timestamp = t;
}
 

Line No.	Rev	Author	Line
1	20	xianfeng	`/* Support */`
2
3			`#include "spr_defs.h"`
4			`#include "support.h"`
5			`#include "common.h"`
6			`#include "int.h"`
7
8			`#include <ctype.h>`
9
10			`volatile unsigned long timestamp = 0;`
11
12			`void int_main(void);`
13
14			`/* return value by making a syscall */`
15			`void exit (int i)`
16			`{`
17			`asm("l.add r3,r0,%0": : "r" (i));`
18			`asm("l.nop %0": :"K" (NOP_EXIT));`
19			`while (1);`
20			`}`
21
22			`/* activate printf support in simulator */`
23			`void __printf(const char *fmt, ...)`
24			`{`
25
26			`va_list args;`
27			`va_start(args, fmt);`
28			`__asm__ __volatile__ (" l.addi\tr3,%1,0\n \`
29			`l.addi\tr4,%2,0\n \`
30			`l.nop %0": :"K" (NOP_PRINTF), "r" (fmt), "r" (args) : "r3", "r4");`
31			`}`
32
33			`/* print long */`
34			`void report(unsigned long value)`
35			`{`
36			`asm("l.addi\tr3,%0,0": :"r" (value));`
37			`asm("l.nop %0": :"K" (NOP_REPORT));`
38			`}`
39
40			`/* just to satisfy linker */`
41			`void __main(void)`
42			`{`
43			`}`
44
45			`/* For writing into SPR. */`
46			`void mtspr(unsigned long spr, unsigned long value)`
47			`{`
48			`asm("l.mtspr\t\t%0,%1,0": : "r" (spr), "r" (value));`
49			`}`
50
51			`/* For reading SPR. */`
52			`unsigned long mfspr(unsigned long spr)`
53			`{`
54			`unsigned long value;`
55			`asm("l.mfspr\t\t%0,%1,0" : "=r" (value) : "r" (spr));`
56			`return value;`
57			`}`
58
59
60
61			`/* Parses hex or decimal number */`
62			`unsigned long strtoul (const char str, char *endptr, int base)`
63			`{`
64
65			`{`
66
67			`unsigned long number = 0;`
68			`char pos = (char ) str;`
69			`char fail_char = (char ) str;`
70
71
72			`while (isspace(pos)) pos++; / skip leading whitespace */`
73
74			`if ((base == 16) && (pos == '0')) { / handle option prefix */`
75			`++pos;`
76			`fail_char = pos;`
77			`if ((pos == 'x') \|\| (pos == 'X')) ++pos;`
78			`}`
79
80			`if (base == 0) { /* dynamic base */`
81			`base = 10; /* default is 10 */`
82			`if (*pos == '0') {`
83			`++pos;`
84			`base -= 2; /* now base is 8 (or 16) */`
85			`fail_char = pos;`
86			`if ((pos == 'x') \|\| (pos == 'X')) {`
87			`base += 8; /* base is 16 */`
88			`++pos;`
89			`}`
90			`}`
91			`}`
92
93			`/* check for illegal base */`
94			`if ( !((base < 2) \|\| (base > 36)) )`
95			`while (1) {`
96			`int digit = 40;`
97			`if ((pos >= '0') && (pos <= '9')) {`
98			`digit = (*pos - '0');`
99			`} else if (*pos >= 'a') {`
100			`digit = (*pos - 'a' + 10);`
101			`} else if (*pos >= 'A') {`
102			`digit = (*pos - 'A' + 10);`
103			`} else break;`
104
105			`if (digit >= base) break;`
106
107			`fail_char = ++pos;`
108			`number = number * base + digit;`
109			`}`
110
111			`if (endptr) *endptr = fail_char; {`
112			`return number;`
113			`}`
114			`}`
115			`}`
116
117			`unsigned long get_timer (unsigned long base)`
118			`{`
119			`__printf("%s - %s: %d\n", __FILE__, __FUNCTION__, __LINE__);`
120			`__printf(" timestamp = %.8lx base = %.8lx\n", timestamp, base);`
121			`return (timestamp - base);`
122			`}`
123
124			`void set_timer (unsigned long t)`
125			`{`
126			`timestamp = t;`
127			`}`
128

Browse

Tools

Subversion Repositories or1k_soc_on_altera_embedded_dev_kit

[/] [or1k_soc_on_altera_embedded_dev_kit/] [trunk/] [soc/] [sw/] [orpmon/] [common/] [support.c] - Blame information for rev 20