[go: up one dir, main page]
Menu ▾ ▴

[r83]: / tags / xmd-2.5.37 / src / cdstep.c  Maximize  Restore  History

Download this file

144 lines (111 with data), 3.2 kB 

  1
  2
  3
  4
  5
  6
  7
  8
  9
 10
 11
 12
 13
 14
 15
 16
 17
 18
 19
 20
 21
 22
 23
 24
 25
 26
 27
 28
 29
 30
 31
 32
 33
 34
 35
 36
 37
 38
 39
 40
 41
 42
 43
 44
 45
 46
 47
 48
 49
 50
 51
 52
 53
 54
 55
 56
 57
 58
 59
 60
 61
 62
 63
 64
 65
 66
 67
 68
 69
 70
 71
 72
 73
 74
 75
 76
 77
 78
 79
 80
 81
 82
 83
 84
 85
 86
 87
 88
 89
 90
 91
 92
 93
 94
 95
 96
 97
 98
 99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
/*

xmd - molecular dynamics for metals and ceramics

By Jonathan Rifkin <jon.rifkin@uconn.edu>

Copyright 1995-2004 Jonathan Rifkin



This program is free software; you can redistribute it and/or

modify it under the terms of the GNU General Public License

as published by the Free Software Foundation; either version 2

of the License, or (at your option) any later version.



This program is distributed in the hope that it will be useful,

but WITHOUT ANY WARRANTY; without even the implied warranty of

MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the

GNU General Public License for more details.



You should have received a copy of the GNU General Public License

along with this program; if not, write to the Free Software

Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.

*/





/*

Functions for organizing output every N steps

6 May 1996

*/







/*

************************************************************************

Include Files

************************************************************************

*/



#include <stdio.h>

#include "cdhouse.h"

#include "cdstep.h"





/*

************************************************************************

Exported Functions

************************************************************************

*/



void OpenStepOutput (StepOutput_t *StepOutput)

	{

	char *FileName;



	/*  Open File	*/

	if (StepOutput->Save)

		{



		/*  GET FILE NAME  */

		FileName = StepOutput->FileName;

		if (*FileName=='+')

			FileName++;



		/*  OPEN FILE FOR FIRST TIME AS WRITE	*/

		if (StepOutput->IsFileNew)

			{

			StepOutput->IsFileNew = FALSE;

			StepOutput->File = fopen (FileName, "wt");

			}



		/*  OPEN FILE AS APPEND  */

		else

			StepOutput->File = fopen (FileName, "at");



		/*  Error opening file	*/

		if (StepOutput->File==NULL)

			{

			printf ("\n*** ERROR: Cannot open Step Output File %s.\n", StepOutput->FileName);

			CleanAfterError();

			}

		}

	}





/*  Call every step, returns true when time to output  */

BOOLEAN NowStepOutput (StepOutput_t *StepOutput)

	{

	BOOLEAN Status = FALSE;



	/*  If step output turned on	*/

	if (StepOutput->Save)

		{



		/*  Increment current step  */

		StepOutput->CurrentStep++;



		/*  If enough steps passed then indicate output this step  */

		if (StepOutput->CurrentStep == StepOutput->StepIncrement)

			{

			StepOutput->CurrentStep = 0;

			Status = TRUE;

			}

		}



	return Status;

	}





BOOLEAN ForceStepOutput (StepOutput_t *StepOutput, BOOLEAN ForceOutput)

	{

	BOOLEAN Status = FALSE;



	/*  If step output turned on	*/

	if (StepOutput->Save)

		{



		/*  Increment current step  */

		StepOutput->CurrentStep++;



		/*  If enough steps passed then indicate output this step  */

		if (ForceOutput)

			{

			StepOutput->CurrentStep = 0;

			Status = TRUE;

			}

		}



	return Status;

	}





void CloseStepOutput (StepOutput_t *StepOutput)

	{

	if (StepOutput->Save && StepOutput->File!=NULL)

		{

		fclose (StepOutput->File);

		StepOutput->File = NULL;

		}

	}



void InitStepOutput (StepOutput_t *StepOutput)

	{

	StepOutput->File = NULL;

	StepOutput->Save = FALSE;

	StepOutput->IsFileNew = FALSE;

	StepOutput->CurrentStep = 0;

	StepOutput->StepIncrement = 0;

	}