home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 7 / 07.iso / c / c150 / 1.ddi / OPENS.C < prev    next >
Encoding:
C/C++ Source or Header  |  1990-12-11  |  2.8 KB  |  101 lines
  1. /*-----------------------------------------------------------------------
  2.    opens.c -- db_VISTA system open() interface module
  3.  
  4.    Copyright (c) 1984-1990, Raima Corporation, All Rights Reserved
  5. -----------------------------------------------------------------------*/
  6.  
  7. /* ********************** EDIT HISTORY *******************************
  8.  
  9.  SCR    DATE    INI                   DESCRIPTION
  10. ----- --------- --- -----------------------------------------------------
  11.   115 19-Jul-88 RSC Integrate VAX/VMS changes into code
  12.   368 28-Jul-88 RSC Integrate BSD changes into code
  13.   310 10-Aug-88 RSC Cleanup function prototype.
  14.   571 27-Jan-89 RSC Removed extraneous include dbtype.h
  15.   571 30-Jan-89 WLW Added required header info for Windows compile w/o dbtype.h
  16.       21-Aug-89 WLW Removed VMS "retry" code.
  17. */
  18.  
  19. #include <stdio.h>
  20. #include <fcntl.h>
  21. #include "vista.h"
  22. #ifdef MSC
  23. #include <share.h>
  24. #include <io.h>
  25. #endif
  26. #ifdef ZOR
  27. #include <io.h>
  28. #include <share.h>
  29. #include <fcntl.h>
  30. #endif
  31.  
  32.  
  33. int INTERNAL_FIXED open_b(P1(CONST char DB_FAR *) Pi(unsigned int));
  34. int INTERNAL_FIXED commit_file(P1(int) Pi(DB_SHORT));
  35. int INTERNAL_FIXED dio_close(P1(FILE_NO));
  36.  
  37. #include <string.h>
  38.  
  39.  
  40. /* ======================================================================
  41.    Open a binary file for shared access
  42. */
  43. int INTERNAL_FIXED open_b(filenm, flags)
  44. CONST char DB_FAR *filenm;
  45. unsigned int flags;  
  46. {
  47.    int desc;
  48. #ifdef MSC
  49.    flags |= O_BINARY;
  50.    desc = sopen((char *)filenm, flags, SH_DENYNO, 0666);
  51. #endif
  52. #ifdef TURBO
  53.    flags |= O_BINARY | O_DENYNONE;
  54.    desc = open(filenm, flags, 0666);
  55. #endif
  56. #ifdef LAT
  57.    flags |= O_RAW | O_SDN;
  58.    desc = open(filenm, flags, 0666);
  59. #endif
  60. #ifdef ZOR
  61.    flags |= O_BINARY;
  62.    desc = sopen(filenm, flags, SH_DENYNO, 0666);
  63. #endif
  64.    return( desc );
  65. }
  66.  
  67.  
  68. /* ======================================================================
  69.    Cause a file's contents to be commited to disk
  70. */
  71. #ifdef ZOR
  72. int INTERNAL_FIXED commit_file(int file_num, DB_SHORT file_handle)
  73. #else
  74. int INTERNAL_FIXED commit_file(file_num, file_handle)
  75. int file_num;          /* db_VISTA file number */
  76. DB_SHORT file_handle;    /* OS file handle ( from open ) */
  77. #endif
  78. {
  79.    int dupfile;
  80.  
  81.    /* If there is a specific way to handle it use it */
  82.  
  83.    /* Other wise this SHOULD always work */
  84.    if ( (dupfile = dup(file_handle)) == -1 ) {
  85.       /* could not get a dup handle ... close the file */
  86.       if ( file_num >= 0 )
  87.      dio_close(file_num);
  88.       else
  89.      close(file_handle);
  90.    }
  91.    else
  92.       close(dupfile);
  93.  
  94.    /* If all else fails close the file - Last resort */
  95.    /*  dio_close(file_num); */
  96.  
  97.    return (0);
  98. }
  99. /* vpp -F -nUNIX -nWIN3 -nVANILLA_BSD -nWINDOWS -nVMS -nOS2 OPENS.c */
  100. /* vpp -F -nFAR_ALLOC -nARCHIVING -nDB_DLL -nBSD -nMEMLOCK -nIS_UNIX_REALLY -nREOPEN_FILES OPENS.c */
  101.