home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 18 REXX / 18-REXX.zip / rexxuuxx.zip / UUXXCODE.CV2 < prev    next >
Text File  |  1997-05-11  |  2KB  |  41 lines

  1.      /* Declarations for Unix-style file encoding/decoding routines */
  2.  
  3.      DCL  UUENCODE_FILE                 ENTRY(PTR)
  4.                                         OPTIONS(BYVALUE NODESCRIPTOR IRRED),
  5.  
  6.           UUDECODE_FILE                 ENTRY(PTR)
  7.                                         OPTIONS(BYVALUE NODESCRIPTOR IRRED),
  8.  
  9.           XXENCODE_FILE                 ENTRY(PTR)
  10.                                         OPTIONS(BYVALUE NODESCRIPTOR IRRED),
  11.  
  12.           XXDECODE_FILE                 ENTRY(PTR)
  13.                                         OPTIONS(BYVALUE NODESCRIPTOR IRRED),
  14.  
  15.           BASE64_ENCODE                 ENTRY(PTR)
  16.                                         OPTIONS(BYVALUE NODESCRIPTOR IRRED),
  17.  
  18.           BASE64_DECODE                 ENTRY(PTR)
  19.                                         OPTIONS(BYVALUE NODESCRIPTOR IRRED);
  20.  
  21.      DCL  Max_in                        BIN FIXED(16,0) UNSIGNED INIT(0B),
  22.  
  23.           1    UUXX_Encode_struct       BASED,
  24.                2    In_cnt                   BIN FIXED(16,0) UNSIGNED,
  25.                2    Output_filename          CHAR(260) VAR,
  26.                2    Msg_file                 CHAR(260) VAR INIT('STDOUT:'),
  27.                2    Input_filename((Max_in) REFER (In_cnt)) CHAR(260) VAR,
  28.  
  29.           1    UUXX_Decode_struct       BASED,
  30.                2    In_len                   BIN FIXED(16,0) UNSIGNED,
  31.                2    Horton_bug               BIT(1) ALIGNED INIT('0'B),
  32.                2    Msg_file                 CHAR(260) VAR INIT('STDOUT:'),
  33.                2    Input_filename_list      CHAR((Max_in) REFER (In_len)) VAR,
  34.  
  35.           1    B64_Decode_struct        BASED,
  36.                2    Valid_rec_len            BIN FIXED(16,0) UNSIGNED,
  37.                2    In_len                   BIN FIXED(16,0) UNSIGNED,
  38.                2    Output_filename          CHAR(260) VAR,
  39.                2    Msg_file                 CHAR(260) VAR INIT('STDOUT:'),
  40.                2    Input_filename_list      CHAR((Max_in) REFER (In_len)) VAR;
  41.