OSDN Git Service

2007-04-20 Pascal Obry <obry@adacore.com>
[pf3gnuchains/gcc-fork.git] / gcc / ada / adaint.h
index ee830e9..131fe1f 100644 (file)
@@ -6,7 +6,7 @@
  *                                                                          *
  *                              C Header File                               *
  *                                                                          *
- *          Copyright (C) 1992-2005 Free Software Foundation, Inc.          *
+ *          Copyright (C) 1992-2007, Free Software Foundation, Inc.         *
  *                                                                          *
  * GNAT is free software;  you can  redistribute it  and/or modify it under *
  * terms of the  GNU General Public License as published  by the Free Soft- *
  *                                                                          *
  ****************************************************************************/
 
+#include <sys/stat.h>
 #include <stdio.h>
+
+#ifdef _WIN32
+#include "mingw32.h"
+#endif
+
 #include <dirent.h>
 
+/*  Constants used for the form parameter encoding values  */
+#define Encoding_UTF8 0
+#define Encoding_8bits 1
+
 typedef long OS_Time; /* Type corresponding to GNAT.OS_Lib.OS_Time */
 
 extern int    __gnat_max_path_len;
-extern void   __gnat_to_gm_time                           (OS_Time *, int *,
-                                                   int *, int *,
-                                                   int *, int *,
-                                                   int *);
+extern OS_Time __gnat_current_time                (void);
+extern void   __gnat_to_gm_time                           (OS_Time *, int *, int *,
+                                                   int *, int *,
+                                                   int *, int *);
 extern int    __gnat_get_maximum_file_name_length  (void);
 extern int    __gnat_get_switches_case_sensitive   (void);
 extern int    __gnat_get_file_names_case_sensitive (void);
@@ -60,6 +70,9 @@ extern int    __gnat_open_new_temp               (char *, int);
 extern int    __gnat_mkdir                        (char *);
 extern int    __gnat_stat                         (char *,
                                                    struct stat *);
+extern FILE  *__gnat_fopen                        (char *, char *, int);
+extern FILE  *__gnat_freopen                      (char *, char *, FILE *,
+                                                   int);
 extern int    __gnat_open_read                     (char *, int);
 extern int    __gnat_open_rw                       (char *, int);
 extern int    __gnat_open_create                   (char *, int);
@@ -68,7 +81,9 @@ extern int    __gnat_open_append                   (char *, int);
 extern long   __gnat_file_length                   (int);
 extern long   __gnat_named_file_length             (char *);
 extern void   __gnat_tmp_name                     (char *);
-extern char  *__gnat_readdir                       (DIR *, char *);
+extern DIR   *__gnat_opendir                       (char *);
+extern char  *__gnat_readdir                       (DIR *, char *, int *);
+extern int    __gnat_closedir                      (DIR *);
 extern int    __gnat_readdir_is_thread_safe        (void);
 
 extern OS_Time __gnat_file_time_name                (char *);
@@ -76,8 +91,7 @@ extern OS_Time __gnat_file_time_fd                  (int);
 /* return -1 in case of error */
 
 extern void   __gnat_set_file_time_name                   (char *, time_t);
-extern void   __gnat_get_env_value_ptr             (char *, int *,
-                                                   char **);
+
 extern int    __gnat_dup                          (int);
 extern int    __gnat_dup2                         (int, int);
 extern int    __gnat_file_exists                  (char *);
@@ -98,7 +112,6 @@ extern char  *__gnat_locate_exec_on_path        (char *);
 extern char  *__gnat_locate_regular_file           (char *, char *);
 extern void   __gnat_maybe_glob_args               (int *, char ***);
 extern void   __gnat_os_exit                      (int);
-extern void   __gnat_set_env_value                (char *, char *);
 extern char  *__gnat_get_libraries_from_registry   (void);
 extern int    __gnat_to_canonical_file_list_init   (char *, int);
 extern char  *__gnat_to_canonical_file_list_next   (void);
@@ -109,7 +122,7 @@ extern char  *__gnat_to_host_dir_spec              (char *, int);
 extern char  *__gnat_to_host_file_spec             (char *);
 extern char  *__gnat_to_canonical_path_spec       (char *);
 extern void   __gnat_adjust_os_resource_limits    (void);
-extern void   convert_addresses                           (void *, int,
+extern void   convert_addresses                           (const char *, void *, int,
                                                    void *, int *);
 extern int    __gnat_copy_attribs                 (char *, char *, int);
 extern int    __gnat_feof                         (FILE *);
@@ -152,6 +165,9 @@ extern int    __gnat_set_close_on_exec                 (int, int);
 extern int    __gnat_dup                          (int);
 extern int    __gnat_dup2                         (int, int);
 
+extern void   __gnat_os_filename                   (char *, char *, char *,
+                                                   int *, char *, int *);
+
 #ifdef __MINGW32__
 extern void   __gnat_plist_init                    (void);
 #endif
@@ -162,9 +178,7 @@ extern void   __gnat_plist_init                    (void);
 #endif
 
 /* This function returns the version of GCC being used.  Here it's GCC 3.  */
-extern int get_gcc_version                  (void);
+extern int    get_gcc_version                      (void);
 
-/* This function offers a hook for libgnarl to set the
-   locking subprograms for libgcc_eh. */
-extern void __gnatlib_install_locks         (void (*) (void),
-                                             void (*) (void));
+extern int    __gnat_binder_supports_auto_init     (void);
+extern int    __gnat_sals_init_using_constructors  (void);