URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Subversion Repositories openrisc
[/] [openrisc/] [trunk/] [bootloaders/] [orpmon/] [common/] [support.c] - Rev 232
Go to most recent revision | Compare with Previous | Blame | 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, ...) { #if 0 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"); #endif } /* 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; }
Go to most recent revision | Compare with Previous | Blame | View Log