BPX4MKN (mknod) example

The following code creates a FIFO (pipe) named /u/fifos/fifo1 and user read-write, group read, other read permissions. For the callable service, see mknod (BPX1MKN, BPX4MKN) — Make a directory, a FIFO, a character special, or a regular file. For the data structure, see BPXYFTYP — File type definitions and BPXYMODE — Map the mode constants of the file services. AMODE 31 callers use BPX1MKN (mknod) example.

                                              
         MVC   BUFFERA(14),=CL14'/u/fifos/fifo1'                        
         MVC   BUFLENA,=F'14'                                           
         XC    S_MODE,S_MODE                                            
         MVI   S_TYPE,FT_FIFO        First in - first out               
         MVI   S_MODE2,S_IRUSR       Read write read read               
         MVI   S_MODE3,S_IWUSR+S_IRGRP+S_IROTH                          
         SPACE ,                                                        
         CALL  BPX4MKN,              Create FIFO or char special file  +
               (BUFLENA,             Input: Pathname length            +
               BUFFERA,              Input: Pathname                   +
               S_MODE,               Input: BPXYMODE and BPXYFTYP      +
               =A(0),                Input: Device id not used here    +
               RETVAL,               Return value: 0 or -1             +
               RETCODE,              Return code                       +
               RSNCODE),             Reason code                       +
               MF=(E,PLIST)          ----------------------------------