Initial import of the CDE 2.1.30 sources from the Open Group.

cde/lib/tt/mini_isam/iscntl.c

@@ -0,0 +1,104 @@
+/*%%  (c) Copyright 1993, 1994 Hewlett-Packard Company			 */
+/*%%  (c) Copyright 1993, 1994 International Business Machines Corp.	 */
+/*%%  (c) Copyright 1993, 1994 Sun Microsystems, Inc.			 */
+/*%%  (c) Copyright 1993, 1994 Novell, Inc. 				 */
+/*%%  $XConsortium: iscntl.c /main/3 1995/10/23 11:36:59 rswiston $ 			 				 */
+#ifndef lint
+static char sccsid[] = "@(#)iscntl.c	1.8 94/11/17";
+#endif
+/*
+ * Copyright (c) 1988 by Sun Microsystems, Inc.
+ */
+
+/*
+ * iscntl.c
+ *
+ * Description:
+ *	Generic control function
+ */
+
+#include <varargs.h>
+#include "isam_impl.h"
+
+
+/*
+ * err =  iscntl(isfd, args)
+ *
+ * Functions:
+ *
+ * iscntl(isfd, ISCNTL_RPCS_TO_SET, tout) - Set timeout for short operations
+ * iscntl(isfd, ISCNTL_RPCL_TO_SET, tout) - Set timeout for long operations
+ * iscntl(isfd, ISCNTL_RPCS_TO_GET) - Get timeout for short operations
+ * iscntl(isfd, ISCNTL_RPCL_TO_GET) - Get timeout for long operations
+ * iscntl(isfd, ISCNTL_TCP_TO_SET) - Set TCP reconnect timeout
+ * iscntl(isfd, ISCNTL_TCP_TO_GET) - Get TCP reconnect timeout
+ *
+ * iscntl(isfd, ISCNTL_APPLMAGIC_WRITE, string) - Write application magic
+ * iscntl(isfd, ISCNTL_APPLMAGIC_READ, buf) - Read application magic
+ *
+ * iscntl(ALLISFD, ISCNTL_FDLIMIT_SET, n) - Set limit on UNIX fd use
+ * iscntl(ALLISFD, ISCNTL_FDLIMIT_GET) - Set limit on UNIX fd use
+ *
+ * oldfunc = iscntl(ALLISFD, ISCNTL_FATAL, func) - Set fatal error handler
+ *     int func(msg) - Apllication handler
+ *     if 0 is returned, NetISAM will use openlog("NetISAM") and
+ *     syslog(ERR_LOG, msg) to log the error.
+ *
+ * iscntl(ALLISFD, ISCNTL_MASKSIGNALS, bool) 1 mask, 0 don't mask
+ *
+ * iscntl(isfd, ISCNTL_FSYNC) -  synchronize a file's in-core state
+ *				 with that on disk
+ *
+ */
+
+typedef int (* intfunc)();
+
+int 
+iscntl(isfd, func, va_alist)
+    int			isfd;
+    int			func;
+    va_dcl
+{
+    extern int		(*_isfatal_error_set_func())();
+    va_list		pvar;
+    int			ret;
+
+    va_start(pvar);
+    switch (func) {
+
+	  case ISCNTL_MASKSIGNALS:
+	    ret =  _issignals_cntl(va_arg(pvar, int));
+	    break;
+
+	  case ISCNTL_FATAL:
+	    ret =  (int)_isfatal_error_set_func(va_arg(pvar,  intfunc));
+	    break;
+
+	  case ISCNTL_FDLIMIT_SET:
+	    ret =  _watchfd_max_set(va_arg(pvar, int));
+	    break;
+
+	  case ISCNTL_FDLIMIT_GET:
+	    ret =  _watchfd_max_get();
+	    break;
+
+	  case ISCNTL_APPLMAGIC_WRITE:
+	    ret =  _isapplmw(isfd, (va_arg(pvar, char *)));
+	    break;
+
+	  case ISCNTL_APPLMAGIC_READ:
+	    ret =  _isapplmr(isfd, (va_arg(pvar, char *)));
+	    break;
+
+	  case ISCNTL_FSYNC:
+	    ret = _isfsync(isfd);
+	    break;
+
+	  default:
+	    _setiserrno2(EBADARG, '9', '0');
+	    ret =  ISERROR;
+    }
+
+    va_end(pvar);
+    return (ret);
+}