/* Copyright 2000-2004 The Apache Software Foundation
		 *
		 * Licensed under the Apache License, Version 2.0 (the "License");
		 * you may not use this file except in compliance with the License.
		 * You may obtain a copy of the License at
		 *
		 *     http://www.apache.org/licenses/LICENSE-2.0
		 *
		 * Unless required by applicable law or agreed to in writing, software
		 * distributed under the License is distributed on an "AS IS" BASIS,
		 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
		 * See the License for the specific language governing permissions and
		 * limitations under the License.
		 */
		
		#include "apr_arch_file_io.h"
		
		static apr_status_t setptr(apr_file_t *thefile, apr_off_t pos )
      ######    {
      ######        apr_off_t newbufpos;
      ######        int rc;
		
      ######        if (thefile->direction == 1) {
      ######            apr_file_flush(thefile);
      ######            thefile->bufpos = thefile->direction = thefile->dataRead = 0;
		    }
		
      ######        newbufpos = pos - (thefile->filePtr - thefile->dataRead);
      ######        if (newbufpos >= 0 && newbufpos <= thefile->dataRead) {
      ######            thefile->bufpos = newbufpos;
      ######            rc = 0;
		    } 
		    else {
		#if defined(NETWARE) && APR_HAS_LARGE_FILES
		        rc = lseek64(thefile->filedes, pos, SEEK_SET);
		#else 
      ######            rc = lseek(thefile->filedes, pos, SEEK_SET);
		#endif
		
      ######            if (rc != -1 ) {
      ######                thefile->bufpos = thefile->dataRead = 0;
      ######                thefile->filePtr = pos;
      ######                rc = 0;
		        }
		        else {
      ######                rc = errno;
		        }
		    }
		
      ######        return rc;
		}
		
		
		APR_DECLARE(apr_status_t) apr_file_seek(apr_file_t *thefile, apr_seek_where_t where, apr_off_t *offset)
           7    {
           7        apr_off_t rv;
		
           7        thefile->eof_hit = 0;
		
           7        if (thefile->buffered) {
      ######            int rc = EINVAL;
      ######            apr_finfo_t finfo;
		
      ######            switch (where) {
		        case APR_SET:
      ######                rc = setptr(thefile, *offset);
      ######                break;
		
		        case APR_CUR:
      ######                rc = setptr(thefile, thefile->filePtr - thefile->dataRead + thefile->bufpos + *offset);
      ######                break;
		
		        case APR_END:
      ######                rc = apr_file_info_get(&finfo, APR_FINFO_SIZE, thefile);
      ######                if (rc == APR_SUCCESS)
      ######                    rc = setptr(thefile, finfo.size - *offset);
		            break;
		        }
		
      ######            *offset = thefile->filePtr - thefile->dataRead + thefile->bufpos;
      ######            return rc;
		    }
		    else {
		
		#if defined(NETWARE) && APR_HAS_LARGE_FILES
		        rv = lseek64(thefile->filedes, *offset, where);
		#else 
           7            rv = lseek(thefile->filedes, *offset, where);
		#endif
           7            if (rv == -1) {
      ######                *offset = -1;
      ######                return errno;
		        }
		        else {
           7                *offset = rv;
           7                return APR_SUCCESS;
		        }
		    }
		}
		
		apr_status_t apr_file_trunc(apr_file_t *fp, apr_off_t offset)
      ######    {
		#if defined(NETWARE) && APR_HAS_LARGE_FILES
		    if (ftruncate64(fp->filedes, offset) == -1) {
		#else 
      ######        if (ftruncate(fp->filedes, offset) == -1) {
		#endif
      ######            return errno;
		    }
      ######        return setptr(fp, offset);
		}