src/info.c

   1 /* Panel managing.
   2    Copyright (C) 1994, 1995 Janne Kukonlehto
   3    Copyright (C) 1995 Miguel de Icaza
   4
   5    This program is free software; you can redistribute it and/or modify
   6    it under the terms of the GNU General Public License as published by
   7    the Free Software Foundation; either version 2 of the License, or
   8    (at your option) any later version.
   9
  10    This program is distributed in the hope that it will be useful,
  11    but WITHOUT ANY WARRANTY; without even the implied warranty of
  12    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13    GNU General Public License for more details.
  14
  15    You should have received a copy of the GNU General Public License
  16    along with this program; if not, write to the Free Software
  17    Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  */
  18
  19 #include <config.h>
  20 #include <stdio.h>
  21 #include "tty.h"
  22 #include <sys/types.h>
  23 #include <sys/stat.h>
  24 #include <sys/param.h>
  25 #include "global.h"
  26 #include "mouse.h"              /* Gpm_Event */
  27 #include "color.h"
  28 #include "dlg.h"
  29 #include "info.h"
  30 #include "dir.h"                /* required by panel */
  31 #include "panel.h"              /* for the panel structure */
  32 #include "main.h"               /* opanel, cpanel definitions */
  33 #include "win.h"                /* print_bytesize */
  34 #include "layout.h"
  35 #include "key.h"                /* is_idle() */
  36 #include "x.h"
  37
  38 #ifndef VERSION
  39 #   define VERSION "undefined"
  40 #endif
  41
  42 /* Have we called the init_my_statfs routine? */
  43 static int initialized;
  44 static struct my_statfs myfs_stats;
  45
  46 static int info_event (Gpm_Event *event, WInfo *info)
  47 {
  48     return 0;
  49 }
  50
  51 static void info_box (Dlg_head *h, WInfo *info)
  52 {
  53     standend ();
  54     if (hascolors)
  55         attrset (NORMAL_COLOR);
  56     widget_erase (&info->widget);
  57     draw_double_box (h, info->widget.y,  info->widget.x,
  58                      info->widget.lines, info->widget.cols);
  59 }
  60
  61 static void
  62 info_show_info (WInfo *info)
  63 {
  64     static int i18n_adjust=0;
  65     static char *file_label;
  66
  67     struct stat buf;
  68
  69     if (!is_idle ())
  70         return;
  71
  72     info_box (info->widget.parent, info);
  73     attrset (MARKED_COLOR);
  74     widget_move (&info->widget, 1, 3);
  75     printw (_("Midnight Commander %s"), VERSION);
  76     attrset (NORMAL_COLOR);
  77     widget_move (&info->widget, 2, 1);
  78     /* .ado: info->widget.x has wrong value (==0) on NT and OS/2, why? */
  79 #ifndef OS2_NT
  80     hline (ACS_HLINE|NORMAL_COLOR, info->widget.x-2);
  81 #endif
  82     if (get_current_type () != view_listing)
  83         return;
  84
  85     if (!info->ready)
  86         return;
  87
  88     my_statfs (&myfs_stats, cpanel->cwd);
  89     buf = cpanel->dir.list [cpanel->selected].buf;
  90 #ifdef OS2_NT
  91     /* .ado: for OS/2 and NT, st_dev must > 0 */
  92     if ((signed char) buf.st_dev < 0)
  93             return;
  94 #endif
  95
  96     /* Print only lines which fit */
  97
  98     if(!i18n_adjust) {
  99         file_label=_("File:       %s");
 100         i18n_adjust=strlen(file_label)+2;
 101     }
 102     /*The printf pattern string is used as a reference for size*/
 103
 104     switch (info->widget.lines-2){
 105         /* Note: all cases are fall-throughs */
 106
 107     default:
 108
 109     case 16:
 110         widget_move (&info->widget, 16, 3);
 111         if (myfs_stats.nfree >0 || myfs_stats.nodes > 0)
 112             printw (_("Free nodes %d (%d%%) of %d"),
 113                     myfs_stats.nfree,
 114                     myfs_stats.total
 115                     ? 100 * myfs_stats.nfree / myfs_stats.nodes : 0,
 116                     myfs_stats.nodes);
 117         else
 118             addstr (_("No node information"));
 119
 120     case 15:
 121         widget_move (&info->widget, 15, 3);
 122         if (myfs_stats.avail > 0 || myfs_stats.total > 0){
 123             addstr (_("Free space "));
 124             print_bytesize (myfs_stats.avail, 1);
 125             printw (_(" (%d%%) of "), myfs_stats.total
 126                     ? 100 * myfs_stats.avail / myfs_stats.total : 0);
 127             print_bytesize (myfs_stats.total, 1);
 128         } else
 129             addstr (_("No space information"));
 130
 131     case 14:
 132         widget_move (&info->widget, 14, 3);
 133         printw (_("Type:      %s "), myfs_stats.typename ? myfs_stats.typename : _("non-local vfs"));
 134         if (myfs_stats.type != 0xffff && myfs_stats.type != 0xffffffff)
 135             printw (" (%Xh)", myfs_stats.type);
 136
 137     case 13:
 138         widget_move (&info->widget, 13, 3);
 139         printw (_("Device:    %s"),
 140                 name_trunc (myfs_stats.device, info->widget.cols - i18n_adjust));
 141     case 12:
 142         widget_move (&info->widget, 12, 3);
 143         printw (_("Filesystem: %s"),
 144                 name_trunc (myfs_stats.mpoint, info->widget.cols - i18n_adjust));
 145
 146     case 11:
 147         widget_move (&info->widget, 11, 3);
 148         printw (_("Accessed:  %s"), file_date (buf.st_atime));
 149
 150     case 10:
 151         widget_move (&info->widget, 10, 3);
 152         printw (_("Modified:  %s"), file_date (buf.st_mtime));
 153
 154     case 9:
 155         widget_move (&info->widget, 9, 3);
 156         printw (_("Created:   %s"), file_date (buf.st_ctime));
 157
 158     case 8:
 159         widget_move (&info->widget, 8, 3);
 160 #if 0
 161 #ifdef HAVE_ST_RDEV
 162         if (buf.st_rdev)
 163             printw ("Inode dev: major: %d, minor: %d",
 164                     buf.st_rdev >> 8, buf.st_rdev & 0xff);
 165         else
 166 #endif
 167 #endif
 168         {
 169             printw (_("Size:      "));
 170             print_bytesize (buf.st_size, 0);
 171 #ifdef HAVE_ST_BLOCKS
 172             printw (_(" (%d blocks)"), buf.st_blocks);
 173 #endif
 174         }
 175
 176     case 7:
 177         widget_move (&info->widget, 7, 3);
 178         printw (_("Owner:     %s/%s"), get_owner (buf.st_uid),
 179                 get_group (buf.st_gid));
 180
 181     case 6:
 182         widget_move (&info->widget, 6, 3);
 183         printw (_("Links:     %d"), buf.st_nlink);
 184
 185     case 5:
 186         widget_move (&info->widget, 5, 3);
 187         printw (_("Mode:      %s (%04o)"),
 188                 string_perm (buf.st_mode), buf.st_mode & 07777);
 189
 190     case 4:
 191         widget_move (&info->widget, 4, 3);
 192         printw (_("Location:  %Xh:%Xh"), (int)buf.st_dev, (int)buf.st_ino);
 193
 194     case 3:
 195         widget_move (&info->widget, 3, 2);
 196         /* .ado: fname is invalid if selected == 0 && ifno called from current panel */
 197         if (cpanel->selected){
 198                 printw (file_label,
 199                         name_trunc (cpanel->dir.list [cpanel->selected].fname,
 200                                     info->widget.cols - i18n_adjust));
 201         } else
 202                 printw (_("File:       None"));
 203
 204     case 2:
 205     case 1:
 206     case 0:
 207         ;
 208     } /* switch */
 209 }
 210
 211 static void info_hook (void *data)
 212 {
 213     WInfo *info = (WInfo *) data;
 214     Widget *other_widget;
 215
 216     other_widget = get_panel_widget (get_current_index ());
 217     if (!other_widget)
 218         return;
 219     if (dlg_overlap (&info->widget, other_widget))
 220         return;
 221
 222     info->ready = 1;
 223     info_show_info (info);
 224 }
 225
 226 static void info_destroy (WInfo *info)
 227 {
 228     delete_hook (&select_file_hook, info_hook);
 229 }
 230
 231 static int info_callback (Dlg_head *h, WInfo *info, int msg, int par)
 232 {
 233     switch (msg){
 234
 235     case WIDGET_INIT:
 236         add_hook (&select_file_hook, info_hook, info);
 237         info->ready = 0;
 238         break;
 239
 240     case WIDGET_DRAW:
 241         info_hook (info);
 242         info_show_info (info);
 243         return 1;
 244
 245     case WIDGET_FOCUS:
 246         return 0;
 247     }
 248     return default_proc (h, msg, par);
 249 }
 250
 251 WInfo *info_new ()
 252 {
 253     WInfo *info = g_new (WInfo, 1);
 254
 255     init_widget (&info->widget, 0, 0, 0, 0, (callback_fn)
 256                  info_callback, (destroy_fn) info_destroy,
 257                  (mouse_h) info_event, NULL);
 258
 259     /* We do not want the cursor */
 260     widget_want_cursor (info->widget, 0);
 261
 262     if (!initialized){
 263         initialized = 1;
 264         init_my_statfs ();
 265     }
 266
 267     return info;
 268 }
 269