main/editor/info.c

   1 /* $Id: info.c,v 1.2 2004-12-19 14:52:48 btb Exp $ */
   2 /*
   3 THE COMPUTER CODE CONTAINED HEREIN IS THE SOLE PROPERTY OF PARALLAX
   4 SOFTWARE CORPORATION ("PARALLAX").  PARALLAX, IN DISTRIBUTING THE CODE TO
   5 END-USERS, AND SUBJECT TO ALL OF THE TERMS AND CONDITIONS HEREIN, GRANTS A
   6 ROYALTY-FREE, PERPETUAL LICENSE TO SUCH END-USERS FOR USE BY SUCH END-USERS
   7 IN USING, DISPLAYING,  AND CREATING DERIVATIVE WORKS THEREOF, SO LONG AS
   8 SUCH USE, DISPLAY OR CREATION IS FOR NON-COMMERCIAL, ROYALTY OR REVENUE
   9 FREE PURPOSES.  IN NO EVENT SHALL THE END-USER USE THE COMPUTER CODE
  10 CONTAINED HEREIN FOR REVENUE-BEARING PURPOSES.  THE END-USER UNDERSTANDS
  11 AND AGREES TO THE TERMS HEREIN AND ACCEPTS THE SAME BY USE OF THIS FILE.
  12 COPYRIGHT 1993-1998 PARALLAX SOFTWARE CORPORATION.  ALL RIGHTS RESERVED.
  13 */
  14
  15 /*
  16  *
  17  * Print debugging info in ui.
  18  *
  19  */
  20
  21
  22 #ifdef RCS
  23 static char rcsid[] = "$Id: info.c,v 1.2 2004-12-19 14:52:48 btb Exp $";
  24 #endif
  25
  26 #include <i86.h>
  27 #include <stdio.h>
  28 #include <stdlib.h>
  29 #include <string.h>
  30 #include <malloc.h>
  31
  32 #include "inferno.h"
  33 #include "segment.h"
  34 #include "gr.h"
  35 #include "ui.h"
  36 #include "editor.h"
  37
  38 #include "mono.h"
  39 #include "error.h"
  40 #include "textures.h"
  41 #include "object.h"
  42 #include "ai.h"
  43
  44 #include "texpage.h"            // Textue selection paging stuff
  45 #include "objpage.h"            // Object selection paging stuff
  46
  47 #include "wall.h"
  48 #include "switch.h"
  49
  50 int init_info;
  51
  52 #ifdef DO_MEMINFO
  53 struct meminfo {
  54     int LargestBlockAvail;
  55     int MaxUnlockedPage;
  56     int LargestLockablePage;
  57     int LinAddrSpace;
  58     int NumFreePagesAvail;
  59     int NumPhysicalPagesFree;
  60     int TotalPhysicalPages;
  61     int FreeLinAddrSpace;
  62     int SizeOfPageFile;
  63     int Reserved[3];
  64 } MemInfo;
  65
  66 #define DPMI_INT        0x31
  67
  68 void read_mem_info()
  69 {
  70     union REGS regs;
  71     struct SREGS sregs;
  72
  73     regs.x.eax = 0x00000500;
  74     memset( &sregs, 0, sizeof(sregs) );
  75     sregs.es = FP_SEG( &MemInfo );
  76     regs.x.edi = FP_OFF( &MemInfo );
  77
  78     int386x( DPMI_INT, &regs, &regs, &sregs );
  79 }
  80 #endif
  81
  82 char * get_object_type(int num, char *name)
  83 {
  84         switch (num) {
  85                 case OBJ_NONE:                  strcpy(name, "OBJ_NONE    ");   break;
  86                 case OBJ_WALL:          strcpy(name, "OBJ_WALL    ");   break;
  87                 case OBJ_FIREBALL:      strcpy(name, "OBJ_FIREBALL");   break;
  88                 case OBJ_ROBOT:                 strcpy(name, "OBJ_ROBOT   ");   break;
  89                 case OBJ_HOSTAGE:       strcpy(name, "OBJ_HOSTAGE ");   break;
  90                 case OBJ_PLAYER:                strcpy(name, "OBJ_PLAYER  ");   break;
  91                 case OBJ_WEAPON:                strcpy(name, "OBJ_WEAPON  ");   break;
  92                 case OBJ_CAMERA:                strcpy(name, "OBJ_CAMERA  ");   break;
  93                 case OBJ_POWERUP:       strcpy(name, "OBJ_POWERUP ");   break;
  94                 default:                                        strcpy(name, " (unknown)  ");   break;
  95         }
  96
  97         return name;
  98 }
  99
 100 char * get_control_type(int num, char *name)
 101 {
 102         switch (num) {
 103                 case CT_NONE:                                   strcpy(name, "CT_NONE       "); break;
 104                 case CT_AI:                                             strcpy(name, "CT_AI         "); break;
 105                 case CT_EXPLOSION:                      strcpy(name, "CT_EXPLOSION  "); break;
 106                 //case CT_MULTIPLAYER:                  strcpy(name, "CT_MULTIPLAYER"); break;
 107                 case CT_FLYING:                         strcpy(name, "CT_FLYING     "); break;
 108                 case CT_SLEW:                                   strcpy(name, "CT_SLEW       "); break;
 109                 case CT_FLYTHROUGH:                     strcpy(name, "CT_FLYTHROUGH "); break;
 110                 //case CT_DEMO:                                 strcpy(name, "CT_DEMO       "); break;
 111                 //case CT_ROBOT_FLYTHROUGH:     strcpy(name, "CT_FLYTHROUGH "); break;
 112                 case CT_WEAPON:                         strcpy(name, "CT_WEAPON     "); break;
 113                 default:                                                        strcpy(name, " (unknown)    "); break;
 114         }
 115         return name;
 116 }
 117
 118 char * get_movement_type(int num, char *name)
 119 {
 120         switch (num) {
 121                 case MT_NONE:                   strcpy(name, "MT_NONE       "); break;
 122                 case MT_PHYSICS:                strcpy(name, "MT_PHYSICS    "); break;
 123                 //case MT_MULTIPLAYER:  strcpy(name, "MT_MULTIPLAYER"); break;
 124                 default:                                        strcpy(name, " (unknown)    "); break;
 125         }
 126         return name;
 127 }
 128
 129 char * get_ai_behavior(int num, char *name)
 130 {
 131 #define AIB_STILL                                               0x80
 132 #define AIB_NORMAL                                              0x81
 133 #define AIB_HIDE                                                        0x82
 134 #define AIB_RUN_FROM                                    0x83
 135 #define AIB_FOLLOW_PATH                         0x84
 136
 137         switch (num) {
 138                 case AIB_STILL:                         strcpy(name, "STILL       ");   break;
 139                 case AIB_NORMAL:                                strcpy(name, "NORMAL      ");   break;
 140                 case AIB_HIDE:                                  strcpy(name, "HIDE        ");   break;
 141                 case AIB_RUN_FROM:                      strcpy(name, "RUN_FROM    ");   break;
 142                 case AIB_FOLLOW_PATH:           strcpy(name, "FOLLOW_PATH ");   break;
 143                 default:                                                        strcpy(name, " (unknown)  ");   break;
 144         }
 145         return name;
 146 }
 147
 148 //      ---------------------------------------------------------------------------------------------------
 149 void info_display_object_placement(int show_all)
 150 {
 151         static  int     old_Cur_object_index;
 152         static  int     old_type;
 153         static  int     old_movement_type;
 154         static  int     old_control_type;
 155         static  int     old_mode;
 156
 157         char            name[30];
 158
 159         if (init_info | show_all) {
 160                 old_Cur_object_index = -2;
 161                 old_type = -2;
 162                 old_movement_type = -2;
 163                 old_control_type = -2;
 164                 old_mode = -2;
 165         }
 166
 167         if ( ( Cur_object_index != old_Cur_object_index) ||
 168                         ( Objects[Cur_object_index].type != old_type) ||
 169                         ( Objects[Cur_object_index].movement_type != old_movement_type) ||
 170                         ( Objects[Cur_object_index].control_type != old_control_type) ||
 171                         ( Objects[Cur_object_index].ctype.ai_info.behavior != old_mode) ) {
 172
 173                 gr_uprintf( 0, 0, "Object id: %4d\n", Cur_object_index);
 174                 gr_uprintf( 0, 16, "Type: %s\n", get_object_type(Objects[Cur_object_index].type , name));
 175                 gr_uprintf( 0, 32, "Movmnt: %s\n", get_movement_type(Objects[Cur_object_index].movement_type, name));
 176                 gr_uprintf( 0, 48, "Cntrl: %s\n", get_control_type(Objects[Cur_object_index].control_type, name));
 177                 gr_uprintf( 0, 64, "Mode: %s\n", get_ai_behavior(Objects[Cur_object_index].ctype.ai_info.behavior, name));
 178
 179                 old_Cur_object_index = Cur_object_index;
 180                 old_type = Objects[Cur_object_index].type;
 181                 old_movement_type = Objects[Cur_object_index].movement_type;
 182                 old_mode = Objects[Cur_object_index].control_type;
 183                 old_mode = Objects[Cur_object_index].ctype.ai_info.behavior;
 184         }
 185
 186 }
 187
 188 //      ---------------------------------------------------------------------------------------------------
 189 void info_display_segsize(int show_all)
 190 {
 191         static  int     old_SegSizeMode;
 192
 193         char            name[30];
 194
 195         if (init_info | show_all) {
 196                 old_SegSizeMode = -2;
 197         }
 198
 199         if (old_SegSizeMode != SegSizeMode  ) {
 200                 switch (SegSizeMode) {
 201                         case SEGSIZEMODE_FREE:          strcpy(name, "free   ");        break;
 202                         case SEGSIZEMODE_ALL:           strcpy(name, "all    ");        break;
 203                         case SEGSIZEMODE_CURSIDE:       strcpy(name, "curside");        break;
 204                         case SEGSIZEMODE_EDGE:          strcpy(name, "edge   ");        break;
 205                         case SEGSIZEMODE_VERTEX:        strcpy(name, "vertex ");        break;
 206                         default:
 207                                 Error("Illegal value for SegSizeMode in info.c/info_display_segsize\n");
 208                 }
 209
 210                 gr_uprintf( 0, 0, "Mode: %s\n", name);
 211
 212                 old_SegSizeMode = SegSizeMode;
 213         }
 214
 215 }
 216
 217 extern int num_objects;
 218
 219 //      ---------------------------------------------------------------------------------------------------
 220 void info_display_default(int show_all)
 221 {
 222         static int old_Num_segments = -1;
 223         static int old_Num_vertices = -1;
 224         static int old_Num_objects = -1;
 225         static int old_Cursegp_num = -1;
 226         static int old_Curside = -1;
 227         static int old_Cursegp_num_for_verts = -1;
 228         static int old_CurrentTexture = -1;
 229         static int old_Num_walls = -1;
 230         static int old_Num_triggers = -1;
 231
 232         if (init_info | show_all) {
 233                 init_info = 0;
 234                 old_Num_segments = -1;
 235                 old_Num_vertices = -1;
 236                 old_Num_objects = -1;
 237                 old_Cursegp_num = -1;
 238                 old_Cursegp_num_for_verts = -1;
 239                 old_Curside = -1;
 240                 old_CurrentTexture = -1;
 241                 old_Num_walls = -1;
 242                 old_Num_triggers = -1;
 243         }
 244
 245         gr_set_fontcolor(CBLACK,CWHITE);
 246
 247         //--------------- Number of segments ----------------
 248
 249         if ( old_Num_segments != Num_segments ) {
 250                 gr_uprintf( 0, 0, "Segments: %4d/%4d", Num_segments, MAX_SEGMENTS );
 251                 old_Num_segments = Num_segments;
 252         }
 253
 254         //---------------- Number of vertics -----------------
 255
 256         if ( old_Num_vertices != Num_vertices ) {
 257                 gr_uprintf( 0, 16, "Vertices: %4d/%4d", Num_vertices, MAX_VERTICES );
 258                 old_Num_vertices = Num_vertices;
 259         }
 260
 261         //---------------- Number of objects -----------------
 262
 263         if ( old_Num_objects != num_objects )   {
 264                 gr_uprintf( 0, 32, "Objs: %3d/%3d", num_objects, MAX_OBJECTS );
 265                 old_Num_objects = num_objects;
 266         }
 267
 268         //--------------- Current_segment_number -------------
 269         //--------------- Current_side_number -------------
 270
 271         if (( old_Cursegp_num != Cursegp-Segments ) || ( old_Curside != Curside ))      {
 272                 gr_uprintf( 0, 48, "Cursegp/side: %3d/%1d", Cursegp-Segments, Curside);
 273                 gr_uprintf( 0, 128, " tmap1,2,o: %3d/%3dx%1d", Cursegp->sides[Curside].tmap_num, Cursegp->sides[Curside].tmap_num2 & 0x3FFF, (Cursegp->sides[Curside].tmap_num2 >> 14) & 3);
 274                 old_Cursegp_num = Cursegp-Segments;
 275                 old_Curside = Curside;
 276         }
 277
 278         //--------------- Current_vertex_numbers -------------
 279
 280         if ( old_Cursegp_num_for_verts != Cursegp-Segments )    {
 281
 282                 gr_uprintf( 0, 64, "{%3d,%3d,%3d,%3d,", Cursegp->verts[0],Cursegp->verts[1],
 283                                                                                                                                                                                          Cursegp->verts[2],Cursegp->verts[3] );
 284                 gr_uprintf( 0, 80," %3d,%3d,%3d,%3d}", Cursegp->verts[4],Cursegp->verts[5],
 285                                                                                                                                                                                          Cursegp->verts[6],Cursegp->verts[7] );
 286                 old_Cursegp_num_for_verts = Cursegp-Segments;
 287         }
 288
 289         //--------------- Num walls/links/triggers -------------------------
 290
 291         if ( old_Num_walls != Num_walls ) {
 292 //              gr_uprintf( 0, 96, "Walls/Links %d/%d", Num_walls, Num_links );
 293                 gr_uprintf( 0, 96, "Walls %3d", Num_walls );
 294                 old_Num_walls = Num_walls;
 295         }
 296
 297         //--------------- Num triggers ----------------------
 298
 299         if ( old_Num_triggers != Num_triggers ) {
 300                 gr_uprintf( 0, 112, "Num_triggers %2d", Num_triggers );
 301                 old_Num_triggers = Num_triggers;
 302         }
 303
 304         //--------------- Current texture number -------------
 305
 306         if ( old_CurrentTexture != CurrentTexture )     {
 307                 gr_uprintf( 0, 144, "Tex/Light: %3d %5.2f", CurrentTexture, f2fl(TmapInfo[CurrentTexture].lighting));
 308                 old_CurrentTexture = CurrentTexture;
 309         }
 310
 311 }
 312
 313 //      ------------------------------------------------------------------------------------
 314 void clear_pad_display(void)
 315 {
 316         gr_clear_canvas(CWHITE);
 317    gr_set_fontcolor( CBLACK, CWHITE );
 318 }
 319
 320 //      ------------------------------------------------------------------------------------
 321 void info_display_all( UI_WINDOW * wnd )
 322 {
 323         static int old_padnum = -1;
 324         int        padnum,show_all = 0;
 325         grs_canvas *save_canvas = grd_curcanv;
 326
 327         wnd++;          //kill warning
 328
 329         grd_curcanv = Pad_text_canvas;
 330
 331         padnum = ui_pad_get_current();
 332         Assert(padnum <= MAX_PAD_ID);
 333
 334         if (padnum != old_padnum) {
 335                 clear_pad_display();
 336                 old_padnum = padnum;
 337                 show_all = 1;
 338         }
 339
 340         switch (padnum) {
 341                 case OBJECT_PAD_ID:                     // Object placement
 342                         info_display_object_placement(show_all);
 343                         break;
 344                 case SEGSIZE_PAD_ID:                    // Segment sizing
 345                         info_display_segsize(show_all);
 346                         break;
 347                 default:
 348                         info_display_default(show_all);
 349                         break;
 350         }
 351         grd_curcanv = save_canvas;
 352 }
 353