File: ctxt_vw.c

package info (click to toggle)
dosemu-freedos 1%3A0.0.b9r5a%2Betch.1-0etch1
  • links: PTS
  • area: contrib
  • in suites: etch
  • size: 19,744 kB
  • ctags: 23,279
  • sloc: ansic: 143,864; asm: 20,397; makefile: 3,868; perl: 1,106; yacc: 690; sh: 553; pascal: 297; xml: 150; cpp: 67
file content (55 lines) | stat: -rw-r--r-- 1,159 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
51
52
53
54
55
/* $Id: ctxt_vw.c,v 1.1 2001/04/12 00:33:53 skaus Exp $

	View all entries of the specified type

*/

#include "../config.h"

#include <assert.h>
#include <stdio.h>

#include <environ.h>

#include "../include/context.h"
#include "../include/misc.h"
#include "../strings.h"

typedef struct {
	unsigned char tag;
	unsigned count;
} view_t;

/* Because new items are appended to the context, the items
	are automatically sorted ascending */
#pragma argsused
static int view(void *arg, word segm, word ofs)
{
	assert(segm);
	if(ctxtProbeItemTag(segm, ofs, ((view_t*)arg)->tag)) {
		++((view_t*)arg)->count;
		printf("%Fs\n", MK_FP(segm, ofs + 1));
	}
	return 0;                     /* don't stop */
}


int ctxtView(const Context_Tag tag, const unsigned empty)
{
	int rc;
	view_t param;

	assert(ctxtFromTag(tag) != CTXT_INVALID);

	param.tag = (unsigned char)tag;
	param.count = 0;

		/* return value == 0 --> OK */
	if((rc = env_forAll(ctxtFromTag(tag), view, (void*)&param)) == 0) {
		if(param.count)
			displayString(TEXT_MSG_ITEMS_DISPLAYED, param.count);
		else	displayString(empty);
	}

	return rc;
}