dwindows: win/dw.c comparison

comparison win/dw.c @ 1090:b905fd8e7fd1

Use _tempnam() on Windows instead of tmpnam() for dw_*_from_data() functions. This overcomes bug in Windows tmpnam() which does not always generate a temporary file name in a directory that can written to. Modified dwtest.c to handle file errors more gracefully.

author	mhessling@81767d24-ef19-dc11-ae90-00e081727c95
date	Tue, 28 Jun 2011 23:38:59 +0000
parents	fa219e997fb8
children	03cd2f3e929d

comparison

equal deleted inserted replaced

-:b58032a619b9
+:b905fd8e7fd1
 #define IS_XPPLUS (dwComctlVer >= PACKVERSION(5,82))
 #ifndef MIN
 #define MIN(a, b) (((a) < (b)) ? (a) : (b))
 #endif
+/*
+* For the dw*from_data() functions, a temporary file is required to write
+* the contents of the image to so it can be loaded by the Win32 API
+* We use _tempnam() which uses TMP env variable by default. It can be passed
+* an alternate temporary directory if TMP is not set, so we get the value
+* of TEMP and store it here.
+*/
+static char _dw_alternate_temp_dir[MAX_PATH];
 FILE *dbgfp = NULL;
 int main(int argc, char *argv[]);
 int API dw_init(int newthread, int argc, char *argv[])
 {
 WNDCLASS wc;
 int z;
 INITCOMMONCONTROLSEX icc;
-char *fname;
+char *fname, *alttmpdir;
 HFONT oldfont;
 /* Initialize our thread local storage */
 _foreground = TlsAlloc();
 _background = TlsAlloc();
 if ( (fname = getenv( "DWINDOWS_DEBUGFILE" ) ) != NULL )
 {
 dbgfp = fopen( fname, "w" );
 }
 /*
+* Get an alternate temporary directory in case TMP doesn't exist
+*/
+if ( (alttmpdir = getenv( "TEMP" ) ) == NULL )
+{
+strcpy( _dw_alternate_temp_dir, "c:\\tmp" );
+}
+else
+{
+strcpy( _dw_alternate_temp_dir, alttmpdir );
+}
+/*
 * Get screen size. Used to make calls to dw_screen_width()
 * and dw_screen-height() quicker, but to alos limit the
 * default size of windows.
 */
 screenx = GetSystemMetrics(SM_CXSCREEN);
 int Italic, Bold;
 char *myFontName;
 int z, size = 9;
 LOGFONT lf;
 HDC hdc = GetDC(handle);
 for(z=0;z<strlen(fontname);z++)
 {
 if(fontname[z]=='.')
 break;
 }
 *           fontname: Font name in Dynamic Windows format.
 */
 void API dw_font_set_default(char *fontname)
 {
 HFONT oldfont = _DefaultFont;
 _DefaultFont = _acquire_font(HWND_DESKTOP, fontname);
 if(oldfont)
 {
 DeleteObject(oldfont);
 }
 if ( thisbox && thisbox->grouphwnd != (HWND)NULL )
 {
 handle = thisbox->grouphwnd;
 }
 }
 /* This needs to be after we get the correct handle */
 oldfont = (HFONT)SendMessage(handle, WM_GETFONT, 0, 0);
 hfont = _acquire_font(handle, fontname);
 if (fontname)
 {
 if(cinfo)
 {
 strcpy(cinfo->fontname, fontname);
 CHOOSEFONT cf = { 0 };
 LOGFONT lf = { 0 };
 char *str = NULL;
 char *bold = "";
 char *italic = "";
 if(currfont && *currfont)
 lf = _get_logfont(NULL, currfont);
 cf.lStructSize = sizeof(cf);
 cf.Flags = CF_SCREENFONTS | CF_INITTOLOGFONTSTRUCT;
 cf.lpLogFont = &lf;
 if(ChooseFont(&cf))
 {
 str = (char *)malloc( 100 );
 if ( str )
 {
 int height;
 HDC hdc = GetDC(NULL);
 if ( lf.lfWeight > FW_MEDIUM )
 bold = " Bold";
 if ( lf.lfItalic )
 italic = " Italic";
 height = MulDiv(abs(lf.lfHeight), 72,  GetDeviceCaps (hdc, LOGPIXELSY));
 str = (char *)malloc( 100 );
 if ( str )
 {
 int height;
 HDC hdc = GetDC(handle);
 if ( lf.lfWeight > FW_MEDIUM )
 bold = " Bold";
 if ( lf.lfItalic )
 italic = " Italic";
 height = MulDiv(abs(lf.lfHeight), 72,  GetDeviceCaps (hdc, LOGPIXELSY));
 FILE *fp;
 int windowtype;
 if ( !(bubble = calloc(1, sizeof(BubbleButton))) )
 return 0;
-file = tmpnam( NULL );
+file = _tempnam( _dw_alternate_temp_dir, "dw" );
 if ( file != NULL )
 {
 fp = fopen( file, "wb" );
 if ( fp != NULL )
 {
 }
 }
 else
 {
 unlink( file );
+free( file );
 return 0;
 }
 unlink( file );
+free( file );
 }
 tmp = CreateWindow( BUTTONCLASSNAME,
 "",
 WS_CHILD | BS_PUSHBUTTON |
 hbitmap = LoadBitmap( DWInstance, MAKEINTRESOURCE(id) );
 icon = LoadImage( DWInstance, MAKEINTRESOURCE(id), IMAGE_ICON, 0, 0, LR_SHARED );
 }
 else if (data)
 {
-file = tmpnam( NULL );
+file = _tempnam( _dw_alternate_temp_dir, "dw" );
 if ( file != NULL )
 {
 fp = fopen( file, "wb" );
 if ( fp != NULL )
 {
 icon = LoadImage( NULL, file, IMAGE_ICON, 0, 0, LR_LOADFROMFILE );
 }
 else
 {
 unlink( file );
+free( file );
 return;
 }
 unlink( file );
+free( file );
 }
 if (icon == 0 && hbitmap == 0)
 return;
 }
 thisbox = (Box *)GetWindowLongPtr(box, GWLP_USERDATA);
 if(thisbox)
 {
 int z, x = 0;
 Item *tmpitem, *thisitem = thisbox->items;
 /* Do some sanity bounds checking */
 if(index < 0)
 index = 0;
 if(index > thisbox->count)
 index = thisbox->count;
 /*
 * Pack windows (widgets) into a box at an arbitrary location.
 * Parameters:
 *       box: Window handle of the box to be packed into.
 *       item: Window handle of the item to be back.
 *       index: 0 based index of packed items.
 *       width: Width in pixels of the item or -1 to be self determined.
 *       height: Height in pixels of the item or -1 to be self determined.
 *       hsize: TRUE if the window (widget) should expand horizontally to fill space given.
 *       vsize: TRUE if the window (widget) should expand vertically to fill space given.
 *       pad: Number of pixels of padding around the item.
 *       vsize: TRUE if the window (widget) should expand vertically to fill space given.
 *       pad: Number of pixels of padding around the item.
 */
 void API dw_box_pack_start(HWND box, HWND item, int width, int height, int hsize, int vsize, int pad)
 {
 /* 65536 is the table limit on GTK...
 * seems like a high enough value we will never hit it here either.
 */
 _dw_box_pack(box, item, 65536, width, height, hsize, vsize, pad, "dw_box_pack_start()");
 }
 char *file;
 FILE *fp;
 if ( !data )
 return 0;
-file = tmpnam( NULL );
+file = _tempnam( _dw_alternate_temp_dir, "dw" );
 if ( file != NULL )
 {
 fp = fopen( file, "wb" );
 if ( fp != NULL )
 {
 icon = LoadImage( NULL, file, IMAGE_ICON, 0, 0, LR_LOADFROMFILE );
 }
 else
 {
 unlink( file );
+free( file );
 return 0;
 }
 unlink( file );
+free( file );
 }
 return (HICN)icon;
 }
 /*
 hdc = GetDC(handle);
 pixmap->handle = handle;
-file = tmpnam( NULL );
+file = _tempnam( _dw_alternate_temp_dir, "dw" );
 if ( file != NULL )
 {
 fp = fopen( file, "wb" );
 if ( fp != NULL )
 {
 pixmap->depth = _read_bitmap_header(file);
 }
 else
 {
 unlink( file );
+free( file );
 free( pixmap );
 return NULL;
 }
 unlink( file );
+free( file );
 }
 if ( !pixmap->hbm )
 {
 free( pixmap );

Mercurial > dwindows

comparison win/dw.c @ 1090:b905fd8e7fd1