can not find LibC (moduleload)
lazarus / 70-OpenGL

----------------------------------------------------------------------
jcaser1948 · 2017-12-28 08:12

I use Lazarus 1.8 in SuseLinux 42.3 64 bits  und try to compile the
Demo Openglcontrol. wich comes with Lazarus.
I get a complain from Moduleloader "Can not find LIBC"
The code  part in the Moduloader is
uses
{$ifdef Linux}
  Types,
  Libc;
{$else} 
I can not fid this Libc anywhere. Cansamone give me a hint? Thanks

----------------------------------------------------------------------
Thaddy · 2017-12-28 08:20

I am not sure the libc unit is necessary(it is deprecated) but the
libc llibrary it is in /packages/libc/ and the unit libc is in
/packages/libc/src/libc.pp. It is 32 bit only and only i386.

http://wiki.freepascal.org/libc_unit

You should use the unix and linux units instead. (I think at least
somethink like baseunix, baselinux , cthreads);

----------------------------------------------------------------------
jcaser1948 · 2017-12-28 10:15

Thanks Thaddy.
No wonder  Lazarus does not find the library.
Is there a way to compile  the Demo Openglcontrol. which comes with
Lazarus (Linux64bit). If there is none I wonder why they ship this
demo in the package at all.Perhaps to discourage newbies like me

----------------------------------------------------------------------
Thaddy · 2017-12-28 10:33

Well its author is on this forum. But are you sure you are using Laz
1.8 +FPC 3.0.4?
If the demo indeed relies on libc, that is easy to fix. It can also be
considered a bug if it still is in Laz 1.8.

----------------------------------------------------------------------
wp · 2017-12-28 11:46

I tested the OpenGL demo which comes along with the package in Linux
Mint/gtk2, and it is running fine (32 bit, though).

I wonder where this module loader is coming from. Seeking through the
entire Lazarus/fpc source tree, there is only one moduleloader.pas,
and this is in (fpc)\packages\winunits-jedi\src\ModuleLoader.pas.
Strange...

----------------------------------------------------------------------
Thaddy · 2017-12-28 12:10

Because jedi units historically supports Kylix? Anyway, libc (the
unit) should not turn up in demo code that is part of the
distribution.. OpenGL is cross-platform.

----------------------------------------------------------------------
marcov · 2017-12-28 12:37

My guess is that your compiler finds some third party GL unit that
isn't terribly well ported to Free Pascal instead of the default
freepascal one.

Go to the example form, and ctrl-click the gl unit, and see what it
loads.

----------------------------------------------------------------------
jcaser1948 · 2017-12-28 13:18

Dear Markov
I explain what I have done
1) downloaded  the compiled Lazarus1.8 from Opensuse with YAST
2) Installed it also with Yast
3) copied  the Demo programs out to my Home directory, changed the
Ownership and compiled it
When I try to compile Openglecontrol Lazarus refuses  The error rises
in the Moduleloader


unit moduleloader;
{
  $Id: moduleloader.pas,v 1.4 2004/02/20 17:19:10 savage Exp $
 
}
{******************************************************************}
{                                                                  }
{       Project JEDI                                               }
{       OS independent Dynamic Loading Helpers                     }
{                                                                  }
{ The initial developer of the this code is                        }
{ Robert Marquardt <robert_marquardt@gmx.de)                       }
{                                                                  }
{ Copyright (C) 2000, 2001 Robert Marquardt.                       }
{                                                                  }
{ Obtained through:                                                }
{ Joint Endeavour of Delphi Innovators (Project JEDI)              }
{                                                                  }
{ You may retrieve the latest version of this file at the Project  }
{ JEDI home page, located at http://delphi-jedi.org                }
{                                                                  }
{ The contents of this file are used with permission, subject to   }
{ the Mozilla Public License Version 1.1 (the "License"); you may  }
{ not use this file except in compliance with the License. You may }
{ obtain a copy of the License at                                  }
{ http://www.mozilla.org/NPL/NPL-1_1Final.html                     }
{                                                                  }
{ Software distributed under the License is distributed on an      }
{ "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or   }
{ implied. See the License for the specific language governing     }
{ rights and limitations under the License.                        }
{                                                                  }
{******************************************************************}
{
  $Log: moduleloader.pas,v $
  Revision 1.4  2004/02/20 17:19:10  savage
  Added Calling convention to Win32 functions just in case.

  Revision 1.3  2004/02/14 22:36:29  savage
  Fixed inconsistencies of using LoadLibrary and LoadModule.
  Now all units make use of LoadModule rather than LoadLibrary and
other dynamic proc procedures.

  Revision 1.2  2004/02/14 00:23:39  savage
  As UNIX is defined in jedi-sdl.inc this will be used to check linux
compatability as well. Units have been changed to reflect this change.

  Revision 1.1  2004/02/14 00:04:50  savage
  dllfuncs conflicts with FreePascal so it has been renamed back to
the moduleloader.pas

  Revision 1.1  2004/02/05 00:08:19  savage
  Module 1.0 release

 
}

interface

{$i jedi-sdl.inc}
{$WEAKPACKAGEUNIT ON}
Hier the error
moduleloader.pas(190,3) Fatal: no puedo encontrar Libcutilizado por
moduleloader.

And hier the Beginning of LIBC

{$mode objfpc}
{$inline on}
{$h+}

{$if not defined(linux) or not defined(cpui386)}
  {$error The KernelDefs unit is a legacy Kylix-compatibility unit
that is only supported on Linux/i386. It is known not to work in
various ways on other OSes and architectures (including Linux/x86_64).
}
{$endif}

unit libc deprecated 'Unportable Kylix legacy unit that only exists on
Linux/x86. see http://wiki.freepascal.org/libc_unit ';

Interface

uses unixtype,kerneldefs;

Const
  clib = 'c';
  dllib

And here  the offending part, where Lazarus strikes


{$ENDIF}

{$IFDEF Unix}
uses
{$ifdef Linux}
  Types,
  Libc;
{$else}
  dl,
  Types,
  Baseunix,
  Unix;
{$endif}
type
  // Handle to a loaded .so
  TModuleHandle = Pointer;

const
  // Value designating an unassigned TModuleHandle od a failed loading
  INVALID_MODULEHANDLE_VALUE = TModuleHandle(nil);

----------------------------------------------------------------------
marcov · 2017-12-28 13:23

That was not the question. The question was which opengl (or whatever)
unit that you use that USES moduleloader.

Moduleloader is an old 2000s unit only for some jedi projects. Thus no
normal FPC sourcecode uses it, except it is very old legacy.

I suspect you have some jedi unit in your search path that directly or
indirectly ends up in module loader.

----------------------------------------------------------------------
jcaser1948 · 2017-12-28 13:37

Dear markov
I have no idea why Lazarus seeks Modulloader and LIbc .I have no such
legacy units that I can find. Perhaps you could give some hints  how
to seek them
Where they came from I can not undertand
Thanks again

----------------------------------------------------------------------
marcov · 2017-12-28 14:11

Quote from: jcaser1948 on December 28, 2017, 02:37:41 pmPerhaps you
could give some hints  how to seek them

I already did in my first post:

QuoteGo to the example form, and ctrl-click the gl unit, and see what
it loads.

----------------------------------------------------------------------
jcaser1948 · 2017-12-28 15:11

Dear markov
Thaks to your hints I have cound the following:
GL calls moduleloader.pas

interface

{$I jedi-sdl.inc}

uses
{$IFDEF __GPC__}
  system,
  gpc,
{$ENDIF}

{$IFDEF WIN32}
  Windows,
{$ENDIF}
  moduleloader;

moduleloader calls LibC

aprox at  position 190

{$IFDEF Unix}
uses
{$ifdef Linux}
  Types,
  Libc;
{$else}
  dl,
  Types,
  Baseunix,
  Unix;
{$endif}     

Furthermore, there exits a libc.so  at /usr/lib64/libc.so
How it went there I do not know
I could not find out where moduleloader.pas is located

Thanks for your time

----------------------------------------------------------------------
Thaddy · 2017-12-28 15:15

libc.so has nothing to do with libc.pp: libc.so contains the C
standard library code. Don't confuse them.
FPC does not usually need libc.so.

Oh and did you give us Laz and FPC version yet?

----------------------------------------------------------------------
marcov · 2017-12-28 15:17

Quote from: jcaser1948 on December 28, 2017, 04:11:14 pmDear markov
Thaks to your hints I have cound the following:
GL calls moduleloader.pas

Free Pascal's gl unit does not . So where is that "gl" coming from? If
you hover above the tab you can see the path.

The name of the include file seems to indicate your GL unit is
packaged with some "jedi-sdl" package.

----------------------------------------------------------------------
jcaser1948 · 2017-12-28 17:44

Dear Thaddy
I have the version FPC 3.0.05.51
and the Lazarus Version 1.8.0-15.5
Thanks

----------------------------------------------------------------------
jcaser1948 · 2017-12-28 18:07

dear marcov
The path for libc is /usr/share/fpcsrc/packages/libc/src /libc.pp
/usr/local/dglsdk/header/moduleloader.pas
I also have the following files/directories

dglOpenGL.o      easySDL.pas          glu.pas       moduleloader.pas 
sdl_mixer.o    sdl_net.ppu  sdl_ttf.pas   smpeg.ppu
dglOpenGL.pas    easySDL.ppu          jedi-sdl.inc  rebuild.sh       
sdl_mixer.pas  sdl.o        sdl_ttf.ppu
dglOpenGL.ppu    easySDLTextures.pas  logger.o      sdl_image.o     
 sdl_mixer.ppu  sdl.pas      sdlutils.pas
easySDLFont.pas  geometry.pas         logger.pas    sdl_image.pas   
 sdl_net.o      sdl.ppu      smpeg.o
easySDL.o        gl.pas               logger.ppu    sdl_image.ppu   
 sdl_net.pas    sdl_ttf.o    smpeg.pas
 How they got installed I do not know
Wnat shell I do?
Thanks again

----------------------------------------------------------------------
molly · 2017-12-28 18:24

Sorry for the noise in advance, but:
Quote from: jcaser1948 on December 28, 2017, 07:07:56 pm How they got
installed I do not know
Really ? so you have no idea how DelphiGL got installed ?

I've never seen that installed by default...

----------------------------------------------------------------------
marcov · 2017-12-28 18:33

If you are feeling uncomfortable with the situation, and don't know
where it came from etc, it might be easier to just erase everything
and start over.

----------------------------------------------------------------------
Thaddy · 2017-12-28 20:28

Quote from: marcov on December 28, 2017, 07:33:51 pmIf you are feeling
uncomfortable with the situation, and don't know where it came from
etc, it might be easier to just erase everything and start over.
Yup. You made - perhaps unintentionally - a mess of it (molly, marco
and me agree, I guess?) and you can't blame it on the component. That
happens to work. Also your FPC is too old. Use 3.0.4.
But we WILL help you out. Just report back.

----------------------------------------------------------------------
wp · 2017-12-28 21:17

Well, these sdl units in fact can be found under an fpc-url:
https://svn.freepascal.org/svn/fpcprojects/contrib/sdl/basesdl/. They
are not part of the official distribution, but I could imagine that
SuseLinux is responsible for the mess, or the OP just picked a wrong
package from Yast.

----------------------------------------------------------------------
jcaser1948 · 2017-12-29 08:21

Thanks guys
Now it compiles
I have taken out all the libc units in 
/usr/share/fpcsrc/packages/libc/src/libc.pp and all its associates.
The same with/usr/local/dglsdk/header/Moduleloader.pas
In both places were headers and stuff from 
https://svn.freepascal.org/svn/fpcprojects/contrib/sdl/basesdl/.
How that got installed  I am still puzzled about, probably I did some
silly mistakes, but at the moment I can not see which ones.
Thanks again