[sql] Import SQLite 3.17.0.

third_party/sqlite/src/src/test_windirent.c

 /*
 ** 2015 November 30
 **
 ** The author disclaims copyright to this source code.  In place of
 ** a legal notice, here is a blessing:
 **
 **    May you do good and not evil.
 **    May you find forgiveness for yourself and forgive others.
 **    May you share freely, never taking more than you give.
 **
 *************************************************************************
 ** This file contains code to implement most of the opendir() family of
 ** POSIX functions on Win32 using the MSVCRT.
 */
 
 #if defined(_WIN32) && defined(_MSC_VER)
 
 #include "test_windirent.h"
 
 /*
+** Implementation of the POSIX getenv() function using the Win32 API.
+** This function is not thread-safe.
+*/
+const char *windirent_getenv(
+  const char *name
+){
+  static char value[32768]; /* Maximum length, per MSDN */
+  DWORD dwSize = sizeof(value) / sizeof(char); /* Size in chars */
+  DWORD dwRet; /* Value returned by GetEnvironmentVariableA() */
+
+  memset(value, 0, sizeof(value));
+  dwRet = GetEnvironmentVariableA(name, value, dwSize);
+  if( dwRet==0 || dwRet>dwSize ){
+    /*
+    ** The function call to GetEnvironmentVariableA() failed -OR-
+    ** the buffer is not large enough.  Either way, return NULL.
+    */
+    return 0;
+  }else{
+    /*
+    ** The function call to GetEnvironmentVariableA() succeeded
+    ** -AND- the buffer contains the entire value.
+    */
+    return value;
+  }
+}
+
+/*
 ** Implementation of the POSIX opendir() function using the MSVCRT.
 */
 LPDIR opendir(
   const char *dirname
 ){
   struct _finddata_t data;
   LPDIR dirp = (LPDIR)sqlite3_malloc(sizeof(DIR));
   SIZE_T namesize = sizeof(data.name) / sizeof(data.name[0]);
 
   if( dirp==NULL ) return NULL;
   memset(dirp, 0, sizeof(DIR));
 
   /* TODO: Remove this if Unix-style root paths are not used. */
   if( sqlite3_stricmp(dirname, "/")==0 ){
-    dirname = getenv("SystemDrive");
+    dirname = windirent_getenv("SystemDrive");
   }
 
+  memset(&data, 0, sizeof(struct _finddata_t));
   _snprintf(data.name, namesize, "%s\\*", dirname);
   dirp->d_handle = _findfirst(data.name, &data);
 
   if( dirp->d_handle==BAD_INTPTR_T ){
     closedir(dirp);
     return NULL;
   }
 
-  /* TODO: Remove this block to allow hidden and system files. */
-  if( data.attrib&_A_HIDDEN || data.attrib&_A_SYSTEM ){
+  /* TODO: Remove this block to allow hidden and/or system files. */
+  if( is_filtered(data) ){
+next:
+
+    memset(&data, 0, sizeof(struct _finddata_t));
     if( _findnext(dirp->d_handle, &data)==-1 ){
       closedir(dirp);
       return NULL;
     }
+
+    /* TODO: Remove this block to allow hidden and/or system files. */
+    if( is_filtered(data) ) goto next;
   }
 
   dirp->d_first.d_attributes = data.attrib;
   strncpy(dirp->d_first.d_name, data.name, NAME_MAX);
   dirp->d_first.d_name[NAME_MAX] = '\0';
 
   return dirp;
 }
 
 /*
 ** Implementation of the POSIX readdir() function using the MSVCRT.
 */
 LPDIRENT readdir(
   LPDIR dirp
 ){
   struct _finddata_t data;
 
   if( dirp==NULL ) return NULL;
 
   if( dirp->d_first.d_ino==0 ){
     dirp->d_first.d_ino++;
     dirp->d_next.d_ino++;
 
     return &dirp->d_first;
   }
 
 next:
 
+  memset(&data, 0, sizeof(struct _finddata_t));
   if( _findnext(dirp->d_handle, &data)==-1 ) return NULL;
 
-  /* TODO: Remove this block to allow hidden and system files. */
-  if( data.attrib&_A_HIDDEN ) goto next;
-  if( data.attrib&_A_SYSTEM ) goto next;
+  /* TODO: Remove this block to allow hidden and/or system files. */
+  if( is_filtered(data) ) goto next;
 
   dirp->d_next.d_ino++;
   dirp->d_next.d_attributes = data.attrib;
   strncpy(dirp->d_next.d_name, data.name, NAME_MAX);
   dirp->d_next.d_name[NAME_MAX] = '\0';
 
   return &dirp->d_next;
 }
 
 /*
@@ skipping 16 matching lines @@
     entry->d_attributes = dirp->d_first.d_attributes;
     strncpy(entry->d_name, dirp->d_first.d_name, NAME_MAX);
     entry->d_name[NAME_MAX] = '\0';
 
     *result = entry;
     return 0;
   }
 
 next:
 
+  memset(&data, 0, sizeof(struct _finddata_t));
   if( _findnext(dirp->d_handle, &data)==-1 ){
     *result = NULL;
     return ENOENT;
   }
 
-  /* TODO: Remove this block to allow hidden and system files. */
-  if( data.attrib&_A_HIDDEN ) goto next;
-  if( data.attrib&_A_SYSTEM ) goto next;
+  /* TODO: Remove this block to allow hidden and/or system files. */
+  if( is_filtered(data) ) goto next;
 
   entry->d_ino = (ino_t)-1; /* not available */
   entry->d_attributes = data.attrib;
   strncpy(entry->d_name, data.name, NAME_MAX);
   entry->d_name[NAME_MAX] = '\0';
 
   *result = entry;
   return 0;
 }
 
 /*
 ** Implementation of the POSIX closedir() function using the MSVCRT.
 */
 INT closedir(
   LPDIR dirp
 ){
   INT result = 0;
 
   if( dirp==NULL ) return EINVAL;
 
   if( dirp->d_handle!=NULL_INTPTR_T && dirp->d_handle!=BAD_INTPTR_T ){
     result = _findclose(dirp->d_handle);
   }
 
   sqlite3_free(dirp);
   return result;
 }
 
 #endif /* defined(WIN32) && defined(_MSC_VER) */