Subversion Repositories HelenOS-historic

Rev

Rev 1610 | Rev 1653 | Go to most recent revision | Only display areas with differences | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 1610 Rev 1631
1
/*  $OpenBSD: screen.c,v 1.13 2006/04/20 03:25:36 ray Exp $ */
1
/*  $OpenBSD: screen.c,v 1.13 2006/04/20 03:25:36 ray Exp $ */
2
/*  $NetBSD: screen.c,v 1.4 1995/04/29 01:11:36 mycroft Exp $   */
2
/*  $NetBSD: screen.c,v 1.4 1995/04/29 01:11:36 mycroft Exp $   */
3
 
3
 
4
/*-
4
/*-
5
 * Copyright (c) 1992, 1993
5
 * Copyright (c) 1992, 1993
6
 *  The Regents of the University of California.  All rights reserved.
6
 *  The Regents of the University of California.  All rights reserved.
7
 *
7
 *
8
 * This code is derived from software contributed to Berkeley by
8
 * This code is derived from software contributed to Berkeley by
9
 * Chris Torek and Darren F. Provine.
9
 * Chris Torek and Darren F. Provine.
10
 *
10
 *
11
 * Redistribution and use in source and binary forms, with or without
11
 * Redistribution and use in source and binary forms, with or without
12
 * modification, are permitted provided that the following conditions
12
 * modification, are permitted provided that the following conditions
13
 * are met:
13
 * are met:
14
 * 1. Redistributions of source code must retain the above copyright
14
 * 1. Redistributions of source code must retain the above copyright
15
 *    notice, this list of conditions and the following disclaimer.
15
 *    notice, this list of conditions and the following disclaimer.
16
 * 2. Redistributions in binary form must reproduce the above copyright
16
 * 2. Redistributions in binary form must reproduce the above copyright
17
 *    notice, this list of conditions and the following disclaimer in the
17
 *    notice, this list of conditions and the following disclaimer in the
18
 *    documentation and/or other materials provided with the distribution.
18
 *    documentation and/or other materials provided with the distribution.
19
 * 3. Neither the name of the University nor the names of its contributors
19
 * 3. Neither the name of the University nor the names of its contributors
20
 *    may be used to endorse or promote products derived from this software
20
 *    may be used to endorse or promote products derived from this software
21
 *    without specific prior written permission.
21
 *    without specific prior written permission.
22
 *
22
 *
23
 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
23
 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
24
 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
24
 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
25
 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
25
 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
26
 * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
26
 * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
27
 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
27
 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
28
 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
28
 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
29
 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
29
 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
30
 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
30
 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
31
 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
31
 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
32
 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
32
 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33
 * SUCH DAMAGE.
33
 * SUCH DAMAGE.
34
 *
34
 *
35
 *  @(#)screen.c    8.1 (Berkeley) 5/31/93
35
 *  @(#)screen.c    8.1 (Berkeley) 5/31/93
36
 */
36
 */
37
 
37
 
38
/*
38
/*
39
 * Tetris screen control.
39
 * Tetris screen control.
40
 */
40
 */
41
 
41
 
42
#include <err.h>
42
#include <err.h>
43
#include <stdio.h>
43
#include <stdio.h>
44
#include <stdlib.h>
44
#include <stdlib.h>
45
#include <string.h>
45
#include <string.h>
46
#include <unistd.h>
46
#include <unistd.h>
47
#include <io/stream.h>
47
#include <io/stream.h>
48
 
48
 
49
 
49
 
50
#include <async.h>
50
#include <async.h>
51
#include "screen.h"
51
#include "screen.h"
52
#include "tetris.h"
52
#include "tetris.h"
53
#include "../console/console.h"
53
#include "../console/console.h"
54
 
54
 
55
static cell curscreen[B_SIZE];  /* 1 => standout (or otherwise marked) */
55
static cell curscreen[B_SIZE];  /* 1 => standout (or otherwise marked) */
56
static int curscore;
56
static int curscore;
57
static int isset;       /* true => terminal is in game mode */
57
static int isset;       /* true => terminal is in game mode */
58
static void (*tstp)(int);
58
static void (*tstp)(int);
59
 
59
 
60
static void scr_stop(int);
60
static void scr_stop(int);
61
static void stopset(int);
61
static void stopset(int);
62
 
62
 
63
static char
63
static char
64
        *CEstr;         /* clear to end of line */
64
        *CEstr;         /* clear to end of line */
65
 
65
 
66
 
66
 
67
/*
67
/*
68
 * putstr() is for unpadded strings (either as in termcap(5) or
68
 * putstr() is for unpadded strings (either as in termcap(5) or
69
 * simply literal strings);
69
 * simply literal strings);
70
 */
70
 */
71
static inline void putstr(char *s)
71
static inline void putstr(char *s)
72
{
72
{
73
    while (*s)
73
    while (*s)
74
        putchar(*(s++));
74
        putchar(*(s++));
75
}
75
}
76
 
76
 
77
static int con_phone;
77
static int con_phone;
78
 
78
 
79
 
79
 
80
 
80
 
81
static void set_style(int fgcolor, int bgcolor)
81
static void set_style(int fgcolor, int bgcolor)
82
{
82
{
83
    async_msg_2(con_phone, CONSOLE_SET_STYLE, fgcolor, bgcolor);
83
    async_msg_2(con_phone, CONSOLE_SET_STYLE, fgcolor, bgcolor);
84
}
84
}
85
 
85
 
86
static void start_standout(void)
86
static void start_standout(void)
87
{
87
{
88
    set_style(0, 0xe0e0e0);
88
    set_style(0xf0f0f0, 0);
89
}
89
}
90
 
90
 
91
static void resume_normal(void)
91
static void resume_normal(void)
92
{
92
{
93
    set_style(0xe0e0e0, 0);
93
    set_style(0, 0xf0f0f0);
94
}
94
}
95
 
95
 
96
 
96
 
97
void clear_screen(void)
97
void clear_screen(void)
98
{
98
{
99
    async_msg(con_phone, CONSOLE_CLEAR, 0);
99
    async_msg(con_phone, CONSOLE_CLEAR, 0);
100
    moveto(0,0);
100
    moveto(0,0);
101
}
101
}
102
 
102
 
103
/*
103
/*
104
 * Clear the screen, forgetting the current contents in the process.
104
 * Clear the screen, forgetting the current contents in the process.
105
 */
105
 */
106
void
106
void
107
scr_clear(void)
107
scr_clear(void)
108
{
108
{
109
 
109
 
110
    resume_normal();
110
    resume_normal();
111
    async_msg(con_phone, CONSOLE_CLEAR, 0);
111
    async_msg(con_phone, CONSOLE_CLEAR, 0);
112
    curscore = -1;
112
    curscore = -1;
113
    memset((char *)curscreen, 0, sizeof(curscreen));
113
    memset((char *)curscreen, 0, sizeof(curscreen));
114
}
114
}
115
 
115
 
116
/*
116
/*
117
 * Set up screen
117
 * Set up screen
118
 */
118
 */
119
void
119
void
120
scr_init(void)
120
scr_init(void)
121
{
121
{
122
    con_phone = get_fd_phone(1);
122
    con_phone = get_fd_phone(1);
123
    async_msg(con_phone, CONSOLE_CURSOR_VISIBILITY, 0);
123
    async_msg(con_phone, CONSOLE_CURSOR_VISIBILITY, 0);
124
    resume_normal();
124
    resume_normal();
125
    scr_clear();
125
    scr_clear();
126
}
126
}
127
 
127
 
128
void moveto(int r, int c)
128
void moveto(int r, int c)
129
{
129
{
130
    async_msg_2(con_phone, CONSOLE_GOTO, r, c);
130
    async_msg_2(con_phone, CONSOLE_GOTO, r, c);
131
}
131
}
132
 
132
 
133
static void fflush(void)
133
static void fflush(void)
134
{
134
{
135
    async_msg(con_phone, CONSOLE_FLUSH, 0);
135
    async_msg(con_phone, CONSOLE_FLUSH, 0);
136
}
136
}
137
 
137
 
138
winsize_t winsize;
138
winsize_t winsize;
139
 
139
 
140
static int get_display_size(winsize_t *ws)
140
static int get_display_size(winsize_t *ws)
141
{
141
{
142
    return async_req_2(con_phone, CONSOLE_GETSIZE, 0, 0, &ws->ws_row, &ws->ws_col);
142
    return async_req_2(con_phone, CONSOLE_GETSIZE, 0, 0, &ws->ws_row, &ws->ws_col);
143
}
143
}
144
 
144
 
145
static void
145
static void
146
scr_stop(int sig)
146
scr_stop(int sig)
147
{
147
{
148
 
148
 
149
    scr_end();
149
    scr_end();
150
    scr_set();
150
    scr_set();
151
    scr_msg(key_msg, 1);
151
    scr_msg(key_msg, 1);
152
}
152
}
153
 
153
 
154
/*
154
/*
155
 * Set up screen mode.
155
 * Set up screen mode.
156
 */
156
 */
157
void
157
void
158
scr_set(void)
158
scr_set(void)
159
{
159
{
160
    winsize_t ws;
160
    winsize_t ws;
161
 
161
 
162
    Rows = 0, Cols = 0;
162
    Rows = 0, Cols = 0;
163
    if (get_display_size(&ws) == 0) {
163
    if (get_display_size(&ws) == 0) {
164
        Rows = ws.ws_row;
164
        Rows = ws.ws_row;
165
        Cols = ws.ws_col;
165
        Cols = ws.ws_col;
166
    }
166
    }
167
    if (Rows < MINROWS || Cols < MINCOLS) {
167
    if (Rows < MINROWS || Cols < MINCOLS) {
168
        char smallscr[55];
168
        char smallscr[55];
169
 
169
 
170
        snprintf(smallscr, sizeof(smallscr),
170
        snprintf(smallscr, sizeof(smallscr),
171
            "the screen is too small (must be at least %dx%d)",
171
            "the screen is too small (must be at least %dx%d)",
172
            MINROWS, MINCOLS);
172
            MINROWS, MINCOLS);
173
        stop(smallscr);
173
        stop(smallscr);
174
    }
174
    }
175
    isset = 1;
175
    isset = 1;
176
 
176
 
177
    scr_clear();
177
    scr_clear();
178
}
178
}
179
 
179
 
180
/*
180
/*
181
 * End screen mode.
181
 * End screen mode.
182
 */
182
 */
183
void
183
void
184
scr_end(void)
184
scr_end(void)
185
{
185
{
186
}
186
}
187
 
187
 
188
void
188
void
189
stop(char *why)
189
stop(char *why)
190
{
190
{
191
 
191
 
192
    if (isset)
192
    if (isset)
193
        scr_end();
193
        scr_end();
194
    errx(1, "aborting: %s", why);
194
    errx(1, "aborting: %s", why);
195
}
195
}
196
 
196
 
197
 
197
 
198
/*
198
/*
199
 * Update the screen.
199
 * Update the screen.
200
 */
200
 */
201
void
201
void
202
scr_update(void)
202
scr_update(void)
203
{
203
{
204
    cell *bp, *sp;
204
    cell *bp, *sp;
205
    cell so, cur_so = 0;
205
    cell so, cur_so = 0;
206
    int i, ccol, j;
206
    int i, ccol, j;
207
    static const struct shape *lastshape;
207
    static const struct shape *lastshape;
208
 
208
 
209
    /* always leave cursor after last displayed point */
209
    /* always leave cursor after last displayed point */
210
    curscreen[D_LAST * B_COLS - 1] = -1;
210
    curscreen[D_LAST * B_COLS - 1] = -1;
211
 
211
 
212
    if (score != curscore) {
212
    if (score != curscore) {
213
        moveto(0, 0);
213
        moveto(0, 0);
214
        printf("Score: %d", score);
214
        printf("Score: %d", score);
215
        curscore = score;
215
        curscore = score;
216
    }
216
    }
217
 
217
 
218
    /* draw preview of next pattern */
218
    /* draw preview of next pattern */
219
    if (showpreview && (nextshape != lastshape)) {
219
    if (showpreview && (nextshape != lastshape)) {
220
        int i;
220
        int i;
221
        static int r=5, c=2;
221
        static int r=5, c=2;
222
        int tr, tc, t;
222
        int tr, tc, t;
223
 
223
 
224
        lastshape = nextshape;
224
        lastshape = nextshape;
225
 
225
 
226
        /* clean */
226
        /* clean */
227
        resume_normal();
227
        resume_normal();
228
        moveto(r-1, c-1); putstr("          ");
228
        moveto(r-1, c-1); putstr("          ");
229
        moveto(r,   c-1); putstr("          ");
229
        moveto(r,   c-1); putstr("          ");
230
        moveto(r+1, c-1); putstr("          ");
230
        moveto(r+1, c-1); putstr("          ");
231
        moveto(r+2, c-1); putstr("          ");
231
        moveto(r+2, c-1); putstr("          ");
232
 
232
 
233
        moveto(r-3, c-2);
233
        moveto(r-3, c-2);
234
        putstr("Next shape:");
234
        putstr("Next shape:");
235
 
235
 
236
        /* draw */
236
        /* draw */
237
        start_standout();
237
        start_standout();
238
        moveto(r, 2 * c);
238
        moveto(r, 2 * c);
239
        putstr("  ");
239
        putstr("  ");
240
        for (i = 0; i < 3; i++) {
240
        for (i = 0; i < 3; i++) {
241
            t = c + r * B_COLS;
241
            t = c + r * B_COLS;
242
            t += nextshape->off[i];
242
            t += nextshape->off[i];
243
 
243
 
244
            tr = t / B_COLS;
244
            tr = t / B_COLS;
245
            tc = t % B_COLS;
245
            tc = t % B_COLS;
246
 
246
 
247
            moveto(tr, 2*tc);
247
            moveto(tr, 2*tc);
248
            putstr("  ");
248
            putstr("  ");
249
        }
249
        }
250
        resume_normal();
250
        resume_normal();
251
    }
251
    }
252
 
252
 
253
    bp = &board[D_FIRST * B_COLS];
253
    bp = &board[D_FIRST * B_COLS];
254
    sp = &curscreen[D_FIRST * B_COLS];
254
    sp = &curscreen[D_FIRST * B_COLS];
255
    for (j = D_FIRST; j < D_LAST; j++) {
255
    for (j = D_FIRST; j < D_LAST; j++) {
256
        ccol = -1;
256
        ccol = -1;
257
        for (i = 0; i < B_COLS; bp++, sp++, i++) {
257
        for (i = 0; i < B_COLS; bp++, sp++, i++) {
258
            if (*sp == (so = *bp))
258
            if (*sp == (so = *bp))
259
                continue;
259
                continue;
260
            *sp = so;
260
            *sp = so;
261
            if (i != ccol) {
261
            if (i != ccol) {
262
                if (cur_so) {
262
                if (cur_so) {
263
                    resume_normal();
263
                    resume_normal();
264
                    cur_so = 0;
264
                    cur_so = 0;
265
                }
265
                }
266
                moveto(RTOD(j), CTOD(i));
266
                moveto(RTOD(j), CTOD(i));
267
            }
267
            }
268
            if (so != cur_so) {
268
            if (so != cur_so) {
269
                if (so)
269
                if (so)
270
                    start_standout();
270
                    start_standout();
271
                else
271
                else
272
                    resume_normal();
272
                    resume_normal();
273
                cur_so = so;
273
                cur_so = so;
274
            }
274
            }
275
            putstr("  ");
275
            putstr("  ");
276
 
276
 
277
            ccol = i + 1;
277
            ccol = i + 1;
278
            /*
278
            /*
279
             * Look ahead a bit, to avoid extra motion if
279
             * Look ahead a bit, to avoid extra motion if
280
             * we will be redrawing the cell after the next.
280
             * we will be redrawing the cell after the next.
281
             * Motion probably takes four or more characters,
281
             * Motion probably takes four or more characters,
282
             * so we save even if we rewrite two cells
282
             * so we save even if we rewrite two cells
283
             * `unnecessarily'.  Skip it all, though, if
283
             * `unnecessarily'.  Skip it all, though, if
284
             * the next cell is a different color.
284
             * the next cell is a different color.
285
             */
285
             */
286
#define STOP (B_COLS - 3)
286
#define STOP (B_COLS - 3)
287
            if (i > STOP || sp[1] != bp[1] || so != bp[1])
287
            if (i > STOP || sp[1] != bp[1] || so != bp[1])
288
                continue;
288
                continue;
289
            if (sp[2] != bp[2])
289
            if (sp[2] != bp[2])
290
                sp[1] = -1;
290
                sp[1] = -1;
291
            else if (i < STOP && so == bp[2] && sp[3] != bp[3]) {
291
            else if (i < STOP && so == bp[2] && sp[3] != bp[3]) {
292
                sp[2] = -1;
292
                sp[2] = -1;
293
                sp[1] = -1;
293
                sp[1] = -1;
294
            }
294
            }
295
        }
295
        }
296
    }
296
    }
297
    if (cur_so)
297
    if (cur_so)
298
        resume_normal();
298
        resume_normal();
299
    fflush();
299
    fflush();
300
}
300
}
301
 
301
 
302
/*
302
/*
303
 * Write a message (set!=0), or clear the same message (set==0).
303
 * Write a message (set!=0), or clear the same message (set==0).
304
 * (We need its length in case we have to overwrite with blanks.)
304
 * (We need its length in case we have to overwrite with blanks.)
305
 */
305
 */
306
void
306
void
307
scr_msg(char *s, int set)
307
scr_msg(char *s, int set)
308
{
308
{
309
   
309
   
310
    int l = strlen(s);
310
    int l = strlen(s);
311
   
311
   
312
    moveto(Rows - 2, ((Cols - l) >> 1) - 1);
312
    moveto(Rows - 2, ((Cols - l) >> 1) - 1);
313
    if (set)
313
    if (set)
314
        putstr(s);
314
        putstr(s);
315
    else
315
    else
316
        while (--l >= 0)
316
        while (--l >= 0)
317
            (void) putchar(' ');
317
            (void) putchar(' ');
318
}
318
}
319
 
319