Subversion Repositories HelenOS

Rev

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

Rev 1787 Rev 2479
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
/** @addtogroup tetris
38
/** @addtogroup tetris
39
 * @{
39
 * @{
40
 */
40
 */
41
/** @file
41
/** @file
42
 */
42
 */
43
 
43
 
44
/*
44
/*
45
 * Tetris screen control.
45
 * Tetris screen control.
46
 */
46
 */
47
 
47
 
48
#include <err.h>
48
#include <err.h>
49
#include <stdio.h>
49
#include <stdio.h>
50
#include <stdlib.h>
50
#include <stdlib.h>
51
#include <string.h>
51
#include <string.h>
52
#include <unistd.h>
52
#include <unistd.h>
53
#include <io/stream.h>
53
#include <io/stream.h>
54
 
54
 
55
 
55
 
56
#include <async.h>
56
#include <async.h>
57
#include "screen.h"
57
#include "screen.h"
58
#include "tetris.h"
58
#include "tetris.h"
59
#include "../console/console.h"
59
#include "../../srv/console/console.h"
60
 
60
 
61
static cell curscreen[B_SIZE];  /* 1 => standout (or otherwise marked) */
61
static cell curscreen[B_SIZE];  /* 1 => standout (or otherwise marked) */
62
static int curscore;
62
static int curscore;
63
static int isset;       /* true => terminal is in game mode */
63
static int isset;       /* true => terminal is in game mode */
64
 
64
 
65
 
65
 
66
/*
66
/*
67
 * putstr() is for unpadded strings (either as in termcap(5) or
67
 * putstr() is for unpadded strings (either as in termcap(5) or
68
 * simply literal strings);
68
 * simply literal strings);
69
 */
69
 */
70
static inline void putstr(char *s)
70
static inline void putstr(char *s)
71
{
71
{
72
    while (*s)
72
    while (*s)
73
        putchar(*(s++));
73
        putchar(*(s++));
74
}
74
}
75
 
75
 
76
static int con_phone;
76
static int con_phone;
77
 
77
 
78
 
78
 
79
 
79
 
80
static void set_style(int fgcolor, int bgcolor)
80
static void set_style(int fgcolor, int bgcolor)
81
{
81
{
82
    async_msg_2(con_phone, CONSOLE_SET_STYLE, fgcolor, bgcolor);
82
    async_msg_2(con_phone, CONSOLE_SET_STYLE, fgcolor, bgcolor);
83
}
83
}
84
 
84
 
85
static void start_standout(void)
85
static void start_standout(void)
86
{
86
{
87
    set_style(0xf0f0f0, 0);
87
    set_style(0xf0f0f0, 0);
88
}
88
}
89
 
89
 
90
static void resume_normal(void)
90
static void resume_normal(void)
91
{
91
{
92
    set_style(0, 0xf0f0f0);
92
    set_style(0, 0xf0f0f0);
93
}
93
}
94
 
94
 
95
 
95
 
96
void clear_screen(void)
96
void clear_screen(void)
97
{
97
{
98
    async_msg(con_phone, CONSOLE_CLEAR, 0);
98
    async_msg(con_phone, CONSOLE_CLEAR, 0);
99
    moveto(0,0);
99
    moveto(0,0);
100
}
100
}
101
 
101
 
102
/*
102
/*
103
 * Clear the screen, forgetting the current contents in the process.
103
 * Clear the screen, forgetting the current contents in the process.
104
 */
104
 */
105
void
105
void
106
scr_clear(void)
106
scr_clear(void)
107
{
107
{
108
 
108
 
109
    resume_normal();
109
    resume_normal();
110
    async_msg(con_phone, CONSOLE_CLEAR, 0);
110
    async_msg(con_phone, CONSOLE_CLEAR, 0);
111
    curscore = -1;
111
    curscore = -1;
112
    memset((char *)curscreen, 0, sizeof(curscreen));
112
    memset((char *)curscreen, 0, sizeof(curscreen));
113
}
113
}
114
 
114
 
115
/*
115
/*
116
 * Set up screen
116
 * Set up screen
117
 */
117
 */
118
void
118
void
119
scr_init(void)
119
scr_init(void)
120
{
120
{
121
    con_phone = get_fd_phone(1);
121
    con_phone = get_fd_phone(1);
122
    async_msg(con_phone, CONSOLE_CURSOR_VISIBILITY, 0);
122
    async_msg(con_phone, CONSOLE_CURSOR_VISIBILITY, 0);
123
    resume_normal();
123
    resume_normal();
124
    scr_clear();
124
    scr_clear();
125
}
125
}
126
 
126
 
127
void moveto(int r, int c)
127
void moveto(int r, int c)
128
{
128
{
129
    async_msg_2(con_phone, CONSOLE_GOTO, r, c);
129
    async_msg_2(con_phone, CONSOLE_GOTO, r, c);
130
}
130
}
131
 
131
 
132
static void fflush(void)
132
static void fflush(void)
133
{
133
{
134
    async_msg(con_phone, CONSOLE_FLUSH, 0);
134
    async_msg(con_phone, CONSOLE_FLUSH, 0);
135
}
135
}
136
 
136
 
137
winsize_t winsize;
137
winsize_t winsize;
138
 
138
 
139
static int get_display_size(winsize_t *ws)
139
static int get_display_size(winsize_t *ws)
140
{
140
{
141
    return async_req_2(con_phone, CONSOLE_GETSIZE, 0, 0, &ws->ws_row, &ws->ws_col);
141
    return async_req_2(con_phone, CONSOLE_GETSIZE, 0, 0, &ws->ws_row, &ws->ws_col);
142
}
142
}
143
 
143
 
144
/*
144
/*
145
 * Set up screen mode.
145
 * Set up screen mode.
146
 */
146
 */
147
void
147
void
148
scr_set(void)
148
scr_set(void)
149
{
149
{
150
    winsize_t ws;
150
    winsize_t ws;
151
 
151
 
152
    Rows = 0, Cols = 0;
152
    Rows = 0, Cols = 0;
153
    if (get_display_size(&ws) == 0) {
153
    if (get_display_size(&ws) == 0) {
154
        Rows = ws.ws_row;
154
        Rows = ws.ws_row;
155
        Cols = ws.ws_col;
155
        Cols = ws.ws_col;
156
    }
156
    }
157
    if (Rows < MINROWS || Cols < MINCOLS) {
157
    if (Rows < MINROWS || Cols < MINCOLS) {
158
        char smallscr[55];
158
        char smallscr[55];
159
 
159
 
160
        snprintf(smallscr, sizeof(smallscr),
160
        snprintf(smallscr, sizeof(smallscr),
161
            "the screen is too small (must be at least %dx%d)",
161
            "the screen is too small (must be at least %dx%d)",
162
            MINROWS, MINCOLS);
162
            MINROWS, MINCOLS);
163
        stop(smallscr);
163
        stop(smallscr);
164
    }
164
    }
165
    isset = 1;
165
    isset = 1;
166
 
166
 
167
    scr_clear();
167
    scr_clear();
168
}
168
}
169
 
169
 
170
/*
170
/*
171
 * End screen mode.
171
 * End screen mode.
172
 */
172
 */
173
void
173
void
174
scr_end(void)
174
scr_end(void)
175
{
175
{
176
}
176
}
177
 
177
 
178
void
178
void
179
stop(char *why)
179
stop(char *why)
180
{
180
{
181
 
181
 
182
    if (isset)
182
    if (isset)
183
        scr_end();
183
        scr_end();
184
    errx(1, "aborting: %s", why);
184
    errx(1, "aborting: %s", why);
185
}
185
}
186
 
186
 
187
 
187
 
188
/*
188
/*
189
 * Update the screen.
189
 * Update the screen.
190
 */
190
 */
191
void
191
void
192
scr_update(void)
192
scr_update(void)
193
{
193
{
194
    cell *bp, *sp;
194
    cell *bp, *sp;
195
    cell so, cur_so = 0;
195
    cell so, cur_so = 0;
196
    int i, ccol, j;
196
    int i, ccol, j;
197
    static const struct shape *lastshape;
197
    static const struct shape *lastshape;
198
 
198
 
199
    /* always leave cursor after last displayed point */
199
    /* always leave cursor after last displayed point */
200
    curscreen[D_LAST * B_COLS - 1] = -1;
200
    curscreen[D_LAST * B_COLS - 1] = -1;
201
 
201
 
202
    if (score != curscore) {
202
    if (score != curscore) {
203
        moveto(0, 0);
203
        moveto(0, 0);
204
        printf("Score: %d", score);
204
        printf("Score: %d", score);
205
        curscore = score;
205
        curscore = score;
206
    }
206
    }
207
 
207
 
208
    /* draw preview of next pattern */
208
    /* draw preview of next pattern */
209
    if (showpreview && (nextshape != lastshape)) {
209
    if (showpreview && (nextshape != lastshape)) {
210
        int i;
210
        int i;
211
        static int r=5, c=2;
211
        static int r=5, c=2;
212
        int tr, tc, t;
212
        int tr, tc, t;
213
 
213
 
214
        lastshape = nextshape;
214
        lastshape = nextshape;
215
 
215
 
216
        /* clean */
216
        /* clean */
217
        resume_normal();
217
        resume_normal();
218
        moveto(r-1, c-1); putstr("          ");
218
        moveto(r-1, c-1); putstr("          ");
219
        moveto(r,   c-1); putstr("          ");
219
        moveto(r,   c-1); putstr("          ");
220
        moveto(r+1, c-1); putstr("          ");
220
        moveto(r+1, c-1); putstr("          ");
221
        moveto(r+2, c-1); putstr("          ");
221
        moveto(r+2, c-1); putstr("          ");
222
 
222
 
223
        moveto(r-3, c-2);
223
        moveto(r-3, c-2);
224
        putstr("Next shape:");
224
        putstr("Next shape:");
225
 
225
 
226
        /* draw */
226
        /* draw */
227
        start_standout();
227
        start_standout();
228
        moveto(r, 2 * c);
228
        moveto(r, 2 * c);
229
        putstr("  ");
229
        putstr("  ");
230
        for (i = 0; i < 3; i++) {
230
        for (i = 0; i < 3; i++) {
231
            t = c + r * B_COLS;
231
            t = c + r * B_COLS;
232
            t += nextshape->off[i];
232
            t += nextshape->off[i];
233
 
233
 
234
            tr = t / B_COLS;
234
            tr = t / B_COLS;
235
            tc = t % B_COLS;
235
            tc = t % B_COLS;
236
 
236
 
237
            moveto(tr, 2*tc);
237
            moveto(tr, 2*tc);
238
            putstr("  ");
238
            putstr("  ");
239
        }
239
        }
240
        resume_normal();
240
        resume_normal();
241
    }
241
    }
242
 
242
 
243
    bp = &board[D_FIRST * B_COLS];
243
    bp = &board[D_FIRST * B_COLS];
244
    sp = &curscreen[D_FIRST * B_COLS];
244
    sp = &curscreen[D_FIRST * B_COLS];
245
    for (j = D_FIRST; j < D_LAST; j++) {
245
    for (j = D_FIRST; j < D_LAST; j++) {
246
        ccol = -1;
246
        ccol = -1;
247
        for (i = 0; i < B_COLS; bp++, sp++, i++) {
247
        for (i = 0; i < B_COLS; bp++, sp++, i++) {
248
            if (*sp == (so = *bp))
248
            if (*sp == (so = *bp))
249
                continue;
249
                continue;
250
            *sp = so;
250
            *sp = so;
251
            if (i != ccol) {
251
            if (i != ccol) {
252
                if (cur_so) {
252
                if (cur_so) {
253
                    resume_normal();
253
                    resume_normal();
254
                    cur_so = 0;
254
                    cur_so = 0;
255
                }
255
                }
256
                moveto(RTOD(j), CTOD(i));
256
                moveto(RTOD(j), CTOD(i));
257
            }
257
            }
258
            if (so != cur_so) {
258
            if (so != cur_so) {
259
                if (so)
259
                if (so)
260
                    start_standout();
260
                    start_standout();
261
                else
261
                else
262
                    resume_normal();
262
                    resume_normal();
263
                cur_so = so;
263
                cur_so = so;
264
            }
264
            }
265
            putstr("  ");
265
            putstr("  ");
266
 
266
 
267
            ccol = i + 1;
267
            ccol = i + 1;
268
            /*
268
            /*
269
             * Look ahead a bit, to avoid extra motion if
269
             * Look ahead a bit, to avoid extra motion if
270
             * we will be redrawing the cell after the next.
270
             * we will be redrawing the cell after the next.
271
             * Motion probably takes four or more characters,
271
             * Motion probably takes four or more characters,
272
             * so we save even if we rewrite two cells
272
             * so we save even if we rewrite two cells
273
             * `unnecessarily'.  Skip it all, though, if
273
             * `unnecessarily'.  Skip it all, though, if
274
             * the next cell is a different color.
274
             * the next cell is a different color.
275
             */
275
             */
276
#define STOP (B_COLS - 3)
276
#define STOP (B_COLS - 3)
277
            if (i > STOP || sp[1] != bp[1] || so != bp[1])
277
            if (i > STOP || sp[1] != bp[1] || so != bp[1])
278
                continue;
278
                continue;
279
            if (sp[2] != bp[2])
279
            if (sp[2] != bp[2])
280
                sp[1] = -1;
280
                sp[1] = -1;
281
            else if (i < STOP && so == bp[2] && sp[3] != bp[3]) {
281
            else if (i < STOP && so == bp[2] && sp[3] != bp[3]) {
282
                sp[2] = -1;
282
                sp[2] = -1;
283
                sp[1] = -1;
283
                sp[1] = -1;
284
            }
284
            }
285
        }
285
        }
286
    }
286
    }
287
    if (cur_so)
287
    if (cur_so)
288
        resume_normal();
288
        resume_normal();
289
    fflush();
289
    fflush();
290
}
290
}
291
 
291
 
292
/*
292
/*
293
 * Write a message (set!=0), or clear the same message (set==0).
293
 * Write a message (set!=0), or clear the same message (set==0).
294
 * (We need its length in case we have to overwrite with blanks.)
294
 * (We need its length in case we have to overwrite with blanks.)
295
 */
295
 */
296
void
296
void
297
scr_msg(char *s, int set)
297
scr_msg(char *s, int set)
298
{
298
{
299
   
299
   
300
    int l = strlen(s);
300
    int l = strlen(s);
301
   
301
   
302
    moveto(Rows - 2, ((Cols - l) >> 1) - 1);
302
    moveto(Rows - 2, ((Cols - l) >> 1) - 1);
303
    if (set)
303
    if (set)
304
        putstr(s);
304
        putstr(s);
305
    else
305
    else
306
        while (--l >= 0)
306
        while (--l >= 0)
307
            (void) putchar(' ');
307
            (void) putchar(' ');
308
}
308
}
309
 
309
 
310
/** @}
310
/** @}
311
 */
311
 */
312
 
312
 
313
 
313