OpenCores
URL https://opencores.org/ocsvn/or1k/or1k/trunk

Subversion Repositories or1k

[/] [or1k/] [trunk/] [rtems-20020807/] [c/] [src/] [librdbg/] [src/] [rdbg.c] - Blame information for rev 1780

Go to most recent revision | Details | Compare with Previous | View Log

Line No. Rev Author Line
1 1026 ivang
/*
2
 **************************************************************************
3
 *
4
 * Component =
5
 *
6
 * Synopsis  =   rdbg.c
7
 *
8
 * rdbg.c,v 1.5 2002/02/01 17:00:01 joel Exp
9
 *
10
 **************************************************************************
11
 */
12
 
13
#include <assert.h>
14
#include <errno.h>
15
#include <rtems.h>
16
#include <rtems/error.h>
17
#include <rdbg/rdbg.h>
18
#include <rdbg/servrpc.h>
19
#include <rtems/rtems_bsdnet.h>
20
#include <rpc/pmap_clnt.h>
21
#include <sys/socket.h>
22
#include <netinet/in.h>
23
 
24
u_short rtemsPort = RTEMS_PORT;
25
int BackPort = RTEMS_BACK_PORT;
26
int rtemsActive = 0;
27
SVCXPRT *rtemsXprt;
28
int rtemsSock;
29
char taskName[] = "RTEMS rdbg daemon";
30
volatile int ExitForSingleStep = 0;
31
volatile int Continue;
32
volatile int justSaveContext;
33
volatile Objects_Id currentTargetThread;
34
volatile int CannotRestart = 0;
35
volatile int TotalReboot = 0;
36
int CONN_LIST_INC = 3;
37
int PID_LIST_INC = 1;
38
int TSP_RETRIES = 10;
39
 
40
  int
41
getId ()
42
{
43
  rtems_id id;
44
 
45
  rtems_task_ident (RTEMS_SELF, RTEMS_SEARCH_ALL_NODES, &id);
46
  return (int) (id);
47
}
48
 
49
  static int
50
rdbgInit (void)
51
{
52
  int sock;
53
  struct sockaddr_in addr;
54
 
55
  sock = socket (AF_INET, SOCK_DGRAM, IPPROTO_UDP);
56
  if (sock == -1) {
57
    printf ("%s: rdbgInit: cannot allocate socket\n", taskName);
58
    return -1;
59
  }
60
 
61
  bzero ((void *) &addr, sizeof (struct sockaddr_in));
62
  addr.sin_port = htons (rtemsPort);
63
  if ((bind (sock, (struct sockaddr *) &addr, sizeof (addr))) == -1) {
64
    printf ("%s: rdbgInit: cannot bind socket\n", taskName);
65
    return -2;
66
  }
67
  rtemsXprt = svcudp_create (sock);
68
  if (svcudp_enablecache (rtemsXprt, 1) == 0) {
69
    printf ("%s: rdbgInit: cannot enable rpc cache\n", taskName);
70
    return -3;
71
  }
72
  rtemsSock = sock;
73
  if (!svc_register (rtemsXprt, REMOTEDEB, REMOTEVERS, remotedeb_2, 0)) {
74
    printf (stderr, "unable to register (REMOTEDEB, REMOTEVERS, udp).");
75
    return -4;
76
  }
77
  connect_rdbg_exception ();
78
 
79
  return 0;
80
}
81
 
82
  rtems_task
83
rdbgDaemon (rtems_task_argument argument)
84
{
85
  svc_run ();
86
}
87
 
88
  void
89
rtems_rdbg_initialize (void)
90
{
91
  rtems_name task_name;
92
  rtems_id tid;
93
  rtems_status_code status;
94
 
95
#ifdef DDEBUG
96
  rdb_debug = 1;                /* DPRINTF now will display */
97
#endif
98
 
99
  DPRINTF (("%s init starting\n", taskName));
100
 
101
  /*
102
   * Print version string
103
   */
104
#ifdef DDEBUG
105
  printk ("RDBG v.%d built on [%s %s]\n", SERVER_VERS, __DATE__, __TIME__);
106
#else
107
  printk ("RDBG v.%d\n", SERVER_VERS);
108
#endif
109
 
110
  /*
111
   * Create socket and init UDP RPC server
112
   */
113
  if (rdbgInit () != 0)
114
    goto error;
115
 
116
  Continue = 1;
117
  justSaveContext = 0;
118
  currentTargetThread = 0;
119
 
120
  task_name = rtems_build_name ('R', 'D', 'B', 'G');
121
  if ((status = rtems_task_create (task_name, 5, 24576,
122
                                   RTEMS_INTERRUPT_LEVEL (0),
123
                                   RTEMS_DEFAULT_ATTRIBUTES |
124
                                   RTEMS_SYSTEM_TASK, &tid))
125
      != RTEMS_SUCCESSFUL) {
126
    printf ("status = %d\n", status);
127
    rtems_panic ("Can't create task.\n");
128
  }
129
 
130
  status = rtems_task_start (tid, rdbgDaemon, 0);
131
 
132
  return;
133
 
134
error:
135
  printf ("initialization failed.\n");
136
}
137
 
138
  void
139
setErrno (int error)
140
{
141
  errno = error;
142
}
143
 
144
  int
145
getErrno ()
146
{
147
  return errno;
148
}

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.