externals.c

Go to the documentation of this file.

/* --
OpenFX - Modelling, Animation and Rendering Package
-- */


/* file loader.c  - loads/saves the models from their files on disk  */

#define MODULE_EXTERNAL 1

#include "design.h"

static void LoadRenderer(int anim);

void LoadMDIviewer(void){
 BOOL n=FALSE;
 int result;
 char modulename[255];
 HWND hWnd;
 if((hWnd=FindWindow("OFX:Viewer",NULL)) == NULL){
   strcpy(modulename,gszHomeDir);strcat(modulename,"mdiview.exe");
   n=TRUE;
   result=WinExec(modulename,SW_SHOW);
   if(result < 32){
     if(result == ERROR_FILE_NOT_FOUND ||
        result == ERROR_PATH_NOT_FOUND)SendPrgmQuery(IDQ_NOSTART,3);
     return;
   }
   hWnd=FindWindow("OFX:Viewer",NULL);
 }
 if(IsWindow(hWnd)){
   SetForegroundWindow(hWnd);
   BringWindowToTop(hWnd);
   ShowWindow(hWnd,SW_SHOW);
   if(n)PostMessage(hWnd,WM_COMMAND,1004,0);
 }
 return;
}


BOOL LoadHeightField(HWND hwnd){
 BOOL status=FALSE;
 HMODULE hLib;
 FARPROC fpFun;
 char lname[256];
 X__STRUCTURE *Evs;
 BOOL (*fpFun1)(HWND, char *, X__STRUCTURE *);
 if(SelectSfxFileName(0,gszGIFfile,gszGIFdir,IDX_MISC_HEIGHTFIELD,
   "(*.GIF)|*.gif|",ghwnd_main) == FALSE)return FALSE;
 EDIT_ACTION=YES;
 Evs=&EviStructure;
 strcpy(lname,gszHomeDir); strcat(lname,"height.dll");
 if((hLib=LoadLibrary(lname)) != NULL){
   if((fpFun=GetProcAddress(hLib,"_HeightField")) != NULL){
     fpFun1 = (void *)fpFun;
     status=(*fpFun1)(hwnd,gszGIFfile,Evs);
   }
   else SendPrgmQuery(IDQ_FAILEDFUNCTION,3);
   FreeLibrary(hLib);
 }
 else SendPrgmQuery(IDQ_FAILEDLIBRARY,3);
 return status;
}

BOOL TraceImageOutline(HWND hwnd){
 BOOL status=FALSE;
 static HMODULE hLibTrace=NULL;
 FARPROC fpFun;
 char lname[256];
 X__STRUCTURE *Evs;
 BOOL (*fpFun1)(HWND, HWND, char *, X__STRUCTURE *);
 if(hLibTrace != NULL){
   return FALSE;
 }
 if(SelectSfxFileName(0,gszIMGfile,gszIMGdir,IDX_MISC_TRACE,
   "All Image Formats|*.bmp;*.gif;*.tga|"
   "(*.GIF)|*.gif|(*.TGA)|*.tga|(*.BMP)|*.bmp|",
   hwnd) == FALSE)return FALSE;
 EDIT_ACTION=YES;
 Evs=&EviStructure;
 strcpy(lname,gszHomeDir); strcat(lname,"trace.dll");
 if((hLibTrace=LoadLibrary(lname)) != NULL){
   if((fpFun=GetProcAddress(hLibTrace,"_TraceOutline")) != NULL){
     fpFun1 = (void *)fpFun;
     status=(*fpFun1)(hwnd,ghwnd_info,gszIMGfile,Evs);
   }
   else SendPrgmQuery(IDQ_FAILEDFUNCTION,3);
   FreeLibrary(hLibTrace);
 }
 else SendPrgmQuery(IDQ_FAILEDLIBRARY,3);
 hLibTrace=NULL;
 return status;
}

BOOL PaintMapOutline(HWND hwnd){ 
 BOOL status=FALSE;
 static HMODULE hLibTrace=NULL;
 FARPROC fpFun;
 char lname[256];
 unsigned char *pixels;
 long w,h,id;
 IMAGEMAP *map;
 RAMIMAGE *image;
 X__STRUCTURE *Evs;
 BOOL (*fpFun1)(HWND, HWND, unsigned char *, long, long, long, X__STRUCTURE *);
 if(hLibTrace != NULL){
   return FALSE;
 }
 if(nImaps < 1){ SendPrgmQuery(IDQ_NOBRUSH,0); return status; }
 else if(nImaps > 1){
  if((id=RequestMapID(ghwnd_main,"Select by Map",0)) < 0)return status;
 }
 else  id=0;
 map = &(iMap[id]);
 image = NULL;
 if(map->s == 1 && map->S != NULL && map->Type != ANIMBRUSH)image  = &(map->si);
 if(image == NULL)return status;
 if( !image->in_use && image->filename == NULL && 
         image->data == NULL && image->size == 0)return status;
 // Make a full pixel copy of the image map
 pixels=MakeFullMemoryImage(image,&w,&h);

 if(pixels == NULL){MessageBox(NULL,"Bad Image Make",NULL,MB_OK); return status; }

 EDIT_ACTION=YES;
 Evs=&EviStructure;
 strcpy(lname,gszHomeDir); strcat(lname,"paintmap.dll");
 if((hLibTrace=LoadLibrary(lname)) != NULL){
   if((fpFun=GetProcAddress(hLibTrace,"_PaintMap")) != NULL){
     fpFun1 = (void *)fpFun;
     status=(*fpFun1)(hwnd,ghwnd_info,pixels,w,h,id,Evs);
   }
   else SendPrgmQuery(IDQ_FAILEDFUNCTION,3);
   FreeLibrary(hLibTrace);
 }
 else SendPrgmQuery(IDQ_FAILEDLIBRARY,3);
 hLibTrace=NULL;
 X__Free(pixels);
 return status;
}


BOOL ExecuteExternalAction(int id,HWND hwnd){
 static BOOL inuse=FALSE;
 BOOL status=FALSE;
 HMODULE hLib;
 FARPROC fpFun;
 X__STRUCTURE *Evs;
 BOOL (*fpFun1)(HWND, HWND, X__STRUCTURE *);
 int l;
 char fname[255];
 if(tool > INZOOM)DisengageDesignerTool();
 if(sktool || SelectedBrush >= 0 || SelectedShader >= 0){
   SendPrgmQuery(IDQ_TOOLNOTFINISHED,0);
   return FALSE;
 }
 if(id >= nActionsList)return FALSE;
 Empty_Undo();
 EDIT_ACTION=YES;
 Save_Undo(2);
 strcpy(fname,ActionsList[id]);
 l=strlen(fname);
 fname[l-1]='l';
 fname[l-2]='l';
 fname[l-3]='d';
 if(inuse)return FALSE;
 inuse=TRUE;
 Evs=&EviStructure;
 if((hLib=LoadLibrary(fname)) != NULL){
   if((fpFun=GetProcAddress(hLib,"_Xmodeler")) != NULL){
     fpFun1 = (void *)fpFun;
     status=(*fpFun1)(hwnd,ghwnd_info,Evs);
   }
   else SendPrgmQuery(IDQ_FAILEDFUNCTION,3);
   FreeLibrary(hLib);
 }
 else SendPrgmQuery(IDQ_FAILEDLIBRARY,3);
 inuse=FALSE;
 return status;
 return TRUE;
}

BOOL ExecuteExternalModeler(HWND hwnd){
 long l;
 static BOOL inuse=FALSE;
 BOOL status=FALSE;
 HMODULE hLib;
 FARPROC fpFun;
 X__STRUCTURE *Evs;
 BOOL (*fpFun1)(HWND, HWND, X__STRUCTURE *);
 if(inuse)return FALSE;
 l=strlen(gszDLMfile);
 strcpy((gszDLMfile+l-3),"dfx");
 if(SelectSfxFileName(0,gszDLMfile,gszDLMdir,IDX_MISC_EXTMODELER,
   "(*.dfx)|*.dfx|",ghwnd_main) == FALSE)return FALSE;
 l=strlen(gszDLMfile);
 strcpy((gszDLMfile+l-3),"dll");
 inuse=TRUE;
 EDIT_ACTION=YES;
 Evs=&EviStructure;
 if((hLib=LoadLibrary(gszDLMfile)) != NULL){
   if((fpFun=GetProcAddress(hLib,"_Xmodeler")) != NULL){
     fpFun1 = (void *)fpFun;
     status=(*fpFun1)(hwnd,ghwnd_info,Evs);
   }
   else SendPrgmQuery(IDQ_FAILEDFUNCTION,3);
   FreeLibrary(hLib);
 }
 else SendPrgmQuery(IDQ_FAILEDLIBRARY,3);
 inuse=FALSE;
 return status;
}

BOOL ExecuteBezierModeler(HWND hwnd){
 char lname[256];
 static BOOL inuse=FALSE;
 BOOL status=FALSE;
 HMODULE hLib;
 FARPROC fpFun;
 X__STRUCTURE *Evs;
 BOOL (*fpFun1)(HWND, HWND, X__STRUCTURE *);
 if(inuse)return FALSE;
 inuse=TRUE;
 EDIT_ACTION=YES;
 Evs=&EviStructure;
 strcpy(lname,gszHomeDir); strcat(lname,"bezier.dll");
 if((hLib=LoadLibrary(lname)) != NULL){
   if((fpFun=GetProcAddress(hLib,"_BezierModeler")) != NULL){
     fpFun1 = (void *)fpFun;
     status=(*fpFun1)(hwnd,ghwnd_info,Evs);
   }
   else SendPrgmQuery(IDQ_FAILEDFUNCTION,3);
   FreeLibrary(hLib);
 }
 else SendPrgmQuery(IDQ_FAILEDLIBRARY,3);
 inuse=FALSE;
 return status;
}

long LoadXmodel(char *name, char *library){
 char lname[255],text[128];
 long rv=0;
 HMODULE hLib=NULL;
 FARPROC fpFun;
 X__STRUCTURE *Evs;
 long (*fpFun1)(HWND, char *, char *, X__STRUCTURE *);
 Evs=&EviStructure;
 strcpy(lname,gszHomeDir); strcat(lname,library);
 if((hLib=LoadLibrary(lname)) != NULL){
   if((fpFun=GetProcAddress(hLib,"_Convert")) != NULL){
     fpFun1 = (void *)fpFun;
     sprintf(lname,"%sW_$.mfx",TempPath);
     rv=(*fpFun1)(ghwnd_main,name,lname,Evs);
   }
   else{
     SendPrgmQuery(IDQ_FAILEDFUNCTION,3);
   }
   FreeLibrary(hLib); hLib=NULL;
 }
 else SendPrgmQuery(IDQ_FAILEDLIBRARY,3);
 if(rv > 0)LoadObject(lname,0);
 remove(lname);
 return rv;
}

void Export3DSmodel(HWND hwnd){
 if(SelectSfxFileName(1,gsz3DSfile,gsz3DSdir,IDX_MISC_EXPORT3DS,
   "(*.3DS)|*.3ds|",ghwnd_main) == FALSE)return;
 AppendFileExtension(gsz3DSfile,".3ds");
 ExportModel(gsz3DSfile,"3dsout.dll");
 return;
}

void ExportDXFmodel(HWND hwnd){
 if(SelectSfxFileName(1,gszDXFfile,gszDXFdir,IDX_MISC_EXPORTDXF,
   "(*.DXF)|*.dxf|",ghwnd_main) == FALSE)return;
 AppendFileExtension(gszDXFfile,".dxf");
 ExportModel(gszDXFfile,"dxfout.dll");
 return;
}

long ExportModel(char *name, char *library){
 char lname[255];
 long rv=0;
 HMODULE hLib=NULL;
 FARPROC fpFun;
 X__STRUCTURE *Evs;
 long (*fpFun1)(HWND, char *, X__STRUCTURE *);
 Evs=&EviStructure;
 strcpy(lname,gszHomeDir); strcat(lname,library);
 if((hLib=LoadLibrary(lname)) != NULL){
   if((fpFun=GetProcAddress(hLib,"_Export")) != NULL){
     fpFun1 = (void *)fpFun;
     rv=(*fpFun1)(ghwnd_main,name,Evs);
   }
   else{
     SendPrgmQuery(IDQ_FAILEDFUNCTION,3);
   }
   FreeLibrary(hLib); hLib=NULL;
 }
 else SendPrgmQuery(IDQ_FAILEDLIBRARY,3);
 return rv;
}

BOOL LoadInternalAction(char *library){
 char lname[128];
 static BOOL inuse=FALSE;
 BOOL status=FALSE;
 HMODULE hLib;
 FARPROC fpFun;
 X__STRUCTURE *Evs;
 BOOL (*fpFun1)(HWND, HWND, X__STRUCTURE *);
 if(tool > INZOOM)DisengageDesignerTool();
 if(sktool || SelectedBrush >= 0 || SelectedShader >= 0){
   SendPrgmQuery(IDQ_TOOLNOTFINISHED,0);
   return FALSE;
 }
 if(inuse)return FALSE;
 inuse=TRUE;
 Empty_Undo();
 EDIT_ACTION=YES;
 Save_Undo(2);
 Evs=&EviStructure;
 strcpy(lname,gszHomeDir); strcat(lname,library);
 if((hLib=LoadLibrary(lname)) != NULL){
   if((fpFun=GetProcAddress(hLib,"_Xmodeler")) != NULL){
     fpFun1 = (void *)fpFun;
     status=(*fpFun1)(ghwnd_main,ghwnd_info,Evs);
     DrawModel();
     UpdateCounters();
     UpdateSkTreeView();
   }
   else SendPrgmQuery(IDQ_FAILEDFUNCTION,3);
   FreeLibrary(hLib);
 }
 else SendPrgmQuery(IDQ_FAILEDLIBRARY,3);
 inuse=FALSE;
 return TRUE;
}

// include the loadviewer code - this is used by the animator and so
// is in a separate file

#include "loadview.c"

// invoke the external plugins through their dialog boxes

#include "..\animate\callall.h"

static void LoadRenderer(int anim){
 char modulename[256];
 HWND hWnd,hWndCall;
 int result;
 if((hWnd=FindWindow("OFX:RenderClass",NULL)) != NULL){
   if     (anim == 1)
     PostMessage(hWnd,WM_COMMAND,IDM_CALLBACK_SETUP_PREVIEW,0);
   else if(anim == 2)
     PostMessage(hWnd,WM_COMMAND,IDM_CALLBACK_RUN,(WORD)1);
   else if(anim == 3){
     if(ghwndOpenGLview == NULL)hWndCall=ghwnd_view;
     else                       hWndCall=ghwndOpenGLview;
     PostMessage(hWnd,WM_CALLBACK_MATERIAL,0,(LPARAM)hWndCall);
   }
   else
     SendMessage(hWnd,IDM_CALLBACK_SETUP_MODELLER,0,0);
   if(anim != 3){
     SetForegroundWindow(hWnd);
     BringWindowToTop(hWnd);
     ShowWindow(hWnd,SW_SHOW);
   }
   return;
 }
 else{
   strcpy(modulename,gszHomeDir);strcat(modulename,"render.exe $SAL$");
   result=WinExec(modulename,SW_SHOW);
   if(result < 32){
     if(result == ERROR_FILE_NOT_FOUND ||
        result == ERROR_PATH_NOT_FOUND)SendPrgmQuery(IDQ_NOSTART,3);
   }
   if((hWnd=FindWindow("OFX:RenderClass",NULL)) != NULL){
     if     (anim == 1)
       PostMessage(hWnd,WM_COMMAND,IDM_CALLBACK_SETUP_PREVIEW,0);
     else if(anim == 2)
       PostMessage(hWnd,WM_COMMAND,IDM_CALLBACK_RUN,(WORD)1);
     else if(anim == 3){
       if(ghwndOpenGLview == NULL)hWndCall=ghwnd_view;
       else                       hWndCall=ghwndOpenGLview;
       PostMessage(hWnd,WM_CALLBACK_MATERIAL,0,(LPARAM)hWndCall);
     }
     else
       PostMessage(hWnd,IDM_CALLBACK_SETUP_MODELLER,0,0);
     if(anim != 3){
       SetForegroundWindow(hWnd);
       BringWindowToTop(hWnd);
       ShowWindow(hWnd,SW_SHOW);
     }
   }
   else SendPrgmQuery(IDQ_NOSTART,3);
 }
 return;
}

void Render_View(int light_pos, long how){
 char config_file[64],SCRIPTfilename[256],OBJECTfilename[256];
 long i,narg;
 FILE *fs,*fc;
 HCURSOR lhcurSave;
 double lpx,lpy,lpz,rad,dr,llpx,llpy,llpz,Fi,Theta;
 if(type_of_view){
   Fi = PerspFi; Theta = -PerspTheta;
 }
 else{
   Fi = -PerspFi; Theta = PerspTheta;
 }
 dr=PI/180.0;
 sprintf(OBJECTfilename,"%sW_$.mfx",TempPath);
 remove(OBJECTfilename);
 lhcurSave=SetCursor(ghcurWait);
 SaveObject(OBJECTfilename,2);    // 2 for saving only in window-box
 SetCursor(lhcurSave);
 sprintf(SCRIPTfilename,"%sW_$.scr",TempPath);
 if((fs=fopen(SCRIPTfilename,"w")) == NULL){
   remove(OBJECTfilename);
   return;
 }
 fprintf(fs,"Renderer-Script\n");
 fprintf(fs,"1 1\n");
 lpx=(double)(TVpointX+TVsizeX/2);
 lpy=(double)(TVpointY+TVsizeY/2);
 lpz=(double)(TVpointZ+TVsizeZ/2);
 rad=TVsizeX*5;
 llpx = lpx-rad*10.0*cos(-(Theta+30)*dr)*sin(-(Fi+45)*dr);
 llpy = lpy-rad*10.0*cos(-(Theta+30)*dr)*cos(-(Fi+45)*dr);
 llpz = lpz-rad*10.0*sin(-(Theta+30)*dr);
 lpx -= rad*cos(-Theta*dr)*sin(-Fi*dr);
 lpy -= rad*cos(-Theta*dr)*cos(-Fi*dr);
 lpz -= rad*sin(-Theta*dr);
 fprintf(fs,"e %.1f %.1f %.1f\n",lpx,lpy,lpz);
 fprintf(fs,"  %.1f %.1f %.1f\n",Fi,0.0,-Theta);
 fprintf(fs,"  %.3f %.3f %.3f\n",3.5,3.5,3.5); /* 3.5 3.0 3.0 */
 fprintf(fs,"  %d %d %.1f\n",0,0,0.0);
#if 0
 if(light_pos == 0){ /* light over shoulder */
   fprintf(fs,"l 0\n  255 255 255 1.0\n");
   fprintf(fs,"  %.1f %.1f %.1f\n",llpx,llpy,llpz);
   fprintf(fs,"  0.0 0.0 0.0\n 0 0 0.0\n");
   fprintf(fs,"  0 1.0 0.0 0.0\n");
 }
#endif
 fprintf(fs,"s %ld %ld %ld\n",
         (long)Preferences.Vcolour[0],
         (long)Preferences.Vcolour[1],
         (long)Preferences.Vcolour[2]);
 fprintf(fs,"  %ld %ld %ld\n",
         (long)Preferences.Vcolour[0],
         (long)Preferences.Vcolour[1],
         (long)Preferences.Vcolour[2]);
 fprintf(fs," 0.0 0.1 0.08\n");
 fprintf(fs," 0 0 0\n");
 fprintf(fs," 0 0 0\n");
 fprintf(fs," 0\n");
 fprintf(fs,"o 1\n");
 fprintf(fs,"%s\n",OBJECTfilename);
 fprintf(fs,"0\n");
 fprintf(fs,"  %.1f %.1f %.1f\n",0.0,0.0,0.0);
 fprintf(fs,"  %.1f %.1f %.1f\n",0.0,0.0,0.0);
 fprintf(fs,"  %.3f %.3f %.3f\n",1.0,1.0,1.0);
 fprintf(fs,"  %d %d %.1f %d %.3f\n",0,0,0.0,0,1.0);
 fprintf(fs,"  1 1 1\n");
 fprintf(fs,"f\n");
 fprintf(fs,"q\n");
 fclose(fs);
 sprintf(SCRIPTfilename,"%sW_$",TempPath);
 if     (how == 1)LoadRenderer(2);   // Quick render with prev params
 else if(how == 0){                  // Setup renderer
   LoadRenderer(0);
   EnableMenuItem(GetMenu(ghwnd_main),IDM_VIEW_RENDERNOW,MF_ENABLED);
 }
 else if(how == 2)LoadRenderer(3);   // render into window
 return;
}

void ShaderPreview(void){ // NOT used now
  LoadRenderer(1);
}