/[LeafOK_CVS]/lbbs/src/screen.c
ViewVC logotype

Diff of /lbbs/src/screen.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

Revision 1.7 by sysadm, Tue Nov 30 07:10:32 2004 UTC Revision 1.25 by sysadm, Wed Apr 30 12:54:41 2025 UTC
# Line 1  Line 1 
1  /***************************************************************************  /***************************************************************************
2                            screen.c  -  description                                                    screen.c  -  description
3                               -------------------                                                           -------------------
4      begin                : Mon Oct 18 2004          begin                : Mon Oct 18 2004
5      copyright            : (C) 2004 by Leaflet          copyright            : (C) 2004 by Leaflet
6      email                : leaflet@leafok.com          email                : leaflet@leafok.com
7   ***************************************************************************/   ***************************************************************************/
8    
9  /***************************************************************************  /***************************************************************************
# Line 15  Line 15 
15   *                                                                         *   *                                                                         *
16   ***************************************************************************/   ***************************************************************************/
17    
18    #include "bbs.h"
19  #include "common.h"  #include "common.h"
20    #include "log.h"
21  #include "io.h"  #include "io.h"
22    #include "screen.h"
23    #include <string.h>
24    #include <ctype.h>
25  #include <sys/types.h>  #include <sys/types.h>
26  #include <sys/stat.h>  #include <sys/stat.h>
27  #include <unistd.h>  #include <unistd.h>
28    
29    #define ACTIVE_BOARD_HEIGHT 8
30    
31  int screen_lines = 24;  int screen_lines = 24;
32    
33  void  void moveto(int row, int col)
 moveto (int row, int col)  
34  {  {
35    if (row >= 0)          if (row >= 0)
36      {          {
37        prints ("\033[%d;%dH", row, col);                  prints("\033[%d;%dH", row, col);
38      }          }
39    else          else
40      {          {
41        prints ("\r");                  prints("\r");
42      }          }
43    iflush ();          iflush();
44  }  }
45    
46  void  void clrtoeol()
 clrtoeol ()  
47  {  {
48    prints ("\033[K");          prints("\033[K");
49    iflush ();          iflush();
50  }  }
51    
52  void  void clrline(int line_begin, int line_end)
 clrline (int line_begin, int line_end)  
53  {  {
54    int i;          int i;
   
   for (i = line_begin; i <= line_end; i++)  
     {  
       moveto (i, 0);  
       prints ("\033[K");  
     }  
55    
56    iflush ();          for (i = line_begin; i <= line_end; i++)
57  }          {
58                    moveto(i, 0);
59                    prints("\033[K");
60            }
61    
62  void          iflush();
 clearscr ()  
 {  
   prints ("\33[2J");  
   moveto (0, 0);  
   iflush ();  
63  }  }
64    
65  int  void clrtobot(int line_begin)
 press_any_key ()  
66  {  {
67    moveto (screen_lines, 0);          //clrline(line_begin, screen_lines);
68    clrtoeol ();          moveto(line_begin, 0);
69            prints("\033[J");
70    
71    prints ("                           \033[1;33m按任意键继续...\033[0;37m");          moveto(line_begin, 0);
   iflush ();  
72    
73    return igetch ();          iflush();
74  }  }
75    
76  void  void clearscr()
 set_input_echo(int echo)  
77  {  {
78    char temp[256];          prints("\033[2J");
79            moveto(0, 0);
80    if (echo)          iflush();
   {  
     outc ('\x83'); // ASCII code 131  
     iflush ();  
   }  
   else  
   {  
 //    outc ('\x85'); // ASCII code 133  
     prints ("\xff\xfb\x01\xff\xfb\x03");  
     iflush ();  
     igetch ();  
     igetch ();  
   }  
81  }  }
82    
83  int  int press_any_key()
 str_input (char *buffer, int buffer_length, int echo_mode)  
84  {  {
85    char buf[256], ch;          moveto(screen_lines, 0);
86    int c, offset = 0, len, loop = 1, i, hz = 0;          clrtoeol();
87    
88    memset (buffer, '\0', buffer_length);          prints("                           \033[1;33m按任意键继续...\033[0;37m");
89            iflush();
90    
91    while (c = igetch ())          return igetch_t(60);
92      {  }
93        if (c == CR)  
94          break;  void set_input_echo(int echo)
95        if (c == LF)  {
96          continue;          if (echo)
       if (c == BACKSPACE)  
         {  
           if (offset > 0)  
             {  
               buffer[--offset] = '\0';  
               prints ("\b \b");  
 //            clrtoeol ();  
               iflush ();  
             }  
           continue;  
         }  
       if (c > 255 || iscntrl (c))  
         {  
           continue;  
         }  
       if (c > 127 && c <= 255)  
97          {          {
98            hz = (!hz);                  outc('\x83'); // ASCII code 131
99                    iflush();
100          }          }
101        if (offset >= buffer_length)          else
102          {          {
103            outc ('\a');                  //    outc ('\x85'); // ASCII code 133
104            continue;                  prints("\xff\xfb\x01\xff\xfb\x03");
105                    iflush();
106                    igetch_t(60);
107                    igetch_t(60);
108          }          }
109        buffer[offset++] = (char) c;  }
110        buffer[offset] = '\0';  
111        switch (echo_mode)  static int _str_input(char *buffer, int buffer_length, int echo_mode)
112    {
113            char buf[256], ch;
114            int c, offset = 0, len, loop = 1, i, hz = 0;
115    
116            for (i = 0; i < buffer_length && buffer[i] != '\0'; i++)
117          {          {
118          case 0:                  offset++;
           outc ((char) c);  
           break;  
         case 1:  
           outc ('*');  
           break;  
119          }          }
120        if (!hz)  
121            while (c = igetch_t(60))
122          {          {
123            iflush ();                  if (c == KEY_NULL || c == KEY_TIMEOUT || c == CR)
124                    {
125                            break;
126                    }
127                    if (c == LF)
128                    {
129                            continue;
130                    }
131                    if (c == BACKSPACE)
132                    {
133                            if (offset > 0)
134                            {
135                                    buffer[--offset] = '\0';
136                                    prints("\b \b");
137                                    //            clrtoeol ();
138                                    iflush();
139                            }
140                            continue;
141                    }
142                    if (c > 255 || iscntrl(c))
143                    {
144                            continue;
145                    }
146                    if (c > 127 && c <= 255)
147                    {
148                            hz = (!hz);
149                    }
150                    if (offset >= buffer_length)
151                    {
152                            outc('\a');
153                            continue;
154                    }
155                    buffer[offset++] = (char)c;
156                    buffer[offset] = '\0';
157                    switch (echo_mode)
158                    {
159                    case DOECHO:
160                            outc((char)c);
161                            break;
162                    case NOECHO:
163                            outc('*');
164                            break;
165                    }
166                    if (!hz)
167                    {
168                            iflush();
169                    }
170          }          }
     }  
171    
172    prints ("\r\n");          prints("\r\n");
173    iflush ();          iflush();
174    
175    return offset;          return offset;
176  }  }
177    
178  int  int str_input(char *buffer, int buffer_length, int echo_mode)
179  display_file (const char *filename)  {
180            int offset;
181    
182            memset(buffer, '\0', buffer_length);
183    
184            offset = _str_input(buffer, buffer_length, echo_mode);
185    
186            return offset;
187    };
188    
189    int get_data(int row, int col, char *prompt, char *buffer, int buffer_length, int echo_mode)
190  {  {
191    char buffer[260];          int len;
192    FILE *fin;  
193    int i;          moveto(row, col);
194            iflush();
195            prints(prompt);
196            prints(buffer);
197            iflush();
198    
199            len = _str_input(buffer, buffer_length, echo_mode);
200    
201    if ((fin = fopen (filename, "r")) != NULL)          return len;
   {  
     while (fgets (buffer, 255, fin))  
       {  
         i = strlen (buffer);  
         if (buffer[i - 1] == '\n' && buffer[i - 2] != '\r')  
           {  
             buffer[i - 1] = '\r';  
             buffer[i] = '\n';  
             buffer[i + 1] = '\0';  
           }  
         prints (buffer);  
         iflush ();  
       }  
     fclose(fin);  
     return 0;  
   }  
     
   return -1;  
202  }  }
203    
204  int  int display_file(const char *filename)
 display_file_ex (const char *filename, int begin_line, int wait)  
205  {  {
206    char buffer[260], temp[256];          char buffer[260];
207    int i, ch, input_ok;          FILE *fin;
208    long int line, c_line_begin = 0, c_line_total=0;          int i;
   long int f_line, f_size, f_offset;  
   FILE *fin;  
   struct stat f_stat;  
209    
210    clrline (begin_line, screen_lines);          if ((fin = fopen(filename, "r")) == NULL)
211    line = begin_line;          {
212    moveto (line, 0);                  return -1;
213            }
214    
215    if ((fin = fopen (filename, "r")) != NULL)          while (fgets(buffer, 255, fin))
     {  
       if (fstat (fileno (fin), &f_stat) != 0)  
216          {          {
217            log_error ("Get file stat failed\n");                  i = strlen(buffer);
218            return -1;                  if (buffer[i - 1] == '\n' && buffer[i - 2] != '\r')
219                    {
220                            buffer[i - 1] = '\r';
221                            buffer[i] = '\n';
222                            buffer[i + 1] = '\0';
223                    }
224                    prints(buffer);
225                    iflush();
226          }          }
227        f_size = f_stat.st_size;          fclose(fin);
228    
229            return 0;
230    }
231    
232        while (fgets (buffer, 255, fin))  int display_file_ex(const char *filename, int begin_line, int wait)
233          c_line_total ++;  {
234        rewind (fin);          char buffer[260], temp[256];
235            int i, ch, input_ok, max_lines;
236            long int line, c_line_begin = 0, c_line_total = 0;
237            long int f_line, f_size, f_offset;
238            FILE *fin;
239            struct stat f_stat;
240    
241            max_lines = screen_lines - 1;
242            clrline(begin_line, screen_lines);
243            line = begin_line;
244            moveto(line, 0);
245    
246        while (fgets (buffer, 255, fin))          if ((fin = fopen(filename, "r")) != NULL)
247          {          {
248            if (line >= screen_lines)                  if (fstat(fileno(fin), &f_stat) != 0)
249              {                  {
250                f_offset = ftell (fin);                          log_error("Get file stat failed\n");
251                            return -1;
252                    }
253                    f_size = f_stat.st_size;
254    
255                moveto (screen_lines, 0);                  while (fgets(buffer, 255, fin))
256                prints                          c_line_total++;
257                  ("\033[1;44;32m下面还有喔 (%d%%)\033[33m   │ 结束 ← <q> │ ↑/↓/PgUp/PgDn 移动 │ ? 辅助说明 │     \033[m",                  rewind(fin);
                  (f_offset-strlen(buffer)) * 100 / f_size);  
               iflush ();  
258    
259                input_ok = 0;                  while (fgets(buffer, 255, fin))
               while (!input_ok)  
260                  {                  {
261                    ch = igetch ();                          if (line >= max_lines)
                   input_ok = 1;  
                   switch (ch)  
                     {  
                     case KEY_UP:  
                       c_line_begin--;  
                       if (c_line_begin >= 0)  
                         {  
                           rewind (fin);  
                           for (f_line = 0; f_line < c_line_begin; f_line++)  
                             {  
                               if (fgets (buffer, 255, fin) == NULL)  
                                 goto exit;  
                             }  
                         }  
                       else  
262                          {                          {
263                            goto exit;                                  f_offset = ftell(fin);
264                          }  
265                        break;                                  moveto(screen_lines, 0);
266                      case KEY_DOWN:                                  prints("\033[1;44;32m下面还有喔 (%d%%)\033[33m   │ 结束 ← <q> │ ↑/↓/PgUp/PgDn 移动 │ ? 辅助说明 │     \033[m",
267                      case CR:                                             (f_offset - strlen(buffer)) * 100 / f_size);
268                        c_line_begin++;                                  iflush();
269                        rewind (fin);  
270                        for (f_line = 0; f_line < c_line_begin; f_line++)                                  input_ok = 0;
271                          {                                  while (!input_ok)
272                            if (fgets (buffer, 255, fin) == NULL)                                  {
273                              goto exit;                                          ch = igetch_t(MAX_DELAY_TIME);
274                          }                                          input_ok = 1;
275                        break;                                          switch (ch)
276                      case KEY_PGUP:                                          {
277                      case Ctrl ('B'):                                          case KEY_UP:
278                        if (c_line_begin > 0)                                                  c_line_begin--;
279                          c_line_begin -= (screen_lines - begin_line - 1);                                                  if (c_line_begin >= 0)
280                        else                                                  {
281                          goto exit;                                                          rewind(fin);
282                        if (c_line_begin < 0)                                                          for (f_line = 0; f_line < c_line_begin; f_line++)
283                          c_line_begin = 0;                                                          {
284                        rewind (fin);                                                                  if (fgets(buffer, 255, fin) == NULL)
285                        for (f_line = 0; f_line < c_line_begin; f_line++)                                                                          goto exit;
286                          {                                                          }
287                            if (fgets (buffer, 255, fin) == NULL)                                                  }
288                              goto exit;                                                  else
289                          }                                                  {
290                        break;                                                          goto exit;
291                      case KEY_RIGHT:                                                  }
292                      case KEY_PGDOWN:                                                  break;
293                      case Ctrl ('F'):                                          case KEY_DOWN:
294                      case KEY_SPACE:                                          case CR:
295                        c_line_begin += (screen_lines - begin_line - 1);                                                  c_line_begin++;
296                        if (c_line_begin + (screen_lines - begin_line) > c_line_total)                                                  rewind(fin);
297                          c_line_begin = c_line_total - (screen_lines - begin_line);                                                  for (f_line = 0; f_line < c_line_begin; f_line++)
298                        rewind (fin);                                                  {
299                        for (f_line = 0; f_line < c_line_begin; f_line++)                                                          if (fgets(buffer, 255, fin) == NULL)
300                          {                                                                  goto exit;
301                            if (fgets (buffer, 255, fin) == NULL)                                                  }
302                              goto exit;                                                  break;
303                                            case KEY_PGUP:
304                                            case Ctrl('B'):
305                                                    if (c_line_begin > 0)
306                                                            c_line_begin -= (max_lines - begin_line - 1);
307                                                    else
308                                                            goto exit;
309                                                    if (c_line_begin < 0)
310                                                            c_line_begin = 0;
311                                                    rewind(fin);
312                                                    for (f_line = 0; f_line < c_line_begin; f_line++)
313                                                    {
314                                                            if (fgets(buffer, 255, fin) == NULL)
315                                                                    goto exit;
316                                                    }
317                                                    break;
318                                            case KEY_RIGHT:
319                                            case KEY_PGDN:
320                                            case Ctrl('F'):
321                                            case KEY_SPACE:
322                                                    c_line_begin += (max_lines - begin_line - 1);
323                                                    if (c_line_begin + (max_lines - begin_line) >
324                                                            c_line_total)
325                                                            c_line_begin =
326                                                                    c_line_total - (max_lines - begin_line);
327                                                    rewind(fin);
328                                                    for (f_line = 0; f_line < c_line_begin; f_line++)
329                                                    {
330                                                            if (fgets(buffer, 255, fin) == NULL)
331                                                                    goto exit;
332                                                    }
333                                                    break;
334                                            case KEY_NULL:
335                                            case KEY_TIMEOUT:
336                                            case KEY_LEFT:
337                                            case 'q':
338                                            case 'Q':
339                                                    goto exit;
340                                                    break;
341                                            case '?':
342                                            case 'h':
343                                            case 'H':
344                                                    // Display help information
345                                                    strcpy(temp, app_home_dir);
346                                                    strcat(temp, "data/read_help.txt");
347                                                    display_file_ex(temp, begin_line, 1);
348    
349                                                    // Refresh after display help information
350                                                    rewind(fin);
351                                                    for (f_line = 0; f_line < c_line_begin; f_line++)
352                                                    {
353                                                            if (fgets(buffer, 255, fin) == NULL)
354                                                                    goto exit;
355                                                    }
356                                                    break;
357                                            default:
358                                                    input_ok = 0;
359                                                    break;
360                                            }
361                                    }
362    
363                                    clrline(begin_line, screen_lines);
364                                    line = begin_line;
365                                    moveto(line, 0);
366    
367                                    continue;
368                          }                          }
369                        break;  
370                      case KEY_LEFT:                          i = strlen(buffer);
371                      case 'q':                          if (buffer[i - 1] == '\n' && buffer[i - 2] != '\r')
                     case 'Q':  
                       goto exit;  
                       break;  
                     case '?':  
                     case 'h':  
                     case 'H':  
                       //Display help information  
                       strcpy (temp, app_home_dir);  
                       strcat (temp, "data/read_help.txt");  
                       display_file_ex (temp, begin_line, 1);  
   
                       //Refresh after display help information  
                       rewind (fin);  
                       for (f_line = 0; f_line < c_line_begin; f_line++)  
372                          {                          {
373                            if (fgets (buffer, 255, fin) == NULL)                                  buffer[i - 1] = '\r';
374                              goto exit;                                  buffer[i] = '\n';
375                                    buffer[i + 1] = '\0';
376                          }                          }
377                        break;                          prints(buffer);
378                      default:                          iflush();
379                        input_ok = 0;  
380                        break;                          line++;
                     }  
381                  }                  }
382                    if (wait)
383                            ch = press_any_key();
384                    else
385                            ch = 0;
386    
387                clrline (begin_line, screen_lines);          exit:
388                line = begin_line;                  fclose(fin);
               moveto (line, 0);  
389    
390                continue;                  return ch;
391              }          }
392    
393            i = strlen (buffer);          return -1;
394            if (buffer[i - 1] == '\n' && buffer[i - 2] != '\r')  }
             {  
               buffer[i - 1] = '\r';  
               buffer[i] = '\n';  
               buffer[i + 1] = '\0';  
             }  
           prints (buffer);  
           iflush ();  
395    
396            line++;  int show_top(char *status)
397          }  {
398        if (wait)          char buffer[256];
         ch = press_any_key();  
       else  
         ch = 0;  
399    
400      exit:          str_space(buffer, 20 - strlen(BBS_current_section_name));
       fclose (fin);  
401    
402        return ch;          moveto(1, 0);
403      }          prints("\033[1;44;33m%-20s \033[37m%20s"
404                       "         %s\033[33m讨论区 [%s]\033[m",
405                       status, BBS_name, buffer, BBS_current_section_name);
406            iflush();
407    
408    return -1;          return 0;
409  }  }
410    
411  int  int show_bottom(char *msg)
 show_top ()  
412  {  {
413    return 0;          char str_time[256], str_time_onine[20], buffer[256];
414            time_t time_online;
415            struct tm *tm_online;
416    
417            get_time_str(str_time, 256);
418            str_space(buffer, 33 - strlen(BBS_username));
419    
420            time_online = time(0) - BBS_login_tm;
421            tm_online = gmtime(&time_online);
422    
423            moveto(screen_lines, 0);
424            prints("\033[1;44;33m[\033[36m%s\033[33m]"
425                       "%s帐号[\033[36m%s\033[33m]"
426                       "[\033[36m%1d\033[33m:\033[36m%2d\033[33m:\033[36m%2d\033[33m]\033[m",
427                       str_time, buffer, BBS_username, tm_online->tm_mday - 1,
428                       tm_online->tm_hour, tm_online->tm_min);
429            iflush();
430    
431            return 0;
432  }  }
433    
434  int  int show_active_board()
 show_bottom ()  
435  {  {
436    return 0;          char filename[256], buffer[260];
437            FILE *fin;
438            int i, j;
439            static long int line;
440    
441            sprintf(filename, "%sdata/active_board.txt", app_home_dir);
442    
443            clrline(3, 2 + ACTIVE_BOARD_HEIGHT);
444    
445            moveto(3, 0);
446    
447            if ((fin = fopen(filename, "r")) != NULL)
448            {
449                    for (j = 0; j < line; j++)
450                    {
451                            if (fgets(buffer, 255, fin) == NULL)
452                            {
453                                    line = 0;
454                                    rewind(fin);
455                                    break;
456                            }
457                    }
458    
459                    for (j = 0; j < ACTIVE_BOARD_HEIGHT; j++)
460                    {
461                            if (fgets(buffer, 255, fin) == NULL)
462                            {
463                                    line = 0;
464                                    if (j == 0)
465                                    {
466                                            rewind(fin);
467                                            if (fgets(buffer, 255, fin) == NULL)
468                                            {
469                                                    break;
470                                            }
471                                    }
472                                    else
473                                    {
474                                            break;
475                                    }
476                            }
477                            line++;
478                            i = strlen(buffer);
479                            if (buffer[i - 1] == '\n' && buffer[i - 2] != '\r')
480                            {
481                                    buffer[i - 1] = '\r';
482                                    buffer[i] = '\n';
483                                    buffer[i + 1] = '\0';
484                            }
485                            prints(buffer);
486                            iflush();
487                    }
488                    fclose(fin);
489            }
490    
491            return 0;
492  }  }


Legend:
Removed lines/characters  
Changed lines/characters
  Added lines/characters

webmaster@leafok.com
ViewVC Help
Powered by ViewVC 1.3.0-beta1