Windows NT 4.0 source code leak
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 
 
 
 
 

82 lines
2.2 KiB

/*
$Log: S:\oiwh\filing\wgfsputi.c_v $
*
* Rev 1.2 12 Apr 1995 03:56:12 JAR
* massaged to get compilation under windows 95
*
* Rev 1.1 06 Apr 1995 13:40:54 JAR
* altered return of public API's to be int, ran through PortTool
*/
//********************************************************************
//
// wgfsputi.c
//
//********************************************************************
#include "abridge.h"
#include <windows.h>
#include "fiodata.h"
#include "wgfs.h"
#include "oierror.h"
#ifdef TIMESTAMP
#include "timestmp.h"
#endif
//********************************************************************
//
// wgfsputi
//
//********************************************************************
int FAR PASCAL wgfsputi (hWnd, fildes, pgnum, gfsinfo, outfile, errcode)
HWND hWnd;
int fildes;
unsigned short pgnum;
lp_INFO gfsinfo;
lp_GFSFILE outfile;
LPINT errcode;
{
int status;
int cid, file_id, loc_rem;
#ifdef TIMESTAMP
timestmp((LPSTR)"Entry Point", (LPSTR)"wgfsputi",
(LPSTR)__FILE__, __LINE__, NULL, 0, NULL, 0);
#endif
if (*errcode = get_file_id(fildes, &file_id, &loc_rem, &cid)) {
#ifdef TIMESTAMP
timestmp((LPSTR)"Function Exit", (LPSTR)"wgfsputi",
(LPSTR)__FILE__, __LINE__, (LPSTR)"Function Returns: ",0xFFFF, (LPSTR)"errcode", *errcode);
#endif
return (-1);
}
if (loc_rem == LOCAL)
{ /* IF LOCAL */
/* LOCAL GFS call */
if ((status = gfsputi (file_id, pgnum, gfsinfo, outfile)) < 0)
*errcode = FIO_WRITE_ERROR;
}
// 9504.10 jar for windows 95 norwegians, this is commented out!
// else
// {
// /* RPC GFS call */
// if ((status = RPCgfsputi (hWnd, cid, file_id, pgnum,
// (struct _info FAR *) gfsinfo,
// (struct gfsfile FAR *) outfile, errcode)))
//
// if (!(*errcode))
// *errcode = FIO_RPC_ERROR;
// }
// 9504.10 jar for windows 95 norwegians, this is commented out!
//UnlockData (0);
#ifdef TIMESTAMP
timestmp((LPSTR)"Function Exit", (LPSTR)"wgfsputi",
(LPSTR)__FILE__, __LINE__, (LPSTR)"status", status, (LPSTR)"errcode", *errcode);
#endif
return (status);
}