Lines Matching refs:VMS
13 This file contains routines to extract VMS file attributes from a zipfile
40 #ifdef VMS /* VMS only! */
101 /* VMS success or warning status */
115 * "AssumeNone" defined. However, as the UI functionality of the VMS
135 /* Non-VMS attributes data */
252 ODS5 Invalid characters only in VMS V7.2 (which no one runs, right?):
510 record format. (BILF is available at various VMS archives.)\n\n",
525 /* VMS extra field types */
533 * VMS attributes ? create_xxx _flush_xxx
557 /* The VMS version of open_outfile() supports special return codes:
707 rfm = FAB$C_STMLF; /* Default, stream-LF format from VMS or UNIX */
773 * this seems to be excessively cautious, but only old VMS
915 * ignored when extracting zip entries with VMS attributes saved
920 rfm = outfab->fab$b_rfm; /* Use record format from VMS extra field */
938 * found in the Zip file's "VMS attributes" extra field.
956 /* If no XAB date/time, use attributes from non-VMS fields. */
973 * VMS/RMS symlink properties will be restored naturally when
1182 * ignored when extracting zip entries with VMS attributes saved
1242 /* VMS-format file name, derived from archive. */
1452 * Whether it makes sense to have a second layer of VMS-specific
1455 * looks more scary than just getting the VMS-specific stuff to work
1631 * and looks for VMS attribute records. Various date-time attributes
1731 "[ Warning: VMS version mismatch."));
2692 * If the symlink is already a symlink (restored with VMS/RMS
2977 * Convert VMS directory spec to VMS directory file name. That is,
3123 /* Extract the VMS file attributes from the preserved attribute
3143 /* Make an attribute descriptor list for the VMS creation and
3201 /* No VMS attribute data were found. Prepare to assemble
3202 * non-VMS attribute data.
3206 /* Get the (already converted) non-VMS permissions. */
3223 /* Set the directory date-time from the non-VMS data.
3232 /* Make an attribute descriptor list for the VMS creation
3246 /* Set the directory protection from the non-VMS data. */
3257 /* Point the FAB-NAM[L] to the VMS-format directory file name. */
3551 static void uxtime2vmstime( /* convert time_t value into 64 bit VMS bintime */
3828 static char vms_msgbuf[256]; /* VMS-specific error message. */
3854 "%s[ VMS status = %d ]\n", string, status));
3872 * The calling interface for the VMS version of do_wild() differs from all
3878 * - initial file search has failed, extended VMS error info is available
3931 * Parse the file spec. If sys$parse() fails, save the VMS
3955 /* Save the VMS error message for later use. */
3976 static ulg unix_to_vms[8]={ /* Map from UNIX rwx to VMS rwed */
3977 /* Note that unix w bit is mapped to VMS wd bits */
3990 #define SETDFPROT /* We are using undocumented VMS System Service */
3991 /* SYS$SETDFPROT here. If your version of VMS does */
4055 case VMS_: /*IM: ??? Does VMS Zip store protection in UNIX format ?*/
4069 * VMS (and probably others ??) leave 0 in the upper 16-bit
4077 * bits from the VMS extra field. But for now, the work-around
4527 return MPN_VOL_LABEL; /* can't set disk volume labels on VMS */
4552 /* GRR: for VMS, convert to internal format now or later? or never? */
4699 { /* Assume VMS root spec */
5177 VMS misinterprets return codes as rather obnoxious system errors ("access
5258 * VMS Status Code Summary (See STSDEF.H for details.)
5334 * For VMS v5.x:
5432 * Changed to include the "-x" part of the VMS version.
5434 * Prepared for VMS versions after 9. (We should live so long.)
5505 (ver_maj >= 6) ? "OpenVMS" : "VMS",
5509 "VMS",
5651 while preserving VMS-ness of ";version". */
5729 /* The declaration for LIB$INITIALIZE() is missing in the VMS system header
5733 (VMS system functions declared in the VMS system headers are defined in a
5751 #endif /* VMS */