/*
* Portions of this file are copyright Rebirth contributors and licensed as
* described in COPYING.txt.
* Portions of this file are copyright Parallax Software and licensed
* according to the Parallax license below.
* See COPYING.txt for license details.
THE COMPUTER CODE CONTAINED HEREIN IS THE SOLE PROPERTY OF PARALLAX
SOFTWARE CORPORATION ("PARALLAX"). PARALLAX, IN DISTRIBUTING THE CODE TO
END-USERS, AND SUBJECT TO ALL OF THE TERMS AND CONDITIONS HEREIN, GRANTS A
ROYALTY-FREE, PERPETUAL LICENSE TO SUCH END-USERS FOR USE BY SUCH END-USERS
IN USING, DISPLAYING, AND CREATING DERIVATIVE WORKS THEREOF, SO LONG AS
SUCH USE, DISPLAY OR CREATION IS FOR NON-COMMERCIAL, ROYALTY OR REVENUE
FREE PURPOSES. IN NO EVENT SHALL THE END-USER USE THE COMPUTER CODE
CONTAINED HEREIN FOR REVENUE-BEARING PURPOSES. THE END-USER UNDERSTANDS
AND AGREES TO THE TERMS HEREIN AND ACCEPTS THE SAME BY USE OF THIS FILE.
COPYRIGHT 1993-1998 PARALLAX SOFTWARE CORPORATION. ALL RIGHTS RESERVED.
*/
/*
*
* Miscellaneous functions stripped out of med.c
*
*/
#include <stdio.h>
#include <stdlib.h>
#include <stdarg.h>
#include <string.h>
#include "gr.h"
#include "ui.h"
#include "3d.h"
#include "u_mem.h"
#include "dxxerror.h"
#include "key.h"
#include "mouse.h"
#include "func.h"
#include "inferno.h"
#include "editor/editor.h"
#include "editor/esegment.h"
#include "editor/medmisc.h"
#include "gameseg.h"
#include "segment.h"
#include "render.h"
#include "screens.h"
#include "object.h"
#include "texpage.h" // For texpage_goto_first
#include "meddraw.h" // For draw_World
#include "game.h"
#include "kdefs.h"
#if DXX_USE_OGL
#include "ogl_init.h"
#endif
#include "compiler-range_for.h"
//return 2d distance, i.e, sqrt(x*x + y*y)
#ifdef __WATCOMC__
long dist_2d(long x,long y);
#pragma aux dist_2d parm [eax] [ebx] value [eax] modify [ecx edx] = \
"imul eax" \
"xchg ebx,eax" \
"mov ecx,edx" \
"imul eax" \
"add eax,ebx" \
"adc edx,ecx" \
"call quad_sqrt";
#else
#include <math.h>
static long dist_2d(long x,long y) {
return sqrt(static_cast<double>(x) * static_cast<double>(x) + static_cast<double>(y) * static_cast<double>(y));
}
#endif
// Given mouse movement in dx, dy, returns a 3x3 rotation matrix in RotMat.
// Taken from Graphics Gems III, page 51, "The Rolling Ball"
void GetMouseRotation( int idx, int idy, vms_matrix * RotMat )
{
fix dr, cos_theta, sin_theta, denom, cos_theta1;
fix Radius = i2f(100);
fix dx,dy;
fix dxdr,dydr;
idy *= -1;
dx = i2f(idx); dy = i2f(idy);
dr = dist_2d(dx,dy);
denom = dist_2d(Radius,dr);
cos_theta = fixdiv(Radius,denom);
sin_theta = fixdiv(dr,denom);
cos_theta1 = f1_0 - cos_theta;
dxdr = fixdiv(dx,dr);
dydr = fixdiv(dy,dr);
RotMat->rvec.x = cos_theta + fixmul(fixmul(dydr,dydr),cos_theta1);
RotMat->uvec.x = - fixmul(fixmul(dxdr,dydr),cos_theta1);
RotMat->fvec.x = fixmul(dxdr,sin_theta);
RotMat->rvec.y = RotMat->uvec.x;
RotMat->uvec.y = cos_theta + fixmul(fixmul(dxdr,dxdr),cos_theta1);
RotMat->fvec.y = fixmul(dydr,sin_theta);
RotMat->rvec.z = -RotMat->fvec.x;
RotMat->uvec.z = -RotMat->fvec.y;
RotMat->fvec.z = cos_theta;
}
int Gameview_lockstep; //if set, view is locked to Curseg
int ToggleLockstep()
{
auto &LevelSharedVertexState = LevelSharedSegmentState.get_vertex_state();
auto &Vertices = LevelSharedVertexState.get_vertices();
Gameview_lockstep = !Gameview_lockstep;
if (Gameview_lockstep == 0) {
//if (keypress != KEY_L)
diagnostic_message("[Ctrl-L] - Lock mode OFF");
//else
// diagnostic_message("Lock mode OFF");
}
if (Gameview_lockstep) {
//if (keypress != KEY_L)
diagnostic_message("[Ctrl-L] Lock mode ON");
//else
// diagnostic_message("Lock mode ON");
Cursegp = imsegptridx(ConsoleObject->segnum);
med_create_new_segment_from_cursegp();
auto &vcvertptr = Vertices.vcptr;
set_view_target_from_segment(vcvertptr, Cursegp);
Update_flags = UF_ED_STATE_CHANGED;
}
return Gameview_lockstep;
}
int medlisp_delete_segment(void)
{
auto &LevelSharedVertexState = LevelSharedSegmentState.get_vertex_state();
auto &Vertices = LevelSharedVertexState.get_vertices();
if (!med_delete_segment(Cursegp)) {
if (Lock_view_to_cursegp)
{
auto &vcvertptr = Vertices.vcptr;
set_view_target_from_segment(vcvertptr, Cursegp);
}
autosave_mine(mine_filename);
undo_status[Autosave_count] = "Delete Segment UNDONE.";
Update_flags |= UF_WORLD_CHANGED;
mine_changed = 1;
diagnostic_message("Segment deleted.");
warn_if_concave_segments(); // This could be faster -- just check if deleted segment was concave, warn accordingly
}
return 1;
}
int medlisp_scale_segment(void)
{
vms_vector scale;
scale.x = fl2f(static_cast<float>(func_get_param(0)));
scale.y = fl2f(static_cast<float>(func_get_param(1)));
scale.z = fl2f(static_cast<float>(func_get_param(2)));
med_create_new_segment(scale);
med_rotate_segment(Cursegp,vm_angles_2_matrix(Seg_orientation));
Update_flags |= UF_WORLD_CHANGED;
mine_changed = 1;
return 1;
}
int medlisp_rotate_segment(void)
{
Seg_orientation.p = func_get_param(0);
Seg_orientation.b = func_get_param(1);
Seg_orientation.h = func_get_param(2);
med_rotate_segment(Cursegp,vm_angles_2_matrix(Seg_orientation));
Update_flags |= UF_WORLD_CHANGED | UF_VIEWPOINT_MOVED;
mine_changed = 1;
return 1;
}
int ToggleLockViewToCursegp(void)
{
auto &LevelSharedVertexState = LevelSharedSegmentState.get_vertex_state();
auto &Vertices = LevelSharedVertexState.get_vertices();
Lock_view_to_cursegp = !Lock_view_to_cursegp;
Update_flags = UF_ED_STATE_CHANGED;
if (Lock_view_to_cursegp) {
//if (keypress != KEY_V+KEY_CTRLED)
diagnostic_message("[ctrl-V] View locked to Cursegp.");
//else
// diagnostic_message("View locked to Cursegp.");
auto &vcvertptr = Vertices.vcptr;
set_view_target_from_segment(vcvertptr, Cursegp);
} else {
//if (keypress != KEY_V+KEY_CTRLED)
diagnostic_message("[ctrl-V] View not locked to Cursegp.");
//else
// diagnostic_message("View not locked to Cursegp.");
}
return Lock_view_to_cursegp;
}
int ToggleDrawAllSegments()
{
Draw_all_segments = !Draw_all_segments;
Update_flags = UF_ED_STATE_CHANGED;
if (Draw_all_segments == 1) {
//if (keypress != KEY_A+KEY_CTRLED)
diagnostic_message("[ctrl-A] Draw all segments ON.");
//else
// diagnostic_message("Draw all segments ON.");
}
if (Draw_all_segments == 0) {
//if (keypress != KEY_A+KEY_CTRLED)
diagnostic_message("[ctrl-A] Draw all segments OFF.");
//else
// diagnostic_message("Draw all segments OFF.");
}
return Draw_all_segments;
}
int Big_depth=6;
int IncreaseDrawDepth(void)
{
Big_depth++;
Update_flags = UF_ED_STATE_CHANGED;
return 1;
}
int DecreaseDrawDepth(void)
{
if (Big_depth > 1) {
Big_depth--;
Update_flags = UF_ED_STATE_CHANGED;
}
return 1;
}
int ToggleCoordAxes()
{
// Toggle display of coordinate axes.
Show_axes_flag = !Show_axes_flag;
LargeView.ev_changed = 1;
if (Show_axes_flag == 1) {
//if (keypress != KEY_D+KEY_CTRLED)
diagnostic_message("[ctrl-D] Coordinate axes ON.");
//else
// diagnostic_message("Coordinate axes ON.");
}
if (Show_axes_flag == 0) {
//if (keypress != KEY_D+KEY_CTRLED)
diagnostic_message("[ctrl-D] Coordinate axes OFF.");
//else
// diagnostic_message("Coordinate axes OFF.");
}
return Show_axes_flag;
}
int med_keypad_goto_prev()
{
ui_pad_goto_prev();
return 0;
}
int med_keypad_goto_next()
{
ui_pad_goto_next();
return 0;
}
int med_keypad_goto()
{
ui_pad_goto(func_get_param(0));
return 0;
}
int render_3d_in_big_window=0;
int medlisp_update_screen()
{
#if 1 //def OGL
Update_flags = UF_ALL;
#endif
if (!render_3d_in_big_window)
range_for (const auto vn, Views)
if (vn->ev_changed || (Update_flags & (UF_WORLD_CHANGED | UF_VIEWPOINT_MOVED | UF_ED_STATE_CHANGED)))
{
draw_world(vn->ev_canv, vn, Cursegp, Big_depth);
vn->ev_changed = 0;
}
if (Update_flags & (UF_WORLD_CHANGED|UF_GAME_VIEW_CHANGED|UF_ED_STATE_CHANGED)) {
grs_canvas *render_canv,*show_canv;
if (render_3d_in_big_window) {
render_canv = LargeView.ev_canv;
show_canv = LargeView.ev_canv;
}
else {
render_canv = Canv_editor_game;
show_canv = Canv_editor_game;
}
gr_set_current_canvas(render_canv);
render_frame(*grd_curcanv, 0);
Assert(render_canv->cv_bitmap.bm_w == show_canv->cv_bitmap.bm_w &&
render_canv->cv_bitmap.bm_h == show_canv->cv_bitmap.bm_h);
(void)show_canv;
}
Update_flags=UF_NONE; //clear flags
return 1;
}
void med_point_2_vec(grs_canvas *canv,vms_vector &v,short sx,short sy)
{
gr_set_current_canvas(canv);
g3_start_frame(*grd_curcanv);
g3_set_view_matrix(Viewer->pos,Viewer->orient,Render_zoom);
g3_point_2_vec(v,sx,sy);
g3_end_frame();
}
void draw_world_from_game(void)
{
if (ModeFlag == 2)
draw_world(Views[0]->ev_canv,Views[0],Cursegp,Big_depth);
}
int UndoCommand()
{
auto &LevelSharedVertexState = LevelSharedSegmentState.get_vertex_state();
auto &Vertices = LevelSharedVertexState.get_vertices();
int u;
u = undo();
if (Lock_view_to_cursegp)
{
auto &vcvertptr = Vertices.vcptr;
set_view_target_from_segment(vcvertptr, Cursegp);
}
if (u == 0) {
if (Autosave_count==9) diagnostic_message(undo_status[0]);
else
diagnostic_message(undo_status[Autosave_count+1]);
}
else
if (u == 1) diagnostic_message("Can't Undo.");
else
if (u == 2) diagnostic_message("Can't Undo - Autosave OFF");
Update_flags |= UF_WORLD_CHANGED;
mine_changed = 1;
warn_if_concave_segments();
return 1;
}
int ToggleAutosave()
{
Autosave_flag = !Autosave_flag;
if (Autosave_flag == 1)
diagnostic_message("Autosave ON.");
else
diagnostic_message("Autosave OFF.");
return Autosave_flag;
}
int AttachSegment()
{
auto &LevelSharedVertexState = LevelSharedSegmentState.get_vertex_state();
auto &Vertices = LevelSharedVertexState.get_vertices();
if (med_attach_segment(Cursegp, vmsegptr(&New_segment), Curside, AttachSide)==4) // Used to be WBACK instead of Curside
diagnostic_message("Cannot attach segment - already a connection on current side.");
else {
if (Lock_view_to_cursegp)
{
auto &vcvertptr = Vertices.vcptr;
set_view_target_from_segment(vcvertptr, Cursegp);
}
vm_angvec_make(&Seg_orientation,0,0,0);
Curside = WBACK;
Update_flags |= UF_WORLD_CHANGED;
autosave_mine(mine_filename);
undo_status[Autosave_count] = "Attach Segment UNDONE.";
mine_changed = 1;
warn_if_concave_segment(Cursegp);
}
return 1;
}
#if ORTHO_VIEWS
int SyncLargeView()
{
// Make large view be same as one of the orthogonal views.
Large_view_index = (Large_view_index + 1) % 3; // keep in 0,1,2 for top, front, right
switch (Large_view_index) {
case 0: LargeView.ev_matrix = TopView.ev_matrix; break;
case 1: LargeView.ev_matrix = FrontView.ev_matrix; break;
case 2: LargeView.ev_matrix = RightView.ev_matrix; break;
}
Update_flags |= UF_VIEWPOINT_MOVED;
return 1;
}
#endif
int CreateDefaultNewSegment()
{
// Create a default segment for New_segment.
med_create_new_segment({DEFAULT_X_SIZE, DEFAULT_Y_SIZE, DEFAULT_Z_SIZE});
mine_changed = 1;
return 1;
}
int CreateDefaultNewSegmentandAttach()
{
CreateDefaultNewSegment();
AttachSegment();
return 1;
}
int ExchangeMarkandCurseg()
{
// If Markedsegp != Cursegp, and Markedsegp->segnum != -1, exchange Markedsegp and Cursegp
if (Markedsegp)
if (Markedsegp->segnum != segment_none) {
using std::swap;
swap(Markedsegp, Cursegp);
swap(Markedside, Curside);
med_create_new_segment_from_cursegp();
Update_flags |= UF_ED_STATE_CHANGED;
mine_changed = 1;
}
return 1;
}
int ClearSelectedList(void)
{
Selected_segs.clear();
Update_flags |= UF_WORLD_CHANGED;
diagnostic_message("Selected list cleared.");
return 1;
}
int ClearFoundList(void)
{
Found_segs.clear();
Update_flags |= UF_WORLD_CHANGED;
diagnostic_message("Found list cleared.");
return 1;
}
// ---------------------------------------------------------------------------------------------------
void set_view_target_from_segment(fvcvertptr &vcvertptr, const shared_segment &sp)
{
if (Funky_chase_mode)
{
//set_chase_matrix(sp);
}
else {
vms_vector tv{};
range_for (const auto &v, sp.verts)
vm_vec_add2(tv, vcvertptr(v));
vm_vec_scale(tv,F1_0/MAX_VERTICES_PER_SEGMENT);
Ed_view_target = tv;
}
Update_flags |= UF_VIEWPOINT_MOVED;
}