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

cde/lib/tt/slib/mp_s_file.C

@@ -0,0 +1,115 @@
+//%%  (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: mp_s_file.C /main/3 1995/10/23 11:54:43 rswiston $ 			 				
+/*
+ *
+ * mp_s_file.cc
+ *
+ * Copyright (c) 1990 by Sun Microsystems, Inc.
+ */
+#include <stdio.h>
+#include "mp_s_mp.h"
+#include "mp/mp_pattern.h"
+#include "mp_s_file.h"
+
+//
+// Use parent class (_Tt_file) for construction and destruction.
+//
+_Tt_s_file::_Tt_s_file()
+{
+}
+
+_Tt_s_file::_Tt_s_file(
+	const _Tt_string &path
+)
+{
+	networkPath = path;
+}
+
+_Tt_s_file::~_Tt_s_file()
+{
+}
+
+Tt_status
+_Tt_s_file::s_join(
+	_Tt_s_procid_ptr &p
+) 
+{
+	_Tt_pattern_list_cursor		pats(p->patterns());
+	int				scopes;
+	int				fpatterns_found = 0;
+
+	while (pats.next()) {
+		scopes = pats->scopes();
+		if (scopes&(1<<TT_FILE)) {
+			fpatterns_found = 1;
+		}
+		if (scopes&(1<<TT_FILE) ||
+		    scopes&(1<<TT_FILE_IN_SESSION)) {
+			pats->add_file(networkPath);
+			_tt_s_mp->mod_file_scope(networkPath, 1);
+		}
+	}
+	if (fpatterns_found) {
+		p->add_joined_file(networkPath);
+	}
+	// note: TT_WRN_NOTFOUND is returned if there are no
+	// TT_FILE patterns that were updated. This is just an
+	// indication to the client side that it doesn't need
+	// to update the database. If patterns were found and
+	// this is the first procid in the session to join
+	// this file then TT_WRN_STALE_OBJID is returned
+	// telling the client side to update the database.
+	return((fpatterns_found) ?
+	       ((procs_joined() == 1) ? TT_WRN_STALE_OBJID : TT_OK)
+	       : TT_WRN_NOTFOUND);
+}
+
+Tt_status
+_Tt_s_file::s_quit(
+	_Tt_s_procid_ptr &p
+)
+{
+	_Tt_pattern_list_cursor		pats(p->patterns());
+	int				scopes;
+	int				fpatterns_found = 0;
+		
+	while (pats.next()) {
+		scopes = pats->scopes();
+		if (scopes&(1<<TT_FILE)) {
+			fpatterns_found = 1;
+		}
+		if (scopes&(1<<TT_FILE) ||
+		    scopes&(1<<TT_FILE_IN_SESSION)) {
+			pats->del_file(networkPath);
+			_tt_s_mp->mod_file_scope(networkPath, 0);
+		}
+	}
+	if (fpatterns_found) {
+		p->del_joined_file(networkPath);
+	} else {
+		return TT_WRN_NOTFOUND;
+	}
+	if (_tt_s_mp->in_file_scope(networkPath)) {
+		return TT_OK;
+	} else {
+		// Tells _Tt_c_file::c_quit() to delete this session from file
+		return TT_WRN_STALE_OBJID;
+	}
+}
+
+int
+_Tt_s_file::procs_joined()
+{
+	_Tt_s_procid_table_cursor	procs(_tt_s_mp->active_procs);
+	int			nprocs = 0;
+	
+	while (procs.next()) {
+		if (procs->joined_to_file(networkPath)) {
+			nprocs++;
+		}
+	}
+	return(nprocs);
+}