Subversion Repositories HelenOS

Rev

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

Rev 1551 Rev 1575
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
    send_call_2(con_phone, CONSOLE_SET_STYLE, fgcolor, bgcolor);
83
    send_call_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(0, 0xe0e0e0);
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(0xe0e0e0, 0);
94
}
94
}
95
 
95
 
96
/*
96
/*
97
 * Clear the screen, forgetting the current contents in the process.
97
 * Clear the screen, forgetting the current contents in the process.
98
 */
98
 */
99
void
99
void
100
scr_clear(void)
100
scr_clear(void)
101
{
101
{
102
 
102
 
103
    resume_normal();
103
    resume_normal();
104
    send_call(con_phone, CONSOLE_CLEAR, 0);
104
    send_call(con_phone, CONSOLE_CLEAR, 0);
105
    curscore = -1;
105
    curscore = -1;
106
    memset((char *)curscreen, 0, sizeof(curscreen));
106
    memset((char *)curscreen, 0, sizeof(curscreen));
107
}
107
}
108
 
108
 
109
/*
109
/*
110
 * Set up screen
110
 * Set up screen
111
 */
111
 */
112
void
112
void
113
scr_init(void)
113
scr_init(void)
114
{
114
{
115
    con_phone = get_fd_phone(1);
115
    con_phone = get_fd_phone(1);
-
 
116
    send_call(con_phone, CONSOLE_CURSOR_VISIBILITY, 0);
116
    resume_normal();
117
    resume_normal();
117
    scr_clear();
118
    scr_clear();
118
}
119
}
119
 
120
 
120
static void moveto(int r, int c)
121
static void moveto(int r, int c)
121
{
122
{
122
    send_call_2(con_phone, CONSOLE_GOTO, r, c);
123
    send_call_2(con_phone, CONSOLE_GOTO, r, c);
123
}
124
}
124
 
125
 
125
static void fflush(void)
126
static void fflush(void)
126
{
127
{
127
    send_call(con_phone, CONSOLE_FLUSH, 0);
128
    send_call(con_phone, CONSOLE_FLUSH, 0);
128
}
129
}
129
 
130
 
130
struct winsize {
131
struct winsize {
131
    ipcarg_t ws_row;
132
    ipcarg_t ws_row;
132
    ipcarg_t ws_col;
133
    ipcarg_t ws_col;
133
};
134
};
134
 
135
 
135
static int get_display_size(struct winsize *ws)
136
static int get_display_size(struct winsize *ws)
136
{
137
{
137
    return sync_send_2(con_phone, CONSOLE_GETSIZE, 0, 0, &ws->ws_row, &ws->ws_col);
138
    return sync_send_2(con_phone, CONSOLE_GETSIZE, 0, 0, &ws->ws_row, &ws->ws_col);
138
}
139
}
139
 
140
 
140
static void
141
static void
141
scr_stop(int sig)
142
scr_stop(int sig)
142
{
143
{
143
 
144
 
144
    scr_end();
145
    scr_end();
145
    scr_set();
146
    scr_set();
146
    scr_msg(key_msg, 1);
147
    scr_msg(key_msg, 1);
147
}
148
}
148
 
149
 
149
/*
150
/*
150
 * Set up screen mode.
151
 * Set up screen mode.
151
 */
152
 */
152
void
153
void
153
scr_set(void)
154
scr_set(void)
154
{
155
{
155
    struct winsize ws;
156
    struct winsize ws;
156
 
157
 
157
    Rows = 0, Cols = 0;
158
    Rows = 0, Cols = 0;
158
    if (get_display_size(&ws) == 0) {
159
    if (get_display_size(&ws) == 0) {
159
        Rows = ws.ws_row;
160
        Rows = ws.ws_row;
160
        Cols = ws.ws_col;
161
        Cols = ws.ws_col;
161
    }
162
    }
162
    if (Rows < MINROWS || Cols < MINCOLS) {
163
    if (Rows < MINROWS || Cols < MINCOLS) {
163
        char smallscr[55];
164
        char smallscr[55];
164
 
165
 
165
        snprintf(smallscr, sizeof(smallscr),
166
        snprintf(smallscr, sizeof(smallscr),
166
            "the screen is too small (must be at least %dx%d)",
167
            "the screen is too small (must be at least %dx%d)",
167
            MINROWS, MINCOLS);
168
            MINROWS, MINCOLS);
168
        stop(smallscr);
169
        stop(smallscr);
169
    }
170
    }
170
    isset = 1;
171
    isset = 1;
171
 
172
 
172
    scr_clear();
173
    scr_clear();
173
}
174
}
174
 
175
 
175
/*
176
/*
176
 * End screen mode.
177
 * End screen mode.
177
 */
178
 */
178
void
179
void
179
scr_end(void)
180
scr_end(void)
180
{
181
{
181
}
182
}
182
 
183
 
183
void
184
void
184
stop(char *why)
185
stop(char *why)
185
{
186
{
186
 
187
 
187
    if (isset)
188
    if (isset)
188
        scr_end();
189
        scr_end();
189
    errx(1, "aborting: %s", why);
190
    errx(1, "aborting: %s", why);
190
}
191
}
191
 
192
 
192
 
193
 
193
/*
194
/*
194
 * Update the screen.
195
 * Update the screen.
195
 */
196
 */
196
void
197
void
197
scr_update(void)
198
scr_update(void)
198
{
199
{
199
    cell *bp, *sp;
200
    cell *bp, *sp;
200
    cell so, cur_so = 0;
201
    cell so, cur_so = 0;
201
    int i, ccol, j;
202
    int i, ccol, j;
202
    static const struct shape *lastshape;
203
    static const struct shape *lastshape;
203
 
204
 
204
    /* always leave cursor after last displayed point */
205
    /* always leave cursor after last displayed point */
205
    curscreen[D_LAST * B_COLS - 1] = -1;
206
    curscreen[D_LAST * B_COLS - 1] = -1;
206
 
207
 
207
    if (score != curscore) {
208
    if (score != curscore) {
208
        moveto(0, 0);
209
        moveto(0, 0);
209
        printf("Score: %d", score);
210
        printf("Score: %d", score);
210
        curscore = score;
211
        curscore = score;
211
    }
212
    }
212
 
213
 
213
    /* draw preview of next pattern */
214
    /* draw preview of next pattern */
214
    if (showpreview && (nextshape != lastshape)) {
215
    if (showpreview && (nextshape != lastshape)) {
215
        int i;
216
        int i;
216
        static int r=5, c=2;
217
        static int r=5, c=2;
217
        int tr, tc, t;
218
        int tr, tc, t;
218
 
219
 
219
        lastshape = nextshape;
220
        lastshape = nextshape;
220
 
221
 
221
        /* clean */
222
        /* clean */
222
        resume_normal();
223
        resume_normal();
223
        moveto(r-1, c-1); putstr("          ");
224
        moveto(r-1, c-1); putstr("          ");
224
        moveto(r,   c-1); putstr("          ");
225
        moveto(r,   c-1); putstr("          ");
225
        moveto(r+1, c-1); putstr("          ");
226
        moveto(r+1, c-1); putstr("          ");
226
        moveto(r+2, c-1); putstr("          ");
227
        moveto(r+2, c-1); putstr("          ");
227
 
228
 
228
        moveto(r-3, c-2);
229
        moveto(r-3, c-2);
229
        putstr("Next shape:");
230
        putstr("Next shape:");
230
 
231
 
231
        /* draw */
232
        /* draw */
232
        start_standout();
233
        start_standout();
233
        moveto(r, 2 * c);
234
        moveto(r, 2 * c);
234
        putstr("  ");
235
        putstr("  ");
235
        for (i = 0; i < 3; i++) {
236
        for (i = 0; i < 3; i++) {
236
            t = c + r * B_COLS;
237
            t = c + r * B_COLS;
237
            t += nextshape->off[i];
238
            t += nextshape->off[i];
238
 
239
 
239
            tr = t / B_COLS;
240
            tr = t / B_COLS;
240
            tc = t % B_COLS;
241
            tc = t % B_COLS;
241
 
242
 
242
            moveto(tr, 2*tc);
243
            moveto(tr, 2*tc);
243
            putstr("  ");
244
            putstr("  ");
244
        }
245
        }
245
        resume_normal();
246
        resume_normal();
246
    }
247
    }
247
 
248
 
248
    bp = &board[D_FIRST * B_COLS];
249
    bp = &board[D_FIRST * B_COLS];
249
    sp = &curscreen[D_FIRST * B_COLS];
250
    sp = &curscreen[D_FIRST * B_COLS];
250
    for (j = D_FIRST; j < D_LAST; j++) {
251
    for (j = D_FIRST; j < D_LAST; j++) {
251
        ccol = -1;
252
        ccol = -1;
252
        for (i = 0; i < B_COLS; bp++, sp++, i++) {
253
        for (i = 0; i < B_COLS; bp++, sp++, i++) {
253
            if (*sp == (so = *bp))
254
            if (*sp == (so = *bp))
254
                continue;
255
                continue;
255
            *sp = so;
256
            *sp = so;
256
            if (i != ccol) {
257
            if (i != ccol) {
257
                if (cur_so) {
258
                if (cur_so) {
258
                    resume_normal();
259
                    resume_normal();
259
                    cur_so = 0;
260
                    cur_so = 0;
260
                }
261
                }
261
                moveto(RTOD(j), CTOD(i));
262
                moveto(RTOD(j), CTOD(i));
262
            }
263
            }
263
            if (so != cur_so) {
264
            if (so != cur_so) {
264
                if (so)
265
                if (so)
265
                    start_standout();
266
                    start_standout();
266
                else
267
                else
267
                    resume_normal();
268
                    resume_normal();
268
                cur_so = so;
269
                cur_so = so;
269
            }
270
            }
270
            putstr("  ");
271
            putstr("  ");
271
 
272
 
272
            ccol = i + 1;
273
            ccol = i + 1;
273
            /*
274
            /*
274
             * Look ahead a bit, to avoid extra motion if
275
             * Look ahead a bit, to avoid extra motion if
275
             * we will be redrawing the cell after the next.
276
             * we will be redrawing the cell after the next.
276
             * Motion probably takes four or more characters,
277
             * Motion probably takes four or more characters,
277
             * so we save even if we rewrite two cells
278
             * so we save even if we rewrite two cells
278
             * `unnecessarily'.  Skip it all, though, if
279
             * `unnecessarily'.  Skip it all, though, if
279
             * the next cell is a different color.
280
             * the next cell is a different color.
280
             */
281
             */
281
#define STOP (B_COLS - 3)
282
#define STOP (B_COLS - 3)
282
            if (i > STOP || sp[1] != bp[1] || so != bp[1])
283
            if (i > STOP || sp[1] != bp[1] || so != bp[1])
283
                continue;
284
                continue;
284
            if (sp[2] != bp[2])
285
            if (sp[2] != bp[2])
285
                sp[1] = -1;
286
                sp[1] = -1;
286
            else if (i < STOP && so == bp[2] && sp[3] != bp[3]) {
287
            else if (i < STOP && so == bp[2] && sp[3] != bp[3]) {
287
                sp[2] = -1;
288
                sp[2] = -1;
288
                sp[1] = -1;
289
                sp[1] = -1;
289
            }
290
            }
290
        }
291
        }
291
    }
292
    }
292
    if (cur_so)
293
    if (cur_so)
293
        resume_normal();
294
        resume_normal();
294
    fflush();
295
    fflush();
295
}
296
}
296
 
297
 
297
/*
298
/*
298
 * Write a message (set!=0), or clear the same message (set==0).
299
 * Write a message (set!=0), or clear the same message (set==0).
299
 * (We need its length in case we have to overwrite with blanks.)
300
 * (We need its length in case we have to overwrite with blanks.)
300
 */
301
 */
301
void
302
void
302
scr_msg(char *s, int set)
303
scr_msg(char *s, int set)
303
{
304
{
304
   
305
   
305
    int l = strlen(s);
306
    int l = strlen(s);
306
   
307
   
307
    moveto(Rows - 2, ((Cols - l) >> 1) - 1);
308
    moveto(Rows - 2, ((Cols - l) >> 1) - 1);
308
    if (set)
309
    if (set)
309
        putstr(s);
310
        putstr(s);
310
    else
311
    else
311
        while (--l >= 0)
312
        while (--l >= 0)
312
            (void) putchar(' ');
313
            (void) putchar(' ');
313
}
314
}
314
 
315