summaryrefslogtreecommitdiffstats
path: root/c/src/lib/libbsp/unix/posix/shmsupp/getcfg.c
blob: 14158f4516081360084ea15e6ea899370d1609b6 (plain) (blame)
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
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
/*  void Shm_get_config( localnode, &shmcfg )
 *
 *  This routine initializes, if necessary, and returns a pointer
 *  to the Shared Memory Configuration Table for the UNIX
 *  simulator.
 *
 *  INPUT PARAMETERS:
 *    localnode - local node number
 *    shmcfg    - address of pointer to SHM Config Table
 *
 *  OUTPUT PARAMETERS:
 *    *shmcfg   - pointer to SHM Config Table
 *
 *  NOTES:  The MP interrupt used is the Runway bus' ability to directly
 *          address the control registers of up to four CPUs and cause
 *          interrupts on them.
 *
 *          The following table illustrates the configuration limitations:
 *
 *                                   BUS     MAX
 *                          MODE    ENDIAN  NODES
 *                        ========= ====== =======
 *                         POLLED    BIG    2+
 *                        INTERRUPT  BIG    2..4
 *
 *  COPYRIGHT (c) 1989, 1990, 1991, 1992, 1993, 1994.
 *  On-Line Applications Research Corporation (OAR).
 *  All rights assigned to U.S. Government, 1994.
 *
 *  This material may be reproduced by or for the U.S. Government pursuant
 *  to the copyright license under the clause at DFARS 252.227-7013.  This
 *  notice must appear in all copies of this file and its derivatives.
 *
 *  $Id$
 */

#include <rtems.h>

#include <shm.h>
#include <bsp.h>

#include <stdio.h>
#include <errno.h>
#include <unistd.h>
#include <sys/types.h>
#include <sys/ipc.h>
#include <sys/shm.h>
#include <sys/sem.h>

#define INTERRUPT 0        /* can be interrupt or polling */
#define POLLING   1

shm_config_table BSP_shm_cfgtbl;

int              semid;

void Shm_Cause_interrupt_unix(
  rtems_unsigned32 node
);

void Shm_Get_configuration(
  rtems_unsigned32   localnode,
  shm_config_table **shmcfg
)
{
    rtems_unsigned32 maximum_nodes;
    int          i;
    int          shmid;
    char        *shm_addr;
    key_t        shm_key;
    key_t        sem_key;
    struct sembuf  sb;
    int          status;

    shm_key = 0xa000;

    shmid = shmget(shm_key, 16 * KILOBYTE, IPC_CREAT | 0660);
    if ( shmid == -1 ) {
       perror( "shmget" );
       exit( 0 );
    }

    shm_addr = shmat(shmid, (char *)0, SHM_RND);
    if ( shm_addr == (void *)-1 ) {
       perror( "shmat" );
       exit( 0 );
    }

    sem_key = 0xa001;

    maximum_nodes = Shm_RTEMS_MP_Configuration->maximum_nodes;
    semid = semget(sem_key, maximum_nodes + 1, IPC_CREAT | 0660);
    if ( semid == -1 ) {
       perror( "semget" );
       exit( 0 );
    }

    if ( Shm_Is_master_node() ) {
      for ( i=0 ; i <= maximum_nodes ; i++ ) {
        sb.sem_op  = 1;
        sb.sem_num = i;
        sb.sem_flg = 0;
        status = semop( semid, &sb, 1 );
        if ( status == -1 ) {
          fprintf( stderr, "Sem init failed %d\n", errno ); fflush( stderr );
          exit( 0 );
        }
      }
    }

    BSP_shm_cfgtbl.base         = (vol_u32 *)shm_addr;
    BSP_shm_cfgtbl.length       = 16 * KILOBYTE;
    BSP_shm_cfgtbl.format       = SHM_BIG;

    BSP_shm_cfgtbl.cause_intr   = Shm_Cause_interrupt_unix;

#ifdef NEUTRAL_BIG
    BSP_shm_cfgtbl.convert      = NULL_CONVERT;
#else
    BSP_shm_cfgtbl.convert      = CPU_swap_u32;
#endif

#if ( POLLING == 1 )
    BSP_shm_cfgtbl.poll_intr    = POLLED_MODE;
    BSP_shm_cfgtbl.Intr.address = NO_INTERRUPT;
    BSP_shm_cfgtbl.Intr.value   = NO_INTERRUPT;
    BSP_shm_cfgtbl.Intr.length  = NO_INTERRUPT;
#else
    BSP_shm_cfgtbl.poll_intr    = INTR_MODE;
    BSP_shm_cfgtbl.Intr.address = 0;    /* process id? */
    BSP_shm_cfgtbl.Intr.value   = 0;    /* signal to send? */
    BSP_shm_cfgtbl.Intr.length  = LONG;
#endif

    *shmcfg = &BSP_shm_cfgtbl;
}