File: blockio.c

package info (click to toggle)
levee 3.4o-7
  • links: PTS
  • area: main
  • in suites: etch, etch-m68k
  • size: 360 kB
  • ctags: 646
  • sloc: ansic: 5,484; makefile: 73; asm: 29; sh: 25
file content (50 lines) | stat: -rw-r--r-- 1,391 bytes parent folder | download | duplicates (2)
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
/*
 * LEVEE, or Captain Video;  A vi clone
 *
 * Copyright (c) 1982-1997 David L Parsons
 * All rights reserved.
 *
 * Redistribution and use in source and binary forms, without or
 * without modification, are permitted provided that the above
 * copyright notice and this paragraph are duplicated in all such
 * forms and that any documentation, advertising materials, and
 * other materials related to such distribution and use acknowledge
 * that the software was developed by David L Parsons (orc@pell.chi.il.us).
 * My name may not be used to endorse or promote products derived
 * from this software without specific prior written permission.
 * THIS SOFTWARE IS PROVIDED AS IS'' AND WITHOUT ANY EXPRESS OR
 * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
 * WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR
 * PURPOSE.
 */
#include "levee.h"
#include "extern.h"

/* read in a file -- return TRUE -- read file
			    FALSE-- file too big
*/

int PROC
addfile(f, start, endd, size)
FILE *f;
int start;
int endd, *size;
{
    register int chunk;

    chunk = read(fileno(f), core+start, (endd-start)-1);

    *size = chunk;
    return chunk < (endd-start)-1;
}


/* write out a file -- return TRUE if ok. */

bool PROC
putfile(f, start, endd)
register FILE *f;
register int start, endd;
{
    return write(fileno(f), core+start, endd-start) == (endd-start);
}