i_bsd.pas 21 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618
  1. {
  2. Copyright (c) 1998-2002 by Peter Vreman
  3. This unit implements support information structures for FreeBSD/NetBSD
  4. This program is free software; you can redistribute it and/or modify
  5. it under the terms of the GNU General Public License as published by
  6. the Free Software Foundation; either version 2 of the License, or
  7. (at your option) any later version.
  8. This program is distributed in the hope that it will be useful,
  9. but WITHOUT ANY WARRANTY; without even the implied warranty of
  10. MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
  11. GNU General Public License for more details.
  12. You should have received a copy of the GNU General Public License
  13. along with this program; if not, write to the Free Software
  14. Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  15. ****************************************************************************
  16. }
  17. { This unit implements support information structures for FreeBSD/NetBSD.
  18. OpenBSD is only added for i386 for now, though it exists for most
  19. other common CPU's too}
  20. unit i_bsd;
  21. interface
  22. uses
  23. systems;
  24. const
  25. system_i386_freebsd_info : tsysteminfo =
  26. (
  27. system : system_i386_FreeBSD;
  28. name : 'FreeBSD/ELF for i386';
  29. shortname : 'FreeBSD';
  30. flags : [tf_pic_uses_got,tf_files_case_sensitive,tf_use_function_relative_addresses,
  31. {$ifdef segment_threadvars}
  32. tf_section_threadvars,
  33. {$endif segment_threadvars}
  34. tf_needs_symbol_type,tf_needs_symbol_size {,tf_smartlink_sections}];
  35. cpu : cpu_i386;
  36. unit_env : 'BSDUNITS';
  37. extradefines : 'UNIX;BSD;HASUNIX';
  38. exeext : '';
  39. defext : '.def';
  40. scriptext : '.sh';
  41. smartext : '.sl';
  42. unitext : '.ppu';
  43. unitlibext : '.ppl';
  44. asmext : '.s';
  45. objext : '.o';
  46. resext : '.res';
  47. resobjext : '.or';
  48. sharedlibext : '.so';
  49. staticlibext : '.a';
  50. staticlibprefix : 'libp';
  51. sharedlibprefix : 'lib';
  52. sharedClibext : '.so';
  53. staticClibext : '.a';
  54. staticClibprefix : 'lib';
  55. sharedClibprefix : 'lib';
  56. Cprefix : '';
  57. newline : #10;
  58. dirsep : '/';
  59. assem : as_i386_elf32;
  60. assemextern : as_gas;
  61. link : nil;
  62. linkextern : nil;
  63. ar : ar_gnu_ar;
  64. res : res_none;
  65. dbg : dbg_stabs;
  66. script : script_unix;
  67. endian : endian_little;
  68. alignment :
  69. (
  70. procalign : 4;
  71. loopalign : 4;
  72. jumpalign : 0;
  73. constalignmin : 0;
  74. constalignmax : 4;
  75. varalignmin : 0;
  76. varalignmax : 4;
  77. localalignmin : 0;
  78. localalignmax : 4;
  79. recordalignmin : 0;
  80. recordalignmax : 2;
  81. maxCrecordalign : 4
  82. );
  83. first_parm_offset : 8;
  84. stacksize : 262144;
  85. abi : abi_default;
  86. );
  87. system_x86_64_freebsd_info : tsysteminfo =
  88. (
  89. system : system_x86_64_freebsd;
  90. name : 'FreeBSD for x86-64';
  91. shortname : 'FreeBSD';
  92. flags : [tf_needs_symbol_size,tf_pic_uses_got,tf_files_case_sensitive,tf_use_function_relative_addresses{,tf_smartlink_sections}];
  93. cpu : cpu_x86_64;
  94. unit_env : 'BSDUNITS';
  95. extradefines : 'UNIX;HASUNIX';
  96. exeext : '';
  97. defext : '.def';
  98. scriptext : '.sh';
  99. smartext : '.sl';
  100. unitext : '.ppu';
  101. unitlibext : '.ppl';
  102. asmext : '.s';
  103. objext : '.o';
  104. resext : '.res';
  105. resobjext : '.or';
  106. sharedlibext : '.so';
  107. staticlibext : '.a';
  108. staticlibprefix : 'libp';
  109. sharedlibprefix : 'lib';
  110. sharedClibext : '.so';
  111. staticClibext : '.a';
  112. staticClibprefix : 'lib';
  113. sharedClibprefix : 'lib';
  114. Cprefix : '';
  115. newline : #10;
  116. dirsep : '/';
  117. assem : as_gas;
  118. assemextern : as_gas;
  119. link : nil;
  120. linkextern : nil;
  121. ar : ar_gnu_ar;
  122. res : res_none;
  123. dbg : dbg_stabs;
  124. script : script_unix;
  125. endian : endian_little;
  126. alignment :
  127. (
  128. procalign : 8;
  129. loopalign : 4;
  130. jumpalign : 0;
  131. constalignmin : 0;
  132. constalignmax : 8;
  133. varalignmin : 0;
  134. varalignmax : 8;
  135. localalignmin : 4;
  136. localalignmax : 8;
  137. recordalignmin : 0;
  138. recordalignmax : 8;
  139. maxCrecordalign : 8
  140. );
  141. first_parm_offset : 16;
  142. stacksize : 256*1024;
  143. abi : abi_default;
  144. );
  145. system_i386_netbsd_info : tsysteminfo =
  146. (
  147. system : system_i386_NetBSD;
  148. name : 'NetBSD for i386';
  149. shortname : 'NetBSD';
  150. flags : [tf_under_development,tf_files_case_sensitive,tf_use_function_relative_addresses];
  151. cpu : cpu_i386;
  152. unit_env : 'BSDUNITS';
  153. extradefines : 'UNIX;BSD;HASUNIX';
  154. exeext : '';
  155. defext : '.def';
  156. scriptext : '.sh';
  157. smartext : '.sl';
  158. unitext : '.ppu';
  159. unitlibext : '.ppl';
  160. asmext : '.s';
  161. objext : '.o';
  162. resext : '.res';
  163. resobjext : '.or';
  164. sharedlibext : '.so';
  165. staticlibext : '.a';
  166. staticlibprefix : 'libp';
  167. sharedlibprefix : 'lib';
  168. sharedClibext : '.so';
  169. staticClibext : '.a';
  170. staticClibprefix : 'lib';
  171. sharedClibprefix : 'lib';
  172. Cprefix : '_';
  173. newline : #10;
  174. dirsep : '/';
  175. assem : as_gas;
  176. assemextern : as_gas;
  177. link : nil;
  178. linkextern : nil;
  179. ar : ar_gnu_ar;
  180. res : res_none;
  181. dbg : dbg_stabs;
  182. script : script_unix;
  183. endian : endian_little;
  184. alignment :
  185. (
  186. procalign : 4;
  187. loopalign : 4;
  188. jumpalign : 0;
  189. constalignmin : 0;
  190. constalignmax : 1;
  191. varalignmin : 0;
  192. varalignmax : 1;
  193. localalignmin : 0;
  194. localalignmax : 1;
  195. recordalignmin : 0;
  196. recordalignmax : 2;
  197. maxCrecordalign : 4
  198. );
  199. first_parm_offset : 8;
  200. stacksize : 262144;
  201. abi : abi_default;
  202. );
  203. system_i386_openbsd_info : tsysteminfo =
  204. (
  205. system : system_i386_OpenBSD;
  206. name : 'OpenBSD for i386';
  207. shortname : 'OpenBSD';
  208. flags : [tf_under_development,tf_files_case_sensitive,tf_use_function_relative_addresses];
  209. cpu : cpu_i386;
  210. unit_env : 'BSDUNITS';
  211. extradefines : 'UNIX;BSD;HASUNIX';
  212. exeext : '';
  213. defext : '.def';
  214. scriptext : '.sh';
  215. smartext : '.sl';
  216. unitext : '.ppu';
  217. unitlibext : '.ppl';
  218. asmext : '.s';
  219. objext : '.o';
  220. resext : '.res';
  221. resobjext : '.or';
  222. sharedlibext : '.so';
  223. staticlibext : '.a';
  224. staticlibprefix : 'libp';
  225. sharedlibprefix : 'lib';
  226. sharedClibext : '.so';
  227. staticClibext : '.a';
  228. staticClibprefix : 'lib';
  229. sharedClibprefix : 'lib';
  230. Cprefix : '_';
  231. newline : #10;
  232. dirsep : '/';
  233. assem : as_gas;
  234. assemextern : as_gas;
  235. link : nil;
  236. linkextern : nil;
  237. ar : ar_gnu_ar;
  238. res : res_none;
  239. dbg : dbg_stabs;
  240. script : script_unix;
  241. endian : endian_little;
  242. alignment :
  243. (
  244. procalign : 4;
  245. loopalign : 4;
  246. jumpalign : 0;
  247. constalignmin : 0;
  248. constalignmax : 1;
  249. varalignmin : 0;
  250. varalignmax : 1;
  251. localalignmin : 0;
  252. localalignmax : 1;
  253. recordalignmin : 0;
  254. recordalignmax : 2;
  255. maxCrecordalign : 4
  256. );
  257. first_parm_offset : 8;
  258. stacksize : 262144;
  259. abi : abi_default;
  260. );
  261. system_m68k_netbsd_info : tsysteminfo =
  262. (
  263. system : system_m68k_NetBSD;
  264. name : 'NetBSD for m68k';
  265. shortname : 'NetBSD';
  266. flags : [tf_under_development,tf_files_case_sensitive,tf_use_function_relative_addresses];
  267. cpu : cpu_m68k;
  268. unit_env : 'BSDUNITS';
  269. extradefines : 'UNIX;BSD;HASUNIX';
  270. exeext : '';
  271. defext : '.def';
  272. scriptext : '.sh';
  273. smartext : '.sl';
  274. unitext : '.ppu';
  275. unitlibext : '.ppl';
  276. asmext : '.s';
  277. objext : '.o';
  278. resext : '.res';
  279. resobjext : '.or';
  280. sharedlibext : '.so';
  281. staticlibext : '.a';
  282. staticlibprefix : 'libp';
  283. sharedlibprefix : 'lib';
  284. sharedClibext : '.so';
  285. staticClibext : '.a';
  286. staticClibprefix : 'lib';
  287. sharedClibprefix : 'lib';
  288. Cprefix : '';
  289. newline : #10;
  290. dirsep : '/';
  291. assem : as_gas;
  292. assemextern : as_gas;
  293. link : nil;
  294. linkextern : nil;
  295. ar : ar_gnu_ar;
  296. res : res_none;
  297. dbg : dbg_stabs;
  298. script : script_unix;
  299. endian : endian_big;
  300. alignment :
  301. (
  302. procalign : 4;
  303. loopalign : 4;
  304. jumpalign : 0;
  305. constalignmin : 0;
  306. constalignmax : 1;
  307. varalignmin : 0;
  308. varalignmax : 1;
  309. localalignmin : 0;
  310. localalignmax : 1;
  311. recordalignmin : 0;
  312. recordalignmax : 2;
  313. maxCrecordalign : 4
  314. );
  315. first_parm_offset : 8;
  316. stacksize : 262144;
  317. abi : abi_default;
  318. );
  319. system_powerpc_netbsd_info : tsysteminfo =
  320. (
  321. system : system_powerpc_netbsd;
  322. name : 'NetBSD for PowerPC';
  323. shortname : 'NetBSD';
  324. flags : [tf_under_development,tf_files_case_sensitive,tf_use_function_relative_addresses];
  325. cpu : cpu_powerpc;
  326. unit_env : '';
  327. extradefines : 'UNIX;BSD;HASUNIX';
  328. exeext : '';
  329. defext : '.def';
  330. scriptext : '.sh';
  331. smartext : '.sl';
  332. unitext : '.ppu';
  333. unitlibext : '.ppl';
  334. asmext : '.s';
  335. objext : '.o';
  336. resext : '.res';
  337. resobjext : '.or';
  338. sharedlibext : '.so';
  339. staticlibext : '.s';
  340. staticlibprefix : 'libp';
  341. sharedlibprefix : 'lib';
  342. sharedClibext : '.so';
  343. staticClibext : '.a';
  344. staticClibprefix : 'lib';
  345. sharedClibprefix : 'lib';
  346. Cprefix : '';
  347. newline : #10;
  348. dirsep : '/';
  349. assem : as_gas;
  350. assemextern : as_gas;
  351. link : nil;
  352. linkextern : nil;
  353. ar : ar_gnu_ar;
  354. res : res_none;
  355. dbg : dbg_stabs;
  356. script : script_unix;
  357. endian : endian_big;
  358. alignment :
  359. (
  360. procalign : 4;
  361. loopalign : 4;
  362. jumpalign : 0;
  363. constalignmin : 0;
  364. constalignmax : 4;
  365. varalignmin : 0;
  366. varalignmax : 4;
  367. localalignmin : 0;
  368. localalignmax : 4;
  369. recordalignmin : 0;
  370. recordalignmax : 2;
  371. maxCrecordalign : 4 // should be 8 probably
  372. );
  373. first_parm_offset : 8;
  374. stacksize : 32*1024*1024;
  375. { abi_powerpc_sysv doesn't work yet }
  376. abi : abi_powerpc_aix;
  377. );
  378. system_powerpc_darwin_info : tsysteminfo =
  379. (
  380. system : system_powerpc_darwin;
  381. name : 'Darwin for PowerPC';
  382. shortname : 'Darwin';
  383. flags : [tf_p_ext_support,tf_files_case_sensitive,tf_smartlink_sections,tf_dwarf_relative_addresses,tf_dwarf_only_local_labels];
  384. cpu : cpu_powerpc;
  385. unit_env : 'BSDUNITS';
  386. extradefines : 'UNIX;BSD;HASUNIX';
  387. exeext : '';
  388. defext : '.def';
  389. scriptext : '.sh';
  390. smartext : '.sl';
  391. unitext : '.ppu';
  392. unitlibext : '.ppl';
  393. asmext : '.s';
  394. objext : '.o';
  395. resext : '.res';
  396. resobjext : '.or';
  397. sharedlibext : '.dylib';
  398. staticlibext : '.a';
  399. staticlibprefix : 'libp';
  400. sharedlibprefix : 'lib';
  401. sharedClibext : '.dylib';
  402. staticClibext : '.a';
  403. staticClibprefix : 'lib';
  404. sharedClibprefix : 'lib';
  405. Cprefix : '_';
  406. newline : #10;
  407. dirsep : '/';
  408. assem : as_darwin;
  409. assemextern : as_darwin;
  410. link : nil;
  411. linkextern : nil;
  412. ar : ar_gnu_ar;
  413. res : res_none;
  414. dbg : dbg_stabs;
  415. script : script_unix;
  416. endian : endian_big;
  417. alignment :
  418. (
  419. procalign : 16;
  420. loopalign : 4;
  421. jumpalign : 0;
  422. constalignmin : 0;
  423. constalignmax : 4;
  424. varalignmin : 0;
  425. varalignmax : 4;
  426. localalignmin : 0;
  427. localalignmax : 4;
  428. recordalignmin : 0;
  429. recordalignmax : 2;
  430. maxCrecordalign : 4
  431. );
  432. first_parm_offset : 24;
  433. stacksize : 262144;
  434. abi : abi_powerpc_aix;
  435. );
  436. system_i386_darwin_info : tsysteminfo =
  437. (
  438. system : system_i386_darwin;
  439. name : 'Darwin for i386';
  440. shortname : 'Darwin';
  441. flags : [tf_p_ext_support,tf_files_case_sensitive,tf_smartlink_sections,tf_dwarf_relative_addresses,tf_dwarf_only_local_labels];
  442. cpu : cpu_i386;
  443. unit_env : 'BSDUNITS';
  444. extradefines : 'UNIX;BSD;HASUNIX';
  445. exeext : '';
  446. defext : '.def';
  447. scriptext : '.sh';
  448. smartext : '.sl';
  449. unitext : '.ppu';
  450. unitlibext : '.ppl';
  451. asmext : '.s';
  452. objext : '.o';
  453. resext : '.res';
  454. resobjext : '.or';
  455. sharedlibext : '.dylib';
  456. staticlibext : '.a';
  457. staticlibprefix : 'libp';
  458. sharedlibprefix : 'lib';
  459. sharedClibext : '.dylib';
  460. staticClibext : '.a';
  461. staticClibprefix : 'lib';
  462. sharedClibprefix : 'lib';
  463. Cprefix : '_';
  464. newline : #10;
  465. dirsep : '/';
  466. assem : as_darwin;
  467. assemextern : as_darwin;
  468. link : nil;
  469. linkextern : nil;
  470. ar : ar_gnu_ar;
  471. res : res_none;
  472. dbg : dbg_stabs;
  473. script : script_unix;
  474. endian : endian_little;
  475. alignment :
  476. (
  477. procalign : 16;
  478. loopalign : 4;
  479. jumpalign : 0;
  480. constalignmin : 0;
  481. constalignmax : 8;
  482. varalignmin : 0;
  483. varalignmax : 16;
  484. localalignmin : 0;
  485. localalignmax : 8;
  486. recordalignmin : 0;
  487. recordalignmax : 16;
  488. maxCrecordalign : 16
  489. );
  490. first_parm_offset : 8;
  491. stacksize : 262144;
  492. abi : abi_default;
  493. );
  494. system_powerpc64_darwin_info : tsysteminfo =
  495. (
  496. system : system_powerpc64_darwin;
  497. name : 'Darwin for PowerPC64';
  498. shortname : 'Darwin';
  499. flags : [tf_p_ext_support,tf_files_case_sensitive,tf_smartlink_sections,tf_dwarf_relative_addresses,tf_dwarf_only_local_labels];
  500. cpu : cpu_powerpc64;
  501. unit_env : 'BSDUNITS';
  502. extradefines : 'UNIX;BSD;HASUNIX';
  503. exeext : '';
  504. defext : '.def';
  505. scriptext : '.sh';
  506. smartext : '.sl';
  507. unitext : '.ppu';
  508. unitlibext : '.ppl';
  509. asmext : '.s';
  510. objext : '.o';
  511. resext : '.res';
  512. resobjext : '.or';
  513. sharedlibext : '.dylib';
  514. staticlibext : '.a';
  515. staticlibprefix : 'libp';
  516. sharedlibprefix : 'lib';
  517. sharedClibext : '.dylib';
  518. staticClibext : '.a';
  519. staticClibprefix : 'lib';
  520. sharedClibprefix : 'lib';
  521. Cprefix : '_';
  522. newline : #10;
  523. dirsep : '/';
  524. assem : as_darwin;
  525. assemextern : as_darwin;
  526. link : nil;
  527. linkextern : nil;
  528. ar : ar_gnu_ar;
  529. res : res_none;
  530. dbg : dbg_dwarf2;
  531. script : script_unix;
  532. endian : endian_big;
  533. alignment :
  534. (
  535. procalign : 16;
  536. loopalign : 4;
  537. jumpalign : 0;
  538. constalignmin : 4;
  539. constalignmax : 8;
  540. varalignmin : 4;
  541. varalignmax : 8;
  542. localalignmin : 4;
  543. localalignmax : 8;
  544. recordalignmin : 0;
  545. recordalignmax : 2;
  546. maxCrecordalign : 8
  547. );
  548. first_parm_offset : 48;
  549. stacksize : 262144;
  550. abi : abi_powerpc_aix;
  551. );
  552. implementation
  553. initialization
  554. {$ifdef cpu86}
  555. {$ifdef FreeBSD}
  556. set_source_info(system_i386_FreeBSD_info);
  557. {$endif}
  558. {$ifdef NetBSD}
  559. set_source_info(system_i386_NetBSD_info);
  560. {$endif}
  561. {$ifdef OpenBSD}
  562. set_source_info(system_i386_NetBSD_info);
  563. {$endif}
  564. {$ifdef Darwin}
  565. set_source_info(system_i386_Darwin_info);
  566. {$endif Darwin}
  567. {$endif cpu86}
  568. {$ifdef cpux86_64}
  569. {$ifdef FreeBSD}
  570. set_source_info(system_x86_64_FreeBSD_info);
  571. {$endif}
  572. {$endif}
  573. {$ifdef cpu68}
  574. {$ifdef NetBSD}
  575. set_source_info(system_m68k_NetBSD_info);
  576. {$endif NetBSD}
  577. {$endif cpu68}
  578. {$ifdef cpupowerpc32}
  579. {$ifdef Darwin}
  580. set_source_info(system_powerpc_darwin_info);
  581. {$endif Darwin}
  582. {$ifdef NetBSD}
  583. set_source_info(system_powerpc_netbsd_info);
  584. {$endif}
  585. {$endif cpupowerpc32}
  586. {$ifdef cpupowerpc64}
  587. {$ifdef Darwin}
  588. set_source_info(system_powerpc64_darwin_info);
  589. {$endif Darwin}
  590. {$endif powerpc64}
  591. end.