i_linux.pas 17 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526
  1. {
  2. $Id$
  3. Copyright (c) 1998-2002 by Peter Vreman
  4. This unit implements support information structures for linux
  5. This program is free software; you can redistribute it and/or modify
  6. it under the terms of the GNU General Public License as published by
  7. the Free Software Foundation; either version 2 of the License, or
  8. (at your option) any later version.
  9. This program is distributed in the hope that it will be useful,
  10. but WITHOUT ANY WARRANTY; without even the implied warranty of
  11. MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
  12. GNU General Public License for more details.
  13. You should have received a copy of the GNU General Public License
  14. along with this program; if not, write to the Free Software
  15. Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  16. ****************************************************************************
  17. }
  18. { This unit implements support information structures for linux. }
  19. unit i_linux;
  20. interface
  21. uses
  22. systems;
  23. const
  24. system_i386_linux_info : tsysteminfo =
  25. (
  26. system : system_i386_LINUX;
  27. name : 'Linux for i386';
  28. shortname : 'Linux';
  29. flags : [tf_needs_symbol_size,tf_pic_uses_got{,tf_smartlink_sections}];
  30. cpu : cpu_i386;
  31. unit_env : 'LINUXUNITS';
  32. extradefines : 'UNIX;HASUNIX';
  33. exeext : '';
  34. defext : '.def';
  35. scriptext : '.sh';
  36. smartext : '.sl';
  37. unitext : '.ppu';
  38. unitlibext : '.ppl';
  39. asmext : '.s';
  40. objext : '.o';
  41. resext : '.res';
  42. resobjext : '.or';
  43. sharedlibext : '.so';
  44. staticlibext : '.a';
  45. staticlibprefix : 'libp';
  46. sharedlibprefix : 'lib';
  47. sharedClibext : '.so';
  48. staticClibext : '.a';
  49. staticClibprefix : 'lib';
  50. sharedClibprefix : 'lib';
  51. p_ext_support : false;
  52. Cprefix : '';
  53. newline : #10;
  54. dirsep : '/';
  55. files_case_relevent : true;
  56. assem : as_i386_elf32;
  57. assemextern : as_gas;
  58. link : nil;
  59. linkextern : nil;
  60. ar : ar_gnu_ar;
  61. res : res_none;
  62. script : script_unix;
  63. endian : endian_little;
  64. alignment :
  65. (
  66. procalign : 16;
  67. loopalign : 4;
  68. jumpalign : 0;
  69. constalignmin : 0;
  70. constalignmax : 8;
  71. varalignmin : 0;
  72. varalignmax : 8;
  73. localalignmin : 4;
  74. localalignmax : 4;
  75. recordalignmin : 0;
  76. recordalignmax : 4;
  77. maxCrecordalign : 4
  78. );
  79. first_parm_offset : 8;
  80. stacksize : 262144;
  81. DllScanSupported:false;
  82. use_function_relative_addresses : true;
  83. abi : abi_default
  84. );
  85. system_m68k_linux_info : tsysteminfo =
  86. (
  87. system : system_m68k_linux;
  88. name : 'Linux for m68k';
  89. shortname : 'Linux';
  90. flags : [tf_needs_symbol_size];
  91. cpu : cpu_m68k;
  92. unit_env : 'LINUXUNITS';
  93. extradefines : 'UNIX;HASUNIX';
  94. exeext : '';
  95. defext : '';
  96. scriptext : '.sh';
  97. smartext : '.sl';
  98. unitext : '.ppu';
  99. unitlibext : '.ppl';
  100. asmext : '.s';
  101. objext : '.o';
  102. resext : '.res';
  103. resobjext : '.or';
  104. sharedlibext : '.so';
  105. staticlibext : '.a';
  106. staticlibprefix : 'libp';
  107. sharedlibprefix : 'lib';
  108. sharedClibext : '.so';
  109. staticClibext : '.a';
  110. staticClibprefix : 'lib';
  111. sharedClibprefix : 'lib';
  112. p_ext_support : false;
  113. Cprefix : '';
  114. newline : #10;
  115. dirsep : '/';
  116. files_case_relevent : true;
  117. assem : as_gas;
  118. assemextern : as_gas;
  119. link : nil;
  120. linkextern : nil;
  121. ar : ar_gnu_ar;
  122. res : res_none;
  123. script : script_unix;
  124. endian : endian_big;
  125. alignment :
  126. (
  127. procalign : 4;
  128. loopalign : 4;
  129. jumpalign : 0;
  130. constalignmin : 0;
  131. constalignmax : 4;
  132. varalignmin : 0;
  133. varalignmax : 4;
  134. localalignmin : 4;
  135. localalignmax : 4;
  136. recordalignmin : 0;
  137. recordalignmax : 2;
  138. maxCrecordalign : 4
  139. );
  140. first_parm_offset : 8;
  141. stacksize : 32*1024*1024;
  142. DllScanSupported:false;
  143. use_function_relative_addresses : true;
  144. abi : abi_default
  145. );
  146. system_powerpc_linux_info : tsysteminfo =
  147. (
  148. system : system_powerpc_LINUX;
  149. name : 'Linux for PowerPC';
  150. shortname : 'Linux';
  151. flags : [tf_needs_symbol_size];
  152. cpu : cpu_powerpc;
  153. unit_env : '';
  154. extradefines : 'UNIX;HASUNIX';
  155. exeext : '';
  156. defext : '.def';
  157. scriptext : '.sh';
  158. smartext : '.sl';
  159. unitext : '.ppu';
  160. unitlibext : '.ppl';
  161. asmext : '.s';
  162. objext : '.o';
  163. resext : '.res';
  164. resobjext : '.or';
  165. sharedlibext : '.so';
  166. staticlibext : '.a';
  167. staticlibprefix : 'libp';
  168. sharedlibprefix : 'lib';
  169. sharedClibext : '.so';
  170. staticClibext : '.a';
  171. staticClibprefix : 'lib';
  172. sharedClibprefix : 'lib';
  173. p_ext_support : false;
  174. Cprefix : '';
  175. newline : #10;
  176. dirsep : '/';
  177. files_case_relevent : true;
  178. assem : as_gas;
  179. assemextern : as_gas;
  180. link : nil;
  181. linkextern : nil;
  182. ar : ar_gnu_ar;
  183. res : res_none;
  184. script : script_unix;
  185. endian : endian_big;
  186. alignment :
  187. (
  188. procalign : 4;
  189. loopalign : 4;
  190. jumpalign : 0;
  191. constalignmin : 0;
  192. constalignmax : 4;
  193. varalignmin : 0;
  194. varalignmax : 4;
  195. localalignmin : 4;
  196. localalignmax : 4;
  197. recordalignmin : 0;
  198. recordalignmax : 4;
  199. maxCrecordalign : 8
  200. );
  201. first_parm_offset : 8;
  202. stacksize : 32*1024*1024;
  203. DllScanSupported:false;
  204. use_function_relative_addresses : true;
  205. abi : abi_powerpc_sysv;
  206. );
  207. system_alpha_linux_info : tsysteminfo =
  208. (
  209. system : system_alpha_LINUX;
  210. name : 'Linux for Alpha';
  211. shortname : 'Linux';
  212. flags : [tf_needs_symbol_size];
  213. cpu : cpu_alpha;
  214. unit_env : 'LINUXUNITS';
  215. extradefines : 'UNIX;HASUNIX';
  216. exeext : '';
  217. defext : '.def';
  218. scriptext : '.sh';
  219. smartext : '.sl';
  220. unitext : '.ppu';
  221. unitlibext : '.ppl';
  222. asmext : '.s';
  223. objext : '.o';
  224. resext : '.res';
  225. resobjext : '.or';
  226. sharedlibext : '.so';
  227. staticlibext : '.a';
  228. staticlibprefix : 'libp';
  229. sharedlibprefix : 'lib';
  230. sharedClibext : '.so';
  231. staticClibext : '.a';
  232. staticClibprefix : 'lib';
  233. sharedClibprefix : 'lib';
  234. p_ext_support : false;
  235. Cprefix : '';
  236. newline : #10;
  237. dirsep : '/';
  238. files_case_relevent : true;
  239. assem : as_gas;
  240. assemextern : as_gas;
  241. link : nil;
  242. linkextern : nil;
  243. ar : ar_gnu_ar;
  244. res : res_none;
  245. script : script_unix;
  246. endian : endian_little;
  247. alignment :
  248. (
  249. procalign : 4;
  250. loopalign : 4;
  251. jumpalign : 0;
  252. constalignmin : 0;
  253. constalignmax : 4;
  254. varalignmin : 0;
  255. varalignmax : 4;
  256. localalignmin : 4;
  257. localalignmax : 4;
  258. recordalignmin : 0;
  259. recordalignmax : 2;
  260. maxCrecordalign : 4
  261. );
  262. first_parm_offset : 8;
  263. stacksize : 32*1024*1024;
  264. DllScanSupported:false;
  265. use_function_relative_addresses : true;
  266. abi : abi_default
  267. );
  268. system_x86_64_linux_info : tsysteminfo =
  269. (
  270. system : system_x86_64_LINUX;
  271. name : 'Linux for x86-64';
  272. shortname : 'Linux';
  273. flags : [tf_needs_symbol_size,tf_needs_dwarf_cfi,
  274. tf_library_needs_pic];
  275. cpu : cpu_x86_64;
  276. unit_env : 'LINUXUNITS';
  277. extradefines : 'UNIX;HASUNIX';
  278. exeext : '';
  279. defext : '.def';
  280. scriptext : '.sh';
  281. smartext : '.sl';
  282. unitext : '.ppu';
  283. unitlibext : '.ppl';
  284. asmext : '.s';
  285. objext : '.o';
  286. resext : '.res';
  287. resobjext : '.or';
  288. sharedlibext : '.so';
  289. staticlibext : '.a';
  290. staticlibprefix : 'libp';
  291. sharedlibprefix : 'lib';
  292. sharedClibext : '.so';
  293. staticClibext : '.a';
  294. staticClibprefix : 'lib';
  295. sharedClibprefix : 'lib';
  296. p_ext_support : false;
  297. Cprefix : '';
  298. newline : #10;
  299. dirsep : '/';
  300. files_case_relevent : true;
  301. assem : as_gas;
  302. assemextern : as_gas;
  303. link : nil;
  304. linkextern : nil;
  305. ar : ar_gnu_ar;
  306. res : res_none;
  307. script : script_unix;
  308. endian : endian_little;
  309. alignment :
  310. (
  311. procalign : 8;
  312. loopalign : 4;
  313. jumpalign : 0;
  314. constalignmin : 0;
  315. constalignmax : 8;
  316. varalignmin : 0;
  317. varalignmax : 8;
  318. localalignmin : 4;
  319. localalignmax : 8;
  320. recordalignmin : 0;
  321. recordalignmax : 8;
  322. maxCrecordalign : 8
  323. );
  324. first_parm_offset : 16;
  325. stacksize : 256*1024;
  326. DllScanSupported:false;
  327. use_function_relative_addresses : true;
  328. abi : abi_default
  329. );
  330. system_sparc_linux_info : tsysteminfo =
  331. (
  332. system : system_SPARC_Linux;
  333. name : 'Linux for SPARC';
  334. shortname : 'Linux';
  335. flags : [tf_needs_symbol_size,tf_library_needs_pic];
  336. cpu : cpu_SPARC;
  337. unit_env : 'LINUXUNITS';
  338. extradefines : 'UNIX;HASUNIX';
  339. exeext : '';
  340. defext : '.def';
  341. scriptext : '.sh';
  342. smartext : '.sl';
  343. unitext : '.ppu';
  344. unitlibext : '.ppl';
  345. asmext : '.s';
  346. objext : '.o';
  347. resext : '.res';
  348. resobjext : '.or';
  349. sharedlibext : '.so';
  350. staticlibext : '.a';
  351. staticlibprefix : 'libp';
  352. sharedlibprefix : 'lib';
  353. sharedClibext : '.so';
  354. staticClibext : '.a';
  355. staticClibprefix : 'lib';
  356. sharedClibprefix : 'lib';
  357. p_ext_support : false;
  358. Cprefix : '';
  359. newline : #10;
  360. dirsep : '/';
  361. files_case_relevent : true;
  362. assem : as_gas;
  363. assemextern : as_gas;
  364. link : nil;
  365. linkextern : nil;
  366. ar : ar_gnu_ar;
  367. res : res_none;
  368. script : script_unix;
  369. endian : endian_big;
  370. alignment :
  371. (
  372. procalign : 4;
  373. loopalign : 4;
  374. jumpalign : 0;
  375. constalignmin : 0;
  376. constalignmax : 8;
  377. varalignmin : 0;
  378. varalignmax : 8;
  379. localalignmin : 4;
  380. localalignmax : 8;
  381. recordalignmin : 0;
  382. recordalignmax : 8;
  383. maxCrecordalign : 8
  384. );
  385. first_parm_offset : 92;
  386. stacksize : 262144;
  387. DllScanSupported:false;
  388. use_function_relative_addresses : true;
  389. abi : abi_default
  390. );
  391. system_arm_linux_info : tsysteminfo =
  392. (
  393. system : system_arm_Linux;
  394. name : 'Linux for ARM';
  395. shortname : 'Linux';
  396. flags : [tf_needs_symbol_size];
  397. cpu : cpu_arm;
  398. unit_env : 'LINUXUNITS';
  399. extradefines : 'UNIX;HASUNIX';
  400. exeext : '';
  401. defext : '.def';
  402. scriptext : '.sh';
  403. smartext : '.sl';
  404. unitext : '.ppu';
  405. unitlibext : '.ppl';
  406. asmext : '.s';
  407. objext : '.o';
  408. resext : '.res';
  409. resobjext : '.or';
  410. sharedlibext : '.so';
  411. staticlibext : '.a';
  412. staticlibprefix : 'libp';
  413. sharedlibprefix : 'lib';
  414. sharedClibext : '.so';
  415. staticClibext : '.a';
  416. staticClibprefix : 'lib';
  417. sharedClibprefix : 'lib';
  418. p_ext_support : false;
  419. Cprefix : '';
  420. newline : #10;
  421. dirsep : '/';
  422. files_case_relevent : true;
  423. assem : as_gas;
  424. assemextern : as_gas;
  425. link : nil;
  426. linkextern : nil;
  427. ar : ar_gnu_ar;
  428. res : res_none;
  429. script : script_unix;
  430. endian : endian_little;
  431. alignment :
  432. (
  433. procalign : 4;
  434. loopalign : 4;
  435. jumpalign : 0;
  436. constalignmin : 0;
  437. constalignmax : 4;
  438. varalignmin : 0;
  439. varalignmax : 4;
  440. localalignmin : 4;
  441. localalignmax : 8;
  442. recordalignmin : 0;
  443. recordalignmax : 4;
  444. maxCrecordalign : 4
  445. );
  446. first_parm_offset : 8;
  447. stacksize : 262144;
  448. DllScanSupported:false;
  449. use_function_relative_addresses : true;
  450. abi : abi_default
  451. );
  452. implementation
  453. initialization
  454. {$ifdef CPU86}
  455. {$ifdef linux}
  456. { some FreeBSD versions define linux as well }
  457. {$ifndef FreeBSD}
  458. set_source_info(system_i386_linux_info);
  459. {$endif FreeBSD}
  460. {$endif}
  461. {$endif CPU86}
  462. {$ifdef CPU68}
  463. {$ifdef linux}
  464. set_source_info(system_m68k_linux_info);
  465. {$endif linux}
  466. {$endif CPU68}
  467. {$ifdef CPUX86_64}
  468. {$ifdef linux}
  469. set_source_info(system_x86_64_linux_info);
  470. {$endif linux}
  471. {$endif CPUX86_64}
  472. {$ifdef CPUALPHA}
  473. {$ifdef linux}
  474. set_source_info(system_alpha_linux_info);
  475. {$endif linux}
  476. {$endif CPUALPHA}
  477. {$ifdef CPUSPARC}
  478. {$ifdef linux}
  479. set_source_info(system_sparc_linux_info);
  480. {$endif linux}
  481. {$endif CPUSPARC}
  482. {$ifdef CPUPOWERPC}
  483. {$ifdef linux}
  484. set_source_info(system_powerpc_linux_info);
  485. {$endif linux}
  486. {$endif CPUPOWERPC}
  487. {$ifdef CPUARM}
  488. {$ifdef linux}
  489. set_source_info(system_arm_linux_info);
  490. {$endif linux}
  491. {$endif CPUARM}
  492. end.
  493. {
  494. $Log$
  495. Revision 1.37 2005-03-20 22:36:45 olle
  496. * Cleaned up handling of source file extension.
  497. + Added support for .p extension for macos and darwin
  498. Revision 1.36 2005/02/14 17:13:10 peter
  499. * truncate log
  500. Revision 1.35 2005/02/06 00:05:56 florian
  501. + x86_64 pic draft
  502. Revision 1.34 2005/01/30 17:45:38 florian
  503. * better alignment on linux
  504. Revision 1.33 2005/01/25 18:48:15 peter
  505. * tf_pic_uses_got added
  506. }