rosapps/sysutils/wmain.c

   1 /* $Id: wmain.c,v 1.1 1999/05/16 07:27:35 ea Exp $
   2  *
   3  * Entry point for programs that use wmain()
   4  */
   5 #include <windows.h>
   6 #include <stdio.h>
   7
   8 int wmain(int argc,wchar_t *argv[]);
   9
  10 wchar_t *
  11 a2w( char * a, wchar_t * w )
  12 {
  13         wchar_t * ww = w;
  14         while (*a) *w++ = (wchar_t) *a++;
  15         *w = 0;
  16         return ww;
  17 }
  18
  19 wchar_t *
  20 fgetws(wchar_t *buf, int bufsize, FILE *file)
  21 {
  22         char * abuf = GlobalAlloc(bufsize,0);
  23         if (!buf)return NULL;
  24         fgets(abuf,bufsize,file);
  25         a2w(abuf,buf);
  26         GlobalFree(abuf);
  27         return buf;
  28 }
  29
  30 int main(int argc, char *argv[])
  31 {
  32         wchar_t ** wargv;
  33         int     i;
  34         int     ec;
  35
  36         wargv = (wchar_t **) GlobalAlloc(
  37                                 sizeof(void*) * argc,
  38                                 0
  39                                 );
  40         for(i=0;i<argc;++i)
  41         {
  42                 wargv[i] = (wchar_t*) GlobalAlloc(
  43                                 sizeof(wchar_t) * (1+lstrlenA(argv[i])),
  44                                 0
  45                                 );
  46                 a2w(argv[i],wargv[i]);
  47         }
  48         wargv[i] = NULL;
  49         ec = wmain(argc,wargv);
  50         for (i=0;wargv[i];++i) GlobalFree(wargv[i]);
  51         return ec;
  52 }