vorbis-tools-1.2.0/oggenc/platform.c

   1 /* OggEnc
   2  **
   3  ** This program is distributed under the GNU General Public License, version 2.
   4  ** A copy of this license is included with this source.
   5  **
   6  ** Copyright 2000, Michael Smith <msmith@xiph.org>
   7  **
   8  ** Portions from Vorbize, (c) Kenneth Arnold <kcarnold-xiph@arnoldnet.net>
   9  ** and libvorbis examples, (c) Monty <monty@xiph.org>
  10  **
  11  ** last mod: $Id: platform.c,v 1.2 2005-06-19 02:52:40+09 blacksword Exp $
  12  **
  13  **/
  14
  15 /* Platform support routines  - win32, OS/2, unix */
  16
  17 #ifdef HAVE_CONFIG_H
  18 #include <config.h>
  19 #endif
  20
  21 #include "platform.h"
  22 #include "encode.h"
  23 #include "i18n.h"
  24 #include <stdlib.h>
  25 #include <ctype.h>
  26 #if defined(_WIN32) || defined(__EMX__) || defined(__WATCOMC__)
  27 #include <fcntl.h>
  28 #include <io.h>
  29 #include <time.h>
  30 #endif
  31
  32 #if defined(_WIN32) && defined(_MSC_VER)
  33
  34 void setbinmode(FILE *f)
  35 {
  36     _setmode( _fileno(f), _O_BINARY );
  37 }
  38 #endif /* win32 */
  39
  40 #ifdef __EMX__
  41 void setbinmode(FILE *f)
  42 {
  43             _fsetmode( f, "b");
  44 }
  45 #endif
  46
  47 #if defined(__WATCOMC__) || defined(__BORLANDC__) || defined(__MINGW32__)
  48 void setbinmode(FILE *f)
  49 {
  50     setmode(fileno(f), O_BINARY);
  51 }
  52 #endif
  53
  54
  55 #if defined(_WIN32) || defined(__EMX__) || defined(__WATCOMC__)
  56 #if     1
  57 #include <windows.h>
  58 void *timer_start(void)
  59 {
  60         DWORD *start = malloc(sizeof(DWORD));
  61         *start   = timeGetTime();
  62         return (void *)start;
  63 }
  64
  65 double timer_time(void *timer)
  66 {
  67         ogg_int64_t     now              = (ogg_int64_t)timeGetTime();
  68         ogg_int64_t     start    = (ogg_int64_t)(*(DWORD*)timer);
  69         if(now<start)
  70                 now     += 0x100000000;
  71         now      = now - start;
  72         if(now)
  73                 return  (double)(now)/1000.0;
  74         else
  75                 return  1;
  76 }
  77
  78
  79 void timer_clear(void *timer)
  80 {
  81         free((int*)timer);
  82 }
  83 #else
  84 void *timer_start(void)
  85 {
  86     time_t *start = malloc(sizeof(time_t));
  87     time(start);
  88     return (void *)start;
  89 }
  90
  91 double timer_time(void *timer)
  92 {
  93     time_t now = time(NULL);
  94     time_t start = *((time_t *)timer);
  95
  96     if(now-start)
  97         return (double)(now-start);
  98     else
  99         return 1; /* To avoid division by zero later, for very short inputs */
 100 }
 101
 102
 103 void timer_clear(void *timer)
 104 {
 105     free((time_t *)timer);
 106 }
 107 #endif
 108
 109 #else /* unix. Or at least win32 */
 110
 111 #include <sys/time.h>
 112 #include <unistd.h>
 113
 114 void *timer_start(void)
 115 {
 116     struct timeval *start = malloc(sizeof(struct timeval));
 117     gettimeofday(start, NULL);
 118     return (void *)start;
 119 }
 120
 121 double timer_time(void *timer)
 122 {
 123     struct timeval now;
 124     struct timeval start = *((struct timeval *)timer);
 125
 126     gettimeofday(&now, NULL);
 127
 128     return (double)now.tv_sec - (double)start.tv_sec +
 129         ((double)now.tv_usec - (double)start.tv_usec)/1000000.0;
 130 }
 131
 132 void timer_clear(void *timer)
 133 {
 134     free((time_t *)timer);
 135 }
 136
 137 #endif
 138
 139 #include <errno.h>
 140 #include <string.h>
 141 #include <sys/types.h>
 142 #include <sys/stat.h>
 143
 144 #ifdef _WIN32
 145
 146 #include <direct.h>
 147
 148 #define PATH_SEPS "/\\"
 149 #define mkdir(x,y) _mkdir((x))
 150
 151 /* MSVC does this, borland doesn't? */
 152 #ifndef __BORLANDC__
 153 #define stat _stat
 154 #endif
 155
 156 #else
 157
 158 #define PATH_SEPS "/"
 159
 160 #endif
 161
 162 int create_directories(char *fn)
 163 {
 164     char *end, *start;
 165     struct stat statbuf;
 166     char *segment = malloc(strlen(fn)+1);
 167
 168     start = fn;
 169 #ifdef _WIN32
 170     if(strlen(fn) >= 3 && isalpha(fn[0]) && fn[1]==':')
 171         start = start+2;
 172 #endif
 173
 174     while((end = strpbrk(start+1, PATH_SEPS)) != NULL)
 175     {
 176         memcpy(segment, fn, end-fn);
 177         segment[end-fn] = 0;
 178
 179         if(stat(segment,&statbuf)) {
 180             if(errno == ENOENT) {
 181                 if(mkdir(segment, 0777)) {
 182                     fprintf(stderr, _("Couldn't create directory \"%s\": %s\n"),
 183                             segment, strerror(errno));
 184                     free(segment);
 185                     return -1;
 186                 }
 187             }
 188             else {
 189                 fprintf(stderr, _("Error checking for existence of directory %s: %s\n"),
 190                             segment, strerror(errno));
 191                 free(segment);
 192                 return -1;
 193             }
 194         }
 195 #if defined(_WIN32) && !defined(__BORLANDC__)
 196         else if(!(_S_IFDIR & statbuf.st_mode)) {
 197 #elif defined(__BORLANDC__)
 198         else if(!(S_IFDIR & statbuf.st_mode)) {
 199 #else
 200         else if(!S_ISDIR(statbuf.st_mode)) {
 201 #endif
 202             fprintf(stderr, _("Error: path segment \"%s\" is not a directory\n"),
 203                     segment);
 204             free(segment);
 205             return -1;
 206         }
 207
 208         start = end+1;
 209     }
 210
 211     free(segment);
 212     return 0;
 213
 214 }
 215
 216
 217