开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 图形图像 > 3D图形编程 > 查看源码
plvInit.cc
资源名称：scanalyze-1.0.3_source_code.rar　[点击查看]
上传用户：kellyonhid
上传日期：2013-10-12
资源大小：932k
文件大小：13k
源码类别：

3D图形编程

开发平台：

Visual C++

plvInit.cc：源码内容
  1. #include <tk.h>
  2. #include <stdlib.h>
  3. #include <limits.h>
  5. #include "togl.h"
  6. #include "plvInit.h"
  7. #include "plvGlobals.h"
  8. #include "plvCmds.h"
  9. #include "plvPlyCmds.h"
  10. #include "plvViewerCmds.h"
  11. #include "plvDrawCmds.h"
  12. #include "plvCybCmds.h"
  13. #include "plvImageCmds.h"
  14. #include "plvClipBoxCmds.h"
  15. #include "plvMeshCmds.h"
  16. #include "plvScene.h"
  17. #include "plvDraw.h"
  18. #include "sczRegCmds.h"
  19. #include "plvAnalyze.h"
  20. #include "plvMMCmds.h"
  21. #include "CyberCmds.h"
  22. #include "Trackball.h"
  23. #include "BailDetector.h"
  24. #include "Progress.h"
  27. int PlvDeinitCmd(ClientData clientData, Tcl_Interp *interp, 
  28.  int argc, char *argv[]);
  29. int PlvGetRendererStringCmd(ClientData clientData, Tcl_Interp *interp, 
  30.     int argc, char *argv[]);
  31. int PlvGetWordSizeCmd(ClientData clientData, Tcl_Interp *interp, 
  32.       int argc, char *argv[]);
  33. float getGLVersion (void);
  36. #define PlvCreateCommand(name,func) 
  37.     Tcl_CreateCommand (interp, (name), (func), (ClientData)main, 
  38.        (Tcl_CmdDeleteProc *)NULL)
  41. int
  42. Plv_Init(Tcl_Interp *interp)
  43. {
  44.   Tk_Window main;
  45.   main = Tk_MainWindow(interp);
  47.   g_tclInterp = interp;
  49.   PlvCreateCommand("plv_saveCurrentGroup", PlvSaveCurrentGroup); 
  51.   PlvCreateCommand("plv_smoothMesh",PlvSmoothMesh );
  52.   PlvCreateCommand("plv_lastRenderTime",PlvLastRenderTime );
  53.   PlvCreateCommand("plv_sweepCoordToWorldCoord", PlvSweepCoordToWorldCoord);
  54.   PlvCreateCommand("plv_worldCoordToSweepCoord", PlvWorldCoordToSweepCoord);
  55.   PlvCreateCommand("plv_getVisiblyRenderedScans", PlvGetVisiblyRenderedScans);
  56.   PlvCreateCommand("plv_getrendererstring", PlvGetRendererStringCmd);
  57.   PlvCreateCommand("plv_getwordsize", PlvGetWordSizeCmd);
  59.   PlvCreateCommand("plv_draw", PlvDrawCmd);
  60.   PlvCreateCommand("plv_clearwin", PlvClearWinCmd);
  61.   PlvCreateCommand("plv_writeiris", PlvWriteIrisCmd);
  62.   PlvCreateCommand("plv_fillphoto", PlvFillPhotoCmd);
  63.   PlvCreateCommand("plv_invalidateToglCache", PlvInvalidateToglCacheCmd);
  64.   PlvCreateCommand("plv_countPixels", PlvCountPixelsCmd);
  66.   PlvCreateCommand("plv_light", PlvLightCmd);
  67.   PlvCreateCommand("plv_drawstyle", PlvDrawStyleCmd);
  68.   PlvCreateCommand("plv_material", PlvMaterialCmd);
  69.   PlvCreateCommand("plv_load_projective_texture", PlvLoadProjectiveTexture);
  70.   PlvCreateCommand("plv_resolution", PlvMeshResolutionCmd);
  71.   PlvCreateCommand("plv_setoverallres", PlvSetOverallResCmd);
  72.   PlvCreateCommand("plv_scan_colorcode", PlvScanColorCodeCmd);
  73.   PlvCreateCommand("plv_getvisible", PlvGetVisibleCmd);
  74.   PlvCreateCommand("plv_setvisible", PlvSetVisibleCmd);
  76.   PlvCreateCommand("plv_sort_scan_list", PlvSortScanListCmd);
  77.   PlvCreateCommand("plv_listscans", PlvListScansCmd);
  78.   PlvCreateCommand("plv_meshinfo", PlvMeshInfoCmd);
  79.   PlvCreateCommand("plv_meshsetdelete", PlvMeshSetDeleteCmd);
  80.   PlvCreateCommand("plv_camerainfo", PlvCameraInfoCmd);
  81.   PlvCreateCommand("plv_positioncamera", PlvPositionCameraCmd);
  82.   PlvCreateCommand("plv_zoom_to_rect", PlvZoomToRectCmd);
  83.   PlvCreateCommand("plv_print_voxels", PlvPrintVoxelsCmd);
  84.   /* added command to print voxel info for ply file 
  85.      - for display voxel feature */
  87.   PlvCreateCommand("plv_param", PlvParamCmd);
  88.   PlvCreateCommand("baildetect", PlvBailDetectCmd);
  89.   PlvCreateCommand("plv_progress", PlvProgressCmd);
  90.   PlvCreateCommand("plv_readcyb", PlvReadCybCmd);
  91.   PlvCreateCommand("plv_bumpcyb", PlvBumpCybCmd);
  92.   PlvCreateCommand("plv_shadecyb", PlvShadeCybCmd);
  93.   PlvCreateCommand("plv_israngegrid", PlvIsRangeGridCmd);
  95.   PlvCreateCommand("scz_session", SczSessionCmd);
  96.   PlvCreateCommand("scz_pseudogroup", SczPseudoGroupCmd);
  97.   PlvCreateCommand("plv_readfile", PlvReadFileCmd);
  98.   PlvCreateCommand("plv_readgroupmembers", PlvReadGroupMembersCmd); 
  99.   PlvCreateCommand("plv_synthesize", PlvSynthesizeObjectCmd);
  100.   PlvCreateCommand("plv_write_scan", PlvWriteScanCmd);
  101.   PlvCreateCommand("plv_write_metadata", PlvWriteMetaDataCmd);
  102.   PlvCreateCommand("plv_write_resolutionmesh", PlvWriteResolutionMeshCmd);
  103.   PlvCreateCommand("plv_get_scan_filename", PlvGetScanFilenameCmd);
  104.   PlvCreateCommand("plv_getNextAvailGroupName", PlvGetNextGroupNameCmd);
  105.   PlvCreateCommand("plv_is_scan_modified", PlvIsScanModifiedCmd);
  106.   PlvCreateCommand("plv_groupscans", PlvGroupScansCmd);
  107.     
  108.   PlvCreateCommand("plv_constrain_rotation", PlvConstrainRotationCmd);
  109.   PlvCreateCommand("plv_force_keep_onscreen", PlvForceKeepOnscreenCmd);
  110.   PlvCreateCommand("plv_ortho", PlvOrthographicCmd);
  111.   PlvCreateCommand("plv_persp", PlvPerspectiveCmd);
  112.   PlvCreateCommand("plv_zoomangle", PlvZoomAngleCmd);
  113.   PlvCreateCommand("plv_oblique_camera", PlvObliqueCameraCmd);
  115.   PlvCreateCommand("plv_viewall", PlvViewAllCmd);
  116.   PlvCreateCommand("plv_resetxform", PlvResetXformCmd);
  117.   PlvCreateCommand("plv_selectscan", PlvSelectScanCmd);
  118.   PlvCreateCommand("plv_rotlight", PlvRotateLightCmd);
  119.   PlvCreateCommand("plv_rotxyviewmouse", PlvRotateXYViewMouseCmd);
  120.   PlvCreateCommand("plv_transxyviewmouse", PlvTransXYViewMouseCmd);
  121.   PlvCreateCommand("plv_translateinplane", PlvTranslateInPlaneCmd);
  122.   PlvCreateCommand("plv_undo_xform", PlvUndoXformCmd);
  123.   PlvCreateCommand("plv_redo_xform", PlvRedoXformCmd);
  124.   PlvCreateCommand("plv_screentoworld", PlvGetScreenToWorldCoords);
  125.   PlvCreateCommand("plv_pickscan", PlvPickScanFromPointCmd);
  126.   PlvCreateCommand("plv_set_this_as_center_of_rotation",
  127.        PlvSetThisAsCenterOfRotation);
  128.   PlvCreateCommand("plv_reset_rotation_center",
  129.        PlvResetCenterOfRotation);
  130.   PlvCreateCommand("SetHome", PlvSetHomeCmd);
  131.   PlvCreateCommand("GoHome", PlvGoHomeCmd);
  132.   PlvCreateCommand("plv_transmesh", PlvTransMeshCmd);
  133.   PlvCreateCommand("plv_blendmesh", PlvBlendMeshCmd);
  134.   PlvCreateCommand("plv_camera_xform_to_mesh", PlvFlattenCameraXformCmd);
  135.   PlvCreateCommand("plv_setslowpolycount", PlvSetSlowPolyCountCmd);
  136.   PlvCreateCommand("plv_setManipRenderMode", PlvSetManipRenderModeCmd);
  138.   PlvCreateCommand("plv_manrotate", PlvManualRotateCmd);
  139.   PlvCreateCommand("plv_mantranslate", PlvManualTranslateCmd);
  141.   PlvCreateCommand("plv_clearselection", PlvClearSelectionCmd);
  142.   PlvCreateCommand("plv_drawboxselection", PlvDrawBoxSelectionCmd);
  143.   PlvCreateCommand("plv_drawlineselection", PlvDrawLineSelectionCmd);
  144.   PlvCreateCommand("plv_drawshapeselection", PlvDrawShapeSelectionCmd);
  145.   PlvCreateCommand("plv_getselectioncursor", PlvGetSelectionCursorCmd);
  146.   PlvCreateCommand("plv_getselectioninfo", PlvGetSelectionInfoCmd);
  148.   PlvCreateCommand("plv_clip_to_selection", PlvClipToSelectionCmd);
  149.   PlvCreateCommand("plv_get_selected_meshes", PlvGetSelectedMeshesCmd);
  150.   PlvCreateCommand("plv_clipBoxPlaneFit", PlvAlignToMeshBoxCmd);
  151.   PlvCreateCommand("plv_analyze_line_depth", PlvAnalyzeClipLineDepth);
  152.   PlvCreateCommand("plv_analyzeLineMode", PlvAnalyzeLineModeCmd);
  153.   PlvCreateCommand("plv_export_graph_as_text", PlvExportGraphAsText);
  155.   PlvCreateCommand("wsh_warp_mesh", wsh_WarpMesh);
  156.   PlvCreateCommand("wsh_align_points_to_plane", wsh_AlignPointsToPlane);
  157.   PlvCreateCommand("plv_draw_analyze_lines", PlvDrawAnalyzeLines);
  158.   PlvCreateCommand("plv_clear_analyze_lines", PlvClearAnalyzeLines);
  160.   PlvCreateCommand("plv_decimate", PlvMeshDecimateCmd);
  161.   PlvCreateCommand("plv_getreslist", PlvMeshResListCmd);
  162.   PlvCreateCommand("plv_getcurrentres", PlvCurrentResCmd);
  163.   PlvCreateCommand("plv_setmeshpreload", PlvSetMeshResPreloadCmd);
  164.   PlvCreateCommand("plv_mesh_res_delete", PlvMeshDeleteResCmd);
  165.   PlvCreateCommand("plv_mesh_res_unload", PlvMeshUnloadResCmd);
  166.   PlvCreateCommand("remove_step", PlvMeshRemoveStepCmd);  
  167.   PlvCreateCommand("FlipMeshNormals", PlvFlipMeshNormalsCmd);
  168.   PlvCreateCommand("plv_hilitescan", PlvHiliteScanCmd);
  169.   PlvCreateCommand("plv_render_thickness", PlvRenderThicknessCmd);
  171.   PlvCreateCommand("plv_shutdown", PlvDeinitCmd);
  172.       
  173.   PlvCreateCommand("plv_icpregister", PlvRegIcpCmd);
  174.   PlvCreateCommand("plv_icpreg_markquality", PlvRegIcpMarkQualityCmd);
  175.   PlvCreateCommand("plv_showicplines", PlvShowIcpLinesCmd);
  176.   PlvCreateCommand("bindToglToAlignmentView", PlvBindToglToAlignmentViewCmd);
  177.   PlvCreateCommand("bindToglToAlignmentOverview",
  178.    PlvBindToglToAlignmentOverviewCmd);
  179.   PlvCreateCommand("plv_correspRegParms", PlvCorrespRegParmsCmd);
  180.   PlvCreateCommand("RegUIMouse", PlvRegUIMouseCmd);
  181.   PlvCreateCommand("AddPartialRegCorrespondence",
  182.    PlvAddPartialRegCorrespondenceCmd);
  183.   PlvCreateCommand("DeleteRegCorrespondence", PlvDeleteRegCorrespondenceCmd);
  184.   PlvCreateCommand("ConfirmRegCorrespondence",
  185.    PlvConfirmRegCorrespondenceCmd);
  186.   PlvCreateCommand("GetCorrespondenceInfo", PlvGetCorrespondenceInfoCmd);
  187.   PlvCreateCommand("plv_registerCorresp", PlvCorrespondenceRegistrationCmd);
  188.   PlvCreateCommand("DragRegister", PlvDragRegisterCmd);
  189.   PlvCreateCommand("plv_globalreg", PlvGlobalRegistrationCmd);
  190.   PlvCreateCommand("scz_auto_register", SczAutoRegisterCmd);
  191.   PlvCreateCommand("scz_xform_scan", SczXformScanCmd);
  192.   PlvCreateCommand("scz_get_scan_xform", SczGetScanXformCmd);
  194.   PlvCreateCommand("mms_vriporient", MmsVripOrientCmd);
  195.   PlvCreateCommand("mms_absorbxform", MmsAbsorbXformCmd);
  196.   PlvCreateCommand("mms_getscanfalsecolor", MmsGetScanFalseColorCmd);
  197.   PlvCreateCommand("mms_numscans", MmsNumScansCmd);
  198.   PlvCreateCommand("mms_isscanvisible", MmsIsScanVisibleCmd);
  199.   PlvCreateCommand("mms_setscanvisible", MmsSetScanVisibleCmd);
  200.   PlvCreateCommand("mms_deletescan", MmsDeleteScanCmd);
  201.   PlvCreateCommand("mms_flipscannorms", MmsFlipScanNormsCmd);
  202.   PlvCreateCommand("mms_resetcache", MmsResetCacheCmd);
  203.   PlvCreateCommand("plv_write_mm_for_vrip", PlvWriteMMForVripCmd);
  205.   PlvCreateCommand("plv_spacecarve", PlvSpaceCarveCmd);
  206.   PlvCreateCommand("plv_write_sd_for_vrip", PlvWriteSDForVripCmd);
  207.   PlvCreateCommand("plv_dice_cyber_data", PlvDiceCyberDataCmd);
  208.   PlvCreateCommand("plv_cyberscan_selfalign", PlvCyberScanSelfAlignCmd);
  209.   PlvCreateCommand("scn_dumplaserpnts", ScnDumpLaserPntsCmd);
  210.   PlvCreateCommand("plv_working_volume", PlvWorkingVolumeCmd);
  211.   PlvCreateCommand("plv_saveworlddata", WriteWorldDataFromScreen);
  212.   PlvCreateCommand("plv_savedepth", WriteOrthoDepth);
  214.   PlvCreateCommand("plv_write_ply_for_vrip", PlvWritePlyForVripCmd);
  216.   PlvCreateCommand("updatewindow", PlvUpdateWindowCmd);
  217.   PlvCreateCommand("get_tick_count", SczGetSystemTickCountCmd);
  218.   
  219.   PlvCreateCommand("plv_extProg", PlvRunExternalProgram);
  221.   tbView  = new Trackball;
  222.   theScene = new Scene (interp);
  224.   if (!g_bNoUI) {
  225.     // initialize interactors
  226.     Togl_DisplayFunc (drawInTogl);
  227.     Togl_CreateFunc (catchToglCreate);
  228.     Togl_OverlayDisplayFunc (drawOverlay);
  229.     initDrawing();
  230.   }
  232.   char *plvDir = getenv("SCANALYZE_DIR");
  233.   if (plvDir == NULL) {
  234.     interp->result = "Need to set SCANALYZE_DIR environment variable.";
  235.     return TCL_ERROR;
  236.   }
  238.   char plvPath[PATH_MAX];
  239.   strcpy(plvPath, plvDir);
  240.   strcat(plvPath, "/scanalyze.tcl");
  242.   Tcl_SetVar (interp, "noui", g_bNoUI ? "1" : "0", TCL_GLOBAL_ONLY);
  243.   int code = Tcl_EvalFile(interp, plvPath);
  244.   if (code != TCL_OK) {
  245.     interp->result = Tcl_GetVar (interp, "errorInfo", TCL_GLOBAL_ONLY);
  246.     return TCL_ERROR;
  247.   }
  249.   // and, once togl widget exists (after scanalyze.tcl is sourced):
  250.   // since these things need a GL context
  251.   if (!g_bNoUI) {
  252.     initDrawingPostCreation();
  253.     g_glVersion = getGLVersion();
  254.     Tk_CreateTimerHandler (30, SpinTrackballs, (ClientData)main);
  255.   }
  257.   // finally, source the user customizations -- ~/.scanalyzerc
  258.   char* homeDir = getenv("HOME");
  259.   if (homeDir == NULL) {
  260.     fprintf(stderr, "Environment variable HOME not set - "
  261.     "will not execute $HOME/.scanalyzercn");
  262.   } else {
  263.     char rcPath[PATH_MAX];
  264.     strcpy(rcPath, homeDir);
  265.     strcat(rcPath, "/.scanalyzerc");
  266.     Tcl_VarEval(interp, "file exists ", rcPath, (char *)NULL);
  267.     if (atoi(interp->result)) {
  268.       code = Tcl_EvalFile(interp, rcPath);
  269.       if (code != TCL_OK) {
  270. char* errMsg = Tcl_GetVar (interp, "errorInfo", TCL_GLOBAL_ONLY);
  271. fprintf (stderr, "nWarning: errors detected in ~/.scanalyzercnn"
  272.  "%snn"
  273.  "Scanalyze should be ok but your customizations probably "
  274.  " won't be.nn", errMsg);
  275.       }
  276.     }
  277.   }
  279.   return TCL_OK;
  280. }
  284. int
  285. PlvDeinitCmd(ClientData clientData, Tcl_Interp *interp, 
  286.      int argc, char *argv[])
  287. {
  288. #if 0
  289.   delete theScene;
  290.   theScene = NULL;
  292.   //if this returns, Tk keeps processing events, and may call event
  293.   //handlers -- in particular, it will try to redraw, which will crash
  294.   //because there's no scene -- could also have drawMeshes() check for this.
  295.   exit (0);
  296. #else
  297.   theScene->freeMeshes();
  298. #endif
  300.   return TCL_OK;
  301. }
  304. float
  305. getGLVersion (void)
  306. {
  307.   const GLubyte* verStr = glGetString (GL_VERSION);
  308.   const GLubyte* verRenderer = glGetString (GL_RENDERER);
  310.   float ver = atof ((const char*)verStr);
  312.   printf ("OpenGL version is %g is rendered by %sn", ver, verRenderer);
  314.   return ver;
  315. }
  318. int PlvGetRendererStringCmd(ClientData clientData, Tcl_Interp *interp, 
  319.     int argc, char *argv[])
  320. {
  321.   const GLubyte* renderer = glGetString (GL_RENDERER);
  322.   Tcl_SetResult (interp, (char*)renderer, TCL_VOLATILE);
  323.   return TCL_OK;
  324. }
  327. int PlvGetWordSizeCmd(ClientData clientData, Tcl_Interp *interp, 
  328.       int argc, char *argv[])
  329. {
  330.   char buf[8];
  331.   sprintf (buf, "%ld", sizeof (long));
  332.   Tcl_SetResult (interp, buf, TCL_VOLATILE);
  333.   return TCL_OK;
  334. }