mysql3.pp 5.7 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102
  1. unit mysql3;
  2. {$undef use_mysql_321} { if undefined, use mysql 3.23 interface }
  3. {
  4. Import unit for the mysql header files.
  5. Translated form the original mysql.h by Michael Van Canneyt
  6. ([email protected])
  7. updated to mysql version 3.23 header files by Bernhard Steffen
  8. ([email protected])
  9. split into mysql/mysqldyn libraries by Bram Kuijvenhoven (Hexis BV, The Netherlands)
  10. }
  11. {$mode objfpc}{$h+}
  12. {$macro on}
  13. {$r+,i+,o+}
  14. interface
  15. uses mysql3_com, mysql3_version;
  16. {$IFDEF Unix}
  17. {$DEFINE extdecl:=cdecl}
  18. const
  19. Mysqllib = 'mysqlclient';
  20. {$ENDIF}
  21. {$IFDEF Windows}
  22. {$DEFINE extdecl:=stdcall}
  23. const
  24. Mysqllib = 'libmysql';
  25. {$ENDIF}
  26. {$ifndef Windows}
  27. {$linklib c}
  28. {$linklib m}
  29. {$linklib mysqlclient}
  30. {$endif}
  31. {$packrecords C}
  32. {$i mysql3types.inc}
  33. Function mysql_num_rows (res : PMYSQL_RES) : my_ulonglong; extdecl; external mysqllib;
  34. Function mysql_num_fields(res : PMYSQL_RES) : Cardinal; extdecl; external mysqllib;
  35. Function mysql_eof(res : PMYSQL_RES) : my_bool; extdecl; external mysqllib;
  36. Function mysql_fetch_field_direct(res : PMYSQL_RES; fieldnr : Cardinal) : PMYSQL_FIELD; extdecl; external mysqllib;
  37. Function mysql_fetch_fields(res : PMYSQL_RES) : PMYSQL_FIELD; extdecl; external mysqllib;
  38. Function mysql_row_tell(res : PMYSQL_RES) : PMYSQL_ROWS; extdecl; external mysqllib;
  39. Function mysql_field_tell(res : PMYSQL_RES) : Cardinal; extdecl; external mysqllib;
  40. Function mysql_affected_rows(mysql : PMYSQL): my_ulonglong; extdecl; external mysqllib;
  41. Function mysql_insert_id(mysql : PMYSQL): my_ulonglong; extdecl; external mysqllib;
  42. Function mysql_errno(mysql : PMYSQL) : Cardinal; extdecl; external mysqllib;
  43. Function mysql_info(mysql : PMYSQL): Pchar; extdecl; external mysqllib;
  44. Function mysql_thread_id(mysql : PMYSQL) : ptruint; extdecl; external mysqllib;
  45. Function mysql_error(mysql : PMYSQL) : pchar; extdecl; external mysqllib;
  46. function mysql_init(mysql: PMYSQL) : PMYSQL;extdecl; external mysqllib name 'mysql_init';
  47. function mysql_connect (mysql : PMYSQL; host,user,passwd: pchar) : PMYSQL;extdecl; external mysqllib name 'mysql_connect';
  48. function mysql_real_connect (mysql : PMYSQL; const host,user,passwd : pchar;
  49. port : cardinal;
  50. unix_socket : pchar;
  51. clientflag : cardinal) : PMYSQL;extdecl; external mysqllib;
  52. function mysql_close(sock : PMYSQL) : longint ;extdecl; external mysqllib name 'mysql_close';
  53. function mysql_select_db(MYSQL : PMYSQL; db : Pchar) : longint;extdecl; external mysqllib name 'mysql_select_db';
  54. function mysql_query(mysql : PMYSQL; q : pchar) : longint;extdecl; external mysqllib name 'mysql_query';
  55. function mysql_real_query(mysql : PMYSQL; q : Pchar; length : longint) : longint;extdecl; external mysqllib name 'mysql_real_query';
  56. function mysql_create_db(mysql : PMYSQL; db : pchar) : longint;extdecl; external mysqllib name 'mysql_create_db';
  57. Function mysql_drop_db(mysql : PMYSQL; DB : Pchar) : longint;extdecl; external mysqllib name 'mysql_drop_db';
  58. Function mysql_shutdown(mysql : PMYSQL) : longint;extdecl; external mysqllib name 'mysql_shutdown';
  59. Function mysql_dump_debug_info(mysql : PMYSQL) : longint;extdecl; external mysqllib name 'mysql_dump_debug_info';
  60. Function mysql_refresh(mysql : PMYSQL; refresh_options : cardinal) : longint;extdecl; external mysqllib name 'mysql_refresh';
  61. Function mysql_kill(mysql : PMYSQL; pid : Cardinal) : longint;extdecl; external mysqllib name 'mysql_kill';
  62. Function mysql_stat(mysql : PMYSQL) : Pchar;extdecl; external mysqllib name 'mysql_stat';
  63. Function mysql_get_server_info(mysql : PMYSQL) : pchar;extdecl; external mysqllib name 'mysql_get_server_info';
  64. Function mysql_get_client_info : pchar;extdecl; external mysqllib;
  65. Function mysql_get_host_info(mysql : PMYSQL) : pchar;extdecl; external mysqllib name 'mysql_get_host_info';
  66. Function mysql_get_proto_info(mysql : PMYSQL) : Cardinal;extdecl; external mysqllib name 'mysql_get_proto_info';
  67. Function mysql_list_dbs(mysql : PMYSQL;wild : Pchar) : PMYSQL_RES;extdecl; external mysqllib name 'mysql_list_dbs';
  68. Function mysql_list_tables(mysql : PMYSQL;Wild : Pchar) : PMYSQL_RES;extdecl; external mysqllib name 'mysql_list_tables';
  69. Function mysql_list_fields(mysql : PMYSQL; table,wild : pchar) : PMYSQL_RES;extdecl; external mysqllib name 'mysql_list_fields';
  70. Function mysql_list_processes(mysql : PMYSQL) : PMYSQL_RES;extdecl; external mysqllib name 'mysql_list_processes';
  71. Function mysql_store_result(mysql : PMYSQL) : PMYSQL_RES;extdecl; external mysqllib name 'mysql_store_result';
  72. Function mysql_use_result(mysql : PMYSQL) : PMYSQL_RES;extdecl; external mysqllib name 'mysql_use_result';
  73. Procedure mysql_free_result(res : PMYSQL_RES);extdecl; external mysqllib name 'mysql_free_result';
  74. Procedure mysql_data_seek(mysql : PMYSQL_RES; offs : cardinal);extdecl; external mysqllib name 'mysql_data_seek';
  75. Function mysql_row_seek(mysql : PMYSQL_RES; Offs: TMYSQL_ROW_OFFSET): TMYSQL_ROW_OFFSET;extdecl; external mysqllib name 'mysql_row_seek';
  76. Function mysql_field_seek(musql : PMYSQL_RES;offs : TMYSQL_FIELD_OFFSET): TMYSQL_FIELD_OFFSET;extdecl; external mysqllib name 'mysql_field_seek';
  77. function mysql_fetch_row(mysql : PMYSQL_RES) : TMYSQL_ROW;extdecl; external mysqllib name 'mysql_fetch_row';
  78. function mysql_fetch_lengths(mysql : PMYSQL_RES) : PCardinal;extdecl; external mysqllib name 'mysql_fetch_lengths';
  79. function mysql_fetch_field(handle : PMYSQL_RES) : PMYSQL_FIELD;extdecl; external mysqllib name 'mysql_fetch_field';
  80. Function mysql_escape_string(escto,escfrom : pchar; length : Cardinal) : cardinal;extdecl; external mysqllib name 'mysql_escape_string';
  81. Procedure mysql_debug(debug : pchar);extdecl; external mysqllib name 'mysql_debug';
  82. implementation
  83. {$i mysql3impl.inc}
  84. end.