home *** CD-ROM | disk | FTP | other *** search
/ Enigma Amiga Life 109 / EnigmaAmiga109CD.iso / software / utilities / jpeg-dt35 / source / libbase.c < prev    next >
C/C++ Source or Header  |  2000-01-22  |  1KB  |  68 lines
  1. #include <pragma/exec_lib.h>
  2. #include <pragma/intuition_lib.h>
  3. #include <dos/dos.h>
  4. #include <exec/resident.h>
  5. #include "class.h"
  6.  
  7. struct ClassBase:Library
  8. {
  9. BPTR sb_SegList;
  10. IClass *cb_Class;
  11. };
  12.  
  13. #pragma libbase ClassBase
  14.  
  15. extern "C"
  16. {
  17. IClass *ObtainClass(register __a6 ClassBase *cb);
  18. }
  19.  
  20. extern "C" void abortLibInit();
  21.  
  22. extern APTR Dispatcher;
  23.  
  24. char LibNameString[]="jpeg.datatype";
  25. char LibVersionString[]="$VER:jpeg.datatype 46.1 (22.01.00) © 1999-2000 by Achim Stegemann\n";
  26.  
  27. Library *JpegBase;
  28. Library *SuperClassBase;
  29. Library *CyberGfxBase;
  30.  
  31. static IClass *InitClass(register __a6 ClassBase *cb)
  32. {
  33. IClass *cl;
  34. if(cl=MakeClass(LibNameString,"picture.datatype",0,sizeof(Data),0))
  35.     {
  36.     cl->h_Entry=&Dispatcher;
  37.     cl->cl_UserData=ULONG(cb);
  38.     AddClass(cl);
  39.     }
  40. return cl;
  41. }
  42.  
  43. extern "C" void INIT_7_LibInit(register __a6 ClassBase *cb)
  44. {
  45. if(SuperClassBase=OpenLibrary("datatypes/picture.datatype",44))
  46.     {
  47.     if(JpegBase=OpenLibrary("jpeg.library",5))
  48.         {
  49.         CyberGfxBase=OpenLibrary("cybergraphics.library",40);
  50.         if(cb->cb_Class=cb->cb_Class=InitClass(cb)) return;
  51.         }
  52.     }
  53. abortLibInit();
  54. }
  55.  
  56. extern "C" void EXIT_7_LibInit(register __a6 ClassBase *cb)
  57. {
  58. if(cb->cb_Class) FreeClass(cb->cb_Class);
  59. CloseLibrary(CyberGfxBase);
  60. CloseLibrary(JpegBase);
  61. CloseLibrary(SuperClassBase);
  62. }
  63.  
  64. extern "C" IClass *ObtainClass(register __a6 ClassBase *cb)
  65. {
  66. return cb->cb_Class;
  67. }
  68.